-'F?,Y!68D:\\aB<B~B~<<><<<%B~B~<<><<<%<~|<~|B><<~x~||BBx~<@><<|B~<~<<<~x~B>|<<~x~|<|BBx~<@><<"<|~@@~x~||BBx~<@><<%~<|~@@~x~|<|BBx~<@><<%<B~|~>B<>B~<|B<>J@B|B~BJ@J(B@DB@BFBB@D@D@BBFD@B@BB"~BB@@@@D@DBBFD@B@BB%BBB@@@@D@D@BBFD@B@BB%B$@D@FBF@BDBBBF@F(<~B<~|B><<~x~B~||B<>B@|(<||<<|BB>|(>||BN|~BBB@@JB@JD@D@B@@BB@(@DBBDBBBB@@FD@Fx~B@<<<|B~~<<>@(<@B< COPY "," ENTER => MENUE ":9750&:1500 rf=535:9850z&:#0;" C => COPY "," ENTER => MENUE ":9750&:1500 |=5466000p =5577000X =5795000  1600@ Ce$(18,13 ):e(18,15):v(18,40() :9800H& s=118 &"VEREINS-NAME:",e$(s) 0 9800H& :s D3#0;"Eingabe korrigieren? (J/N) " N23658j\,0 X6=106jspb=9800H&:2000:1860D b=110n1500 g 1880X lCz$(20,13 ):z(20,15):w(20,40() v:9850z& s=120 "VEREINS-NAME:",z$(s)  9850z& s 3#0;"Eingabe korrigieren? (J/N) " 23658j\,0 6=106jspb=9850z&:2000:1960 =110n1500  1980 "NUMMER DES VEREINS: ";s "VEREINS-NAME",a$ &spb=9800H&e$(s)=a$:2040  z$(s)=a$  :spb: 66:"HEIM: ";h;" GAST: ";g;" SPIEL: ";t1;":";t2 C7;9 ;21,0;e$(h);"-";e$(g);" ";t1;":";t2 3#0;"Eingabe korrigieren? (J/N) " :=106j9700%:0.5,10 :2200 k=110n13 :0:#0;" BITTE EINEN MOMENT GEDULD !! ":9700%:2260  2230 #e(h,1)=e(h,1)+1 #e(g,1)=e(g,1)+1 t1=t22500 t1>t22600( t2>t12700 e(h,3)=e(h,3)+t2 e(h,2)=e(h,2)+t1 e(g,2)=e(g,2)+t2 $e(g,3)=e(g,3)+t1 .e(h,12 )=5 8e(g,12 )=9 Be(h,13 )=g Le(g,13 )=h Ve(h,14)=t1 `e(h,15)=t2 je(g,15)=t2 te(g,14)=t1 y%fa=18:9800H&:4000 ~:9800H& N6:#0;" WEITERE EINGABEN? (J/N) ":0.5,10 0 =106j2200 =110n1500 2450 #e(h,4)=e(h,4)+1 #e(h,5)=e(h,5)+1 #e(g,4)=e(g,4)+1 #e(g,5)=e(g,5)+1 %e(g,10 )=e(g,10 )+1 #e(h,7)=e(h,7)+1 v(h,e(h,1))=-2 v(g,e(g,1))=2  (#e(h,4)=e(h,4)+2 2#e(g,5)=e(g,5)+2 <#e(h,6)=e(h,6)+1 F%e(g,11 )=e(g,11 )+1 Zv(g,e(g,1))=-3 dv(h,e(h,1))=3  #e(h,5)=e(h,5)+2 #e(g,4)=e(g,4)+2 #e(h,8)=e(h,8)+1 #e(g,9 )=e(g,9 )+1 v(h,e(h,1))=-4 v(g,e(g,1))=4  66:"HEIM: ";h;" GAST: ";g;" SPIEL: ";t1;":";t2 C7;9 ;21,0;z$(h);"-";z$(g);" ";t1;":";t2 3#0;"Eingabe korrigieren? (J/N) " :=106j9700%:0.5,10 :3200 k=110n13 :0:#0;" BITTE EINEN MOMENT GEDULD !! ":9700%:3260 3230 #z(h,1)=z(h,1)+1 #z(g,1)=z(g,1)+1 t1=t23500 t1>t23600 t2>t13700t z(h,3)=z(h,3)+t2 z(h,2)=z(h,2)+t1 z(g,2)=z(g,2)+t2 z(g,3)=z(g,3)+t1 z(h,12 )=5 z(g,12 )=9 *z(h,13 )=g 4z(g,13 )=h >z(h,14)=t1 Hz(h,15)=t2 Rz(g,15)=t2 \z(g,14)=t1 a%fa=20:9850z&:4000 f:9850z& kN6:#0;" WEITERE EINGABEN? (J/N) ":0.5,10 p 0 z=106j3200 =110n1500 3450z #z(h,4)=z(h,4)+1 #z(h,5)=z(h,5)+1 #z(g,4)=z(g,4)+1 #z(g,5)=z(g,5)+1 %z(g,10 )=z(g,10 )+1 #z(h,7)=z(h,7)+1 w(h,z(h,1))=-2 w(g,z(g,1))=2  #z(h,4)=z(h,4)+2 #z(g,5)=z(g,5)+2 $#z(h,6)=z(h,6)+1 .%z(g,11 )=z(g,11 )+1 Bw(g,z(g,1))=-3 Lw(h,z(h,1))=3 j t#z(h,5)=z(h,5)+2 ~#z(g,4)=z(g,4)+2 #z(h,8)=z(h,8)+1 #z(g,9 )=z(g,9 )+1 w(h,z(h,1))=-4 w(g,z(g,1))=4  (s$(13 ):s(15):r(40() fa>184600 x=117 hQe(x,4)-e(x,5)e(x+1,4)-e(x+1,5)x: r/e(x,4)e(x+1,4)x: |Qe(x,2)-e(x,3)e(x+1,2)-e(x+1,3)x: /e(x,2)z(x+1,4)-z(x+1,5)x: f/z(x,4)z(x+1,4)x: pQz(x,2)-z(x,3)z(x+1,2)-z(x+1,3)x: z/z(x,2) $" ,17,4;"ANSONSTEN ===> ENTER"  0 =36$ 36$1500  5535 p&1:5:1:9 : z,5,4;"VEREINS-INFORMATION" +10 ,4;"1 ===> 1.BUNDESLIGA" +12 ,4;"2 ===> 2.BUNDESLIGA" $14,4;"M ===> MENUE" 23658j\,0:0 '=491s1=5::9800H& =109m1000 '=502s1=9 ::9850z& "PLATZ-NUMMER",pn: *0,0;" INFORMATION: ", s1=562008 s1=9 6700, ]#0;"  C ==> COPY "," M ==> MENUE ";"  ENTER ==> Naechster Verein " 23658j\,0 =99c =109m1500 $=13 6000p . 6120 80,15;e$(pn) V?6500d:e(pn,4);5,27;":";e(pn,5) `?6510n:e(pn,2);6,27;":";e(pn,3) j6520x:e(pn,1) t6530:e(pn,6) ~6540:e(pn,9 ) 6550:e(pn,8) 6560:e(pn,11 ) 6570:e(pn,7) 6580:e(pn,10 )  6590 k=140( v(pn,k),-1 k  d55,2;"Punktestand";5,25;: n86,2;"Torverhaeltnis";6,25;: x<7,2;"Absolvierte Spiele";7,28;: :8,2;"Gewonnene daheim";8,28;: =9 ,2;"Gewonnene auswaerts";9 ,28;: ;10 ,2;"Verloren daheim";10 ,28;: >11 ,2;"Verloren auswaerts";11 ,28;: @12 ,2;"Unentschieden daheim";12 ,28;: C13 ,2;"Unentschieden auswaerts";13 ,28;: ?7;15,0;"MINUS _PLUS" 15,15;"" 124|,46.  ,0,15;z$(pn) J?6500d:z(pn,4);5,27;":";z(pn,5) T?6510n:z(pn,2);6,27;":";z(pn,3) ^6520x:z(pn,1) h6530:z(pn,6) r6540:z(pn,9 ) |6550:z(pn,8) 6560:z(pn,11 ) 6570:z(pn,7) 6580:z(pn,10 )  6590 k=140( w(pn,k),-1 k  X$3:6:9 :1 ]:x=118 b0+x,0;x+500;0+x,4;e$(x,11 );0+x,16;x+900;0+x,20;z$(x,12 ) lx vx=1920 E0+x,16;x+900;0+x,20;z$(x,12 ) x 90,0;"TABELLE FUER DEN FUSSBALLTOTOTIP"  79906 p(11 ,2) x=111 .7;9 ;(x);". PAARUNG ";o$;"-";p$ 1o$>3űp$>37980,:7100 o$=""p$=""7290z $p(x,1)=o$:p(x,2)=p$ m(p(x,1)>900p(x,1)<921)(p(x,1)>500p(x,1)<519)7160 D7980,:p(x,1)=0:p(x,2)=0:7100 m(p(x,2)>900p(x,2)<921)(p(x,2)>500p(x,2)<519)7180   7150  `p(x,1)<5191;21,0;e$(p(x,1)-500);"-";:7200  <1;21,0;z$(p(x,1)-900);"-";  Jp(x,2)<5191;e$(p(x,2)-500);:72204 *&1;z$(p(x,2)-900); 41;" " >-#0;"PAARUNG KORRIGIEREN? (J/N) " H 0 R23658j\,0 \&=110n79906:7290z f&=106j79906:7100 p 7240H zx:3: 82,3;2;"DER FUSSBALL - TOTO - TIP"  7340 x=111 5+x,0;9 ;x x: x=231 )3;4,x;" ";18,x;" " x x=418 G3;x,0;" ";x,1;" ";x,2;" ";x,31;" " x  7310 x=78N190568 y=14 x+y,135 3;0,-103g y x $x=616 .y=4267 857;x,y;"1";x,y+2;"0";x,y+4;"2" B7y:x:#0;" BITTE EINEN MOMENT GEDULD !! " Lx=111 Qf1=0:f2=0 R7p(x,1)=0p(x,2)=07590 Vy=140( `Gp(x,1)<519f1=f1+v(p(x,1)-500,y):7540t j#f1=f1+w(p(x,1)-900,y) tGp(x,2)<519f2=f2+v(p(x,2)-500,y):7560 ~#f2=f2+w(p(x,2)-900,y) y +f1=f25+x,6;"":7590 +f1>f25+x,4;"":7590 $5+x,8;"":7590 x x=111 f1=0:f2=0 7p(x,1)=0p(x,2)=07690  αp(x,1)<519f1=e(p(x,1)-500,6)+e(p(x,1)-500,9 )-e(p(x,1)-500,8)-e(p(x,1)-500,11 ):7650 ؍f1=z(p(x,1)-900,6)+z(p(x,1)-900,9 )-z(p(x,1)-900,8)-z(p(x,1)-900,11 ) p(x,2)<519f2=e(p(x,2)-500,6)+e(p(x,2)-500,9 )-e(p(x,2)-500,8)-e(p(x,2)-500,11 ):7670 f2=z(p(x,2)-900,6)+z(p(x,2)-900,9 )-z(p(x,2)-900,8)-z(p(x,2)-900,11 ) ,f1=f25+x,13 ;"":7690  ,f1>f25+x,11 ;"":7690  5+x,15;""  x  8000@  85004! xK13 :0.5,0:#0;"C = COPY M = MENUE P = PAARUNG" 23658j\,0  0 =99c =109m1500 &=112p8900":7800x  7810 " ,G#0;1;"  FALSCHE EINGABE  ":250: 6J21,0;7;9 ;"PAARUNG NICHT VORHANDEN => ENTER": @x=111 J7p(x,1)=0p(x,2)=08190 Tf1=0:f2=0 ^p(x,1)<519f1=e(p(x,1)-500,4)-e(p(x,1)-500,5)+e(p(x,1)-500,7)-e(p(x,1)-500,10 ):8050r hf1=z(p(x,1)-900,4)-z(p(x,1)-900,5)+z(p(x,1)-900,7)-z(p(x,1)-900,10 ) rp(x,2)<519f2=e(p(x,2)-500,4)-e(p(x,2)-500,5)+e(p(x,2)-500,7)-e(p(x,2)-500,10 ):8070 |f2=z(p(x,2)-900,4)-z(p(x,2)-900,5)+z(p(x,2)-900,7)-z(p(x,2)-900,10 ) ,f1=f25+x,20;"":8190 ,f1>f25+x,18;"":8190 5+x,22;"" x: !4x=111 !>7p(x,1)=0p(x,2)=08790V" !Hf1=0:f2=0 !Rp(x,1)<519f1=e(p(x,1)-500,4)+e(p(x,1)-500,2)-e(p(x,1)-500,5)-e(p(x,1)-500,3):8550f! !\f1=z(p(x,1)-900,4)+z(p(x,1)-900,2)-z(p(x,1)-900,5)-z(p(x,1)-900,3) !fp(x,2)<519f2=e(p(x,2)-500,4)+e(p(x,2)-500,2)-e(p(x,2)-500,5)-e(p(x,2)-500,3):8570z! !pf2=z(p(x,2)-900,4)+z(p(x,2)-900,2)-z(p(x,2)-900,5)-z(p(x,2)-900,3) !z,f1=f25+x,27;"":8790V" !,f1>f25+x,25;"":8790V" !5+x,29;"" "Vx: ""SPIEL: ";sp "20,27;" " "`p(sp,1)<51920,1;sp;" ";e$(p(sp,1)-500);"-";:8930" ";20,1;sp;" ";z$(p(sp,1)-900);"-"; "Bp(sp,2)<519e$(p(sp,2)-500):8950" "z$(p(sp,2)-900) " #0:1500 %\0.5,5:1;21,0;"  DRUECKEN SIE EINE TASTE  ": %l=031 %21,l;" " %l: & 0 & =99c:9750& &* &Hx=118 &R y=x+1 &\y,0;x;y,3;e$(x);y,17;e(x,1);" ";y,20;e(x,2);" ";y,22;":";y,23;e(x,3);" ";y,27;e(x,4);" ";y,29;":";y,30;e(x,5);" " &fx &p;0,0;"PL 1.BUNDESLIGA SP TORE PUNKTE": &zx=120 &y=x &y,0;x;y,3;z$(x);y,17;z(x,1);" ";y,20;z(x,2);" ";y,22;":";y,23;z(x,3);" ";y,27;z(x,4);" ";y,29;":";y,30;z(x,5);" " &x &;0,0;"PL 2.BUNDESLIGA SP TORE PUNKTE": &J9950&:x=14:p$:y=07:a:p$+y,a:y:x: &S"a",129,126~,102f,90Z,90Z,102f,126~,129 &P"b",129,90Z,84T,24,24,44,,126~,129 &S"c",129,126~,102f,26,60<,100d,126~,129 &G"d",8,8,8,8,8,42*,28,8 'u21,0;9 ;"NOCH ";23730\+256*23731\-23653e\-256*23654f\;" BYTES" &&a Bay.Muenchen Bremen M'Gladbach K'lautern Hamburg Bochum Uerdingen Frankfurt 1.FC Koeln Leverkusen Schalke 04 Stuttgart Mannheim Duesseldorf Karlsruhe Bielefeld Dortmund Braunschweig K! )  *            ##          $     '         )   (~  Aachen Saarbruecken Hertha BSC Kassel Wattenscheid Hannover Nuernberg Solingen Offenbach Buerstadt Darmstadt Homburg Fort.Koeln Oberhausen Ulm Blau-Weiss Freiburg Duisburg Stuttg.KickerSt.Pauli    '                                   "    # (||||{zzz|zzz|z|~hg %)(s O909 M'Gladbach N*   (Pd"bundliga.p" 3 BUNDLIGA.Pts0F P PMMTTб3P23`T3,'o{Rv>~fZZf~ZT,~~f>BB<DHpHDB@~BfZBBBBbRJFB