5  REM POKE 49173,X1:POKE 49178,X2:            POKE 49183,X3
10 FORT=49152TO49216:READD:POKET,D:NEXT:SYS49152
20 DATA120,173,32,208,72,173,17,208,41,239,141,17,208,173,1,220,201,255,208,30
30 DATA169,1,141,32,208,169,2,141,32,208,169,1,141,32,208,234,230,2,230,2,165,2
40 DATA230,2,230,2,234,76,13,192,173,17,208,9,16,141,17,208,104,141,32,208,88
50 DATA96,16