Commodore 64 BASIC v2 example code 14(1.3kB)

10 PTR=49152:FOR A=0 TO 150:READ X,Y 20 POKE PTR+X,Y:NEXT A:POKE 198,0 30 WAIT 198,1:PRINT CHR$(147):END 40 DATA 40,0,41,0,43,169,65,123,44,89 50 DATA 64,123,64,125,65,125,64,35 60 DATA 43,231,64,83,64,40,64,88 70 DATA 64,44,64,90,64,44,64,73,64,44 80 DATA 64,82,65,41,44.134,65,123 90 DATA 64,54,64,60,64,53,64,44,64,48 100 DATA 64,62,64,60,64,56,64,44,64,49 ... https://www.youtube.com/watch?v=Fkj4tvDNLao