SE Basic IV 4.2 Cordelia

nch
Mensajes: 77
Registrado: 10 Ene 2018, 23:16

Re: SE Basic IV 4.2 Cordelia

Mensaje por nch » 13 Mar 2019, 18:29

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. :enelPC:

kgmcneil
Mensajes: 81
Registrado: 29 Ago 2016, 08:48

Re: SE Basic IV 4.2 Cordelia

Mensaje por kgmcneil » 17 Mar 2019, 12:58

Definitely looking forward to being able to install this on my ZXUno... :plasplas:

Avatar de Usuario
aowen
Mensajes: 178
Registrado: 07 Oct 2015, 13:32

Re: SE Basic IV 4.2 Cordelia

Mensaje por aowen » 18 Mar 2019, 20:02

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.

Avatar de Usuario
aowen
Mensajes: 178
Registrado: 07 Oct 2015, 13:32

Re: SE Basic IV 4.2 Cordelia

Mensaje por aowen » 20 Mar 2019, 23:46

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.

zxpope
Mensajes: 17
Registrado: 02 Ene 2018, 02:12

Re: SE Basic IV 4.2 Cordelia

Mensaje por zxpope » 31 Mar 2019, 16:38

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.
pendulum.png
pendulum.png (14.25 KiB) Visto 9279 veces
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
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

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
pendulum1.png
pendulum2.png
thanks for your basic, i enjoyed it a lot.
zxpope

Avatar de Usuario
aowen
Mensajes: 178
Registrado: 07 Oct 2015, 13:32

Re: SE Basic IV 4.2 Cordelia

Mensaje por aowen » 05 Abr 2019, 12:45

zxpope escribió:hello andy Andrew
thanks for your fine Basic interpreter.
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.

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

Avatar de Usuario
aowen
Mensajes: 178
Registrado: 07 Oct 2015, 13:32

Re: SE Basic IV 4.2 Cordelia

Mensaje por aowen » 09 Abr 2019, 00:05

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.

Avatar de Usuario
aowen
Mensajes: 178
Registrado: 07 Oct 2015, 13:32

Re: SE Basic IV 4.2 Cordelia

Mensaje por aowen » 30 Abr 2019, 00:08

Now running on my own development hardware.

Imagen

Avatar de Usuario
brunosilva
Mensajes: 312
Registrado: 18 Jun 2016, 19:54

Re: SE Basic IV 4.2 Cordelia

Mensaje por brunosilva » 30 Abr 2019, 01:03

nice!!!!!! :)

Avatar de Usuario
aowen
Mensajes: 178
Registrado: 07 Oct 2015, 13:32

Re: SE Basic IV 4.2 Cordelia

Mensaje por aowen » 30 Abr 2019, 11:43

Now I need to port the Uno dot commands to Chloe apps.

Responder