ZXTape! 0Created with Ramsoft MakeTZXmath  : t$="hist":1:1::21,0;"CHARGEMENT DU PROGRAMME EN COURS";0,0;:23692[,1  t$="math" w8;"ERE INFORMATIQUE";9 ;" vous propose"'"sa gamme de programmes SPECTRUM " W1:13 ;"AWARI"'"Un ancien et puissant jeu de strategie.(16 K)" (]11 ;"HISTOIRE"'"Testez vos connaissances Historiques en vous amusant !(16 K)" 2]13 ;"MATH"'"Calculez vite si vous voulez ra-mener votre fusee a terre.(16 k)" n11015 <res=n1-nb:6000p:y=90Z:d$="------":6005u #y=110n:6500d:car,jb: car,jn:nb=(a(niv)/10 ):y=502:6000p:d$="x":y=70F:x=60<:6010z:n1=nb:nb=(a(niv)/10 ):res=n1*nb:6000p:y=90Z:d$="------":6005u #y=110n:6500d:car,jb: Nres=(a(niv)/10 ):nb=(a(niv)/5):n1=res*nb:nb=ze2005 n1>72005 ږcar,jn:y=502:mem=niv:niv=.2~L:d$=n1+" ":6005u:d$="-------------":d$=d$(1̱n1)+" =":y=70F:6005u:y=90Z :d$=nb+" ":6005u:y=70F:m1=mem:niv=6 6500d:car,jb:niv=m1:  7:un:7: !n=ze3:6-n*2 /i=n21-n:i,n;" ";i,31-n;" ":i 7i=n31-n:0+n,i;" ";21-n,i;" ":i hn |b7:2:un:xs=2:ys=2:y=76L:cs=8:d$=" M A T H ":x=m():ze  5000 [un:40(,110n:175,ze:ze,-37%:-175,ze:ze,37%:100d i=417:i/2 Fi4i-un,4;" ":9 -i/2 8i,4;"  ERE INFORMATIQUE 83 ":10 :i:ze -ze:un:7,8;" " %8,8;" " %9 ,8;" " &10 ,8;" " &11 ,8;" " &12 ,8;" " 513 ,8;" ":ze:200  un:7::''" Vous etes aux commandes d'un vaisseau spatial dont l'objectifest la lune."'" Malheureusement, Dudule, votreordinateur vient de tomber en panne !!!"'" Seule solution : executer tousles calculs a la main ! Mais at-tention aux erreurs : chacune" "d'elles vous fera devier de vo- tre trajectoire, diminuera vos reserves de carburant et augmen-tera dangereusement votre vites-se d'approche... De plus, au furet a mesure que passe le temps, vos chances de succes diminuent:ne trainez pas !!!" /4;1'10 ;"TAPEZ 'ENTER' :"  4E4@ i6:6::un:d$="MENU":y=10 :xs=3:ys=3:cs=10 :x=m():5000  zze:7,8;"1 - ADDITION"',8;"2 - SOUSTRACTION"',8;"3 - MULTIPLICATION"',8;"4 - DIVISION" O2:p="170":44,,135:p,ze:ze,-90Z:-p,ze:ze,90Z fun:d$="VOTRE CHOIX ?":y=150:xs=2:ys=2:cs=8:x=m():un:5000 :ze  5100  a=23306 [:a,x:a+1,y:a+2,xs:a+3,ys:a+4,cs:a=a+4:i=1̱d$:a+i,d$(i):i:a+i,255:i=32256~: !x=(256-xs*cs*d$)/2 r$=:r$=""5100 -r$<"1"r$>"4".1}L,5:5100  pd$=nb u;x=8*((144+(12 *niv)-xs*cs*d$)/8) z2xs=2:ys=2:cs=8:5000: d=mem=niv:f$="":v=1̱res:d$="?":un:6005u:ze i "8000" n$r$=:r$=""r$<"0"r$>"9""6505" s""6515s x%d$=r$:un:6005u:ze:f$=r$+f$ niv=niv-1.33*=p v resɰf$"8500":"6610" 7sco=sco+un:7:ze;17,31-sco;sco Ixp,yp;" ";19,15;"+":xp=19:yp=15 niv=mem:5: JJcb=cb-un:cbcb=lc:.5,3:7;19,p;" ":p=p-un T]t=t+un:r=t/li*:xc,yc:un;xa,ya:xa=7*r:ya=7*r:xc,yc:7;un;xa,ya Y"p="21"t=li*28600! ^ !>oe=res-f$:6:2:d$="ERREUR":y=10 :xs=3:ys=3:cs=10 :x=m():5000 !Hr1,5:6:d$=" ":5000:1;6;1,5;"Le bon resultat etait :" !Rcs=8:ze:d$=res:y=17:x=m():5000:6:q=un̰"500":q:d$=" ":"6005":q=un4:q,1;b$(3):q !\cb=cb-e:cb19xp=xp-e !v#yp>17yp<12 yp=yp+e !z&xp,yp;"+":.1}L,4 !5:ze: !Uze:6:un:car,jb:p="21"3,6;"PLUS DE CARBURANT !!!":"8700" !ct=li*22,4;"VITESSE LIMITE DEPASSEE,";3,6;"LA FUSEE PREND FEU !" !mxp19yp152,4;"FUSEE HORS TRAJECTOIRE,";3,6;"OBJECTIF RATE !! " !i=un̰"400":i "[un:d$="BOUM!":y=10 :x=12 :xs=6:ys=20:cs=8::5020 "ze:i=un̰"400":i " 10 "`ze::10 #(?xp="19":yp="15":cb=lc:xc="44":yc="24":xa=ze:ya="7" #)t=ze #-9un:k="17"̰"21":k,ze;b$:k:7:xc,yc,15 #2ze:175,15:73I,ze:ze,9 :-73I,ze:ze,-9 :7:95_,9 :568,ze:ze,26:-568,ze:ze,-26 #<6:21,2;"vitesse";13 ;"visee";22;"carburant";17,22;"score ";7;" ";:ze:7:17,31-sco;sco #F]7;un;xp,yp;"+":p="30":2;"19","22";" ";:xc,yc:7;xa,ya #ze: c z@F$$$~$$~$>(> >bd&F(*D:  >>>8p~ >>>![~#"[o<&)))K6\ >2[: [2 [: [2[> 2[~#"[2[:[= 2:[= :[G: [O: [ 2 [*[~2[: [G: [2 [*[ ~2[: [G: [2[: [Oͤ~:[<2[ :[<2[ :[0~@ :\G:\G:[o:[g>Xg:\w:[G@gxgxo:[Go!~xO F![F(// PR