1 PRINT"[147]@@@@@@@@@@@@@F@@F@@D@@NX@M[190]@N[191][146]C[191][176][146]?[191][160][199][191][192][146]G[191]@[146]A[191][146]@AC[146]@AA[146]@A"; 2 PRINT"[193][146]@A[179]@@V[146]@@[194]@@@@@@@@@@@@@@@@@@[192][146]@@[192][146]@C@@FL[146]@N[190][192][191][191][146]?[191][179][146]G[191][192][146]G[191]"; 3 PRINT"@[146]A[191][146]@A[192][146]@AA@[146]C@[192][146]A@ [146]B@[146][208]B@@":FORA=0TO62:POKE896+A,PEEK(1087+A) 4 POKE832+A,PEEK(4^5+A):NEXT:V=53248:POKEV+21,0:POKEV+23,0:POKEV+29,0:FORA=0TO7 5 POKEV+A*2+1,50+A*24:POKEV+39+A,9:NEXT:POKEV+32,0:POKEV+33,0:P(0)=13:P(1)=14 6 PRINT"[147]"SPC(13)"PFERDE-RENNEN[154]":C$=CHR$(13)+"[163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163]" 7 J=J+1:G(J)=5^6:PRINT"NA."J" ";:INPUTN$(J):ON-(N$(J)<>"")GOTO7:C$=C$+"[163][163][163][163][163][163][163]" 8 INPUT"TAGE";R:J=J-1:FORT=1TOR:PRINT"[147]TAG"T"":FORA=0TO7:Q(A)=INT(RND(1)*5)+2 9 PRINT"PF."A+1" 1:";Q(A):Z(A)=0:S(A)=24:NEXT:PRINT:FORA=1TOJ:PRINTN$(A);:W=0 10 INPUTI(A):PRINT"-"G(A)"DM";:INPUTM(A):NEXT:PRINT"[147]";:FORA=1TO8:PRINTC$;:NEXT 11 POKEV+21,255:FORA=0TO7:S(A)=S(A)+INT(RND(1)*(40-Q(A)))/3.3:IFZ(A)<>0THEN14 12 IFS(A)>=255THENPOKEV+39+A,1:W=W+1:Z(A)=W:POKEV+A*2,255:POKE2040+A,13:GOTO14 13 POKE2040+A,P(ABS(C)):POKEV+2*A,S(A) 14 POKEV+39+A,9:IFW<8THENNEXT:C=C=0:GOTO11 15 PRINT"[147]":POKEV+21,0:FORA=0TO7:PRINT"PFERD"A+1"[157] [146] : [154]PLATZ"Z(A); 16 PRINT" QUOTE : 1 -";Q(A):NEXT:PRINTC$"[163][163]":FORA=0TO7:POKEV+A*2,24:NEXT 17 PRINT"":FORA=1TOJ:G=0:PRINT"[154]"N$(A)":";:IFZ(I(A)-1)>3THENPRINT"[150]NIX":GOTO19 18 Z=Z(I(A)-1):G=INT((M(A)*Q(I(A)-1))/Z):PRINT"[150]GEWINNT";G;"DM MIT PF."I(A)"." 19 G(A)=G(A)-M(A)+G:NEXTA:WAIT198,1:POKE198,0:PRINT"[147][158]BISHER RESULTAT:" 20 FORA=1TOJ:PRINT"[154]"N$(A)"'S GELD :[153]"G(A)"DM":NEXT:WAIT198,1:POKE198,0:NEXTT