Smashbasic~ ~4 8 0 :0 ::0 :0 :0 :0 a=1 :p=1 n=0 19 (" n,n;p;9 ;"Snake-Smasher" 2" p=p+a:p=7 p=1 a=-a < .01z# =,n F n P. #0 ;4 ;" by Andreas Reimer 1985" U 19 ,0 ; n "Smashcode"35000 x S$(15 ,30 ) } N$(18 ) 180 :N=1 15 N$ S$(N)=" "+N$+" 000000" N "ANDREAS REIMER","SIR CLIVE SINCLAIR","THE C64-DESTROYER","RONALD RAYGUN","ROBBY ROBOT","DRUNKEN HARRY","THE SNAKE-EATER","DER WILDE WATZ" k "RED RUDI","ASTERIX & OBELIX","JUMPING JACK","TUTANKHAMUN","THE DEADLY DENNIS","SILLY LILLY","LUCKY LUKE" L=38061 C$(2 ,8 ) C$(1 )="TASTATUR" C$(2 )="JOYSTICK" J T(2 ,10 ):M=1 2 :N=1 10 :T(M,N):N:M [ 239 ,2 ,239 ,1 ,247 ,1 ,251 ,1 ,127 ,4 V 31 ,2 ,31 ,1 ,31 ,4 ,31 ,3 ,31 ,5 T$="901QN" 23658 j\ ,8 68 0 :0 :7 :0 :0 :0 : @ 38108 ܔ ,1 J L=38104 ؔ TX 5 ,2 ;5 ;"1";7 ;" STEUERUNG ";4 ;C$(40058 z +1 ) ^( '5 ;" 2";7 ;" TASTENWAHL" h( '5 ;" 3";7 ;" HIGHSCORES" |' 11 ,12 ;5 ;"TASTEN:" U 13 ,14 ;4 ;"^";15 ,12 ;"` _";17 ,14 ;"] " 14 ,14 ;T$(3 );15 ,13 ;T$(1 );" ";T$(2 );16 ,14 ;T$(4 );17 ,17 ;T$(5 ) . 21 ,4 ;" BY ANDREAS REIMER 1985" : 19 ,2 ;4 ;" START MIT DER FEUERTASTE." L=38132 L (31 =16 ƾ40058 z )(=T$(5 )þ40058 z )500 I$= I$>"0"I$<"4"I$*1000 430 ) 40019 S ,0 :0 ::7 G N=40006 F 40015 O :N,T(40058 z +1 ,N-40005 E ):N U 0 ,0 ;" " H 1 ,16 ;4 ;"LE S";7 ;21 ,0 ;"ZEIT:" & L=35410 R 0" 7 ::A$=" " :B 5 ,0 ;4 ;A$;2 ;A$;4 ;A$;2 ;A$ DQ 38118 ,160 :38108 ܔ ,4 :L=38104 ؔ :38118 ,0 XD P$="":N=40005 E 40000 @ -1 :P$=P$+(N+48 0 ):N b( 10 ,7 ;"SCORE:";5 ;P$ l= N=1 5 :.05|L,10 :.05|L,0 :N v P=1 15 ( S$(P)(25 30 )