RosettaCodeData/Task/Random-number-generator-device-/Atari-BASIC/random-number-generator-device-.basic
2025-02-27 18:35:13 -05:00

5 lines
71 B
Text

10 X=0
20 FOR I=0 TO 3
30 X=X+PEEK(53770)*(256^I)
40 NEXT I
50 PRINT X