:  ---ERRATEN VON TIERNAMEN;---VERFASSER:W.STRAUCHV---DATUM :12.09.84c( 3000:l<670F (4,3);"WIR SPIELEN 'RATE DAS TIER'"P (8,1);"DENKE DIR EIN TIER AUS UND DER"Z (10,1);"COMPUTER VERSUCHT ES ZU ERRATEN."d A$(200)n A$(0)#xN(A$(0))3 I1 N1? A$(I)G IP 40j---HAUPTKONTROLLTEIL: "HAST DU DIR EIN TIER AUSGEDACHT (J)";A$:"ANTWORTE AUF DIE FRAGEN MIT'J'ODER'N'": ("LISTE",A$)0 1040 (A$,1)"J" 180 K1490) (A$(K))0 1160/AB$(A$(K),2)T" B$"@Q" 250s,"IST ES EIN ";(A$(K),3);|6 A$@A$(A$,1)J A$"J" :"VERSUCHE NOCH EIN ANDERES TIER?":160T: "DAS VON DIR AUSGEDACHTE TIER WAR EIN ";V$ ^"GIB BITTE EINE FRAGE EIN, DIE EIN"Nh:V$;" VOM ";(A$(K),3);" UNTERSCHEIDET"Yr: X$|:"FUER ";V$;" WAERE DIE ANTWORT ";: A$A$(A$,1): A$"J" A$"N" 380 A$"J" B$"N" A$"N" B$"J"Z1(A$(0))A$(0)(Z12)A$(Z1)A$(K))A$(Z11)"@A"V$[A$(K)"@Q"X$"@"A$(Z11)"@"B$(Z1)"@"d170---UP ZUM AUSGEBEN DER FRAGENQ$A$(K) Z3 (Q$) (Q$,Z,1)"@" (Q$,Z,1);: Z C$C$(C$,1) & C$"J" C$"N" 510 0T$"@"C$% : X3 (Q$)1= D (Q$,X,2)T$ 610E N XK X_ b YX1 (Q$)x l (Q$,Y,1)"@" 650 v Y  K((Q$,X2,YX2))   38,@QIST ES EIN SAEUGETIER@J3@N2@  @QIST ES EIN INSEKT@J5@N4@  @QIST ES EIN HAUSTIER@J13@N12@4  @QLEBT ES IM WASSER@J7@N6@S  @QKANN ES STECHEN@N9@J8@a  @AVOGELo  @AFISCH}  @ABIENE  @QKANN ES FLIEGEN@N11@J10@  @ASCHMETTERLING  @ASPINNE  @QFRISST ES ROTKAEPPCHEN@J17@N16@  @QHAT ES HOERNER@J15@N14@5  @QHAT ES EIN RINGELSCHWANZ@N19@J18@T * @QGIBT ES WOLLE@J27@N26@{ 4 @QHAT ES EIN ROTES FELL@J21@N20@ > @AWOLF H @ASCHWEIN R @QHAT ES EINE KALTE SCHNAUZE@N23@J22@ \ @QBRUMMT ES@N25@J24@ f @AFUCHS p @AHUND z @QTRAEGT ES LASTEN@J31@N30@)  @ABAERQ  @QKLETTERT ES AUF BAEUME@N33@J32@s  @QMACHT ES 'MUHHH'@J29@N28@  @ASCHAF  @AZIEGE  @AKUH  @AKATZE  @AESEL  @AAFFE  @QHAT ES EINEN RUESSEL@J35@N34@  @QFREUEN SICH OSTERN DIE KINDER DARAUF@J37@N36@/  @AELEFANT<  @AMAUSI  @AHASEw :"DIE FOLGENDEN TIERE KENNE ICH SCHON:"}  $X0 . I1 200 8 (A$(I),2)"@A" 1130 B15X); L Z3 (A$(I))V (A$(I),Z,1)"@" (A$(I),Z,1);: Z`XX1: X3 X0:"j I*t:3~1609); L Z3 (A$(I))V (A$(I),Z,1)"@" (A$(I),Z,1);: