u-1000:A1$"HEIMCOMPUTER robotron Z9001"CA2$"SPIELE":A92VA3$"K+SPIEDI"hA4$"SPIEDIE"A5$"EIN REAKTIONS-SPIEL" (C) 1983 BY T. STAHMER ,2000 HAMBURG 60, PREYSTR. 13 VERFASSER:KITTELMANN ANSCHRIFT:MKD,1EKG DATUM 25.02.1985 VERSION 1.0? INITIALWERTE =================INRA9:8:1:160W1$(38,""):W2$(36,""):W3$(36,"")W4$(36,""):W5$(18,"")Z100:1000` UNTERPROGRAMME ===============UPb TITELBILD --------------------UP(d(2,2);A1$:(4,2);"",(34,""),""Ef(5,2);"":(5,37);""ch(6,2);"",(34,""),""j(5,3);A2$:3;(5,29);A3$lA9:(8,2);(36,"")nI913:(I,2);"":(I,37);"":Ip(14,2);(36,"") r8:(10,36(A4$));A4$:(12,36(A5$));A5$/t3:(17,2);"HANS KITTELMANN"Ku(19,2);"8019 DRESDEN"jv(21,2);"HOLBEINSTR. 131"w >ENTER< ---------------------UPx4;(22,31);">ENTER<"|170:T13(20,27);(11," "):~130:124 WIE BITTE ? -----------------UP%2;(20,27);"WIE BITTE ?":K J/N ABFRAGE -----------------UPp4;(22,(34(KY$)));KY$," ? J"170:2;(22,37);(T)T74T13T1:(20,27);(11," "):T78T0:(20,27);(11," "):130:10:150 STANDART-WINDOW -------------UP& ::(0,0);" ":L TASTENABFRAGE ---------------UPg T(36):T0T127170m LAUFBILD -------------------UP 160 A$(1)" SSS PPPP III EEEE DDD III EEEE" A$(2)"S S P P I E D D I E "7 A$(3)"S P P I E D D I E "k A$(4)" SSS PPPP I EEE D D I EEE " A$(5)" S P I E D D I E " A$(6)"S S P I E D D I E " A$(7)" SSS P III EEEE DDD III EEEE" D$(16," "), I17:II139Q (I5,39II);(A$(I),II):II:I RR0KY$"BRAUCHEN SIE EINE ANLEITUNG":150:5: T0 160 (2,2);"BEI SPIEDIE HABEN SIE DIE AUFGABE," (4,2);"EINEN BALL ODER EINE ANDERE FIGUR,"* (6,2);"JE NACH RUNDENZAHL, MIT EINEM"^ (8,2);"PADDEL AN DIE WAND ZURUECKZUSCHLAGEN." (10,2);"JE NACH ANZAHL DER GESCHLAGENEN" (12,2);"WANDELEMENTE GIBT ES PUNKTE. ZUM" (14,2);"BEWEGEN DES PADDELS BENUTZEN SIE" (16,2);"LINKS = <-- RECHTS = -->"L (18,2);"VIEL SPASS BEIM 'PADDELN' !!":120:r SPIELFELD -------------------UP B5120:B$"":G$" ":ZZ0:Q0:X720:DX80:Y14:DY1:Z$W2$YY14:Y234:R1:P120:ZE207:Q10:PK0:L$" ":RR1:SC3:SC$"***"160E(1,1);W1$:I122:(I,1);"":(I,38);"":IV(23,1);W1$g(21,YY);B$I57:(I,2);Z$:IQ0:Q167:ZE207: Q0:Q11:ZE144: Q0:Q12:ZE167:Q0:Q11:ZE136:(15,10);RR,". R U N D E ! ! !"I120::1:I1(15,10);(22," ")7] HAUPTPROGRAMM ===============HPk200:248yBXY,32X3201010X320(DX)80DXDX2:1010X320(DX)40DXDX2:1010XXDX:X80X880DXDX::1010YYDY:Y2Y37DYDY::1012V(BXY)32X840BXY,32:BXY1,32:BX1,199:1040(BXY40)32X840DXDX::1010  SPRITES !!!X8801110QQ1Q:BXY,ZEQ:Y1YY:A(36):A01002 A8YY30YYYY3:1038( A9YY3Y2YYYY3:10382 1002V(21,Y1);L$:(21,YY);B$:1002x(((1)3)1)1042,1044,1046DXDX::1048DYDY::1048DXDX:DYDY::1048PKPK((1)P1):HIPKHIPK(0,1);"PUNKTE:",PK," ",SC$," HI:",HI," "((0,29);RR,".RUNDE "NZZZZ1:ZZ25R264,266,268,270u ZZ50ZZ0:R1062,1072,1078,1084"SC01016$1090&SC3SCSC1:SC$SC$"*"(R2:RRRR1*(21,YY);L$:(21,Y1);L$:B$"":L$" ",(21,Y1);B$=.Z$W3$:Q0:Q10:ZE144:P130:Y236:260:272:ZZZZ1:1050[0SC3SCSC1:SC$SC$"*"k2R3:RRRR14Z$W4$:Q0:Q10:ZE167:P140:260:272:ZZZZ1:10506SC3SCSC1:SC$SC$"*"8R4:RRRR1 :Z$W5$:Q0:Q10:ZE136:P150:260:272:ZZZZ1:1050)<SC3SCSC1:SC$SC$"*"9>R1:RRRR1r@Z$W2$:Q0:Q10:ZE207:P130:260:272:ZZZZ1:1050BA$(1)"**************************"DA$(2)"* *"FA$(3)"* NEUES SPIEL? *"HA$(5)"* NEUES GLUECK!! *"5JA$(7)"* NICHT VERZAGEN ! *"iLA$(4)A$(2):A$(6)A$(2):A$(8)A$(2):A$(9)A$(1)NI917:(I,7);A$(I8):IPKY$"NEUER VERSUCH":150RT11000T9000VSCSC1:ZZZZ1:SC0SC$(SC$,SC)XI110::2:I:20ZXX80:DXDX:YY11:1050B'# ENDE =====================ENDEt(#160:3;(8,2);"AUF WIEDERSEHEN!":50:T$:I:20