10 REM *** נעיםוע פןלרכן הלס MSX2 ***
20 SCREEN 5:CLS
30 C=15
40 XX=127:YY=96
50 PSET (XX,YY),C
60 XL=XX:YL=YY
70 XX=XX+X:IF XX<0 THEN XX=0 ELSE IF XX>255 THEN XX=255
80 YY=YY+Y:IF YY<0 THEN YY=0 ELSE IF YY>211 THEN YY=211
90 Z=PAD (12)
100 X=PAD (13)
110 Y=PAD (14)
120 IF STRIG (1) THEN LINE (XL,YL)-(XX,YY),C ELSE PRESET STEP (0,0)
130 IF STRIG (3) THEN CLS:GOTO 40
140 GOTO 50
150 END