B??>\8F:\ <B<~|<@BB<$B@BB@BBFBB@DBDx< <<~<@88@Dx88x88h@DDDDDT@DDxxD<10 ):k(2)=23-k(1):was=6:k(3)=1 i=23 ?f(i,1)=10 +r(20):f(i,2)=r(21) Vf(i,1)+f(i,2)<25f(i,1)>f(1,1)-414 @j=13:(f(i,2)=f(j,2))(ji)14 j:i i=13 ?g(i,1)=10 +r(10 ):g(i,2)=r(18) Vg(i,1)+g(i,2)<24g(i,1)>f(1,1)-419 ^j=13:(g(i,2)=f(j,2))((g(i,2)=g(j,2))(ji))19 j:i -0:7:1:6:4 0::1090B ,dr=-d(3):dp=(dr=-1)*255 7z(71G),88X:dr*-16,-8:dr*-8,-16:dr*24,0:z(8),0:dr*175,175:z(72H),64@:dr*0,24:dr*480,480:dr*0,-24:z(64@),568:dr*24,0:dr*64@,64@:dr*-24,0 z(32 ),24:dr*96`,0:dr*115s,115s:dr*-96`,0:z(119w),135:dr*-16,-8:dr*-8,-16:dr*24,0:z(102f),126~:dr*-480,-480:z(158),84T:dr*2,0:z(158),85U:dr*2,0:z(201),96`:dr*-40(,-40(,dr*-2*/5 dp=dp/255*31 1:aw1;f(1,2),z(f(1,1));f$(1):i=23:aw1;f(i,2),z(f(i,1));f$(1+2*(f(i,2)<10 )):i gi=13:ho1;g(i,2),z(g(i,1));f$(2+2*(g(i,2)<10 )):i (1;d(2),z(d(1));d$ -ho1;k(2),z(k(1));k$(1) !:oop=0:dri=r(3)*2-1:wm=1 "e=1dri:wm1=wm:wm=(1.5@/wm)+1:6;d(2),z(d(1));d$;1;d(2),z(d(1)-1);d$:d(1)=d(1)-1:47/:e #nj=13:6;g(j,2),z(g(j,1));f$(wm1+2*(g(j,2)<10 ));ho1;g(j,2),z(g(j,1));f$(5):j:j=23:6;f(j,2),z(f(j,1));f$(wm+2*(f(j,2)<10 ));aw1;f(j,2),z(f(j,1));f$(5):j:6;f(1,2),z(f(1,1));f$(2) $paw1;f(1,2),z(f(1,1));f$(1):.15~,-40(:d(4)=(d(2)<8)-(d(2)>15)+(d(2)>12 d(2)<16)*(r(2)-2):d(3)=-2:41):41):41):aw1;f(1,2),z(f(1,1));f$(1);f(1,2),z(f(1,1));f$(5) %!oop141):37% &(d(1)+d(2)<22)(d(2)<14)(d(2)>4)(d(1)<15)(d(1)>6)(d(1)=7d(2)=13 d(4)<0)s(2-dp)=s(2-dp)+1:0:6;2;0,0;"* * * * *":r=15+r(5):.05|L,r(36$):r:1090B: 'R0:0;7;1,10 ;"GEEN GOAL!":.25~,-11 : ( )px=d(1)+d(3):py=d(2)+d(4):des=(py,z(px)):((py+px=24)(py+px=25)(py+px=26)(py+px=27))py>7py<14:6;k(2),z(k(1));k$(k(3)):k(3)=(1.5@/k(3))+1:r3=(d(2)>k(2)+(d(4)0))-(d(2)21px>31oop=1:was;d(2),z(d(1));d$:d(2)=py:d(1)=px:45- +$des102fd(3)=(des=96`+ho1)*2+(des=96`+aw1)*-2:d(4)=(d(3)=-2)*(r(2)-2)+(d(3)=2)*(r(3)-2):was;d(2),z(d(1));d$;(des-96`);py,z(px);d$;py,z(px);f$(5*(py+px23)+(py+px=23)*(6+k(3)));py,z(px);f$(6):.15~,-30:.08}# =,-40(:(des-96`);py,z(px);f$(6);py,z(px);f$(5*(py+px23)+(py+px=23)*(6+k(3))):d(2)=py:d(1)=px:46. ,cwas;d(2),z(d(1));d$;1;py,z(px);d$:d(2)=py:d(1)=px:46. -`(px+py<22)(py0)(py21)(px0)(px31)1;py,z(px);d$ .was=des-96`: /96;f(1,2),z(f(1,1));f$(wm1);aw1;f(1,2),z(f(1,1)-1);f$(wm):f(1,1)=f(1,1)-1:i=23:py=f(i,2)+1*(f(i,2)<10 )-1*(f(i,2)>9 ):px=f(i,1)-1:des=(py,z(px)) 0des=102f(py+px>24)6;f(i,2),z(f(i,1));f$(wm1+2*(f(i,2)<10 )):aw1;py,z(px);f$(wm+2*(py<10 )):f(i,2)=py:f(i,1)=px:502 16;f(i,2),z(f(i,1));f$(wm1+2*(f(i,2)<10 ));aw1;f(i,2),z(f(i,1));f$(wm+2*(f(i,2)<10 )) 2i 3i=13:py=g(i,2)+1*(g(i,2)<10 )-1*(g(i,2)>9 ):px=g(i,1)-1:des=(py,z(px)) 4des=102f(py+px>23)6;g(i,2),z(g(i,1));f$(wm+2*(g(i,2)<10 )):ho1;py,z(px);f$(wm1+2*(py<10 )):g(i,2)=py:g(i,1)=px:546 56;g(i,2),z(g(i,1));f$(wm+2*(g(i,2)<10 ));ho1;g(i,2),z(g(i,1));f$(wm1+2*(g(i,2)<10 )) 6i 7 8 d e 2000 x 4000 8000@ 8100 8700!  "l5",l5'' !l2=(d2-1)*4/3 "divisie",l2 l3=(17-t(t1-lt))/8 "(17+pl)/8",l3 l4=a(2)/10 $"animo/10",l4''"totaal",l2+l3+l4'' "l5=(l2+l3+l4+2*l5)/3 "l5",l5 l1=l5 l1<1l1=1 l1>7l1=7 "l1",l1 1030 100d 261:100d  261 324,88X,126~,26,120x,72H,206,2,480,480,24,60<,28,568,480,40(,24,24,30,58:,24,42*,36$,32 ,24,24,24,28,60<,24,28,8,24,24,60<,90Z,90Z,60<,36$,102f,0,0,0,0,0,0,3,3,24,26,126~,88X,30,18,115s,64@,12 ,12 ,24,60<,568,28,12 ,20,24,24,120x,92\,24,84T,36$,4,24,24,24,568,60<,24,568,8,0,0,0,0,0,0,192,192,24,24,61=,90Z,568,28,20,36$,24,24,188,90Z,28,568,40(,36$,12 ,12 ,60<,91[,152,62>,64@,192,480,480,60<,218,25,124|,2,3  $i=015*8-1  q:"a"+i,q  i    "voetbal"200 * &,,"Saldo f";m'"Lening f";l'  2:'1;1;"Je hebt niet genoeg geld!"  ,,a$(7);t(t1-lt) $"Competitiewedstrijdnr. = ";ml  [.2~L,0:#0;1;0;6;"ENTER = doorgaan Z = copy"; 0:y$=  Y$="Z"y$="z":1030  xz<1xz=1 xz>20xz=20    8@1;0;6;"Of ENTER om verder te spelen", < Bz$=t$(x(1))+23+12 +0+s(1)+23+16+0+t$(x(2))+23+28+0+s(2)+23+0+0 C9#0;0,0;1;0;7;z$ D `p=0:p1=p:p2=p er=124 jp(r)=2p=p+1 op(r)>0p1=p1+1 pp(r)=3p2=p2+1 tr v;:"Opgesteld: ";p;" van de ";p1;" spelers";0 y ~"q=1100d*r(10 ) q   xz=a(i)  1040  a(i)=xz  0.2~L,0:i$ i$="z"i$="Z":1171 Ti$=1(i$"a"i$"x")(i$"A"i$"X")i$=(i$-64@-32 *(i$"a")) i$=""i$="99" <q=1̱i$:i$(q)<480ůi$(q)>5791171 q  q=("0"+i$)   *ml=ml+1:3000 :ml=ml-1 ''"Wat doe je, ";m$;"?";0: p"T Transfer","L Lening"''"S Save Cassette","M Save Mdrive"''"W Wedstrijd","Z Copy" !.2~L,0:0:x$= x$="z"x$="Z":2180 'x$="t"x$="T"2400` :2000 'x$="l"x$="L"2800 :2000 'x$="n"x$="N"9400$:2000 'x$="m"x$="M"9900&:2180 &x$="s"x$="S"800 :2180 x$"w"x$"W"2180  ` 1050 2540 n=124 p(n)=02460 pl=n 2550 n 1120` ,"Enter de te verkopen speler " 10808 K.2~L,0:0:i$=:i=i$-64@:i>32 i=i-32 i=-513i=99c i=99c2539 "i<1i>242472 p(i)=02472  p(i)32484 2"Hij is geblesseerd- niemand wil hem hebben" 1030 2539 *o=(((*5+8)*v(i))/10 ) t$(r(64@));" heeft geboden f";o,"voor ";p$(i)''"Hij is f";v(i);" waard":1180:"":#0;"Neem je het aanbod aan? (j/n)";:0:i$= i$="J"i$="j""":2500 *i$13 i$"N"i$"n":2485 2535 p(i)=0 m=m+o p1=p1-1  p$(i);" is verkocht" 1030 2539 !r(3)=12539 p(i)=3  61;6;"Naam Pos Q Cond Waarde"   R9 :7*(p(pl)=2)+3*(p(pl)=3)+5*(p(pl)=1) $k9=((pl-1)/8+1) p$(pl);" ";"AMV"(k9);" ";"-"p(pl)=1;"+"p(pl)=2;"*"p(pl)=3;" ";r(pl);" ";" "y(pl)<10 ;y(pl);" "; E" f";" "v(pl)<10CP;" "v(pl)<10000';v(pl):7  ).2~L,0:"Hoogte lening? ";i$ 1172 i=q i=99c2834 i=i-l m+i<0i=-m qi+l>250000t$*d2#0;"Sorry, de limiet is f ";250000t$*d2,:100d:"":i=250000t$*d2-l m=m+i:l=l+i  M:1;t$(t1),"Kleur = ";("Zwart"(tco=0))+("Wit"(tco=7)), 1''"Divisie ";5-d2,"Seizoen ";s5+1 9a$(7);t(t1-lt),a$(2);a(2):1021 ,"Opgesteld: ";p;" van de ";p1;" spelers" :"Manager ";m$, ""Nivo ";l5,1;l1;9;l$(l1) s5=03010 s1=(1+s)/s5*2 s1>100s1=100 %"Managerwaarde (max 100)= ";s1, -"Nivo ";l5,1;l1;9 ;l$(l1) 1000  ma=ma+1  lc=2 recette=0 $ma=3ma=0:lc=1 fa=1lc=2   lc14120  c=c+1 'v1=((8-c)*8+r(8)) v1=t14118 lc24140, ml=ml+1  v1=ml+lt "v1=t1v1=lt+16 ,i=15 6]lc=1u(i)=(r(16)+l1+((t1-1)/16)-((v1-1)/16+1)) 83lc=2u(i)=(r(14)+l1+(z(v1-lt)/ml)) ;xz=u(i):1040:u(i)=xz @i ^'lc=14500:h=r(2) h/lc=2h=((1.5@/h1)+1):h1=h mv=((1.5@/h)+1) rlc=14600 wlc=24700\ | x(h)=t1 ~ x(v)=v1 s(1)=0 s(2)=0 ,lc=1"Cupwedstrijdronde ";c$, ;lc=2"Competitiewedstrijd - ";a$(6);d1  4240  4245 Z''8;t$(x(1));"- ";t$(x(2))'''a$(5+lc);13 ;x1;25;x2  1030  6000p  5000 "Recette","f ";x9, m=m+x9  lc=24340 s(h)s(v)4340 *:" >> Herhaling << "  1030  h=((1.5@/h)+1) v=((1.5@/v)+1)  4210r lc=15200P lc=27000X Cs(h)>s(v)a(2)=a(2)+((20-a(2))/2) -s(h)32 i=i-32 Ikp<11 i=-513p+p2p1#0;"Je moet meer spelers opstellen",:100d:"":6216H J6i=-513p11 .2~L,0:6113 KPi=-513#0;"Je hebt teveel spelers",:100d:"":6216H Lbi<1i>24#0;"Speler hoort niet bij je elftal ":100d:"":6216H Qep(i)1p(i)2#0;"Speler is is niet beschikbaar",:100d:"":6216H V5p(i)=1p=p+1:p(i)=2:6240` [)p(i)=2p(i)=1:p=p-1 `1,0; aj=1i:p(j)>0 bj c2pl=i:2550 :18,0;:1142v d 6216H c di=15 ea(i)=a(i)*(i=2) fi ii=124 np(i)26550 x"q=((i-1)/8)+3 a(q)=a(q)+r(i) a(1)=a(1)+y(i) i #a(1)=(a(1)/11 )  ,lc=1"Cupwedstrijdronde ";c$, ;lc=2"Competitiewedstrijd - ";a$(6);d1 v''8;t$(x(1));"- ";t$(x(2))'''a$(5+lc);13 +(x1<10 );x1;25+(x2<10 );x2 i=15:  1160 `x(1)=t1a$(i);13 +(a(i)<10 );a(i);25+(u(i)<10 );u(i):6630 Ea$(i);13 +(u(i)<10 );u(i);25+(a(i)<10 );a(i) i  Xb(t1-lt)=b(t1-lt)+s(h) ]c(t1-lt)=c(t1-lt)+s(v) bb(v1-lt)=b(v1-lt)+s(v) gc(v1-lt)=c(v1-lt)+s(h) lMs(h)=s(v)z(t1-lt)=z(t1-lt)+1:z(v1-lt)=z(v1-lt)+1:7099 vhs(h)r3z(r)=z(r)+2 r2177346 2i=116 4 u$(i)=(i) 5i 6pass=1 7change=0 8i=116-pass :q=u$(i):q1=u$(i+1) >z(q)>z(q1)7800x @z(q)b(q1)-c(q1)7800x D#b(q)-c(q)b(q1)7800x F 7770Z ZGq2=(u$(i)):u$(i)=u$(i+1):u$(i+1)=(q2):change=1 xi y'pass=pass+1:change77357 z 7805} { } ~:7;1;1;"ELFTAL"," V T P ",': i=116  q1=u$(i) ;t$(q1+lt);18;b(q1);22;c(q1);28;z(q1)  t(q1)=i i  1020  1030  @ T w=0 Vi=124 X%p(i)>0w=w+r(i)*100d*d2 [i `"**** WEKELIJKSE REKENINGEN ****"''"Salarisrekening = f";w'"Terreinhuur = f";x'"Rente op de lening = f";(l/100d) a"Recette = f";recette dm=m-w-x-(l/100d) hKi=m-l-xp:"Wekelijkse balans = ";0+(i<0)*2;"f";i mxp=m-l rm08060| sl=l-m t m=0 x*:"Lening verhoogd (saldo te laag) " |l>250000t$*d21030::"+JE SCHULDEN BEDRAGEN MEER DAN f";250000t$*D2;32 ;"JE BENT DOOR DE CLUB ONTSLAGEN +":1030:  $ml<15fa=084993! .:"*Einde van het seizoen*" 1030 7805  r1=17-t(t1-lt) s=s+r1+c*2*d1 m=m+r1*5000*d2 0"Bonusuitkering = f";r1*5000*d2,:,, &s5=s5+1 +i=116 0 85004! 3 8600! 6i : 8800`" D*:"Nieuw seizoen ";a$(6);d1, X 1030 !3 !4t(i)>38579! !Cd1=18570z! !Ht$(lt+i);" is gepromoveerd" !Rx$=t$(lt-t(i)) !\t$(lt-t(i))=t$(lt+i) !f t$(lt+i)=x$ !hlt+i=t1t1=(lt-t(i)) !p 8579! !z*t(i)=1t$(lt+i);" is kampioen!" ! !d1=48699! !t(i)<148699! !!t$(lt+i);" is gedegradeerd" !"x$=t$(d1*16+17-t(i)) !(t$(d1*16+17-t(i))=t$(lt+i) ! t$(lt+i)=x$ !'lt+i=t1t1=d1*16+17-t(i) ! !ml=08780L" !r1=r(24) "p(r1)>08700! ".'"**** Transfermarkt ****"' "p1>15:"Je kunt geen speler kopen, omdatje er al 16 in je elftal hebt; dat is het maximum, dat"'"toegestaan is volgens de"'"Bondsregels.":8778J" " 1000 " 2540 "pl=r1 " 2550 "$%'"Type je bod in guldens",' "& 10808 ") 1170 "*n=q ".n=99c8780L" "3mn87608" "4 1010 "5 1030 "6 8705" "8r=(r(10 )*n)/v(r1) ":r58770B" "> 8785Q" "@ 8705" "B+''p$(r1);" is aan je elftal"'"toegevoegd" "Cp1=p1+1 "Ev(r1)=r(r1)*5000*d2 "Fm=m-n "Gp(r1)=1 "J 1030 "L "Qv(r1)=(v(r1)+v(r1)/5) "R,''"JE BOD IS GEWEIGERD",:1030: "T "`'d1=(((t1-1)/16)+1) "a fa=0 "blt=(d1-1)*16 "c lc=0 "d h=1 "ed2=5-d1 "f ma=1 "g ml=0 "h y=0 "i z=0 "ji=116 "kz(i)=0 "lt(i)=0 "mb(i)=0 "nc(i)=0 "ri "s v=0 "ti=124 "x#v(i)=(5000*d2*r(5)) "{r(i)=(v(i)/(5000*d2)) "~y(i)=r(20) "i "z(17)=-1 "a(2)=10 "g=5000*d2 " c=0 "x=500*d2 " h1=2 " " d1=0 "d1=d1+1 "d1>28900" " "*1;"Kies je club";0: "lt=(d1-1)*32 "i=lt+1lt+16 "C" "i<10 ;i;" ";t$(i),0;i+16;" ";t$(i+16) "i "*:"Nummer of ENTER voor meer keus " " 1170 "t1=q "$t1<1t1>64@8902" " d1=2 "y$=t$(64@) "t$(64@)=t$(t1) " t$(t1)=y$ " t1=64@ "t1=64@9400$ #&tco=0:p=11 :p1=12 # &:"Er worden nu 12 spelers gekozen." # i=112 #r=r(24) #p(r)>08975# #p(r)=2 #i=12 p(r)=1 #i # 8800`" #' #(init section #) 260  #*i=0:i$="" #+d$(1):k$(2):f(3,2):g(3,2):d(4):k(3):f$(8):s(2):u$(16):l$(7,16) #,a(5):u(5):z(17):b(16):c(16):p$(24,8):p(24):t$(64@,12 ):t(16):x(2):a$(7,9 ):y(24):r(24):v(24) #-Vl5=1:l1=1:s5=i:s1=i:xp=i:m=10CP:l=i:ho=i:aw=i:re=i:s=i #/r7:0:7:0:0:0:0::"VOETBAL MANAGER"'" Copyright K. J. Toms 1982" #2]"Type je naam ";m$:m$>20"Naam is te lang (max 20 tekens)":100d:9007/# #7m$=""m$="Willem Lageman" #A 9030F# #Bi=124 #Cp$(i) #Di #F"Adema","Berends","Cloos","Deelder","Elzema","Franssen","Gerritse","Huberts","Isaacs","Jordans","Khamal","Lieverse","Menton","Nelissen","Ozyna","Pastoor","Quint","Rinsema","Sevenum","Tieleman","Udema","Verweij","Winter","Xeno" #Pi=17:a$(i):i #C"Conditie","Inzet","Verd.","Halfline","Aanval","Divisie","Plaats" #i=17:l$(i):i #U"Beginner","Nieuweling","middelmatig","Goed","Expert","Super Expert","Virtuoos" #i=164@:t$(i):i $"PSV","Ajax","Volendam","Feyenoord","Groningen","Sparta","FC Utrecht","FC Twente","Excelsior","Roda JC","Den Bosch","GA Eagles","Fortuna S","MVV","AZ '67","NAC" $"Haarlem","PEC","FC VVV","Heerenveen","Willem II","Heracles","RKC","Graafschap","Cambuur","Veendam","Den Haag","NEC","Vitesse","DS '79","Telstar","Wageningen" $""SVV","Helmond Sp","RBC","Eindhoven","DHC","AFC","RCH","DWV","EDO","Blauw Wit","Elinkwyk","VUC","Unitas","CVV","Spartaan","Wilhelmus" $,"Stormvogel","Rheden","Enschede","H Sneek","ROHDA","Bataven","HSC","Hoogeveen","WKE","Achilles","Zw Boys","Drachten","Emmen","Treffers","Leones","Caesar" $J 8900" $S $ 9440$ $+.2~L,0:"Veranderde naam: ";i$ $i$""t$(t1,3)=i$ $(:"Je club heet:  ";t$(t1);,: % &"m";1;"voetbal" &"*"m";1;"voetbal"200 &*"m";1;"voetbal" & w qI  ##    up XVSQSQ {y@ SQ  D ? {y{y{ymCPls ; P B8 BΩM\B .p;Qa! v>X~xH00<80(:*$ <@00<||BB|@@