prog8/compiler/examples/stackvmtest.txt

; source code for a stackvm program
; init memory bytes/words/strings
%memory
0400 01 02 03 04 05 06 07 08 09 22 33 44 55 66
0500 1111 2222 3333 4444
1000 "Hello world!\n"
%end_memory
; init global var table with bytes/words/floats/strings
%variables
main.var1    str  "This is main.var1"
main.var2   byte    aa
main.var3  word   ea44
main.var4  float  3.1415927
main.textcolor byte 0
input.prompt  str  "Enter a number: "
input.result  word  0
%end_variables
; instructions and labels
%instructions
    nop
    syscall WRITE_MEMSTR w:1000
loop:
    inc_var main.textcolor
    syscall RANDOM
    syscall RANDOM
    push_var main.textcolor
    syscall GFX_PIXEL
;    syscall WRITE_VAR "input.prompt"
;    push  b:10
;    syscall INPUT_STR
;    pop_var input.result
;    syscall WRITE_VAR "input.result"
;    push b:8d
;    syscall WRITE_CHAR
    jump loop
%end_instructions