2018-02-25 15:43:00 +00:00
|
|
|
; source code for a tinyvm program
|
|
|
|
%block b1
|
|
|
|
%vardefs
|
2018-02-27 21:16:45 +00:00
|
|
|
var byte teller 1
|
|
|
|
const byte one 1
|
|
|
|
const byte thousand 1000
|
|
|
|
var array_byte newlinestr 1 10
|
2018-02-25 15:43:00 +00:00
|
|
|
%end_vardefs
|
|
|
|
|
|
|
|
%instructions
|
2018-02-27 21:16:45 +00:00
|
|
|
push teller
|
|
|
|
syscall decimalstr_signed
|
|
|
|
syscall printstr
|
|
|
|
push newlinestr
|
|
|
|
syscall printstr
|
|
|
|
back:
|
|
|
|
push teller
|
|
|
|
push one
|
|
|
|
add
|
|
|
|
pop teller
|
|
|
|
push teller
|
|
|
|
syscall decimalstr_signed
|
|
|
|
syscall printstr
|
|
|
|
push newlinestr
|
|
|
|
syscall printstr
|
|
|
|
push teller
|
|
|
|
push thousand
|
|
|
|
cmp_lt
|
|
|
|
jump_if_true back
|
|
|
|
return
|
2018-02-25 15:43:00 +00:00
|
|
|
%end_instructions
|
|
|
|
|
|
|
|
%subblocks
|
|
|
|
%end_subblocks
|
|
|
|
%end_block ;b1
|