curioustorvald/tsvm
1
0
Fork 0
mirror of https://github.com/curioustorvald/tsvm.git synced 2026-03-09 20:51:51 +09:00
Code Issues Packages Projects Releases Wiki Activity

basic: proof that gosub in the middle of the statements works now

Browse Source
This commit is contained in:
minjaesong
2020-12-16 11:50:21 +09:00
parent 5b3d569d06
commit b67c8ede6f
1 changed files with 7 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
assets/gosubtest.bas Normal file
View File

@@ -0,0 +1,7 @@
1 GOTO START
100 LABEL PRINTRNDNUM
110 K=FIX(RND(1)*256)
120 PRINT " ";K;" ";
130 RETURN
1000 LABEL START
1010 PRINT "HELLO,";:GOSUB PRINTRNDNUM:PRINT(IF K==1 THEN "WORLD" ELSE "WORLDS")