MSX


GitHub

Topics related with MSX Computers

Interesting Projects

Authors

Sites to explore


10  SCREEN2 :X = 0:Y = 0:ST=7
20  C = 1* RND (-TIME)
30  IF C < .47 THEN GOSUB 100 ELSE GOSUB 110
40  X = X + 8: IF X = 256 THEN X = 0: Y = Y + 8: IF Y = 192 GOTO 60
50  GOTO 20
60  A$=INPUT$(1):END
100 FOR D = 0 TO ST: PRESET(X+ D,Y + D):PSET(X+ D,Y + ST - D):NEXT: RETURN
110 FOR D = 0 TO ST: PSET(X+ D,Y + D):PRESET(X+ D,Y + ST - D):NEXT: RETURN

https://msxpen.com/?code=-Lm2SpGxwu4QSkisVcj7

Running BASIC from MSX-DOS