ZXTape!D-023 AAyCh ?XX: D\: D\: D\: D\: D\:yD\DXX?zzzzzzzzzxxxxxxzzzzzzzzz\!l@$  !lX> =  >JbRJFB>> >>>~ ~@HP`@~0 JbRJFB,2"""8DDD8GM>2^KC!$!ʹͭ~w#~w#BV#~#( 7ݦw}<(~w $x>xͲ"W!> >8H~(w88#~0wx#w:0 M:V!$Kʹͭ~w#~w# !>w#w!]@>GM>2^!X  6UU6 >͌_6x#  >͌_68# !Xj  GÐ 9textbag *********************************************** .1::;1,9 ;"WYBIERZ TEKST" %1520 :1460:1010 ;manipuluj *********************************************** (!n=1lines:b$(n)=a$(n):n 2gn=1lines:m=132 :z$=a$(n,m):(z$"A"z$"Z")(z$"a"z$"z") b$(n,m)=160 <m:n: F;ustaw linie ********************************************* Pt$:lines=1 Zfit=33! d"t$a$(lines)=t$(fit-1):t$=t$(fit):lines=lines+1 -t$(1)=" "t$=t$(2):130 90Z 5nq:q(nq+1):q$(nq,36$):r$(nq,60<) )n=1nq:q(n)=n:q$(n):r$(n):n: :wprowadanie z klawiatury ******************************* change=0:1210 n=startend >#screen;y,n-1;1;1;1;2;" " ""210 rg$=:(g$"A"g$"Z")(g$"a"g$"z").01z# =,24:#screen;1;y,n-1;g$:w$(n)=g$:270 C(g$=535ůg$=8ůg$=12 )n=startchange=1: dg$=535ůg$=8ůg$=12 #screen;1;y,n-2;d$;d$:n=n-1:200 screen=1Ưg$=13  220 n  ":analizuj wyraz ***************************************** ,sub=0:back=sub 6%m=startend:w$(m)=c$(m)370r @9(w$(m)-c$(m))=32 sub=sub+0.4L:370r J`w$(m)=c$(m+1)w$(m+1)=c$(m)w$(m+1)=w$(m):sub=sub+2:370r T[w$(m+1)=c$(m)w$(m)=w$(m+1):back=back+1:sub=sub+2:370r ^Jw$(m)=c$(m+1)w$(m+1)=w$(m):back=back+2:370r hsub=sub+2.5 rm |screen=1400 gotit=sub(end-start): 8len-lmar-back>endsub=sub+2*(len-lmar-back-end)  :sama gra *********************************************** +y,x-1;1;2;161 g$= 460+25*(g$=13 )+20*(g$="5"g$=8)+30*(g$="8"g$=9 )+40(*(g$="6"g$=10 )+502*(g$="7"g$=11 ) V440+90Z*(g$="z")+150*(g$="w")+260*(g$="p")+510*(g$="@") : ruchy kursora po ekranie ****************************** .005y# =,12 :y,x-1;b$(y,x):x=(x-1)*(x>1)+32 *(x=1):y=y-(y>1)*(x=32 ):430 P.005y# =,12 :y,x-1;b$(y,x):x=1:y=y+(y1):430 :kupujesz *********************************************** 3.01z# =,12 :b$(y,x)160470 .10808:ink=2:stock=stock-3 &inv=1:1250:1400x:n=1502:n:b$(y,startend)=a$(y,start end):1150~:ink=0:inv=0:1250 0done960 :'x=end:words=words+1:430 D9zgaduj ************************************************ N3.01z# =,12 :b$(y,x)160470 X610808:d$=160:screen=2:180 b?change=1y,start-1;160:x=end:430 lc$=a$(y):300, vgotit670 :dobrze ************************************************* Xstock=stock+10 -(7*sub/(1+end-start)):ink=3+(sub):550& :niedobrze ********************************************** 1n=start-1end-1:y,n;160:n ,stock=stock-5:1390n:430 : odpowiadanie na pytanie ******************************* $.01z# =,12 :nq430 .y,x-1;b$(y,x):1340<:1210 Ystart=lmar:end=rmar-1:yy=y:y=1:screen=1:d$=" ":180:len=n I#1;y,n-1;1;" ":changey=yy:1320(:430 x$=w$(lmar) : ekstrakcja ******************************************* e$=r$(q(qu)) "na=e$(1):e$=e$(2) *n=1na:start=1:end=1  1e$(end+1)"*"end=end+1:780  5c$=e$(end)+"*":w$=x$:300,:gotit840H  e$=e$(end+2):n *:odp zla ************************************************ 4on=lmar-1rmar-1:#1;1,n;1;" ":n:stock=stock-502:1390n:880p >:dobrze ************************************************* H|stock=stock+100d-words-(502*sub/(1+end-start)):flash=1:ink=3+(sub):1230:1400x R@n=0200:n:flash=0:ink=0:1230 \>n=qunq:q(n)=q(n+1):n:nq=nq-1:nq900 f1190:1280 p)y=yy:1210:1320(:430 z:ost pyt ************************************************ 71320(:p$="Byo to ostatnie pytanie":1280 Mm=1100d:m:p$="Chcesz dokoczy ten tekst (T/N)?":1280  5g$=:920+10 *(g$="t")+30*(g$="n") $p$="":1280:y=yy:430 : koniec ************************************************ 81,0;:n=1lines:a$(n,32 ):n 3p$="T = nowy tekst K = koniec":1270 !g$=:g$="t"g$="k"1000  970 :nowy tekst ********************************************* +1360P:g$="t"10 :1460:1350  2000 9pierwsze wejcie*************************************** ;n=16:8990#+15*n:u$:h$(n)=u$:n =n=16:3+2*n,4;" ";h$(n):n %5500|:poz=65000 %8995##+15*f$:1420 %n=textnt:t(n)=t(n+1):n:nt=nt-1  80P:40(:1190 Bdone=0:words=0:check=1:x=1:y=1 $a1380d:1400x:n=1lines:b$(n)(32 ):n:1320(:1280:430 .7poczatek koniec************************************* 8y,x-1;b$(y,x):end=x Bx=11110V L5b$(y,x-1)=160x=x-1:1090B V start=x `;b$(y,end+1)=160end=end+1:1120` j t9co tam na ekranie ************************************* ~a$(check)b$(check) check=linesdone=1: !check=check+1:1150~ 9wybieraj pytanie ************************************** squ=1+(*nq):p$=q$(q(qu)):lmar=p$(12)+2:rmar=p$(34):p$=p$(5): 9znaki zapytania ************************************** ,w$="???????????????????????????????????": 9drukuj wyraz ****************************************** c#1;1,lmar-1;ink;flash;1;c$(1end);0;s$(rmar-lmar-end): 9pokazuj wyraz ***************************************** ,ink;inv;y,start-1;a$(y,startend) 1140t: 9flaga ************************************************* p$>311300  p$=p$+s$(32 -p$) ]n=132 :#1;1;1,32 -n;p$(n):m=15:m:n: 9symbole operacji ************************************** (>#1;0,0;"Z=zakup P=pytanie W=wyraz @=stop" - 29co robisz po wpisaniu ********************************* <>#1;0,0;" Po wpisaniu - klawisz ENTER " A F9wycieraj ********************************************** PV0,0:n=121:s$:n:#1;1,0;1;s$: Z8tytu tekstu ***************************************** d)0,0;1;h$(f$);" ": n8drukuj wynik tego nie bylo w oryginale *************** x.0,28-((stock));" ";stock: 9komunikat ********************************************* @#1;1,0;"Prosz poczekaj okoo 40 sekund.": 9stop ************************************************* ustaw wskanik ; 9000(#:nt:t(nt+1):n=1nt:t(n)=n:n: 9procedury inicjujonce ******************************** Ta$(21,33!):b$(21,33!):y=1:x=y:h$(6,20) H1540:n=12:u$:m=07:r:u$+m,r:m:n G"Q",0,0,0,40(,20,0,0,0 U"R",195,129,129,129,129,129,129,195 G:stock=250:s$=" ":1210: 'u$=" "  5000 4 dla ucznia >5:5:0: CD"Instrukcje dla ucznia str 1--------------------------------" H 3,0;"Program ten to gra polegajca naodbudowywaniu tekstu i odszuki- waniu informacji w czciowo od-budowanym tekcie. Komputer usu-nie z wybranego przez Ciebie tekstu wszystkie litery, pozos- tawiajc jedynie odstpy, znaki interpunkcyjne i cyfry." M12 ,0;"Poszczeglne wyrazy mona 'ku- powa' (jeden wyraz kosztuje 3 punkty). Wystarczy umieci kur-sor na wyrazie, o ktry chodzi i nacisn klawisz K (kupno)." R 6000p WF:"Instrukcje dla ucznia str 2--------------------------------" \3,0;"Jeeli uwaasz, e odgadniesz wyraz w tekcie, po odpowiednim ustawieniu kursora nacinij kla-wisz W . Pojawi si wtedy miga- jcy kursor i bdzie mona wpi- sa wyraz. Za odgadnicie wyrazumona otrzyma 10 punktw. Migo-tanie wyrazu na zielono oznacza peen sukces, a migotanie na niebiesko, przyjcie odpowiedzi mimo bdu w pisowni. Cakowiciebdna odpowied spowoduje stra-t 5 punktw." a 6000p fF:"Instrukcje dla ucznia str 3--------------------------------" k2,0;"W dolnej czci ekranu pojawia si bd pytania, na ktre nale-y odpowiada jednym sowem wy- korzystujc informacje z tekstu." p6,0;"Kiedy stwierdzisz, e potrafisz odpowiedzie na pytanie, naci- nij klawisz P i wpisz odpowied w miejscu oznaczonym kursorem." zq10 ,0;"W pocztkowej fazie gry za odpo-wied na pytanie moesz otrzyma100 punktw (minus ewentualne punkty odjte za bdy w pisow- ni). Liczba ta obnia si w mia-r jak przybywa w tekcie wyra- zw. Bdna odpowied powoduje strat 50 punktw. Po udzieleniuprzez Ciebie prawidowej odpo- wiedzi na jedno pytanie, na ekranie pojawi si kolejne."  6000p F:"Instrukcje dla ucznia str 4--------------------------------" 4,0;"Podczas wpisywania odpowiedzi mona dokonywa poprawek nacis- kajc klawisz DELETE lub klawiszsterujcy ruchami kursora w lewo. Jeli w trakcie odpowiada-nia na pytanie, zmienisz zdanie i zdecydujesz si nie udziela "  11 ,0;"odpowiedzi, nacinij jeden z wymienionych powyej klawiszy kiedy kursor ustawiony bdzie napierwszej literze wpisywanego wyrazu. Jeli postanowisz przer-wa prac z danym tekstem, na- cinij jednoczenie klawisze SYMBOL SHIFT i 2 (@)."  6000p F:"Instrukcje dla ucznia str 5--------------------------------" 4,0;"Na zakoczenie dwie praktyczne wskazwki dla grajcych.";7,0;"1. Podczas odbudowywania tekstu dobrze jest 'kupowa' dugie wy-razy, a odgadywa krtkie po- midzy nimi." 12 ,0;"2. Pamitaj, e im prdzej odpo-wiesz na pytania, tym wicej uzyskasz punktw. Musisz wic ustali od pocztku gdzie w tekcie moe znajdowa si po- trzebna Ci informacja i stara si odbudowa wanie t cz tekstu."  6000p  2000 dla nauczyciela 1:1:7: 6"Instrukcje dla nauczyciela str.1--------------------------------";6,0;"Przed przystpieniem do demon- stracji i wykorzystaniem pro- gramu w nauczaniu, zapoznaj si dokadnie z zaczon instrukcjobsugi programu, jego tematyk oraz przeanalizuj sam(a) wszyst-kie etapy i warianty programu." ݨ15,0;"Uwaga!";16,0;"Sterowa strzak mona klawi- szami ze strzakami i spacj (Spectrum+) lub klawiszami 5,6,7,8 i 0 (Spectrum)." 6000p :"Instrukcje dla nauczyciela str.2--------------------------------";4,0;"W przypadku jakichkolwiek trud- noci w obsudze programu oraz wtpliwoci i uwag merytorycz- nych skontaktuj si z naszym przedsibiorstwem." 1'"Nasz adres :"''" Przedsibiorstwo Zagraniczne"'" ""POLMER"""'" Dzia Oprogramowania"'" ul. Surzyskiego 32"'" 64-000 Kocian"'" tel.:12-18-73 telex:045313" 6''"Zapewniamy bezpatne porady i fachow pomoc." 6000p:2000 zapal=1wyl s"65308","64":"65309","255":"65344","225":"65345","241":"65346","195":"65347","56":"65348","0" inic=15041 64000:zapal=0:23675{\,216:23676|\,92\:bre1=23991]:bre2=23992]:bre1,136:bre2,19:23762\:inic=0 s"65308","64":"65309","255":"65344","225":"65345","241":"65346","195":"65347","56":"65348","0" /gr=0:uyu=0:236099\,30  br1=24410Z_:br0=24435s_:br0+14,568:br1+14,120x:xst=65025:yst=65026:zal=65090B:wyl=65310 ' 0:6:0:6: &1,8;"Praca z tekstem 1" Ď6,6;"Praca z tekstem";10 ,6;"Uwagi dla ucznia";14,6;"Uwagi dla nauczyciela";18,6;"Koniec" e(br0+1),16:(br0+5),5:(br0+7),23:(br0+3),20:br0 #0;"ruch strzaki-";:23675{\,546:23676|\,95_:#0;1,15;" ":23675{\,216:23676|\,92\:#0;1,20;"wybr-SPACJA" k0(,0:0,0:0,-0:-0,0:0,0:0(,0h:0,0:0(,0H:0,0:0(,0(:0,0:0 ,0:0,0:0,-0:-0,0:0,0:0!,0:0,0:0,-0:-0,0:0,0 ""5100 xst,212:yst,58: ~ inic=165244,24:65245,07:65264,126~:65265,128:zal:zapal=1  inic=023765\:wyl:65267,176:65244,24:65245,7:yst,80P:zal:inic=1:zapal=1 xs=xst:ys=yst dys>40(ys<70Fy1=5:poz=1:m=30:yd=40(:yg=70F:5200P (fys>70Fys<102fy1=9 :poz=2:m=15:yd=70F:yg=102f:5200P 2iys>102fys<134y1=13 :poz=3:m=22:yd=102f:yg=134:5200P 134ys<166y1=17:poz=4:m=5000:yd=134:yg=166:5200P F 5140 Pf(br1+1),4:(br1+5),5:(br1+7),23:(br1+3),y1+3:br1 Zxs=xst:ys=yst d.=" "Ŧ="0"wyl:zapal=0:5300 nyd39'ys<491y1=5:poz=1:m=30:yd=39':yg=491:5700D dys>557ys<65Ay1=7:poz=2:m=15:yd=557:yg=65A:5700D dys>71Gys<81Qy1=9 :poz=3:m=22:yd=71G:yg=81Q:5700D gys>87Wys<97ay1=11 :poz=4:m=5000:yd=87W:yg=97a:5700D kys>103gys<113qy1=13 :poz=5:m=5000:yd=103g:yg=113q:5700D kys>119wys<129y1=15:poz=6:m=5000:yd=119w:yg=129:5700D  5560 D^(br1+1),1:(br1+5),6:(br1+7),19:(br1+3),y1:br1 Nxs=xst:ys=yst X.=" "Ŧ="0"wyl:zapal=0:5800 byd64@xs<103gx1=8:poz=1:m=1:xd=64@:xg=103g:62008 hxs>136xs<175x1=17:poz=2:m=2:xd=136:xg=175:62008  6140 8](br1+1),3:(br1+5),x1:(br1+7),5:(br1+3),9 :br1 Bxs=xst:ys=yst L.=" "Ŧ="0"wyl:zapal=0:6270~ Vxd\),3:(23613=\+256*23614>\+1),19:23755\,255:""  5000 #( 5 #-"AT THE RIVER" #2"My name is Jerry and I am twelve years old. Last year my friend from Germany, Albrecht, came to us for the summer holidays. One day we went to the river. Albrecht saw a big fish in the water. Then suddenly he fell into the river! He fell three meters under water. I could see his red jersey at the bottom. I dived in and pulled him out and started calling for help. Then a man with a dog appeared. He ran to a telephone booth, and in about twenty minutes the police and an ambulance were there. They took my friend to a nearby hospital. I was able to visit him the next day and talk to him. He was fine, but sad - his holidays in England were over." #7!7,"1832How old was Jerry?","1Twelve*","1732Albrecht was from","1Germany*","1420Albrecht saw a in the water","1fish*","2132They took Albrecht to","1hospital*","1932Who saved Albrecht?","1Jerry*","1432Jerry lived in","1England*","1524Help came after minutes.","1twenty*" #<"RADIO TELEMETRY" #Aj"Radio telemetry is a new method which is helping scientists to learn more about animals. Scientists leave their lab, go into the jungle and catch a crocodile. They bring it to the lab, where they put a tiny transmitter (which works like a radio) inside its body. Then they take the crocodile back to the river. The transmitter sends signals back to the lab. The scientists study the signals and learn about the crocodile's life. They soon know where the animal sleeps, what it eats, where it moves, and so on. When more animals walk around with radios, the scientists can study the life of whole groups of animals." #F 6,"2032Radio telemetry is a","1method*","2032Scientists work in a","2lab*laboratory*","2032The radio sends back","1signals*","1632Scientists study","3signals*animals*crocodiles*","1732The radio is very","2tiny*small*","1832Crocodiles live in","2jungles*rivers*" #K"A LONDON SCHOOLBOY" #P"Mark Collins lives in London and goes to Holland Park School. He gets up at half past seven in the morning on weekdays and has breakfast at about eight. Then he walks to school. Lessons start at 9:30 am. The pupils learn many different subjects. Mark likes English and music. He also likes French and he can already speak it quite well. Now it is two weeks before Christmas and all the teachers and pupils are very busy. They are making Christmas cards and decorating the classrooms. In Mark's class the pupils are preparing a play. This afternoon Mark is not working hard. He is thinking about his Christmas presents. He wants a camera for Christmas." #U6,"1932The text is about a","3pupil*boy*schoolboy*","1332Mark lives in","3London*England*Britain*","2432Mark's foreign language:","1French*","1524Breakfast is at o'clock.","1eight*","2132They're preparing for","1Christmas*","2232They're decorating the","1school*" #Z"A BRAVE LITTLE GIRL" #_N"Martha Forrester is six years old. She can dance, swim and ride horses. She takes her dog for walks and she rides her bicycle in the park. At home she is learning to read just like other children. But Martha is different - she is blind. She lost one eye when she was a baby. Then at the age of four she lost the other one. But Martha wants to live a normal life. She does not think about her handicap. And what about her future? Martha says she wants to work with horses. And how can she cycle in the park? She says she listens to the wind. It tells her about the trees in front of her." #d6,"1232Martha rides","2horses*bicycles*","2332The girl is learning to","2read*play*","2026She's been blind for years.","1two*","1832How old is Martha?","1six*","2232She plans to work with","1horses*","1732She cycles in the","1park*" #i "VOLCANOES" #np"The word volcano comes from the name of the ancient Roman god, Vulcanus. He was a metal worker and he had his workshop right at the top of Mount Etna in Sicily. Today you can still see the red light of his workshop at night. A volcano can sleep for a long time so people forget about it. Then suddenly it wakes up. This happened in 1883 on Krakatoa, an Indonesian island. 36,000 people died and most of the island disappeared. People could hear the eruption 5,000 kilometres away and the sky was dark 250 kilometres away. There were beautiful sunsets and sunrises because the atmosphere was full of ash from the volcano." #s7,"1422Vulcanus was a god.","1Roman*","1432Vulcanus had a","1workshop*","1932The air was full of","1ash*","1432Krakatoa is an","1island*","1632Mount Etna is in","2Sicily*Italy*","1732Sunsets were very","1beautiful*","2229A volcano can suddenly up.","1wake*" #x"SPIS TRECI" %1,-20:2000 &"d-023"2 & ' full of","1ash*",'"Nasz adres :"''" Przedsibiorstwo Zagraniczne"'" ""POLMER"""'" Dzia Oprogramowania"'" ul. Surzyskiego 32"'" 64-000 Kocian"'" tel.:12-18-73 telex:045313"  re]re]niyrZ_rs_ssaByUAom@gQ