; S+4 Enhanced VX Edition
; the code used to power the se4 pico processor
;
; format: 
; 	[charonic] [parms...] '-' [nasic] [expression]
; val : value 
; var : variable (charonic) note that variables are
;	also flags, e.g. '=' is the equal flag, set after
;	a compare ('c').
; lbl : label number (must be unique)
; trg : target number (one of the elsewhere defined label numbers)
;
l var val - let %1 = %2
u lbl - declare subroutine number %1
t - return from subroutine
o lbl - declare stage number %1
j trg - jump unconditionally to %1
; jumps and branches are like goto or gosub,
; depending on the nature of the target.
; this means that you don't have to think of goto
; or gosub, only of wheter to jump or not.
e - end program cleanly
; '-' is End of File, and fallout exit
r - rest 
; this used to stand for "refresh", as in, refresh screen.
; it really pauses the virtual pico processor... remember
; that it is a burst mode processor, without the r commands,
; it would never stop (until it reached and end), and never
; pause to allow you to read its state.
; in the future, perhaps the actual pauses will be hidden
; in the gfx libs or something. or burst mode will be optional
; e.g. burst, step, or limited burst modes.
;
; simple maths
;
a var val - add %2 to %1
s var val - subtract %2 from %1
;
; boolean stuff
;
c var val - compare %2 with %1
; flags are cleared by default, 
; and set on the following conditions:
;	'=' if equal
;	'>' if %2 > %1 
;	'<' if %2 < % 1
;
b var trg - branch to %2 if %1 is true
n var trg - branch to %2 if %1 is false
;
*
; end of list 
-
; end of file fall thru, just in case
;
--]

