Tällänen Pikkunen Koodin Pätkä
Toi On Muka Matrix Demo (Pah)
No Kirjottakaa Mitä Piditte
Matrixx.bas
SCREEN 13
RANDOMIZE TIMER
DO 'looppi
x1 = INT(RND * 40) + 1
y1 = INT(RND * 24) + 1 'Arvotaan Korkeus ja leveys
FOR y = y1 TO 24
COLOR 19 + y / 2 'vaihdetaan väri
LOCATE y, x1: PRINT CHR$(INT(RND * 139) + 33)' Kohtaan y,x1 Sat.Merkki
NEXT y
LOOP UNTIL INKEY$ <> "" 'looppi lopetetaan jos painetaan jotain nappiaAihe on jo aika vanha, joten et voi enää vastata siihen.