SE Basic IV 4.2 Cordelia
Re: SE Basic IV 4.2 Cordelia
Como ya he dicho anteriormente, no se mucho que digamos y menos comparado con los que andan por aquí, pero aún así me parece un proyecto muy recomendable.
Ojalá se anime mas gente a probarlo.
Ojalá se anime mas gente a probarlo.
Re: SE Basic IV 4.2 Cordelia
Definitely looking forward to being able to install this on my ZXUno...
Re: SE Basic IV 4.2 Cordelia
Phase 4 is complete.
- Fixed a RETURN bug.
- Spectrum emulator app.
- Marked UnoDOS 3 entry points.
- Optimized arithmetic module.
- Renamed LN to LOG.
- Added empty comments to remaining modules.
- Keyboard buffer.
- System variable and ORG cleanup.
- Editor cleanup.
- Empty comments to remaining frameworks.
- Extended RUN to work as a file command.
- Overhauled reports.
- Three new command classes and shortened command parameter table.
- Style cleanup.
- Optimized command module.
- Fixed ORG offsets.
- Updated ZCL for 40-bit float / int support.
- Fixed a tokenizer bug.
Re: SE Basic IV 4.2 Cordelia
Phase 5 is complete.
Developer Preview 1 is released:
https://cheveron.github.io/sebasic4/
If you need any help getting started, please ask in this thread.
Developer Preview 1 is released:
https://cheveron.github.io/sebasic4/
If you need any help getting started, please ask in this thread.
Re: SE Basic IV 4.2 Cordelia
hello andy
thanks for your fine Basic interpreter.
creating unstable systems (oscillators) in computers are an interesting thing.
I found an very simple example in rossetacode.org and
i spent some time this Sunday implementing it with SEBASIC.
here you will find the code i have tested.
I am not sure how to do a copy/paste to the speccy, hi hi
for the sake of completeness,
i spent some time tunning the knobs with matlab-octave.
i attach some plots to show the inners of the algorithm
thanks for your basic, i enjoyed it a lot.
zxpope
thanks for your fine Basic interpreter.
creating unstable systems (oscillators) in computers are an interesting thing.
I found an very simple example in rossetacode.org and
i spent some time this Sunday implementing it with SEBASIC.
here you will find the code i have tested.
I am not sure how to do a copy/paste to the speccy, hi hi
Código: Seleccionar todo
100 rem pendulum from http://rossetacode.org
110 let l=0.5
120 let tetha=1
130 let speed=0
140 let g=9.81
150 let k=26
160 let i=0
170 let j=0
210 let x=l*k*sin(tetha)
220 let y=l*k*cos(tetha)
230 let accel=g*sin(tetha)/l/k
240 let speed=speed+accel/k
250 let tetha=tetha+speed
300 let x=16-x
302 let y=8-y
340 print at j,i;" "
350 print at y,x;"*"
350 print at 8,16;"+"
370 let i=x
380 let j=y
400 goto 200
i spent some time tunning the knobs with matlab-octave.
i attach some plots to show the inners of the algorithm
Código: Seleccionar todo
l=0.5
tetha=1
sspeed=0
g=9.81
k=26
for n=[1:k*6]
x=l*k*sin(tetha);
y=l*k*cos(tetha);
accel=g*sin(tetha)/l/k;
sspeed=sspeed+accel/k;
tetha=tetha+sspeed;
end
zxpope
Re: SE Basic IV 4.2 Cordelia
You're welcome. I'm curious as to which version you are using though as the latest build does not support PRINT AT. Instead, you use LOCATE. Also LET is optional (you can leave it out) and you can substitute a single quote (') for REM. As I haven't had any bug reports in since the previous release I'll be doing a new release soon with complete character map support (it's a very minor code change). What this means is that you can access a Chloe VM running on ZEsarUX from the terminal using the --vo curses option. You should also be able to use it from a remote terminal session.zxpope escribió:hello andy Andrew
thanks for your fine Basic interpreter.
Someone should let the RosettaCode.org folks know that it's Sinclair BASIC rather than ZX Spectrum BASIC (most examples should work unmodified on a SAM Coupe, and some simple ones will work on a ZX81, and those that only use integers may even work on the ZX80).
Here's what the code should look like for the current version of SE Basic 4.2:
Código: Seleccionar todo
100 ' pendulum from http://rossetacode.org
110 l=0.5
120 tetha=1
130 speed=0
140 g=9.81
150 k=26
160 i=0
170 j=0
210 x=l*k*sin(tetha)
220 y=l*k*cos(tetha)
230 accel=g*sin(tetha)/l/k
240 speed=speed+accel/k
250 tetha=tetha+speed
300 x=16-x
302 y=8-y
340 locate j,i:print " "
350 locate y,x:print "*"
350 locate 8,16:print "+"
370 i=x
380 j=y
400 goto 200
Re: SE Basic IV 4.2 Cordelia
Experimental app support is done. You can launch an app with RUN "nameofyourprogram".
The first app is a Spectrum emulator. For some reason the font gets corrupted with ZEsarUX but not with RVM so I am looking for people with real Unos to test.
The first app is a Spectrum emulator. For some reason the font gets corrupted with ZEsarUX but not with RVM so I am looking for people with real Unos to test.
Re: SE Basic IV 4.2 Cordelia
Now running on my own development hardware.
- brunosilva
- Mensajes: 312
- Registrado: 18 Jun 2016, 19:54
Re: SE Basic IV 4.2 Cordelia
nice!!!!!!
Re: SE Basic IV 4.2 Cordelia
Now I need to port the Uno dot commands to Chloe apps.