Maker Faire Eindhoven/TRS80Model102

From NURDspace
Revision as of 02:40, 21 September 2022 by Buzz (talk | contribs) (Created page with "Example programs i wrote for the yolo (this page is just for backup) 9 CLS 10 X=INT((240-11)*RND(1)) 11 X=X+40 12 DISPLAY$="-NURDspace-" 13 DICE=INT(RND(1)*100) 14 IF D...")
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)

Example programs i wrote for the yolo (this page is just for backup)

9 CLS
10 X=INT((240-11)*RND(1))
11 X=X+40
12 DISPLAY$="-NURDspace-"
13 DICE=INT(RND(1)*100)
14 IF DICE > 33 THEN DISPLAY$="---Hark!---"
15 IF DICE > 66 THEN DISPLAY$="-Wageningen"
17 IF DICE MOD 3 THEN PRINT@ 0, CHR$(27)+"p"
19 PRINT@ X,DISPLAY$
20 IF DICE MOD 3 THEN PRINT@ 0, CHR$(27)+"q"
100 GOTO 10