ZXTape!D-026 |h ?XX: D\: D\: D\: D\: D\:yD\DXX?zzzzzzzzzxxxxxxzzzzzzzzz\!l@$  !lX> =  >JbRJFB~<|<$~@BB>~<B>@BBB|B(B8ZBBB|BBRB@~@|BB@>B~B~RB@|ߠߠ BbB@BB@BZ@ZBDBBJZ@D``~<<<~B}}<@<$~$B8BB<$~B߰߰߰߰D@B~ # <@TT0Oq'r\\\\_\PqSq[_[[qlqlq\FX! !@P!!080  IW K SR Pi Ì]]!@8>> >>>~ ~@HP`@~0 JbRJFB,2"""8DDD82[$+[>^*=\++![~#"[o<&)))=( K{\RK6\ >2[: [2 [: [2[> 2[~#"[2[:[= 0:[= :[G: [O: [ 2 [*[2[: [G: [2 [*[2[: [G: [2[: [O^:[<2[ :[<2[ :[@ :[G:\G:[o:[g>Xg:\w:[G@gxgxo:[Go!^xO F![F(//Ð  "D-026"23560\,5500|  30 2:24000],232:24001],3:23762\ dB23658j\,0:23675{\,228:23676|\,92\ i$6:6:0:8 ne$(128) x z=0 bp=0 20,8;1;"WYCZ MAGNETOFON":y=176:xs=1:ys=2:cs=8:d$="i nacinij dowolny klawisz":9390$:z 23768\:xs=1:ys=2:y=160:d$="Mikrokomputer Spectrum":9390$:y=176:xs=2:d$="POLMER 1986":9390$ =""1010 5000:18,0;"Program ten opisuje budow mikrokomputera Spectrum. Zaczniemy od czci wewntrznychktre wchodz w jego skad." k$="0123":85004! 5000:18,0;"Najbardziej skomplikowan (ale najtasz) czci Spectrumjest mikroprocesor (CPU) - Z80. ":k$="2":85004! L5000:18,0;"CPU niewiele znaczy bez pamici.Spectrum ma dwa rodzaje pamici:-pami staa ROM -pami o dostpie swobodnym RAM":k$="01":85004! ~5000:18,0;" ROM zawiera system operacyjny i dane pozwalajce komputerowi na rozpoczcie pracy zaraz po wczeniu do sieci. ":k$="0":85004! 5000:18,0;"Pami RAM umoliwia zapisywanie i odczytywanie programw i danych .Jej zawarto znika po wyczeniu komputera. ":k$="1":85004! 5000:18,0;"Aby komputer by poyteczny,musimie moliwo porozumiewania si ze wiatem zewntrznym za pomoc urzdze wejcia-wyjcia.":k$="4567":85004! 5000:18,0;"Do komputera mona przyczy inne - oprcz standardowych - urzdzenia peryferyjne (np. drukark). ":k$="8":85004! 5000:18,0;"Kontakt midzy CPU a urzdzenia-mi peryferyjnymi jest moliwy dziki specjalnemu ukadowi logicznemu WE-WY o nazwie ULA.":k$="3":85004! F5000:18,0;"Monitor i gonik to urzdzenia uywane przez Spectrum do prze- kazywania informacji uytkowni- kowi. ":k$="5":bp=.5:8900":85004!:bp=0 x5000:18,0;"Magnetofon jest urzdzeniem wejcia-wyjcia sucym do zapisywania i przechowywania programw i danych. ":k$="6":85004! 5000:18,0;"Spectrum 'mwi' do Ciebie poprzez ekran TV, a Ty 'mwisz' do komputera uywajc klawiatury ":k$="7":85004! ܭ5000:18,0;"Poniewa znajomo klawiatury jest bardzo wana, naley poznaj jak najprdzej i jak najdokadniej. ":85004! 5000:18,0;"Poznanie klawiatury uatwi Ci lekcje, umieszczone w dalszej czci programu. ":85004! 5000:18,0;"Czy chcesz powtrzy t cz programu? Nacinij T lub N (tak-nie). " @k$=:k$="t"1000 Jk$"n"1600@  9960& Axs=1:y=100d:d$="Wprowadzanie lekcji 2":9390$ 4 b#0;0,0;" " ""5002  p&0:6:7:0: XWx=0:y=160:xs=4:ys=4:cs=8:d$=" ":9400$ !4J8:1:8550f!:0:9200#:8550f!:0: !f k$="" !pN1:i=1̱k$:8600!+(k$(i)-480)*10 ::i:0: !5,4;" ": !5,13 ;" ": !10 ,4;" ": !10 ,13 ;" ": !2,29;" ": !7,29;" ": !12 ,27;" ": !#16,17;" ": !)1,1;" ": ""i=130:bp,i:"" "i:8900" #2 #Py=177:xs=1:ys=2:d$="Nacinij dowolny klawisz":9390$ #=""9210# $5000: $T 7000X $!x=(256-xs*cs*d$)/2 %23765\,x,y,xs,ys,d$: &G 65367W::1:8,8;"WCZ MAGNETOFON":0 &\23765\,40(,100d,1,2,"Wprowadzanie lekcji 2":0,0; &u23755\,255:23675{\,88X:23676|\,255:23613=\,84T:23614>\,255:"" 20 D-026 |\>\|ectrum 'mwi' lekcja 2   ""  !\ +! #  <@TT0 '}|\\\m_\}}l_}}}!\&zuX! !@P!!00' %W K SR P] À]]8>> >>>~ ~@HP`@~0 JbRJFB,2"""8DDD82[$+[>^*=\++![~#"[o<&)))=( K{\RK6\ >2[: [2 [: [2[> 2[~#"[2[:[= 0:[= :[G: [O: [ 2 [*[2[: [G: [2 [*[2[: [G: [2[: [Oͷ^:[<2[ :[<2[ :[@ :[G:\G:[o:[g>Xg:\w:[G@gxgxo:[Go!^xO F![F(//Ð =22+3+0+" "23560\,8650!  5 -23675{\,216:23676|\,92\ 8ala=23765\:q$=" " :23988],110n:23989],0:23762\ 8ala=23765\:q$=" " 6:0:7: f$(3,38&) 6f$(1)="1234567890QWERTYUIOPASDFGHJKL ZXCVBNM " Bf$(2)="1234567890qwertyuiopasdfghjkl"+13 +"zxcvbnm " 7f$(3)="!@#$%&'()_<>Ŭ;""^-+= :`?/*,. " dG8920":0:y=0:d$="LEKCJA 2":9700%:9970& n8000@:d$="NIE NACISKAJ BREAK!":y=40(:9390$:1;19,0;" ";19,27;" ":200 x9960&:4,0;"Nacinicie BREAK powoduje przerwanie programu i ponowne rozpoczcie go od pocztku.":9970& ~8000@:4,0;"Klawisze liter i cyfr ustawione s prawie tak samo jak na kla- wiaturze maszyny do pisania." 9970& 0: 7:1,0;"Jak wida,jest jeszcze duo wicej znakw na klawiszach i wok nich,na obudowie.Sprawiato,e klawiatura Spectrum jest bardziej zoona,ale ma i duo wiksze moliwoci." \y=10 :f(5):i=15:f(i)=1:i:f(2)=0:8700! u0:17,0;"Funkcjami zajmiemy si w innej lekcji.Teraz skoncentrujemy si na literach i cyfrach." 9970& ,8000@:4,0;"Aby uzyska due litery,przed naciniciem klawisza litery naley nacisn CAPS SHIFT.":9970 & 00:7:9960& 18000@:4,0;"Np.nacinicie klawisza H ...":d$="h":7600:100d:6,0;" ...daje ma liter ";1;d$:ch=d$:9971& 6 8000@:9960&:0:7:4,0;"Nacinicie najpierw CAPS SHIFT, a potem H ...":d$="H":7600:200:7,0;" ...daje du liter ";1;d$:ch=d$:9971&:2500  6:0: * ĕ8000@:4,0;"Nastpny test bdzie trwa bez koca,jeli nie naciniesz klawisza STOP (SYMBOL SHIFT i A)Teraz nacinij STOP." Ich=226:i=21:j=3:7605:9980&:9150# 9940& 9942& ~7000X:d$="NACISNIJ "+ch:y=40(:9960&:9700%:l=1:9150#:l=08000@:3005 z2263010 7010b .:d$="Znaki i ENTER":y=12 :9700% &`6,0;"W nastpnym tecie trzeba bdziewprowadza szeregi znakw (acuchy)." 0k'"Sowo 'ENTER' bdzie oznacza zawsze,e naley zakoczy wprowadzanie naciskajc klawisz ENTER." :'"Jeli w poleceniu jest mowa o wprowadzeniu znaku lub sowa kluczowego,nie naley naciska klawisza ENTER.":9970&  9940&  9942& ;k$="":i=0̺(3.9y*):7000X:k$=k$+ch:i cd$=k$+" ENTER":9960&:y=40(:9700%:9250"$:l=08000@:4005 z2264010  7010b ph0:6::d$="KONIEC":xs=5:ys=5:cs=8:y=16:x=0:9400$ zd$="ta sama lekcja - klawisz t":y=80P:9390$:y=120x:d$="lekcja 3 - inny klawisz":9390$:9200#:z="t"  9995 ' X3ch=(*26+65A)+(2*)*32 : b=9960&:d$="O.K.":9930&:i=1100d:i: k$>317180  k$=13 d$="ENTER":  d$="?":  }0;0;21,0;"0000000000";21,0;k$:d$="":x=09 :e$=(21,x):e$="0" d$=d$+e$:x:  5j=13:i=138&:d$=f$(j,i) *i:j:  q=i-1 Cy=(q/10 ):x=(q-y*10 )*3+y:y=y*3+10 18;8;1;y,x;1;" ":  7200  7300:j=2 #j=3i=38&:7300 .j=4j=1:i=38&:7300 aj=1z=(23658j\/8):2*(z/2)=z19,0;1;" ":  @X0:0::y=10 :x=0:n=9 :c=7:s=1:85004! J=x=x+1:y=y+3:s=11 :c=4:85004! T=x=x+1:y=y+3:s=21:n=8:85004! ^=x=x+1:y=y+3:s=31:n=6:85004! h8x=29:y=16:d$=" ":n=7:8600! r#x=0:y=19:8600! |#x=27:d$=" ":8600! ,x=24:d$=" ":n=2:8600! :4:ala,0,0,2,2,"sinclair" @7:ala,2,16,1,1,"ZX Spectrum":  !42y-1,x;:i=ss+n:c;"";0;" ";:i !>=y,x;:i=ss+n:5;f$(1,i);" ";0;" ";:i !HAy+1,x;:i=ss+n:5;2;"";0;" ";:i !R !n:y,x;d$;y+1,x; !#i=1̱d$:"";:i:0: ! x=12 "ky,x;5;"":i=13:y+i,x;5;" ":i:y+4,x;5;"" "Qy-1,x;4;f(1);"CODE";y+5,x;2;f(5);"IN" "k5:y+1,x+4;2;f(3);"AT";7;y+3,x+2;f(4);"INPUT" "$wf(2):x=8*x+2:y=8*y+8:7:d$="I":xs=2:ys=2:cs=8:9400$ "V 0: "0:y=32 :d$="PRZEWODNIK":9700%:y=546:d$="UYTKOWNIKA":9700%:y=144:1:y=96`:d$="ZX Spectrum":9700%:y=150:d$="POLMER 1986":9700% #-9200#:ch=zz=226ch226 # 9950& #23560\,0 #'z=23560\:z=09210# $ $"N0,22;" ";0,22;:l=0:k$=k$+13 $6Hl=l+1:ch=k$(l):9150#:l=0z=13 z=226 $@z;:92706$ $Ld$="ENTER":9950& $T6:6:0:: $6xs=1:ys=2:x=(256-cs*d$)/2 $ala,x,y,xs,ys,d$: %Tx=(256-24*d$)/2:xs=3:ys=4:cs=8:9400$ %Tx=(256-16*d$)/2:xs=2:ys=2:cs=8:9400$ &:ch=(24*+97a) &7"Nacinij klawisz ";1;ch;0:9150# &0i=300-1:.003xD,i:i: &-9960&:y=32 :7:9600% &/8000@:d$="TEST":9930&:502: &֞6:0:d$="Przerwanie testu - klawisz STOP":xs=1:ys=2:cs=8:x=4:y=176:9400$:0:7:9960& &ު0:7:d$="NIE TAK!":9930&:9920&:8000@:7:l=0:k$=z:7100:d$=" nie "+d$:y=24:cs=7:9390$:d$=ch &P7600:k$=ch:7100:d$=" powinno by "+d$:y=40(:9390$ &K6;1;8,10 ;"JESZCZE RAZ":9980&:9150# &Oj=05:3+j,0;" ":j: &ch=(26*+97a) &_0:6:d$="Nacinij klawisz "+ch:y=176:cs=8:9390$:9150# &X0:6:d$="Nacinij migajce klawisze":y=176:cs=8:9390$ ' I65367W:: 10 ,8;1;"WCZ MAGNETOFON":502 ' f23765\,0,120x,1,2," WPROWADZANIE LEKCJI 3 ":0,0; ' u23675{\,88X:23676|\,255:23613=\,84T:23614>\,255:23755\,255:"" ' 3   !\ \ʷlekcja 3   ""  "\2 Y " # <@TT0}|\\\m_\}}l_}}}"\z\X! !PP!!00  iW K SR P] À]]8>> >>>~ ~@HP`@~0 JbRJFB,2"""8DDD82[$+[>^*=\++![~#"[o<&)))=( K{\RK6\ >2[: [2 [: [2[> 2[~#"[2[:[= 0:[= :[G: [O: [ 2 [*[2[: [G: [2 [*[2[: [G: [2[: [Oͷ^:[<2[ :[<2[ :[@ :[G:\G:[o:[g>Xg:\w:[G@gxgxo:[Go!^xO F![F(//Ð =22+3+0+" "23560\,8715 "  5 23675{\,216 23676|\,92\ :23988],110n:23989],0:23762\ 8ala=23765\:q$=" " 6:0:7: f$(3,38&) 6f$(1)="1234567890QWERTYUIOPASDFGHJKL ZXCVBNM " Bf$(2)="1234567890qwertyuiopasdfghjkl"+13 +"zxcvbnm " 7f$(3)="!@#$%&'()_<>Ŭ;""^-+= :`?/*,. " 5d(5):d(4)=-1:d(5)=1 dG8920":0:y=0:d$="LEKCJA 3":9700%:9970& n8000@:d$="NIE NACISKAJ BREAK!":y=40(:9390$:1;19,0;" ";19,27;" ":100d x9960&:4,0;"Nacinicie BREAK powoduje przerwanie programu i ponowne rozpoczcie go od pocztku.":9970& <0:7::y=4:d$="KLAWIATURA":9700% ҁ4,0;"Migajce sowa na klawiszach i wok nich s kluczowymi sowami jzyka BASIC komputera ZX Spectrum." [y=9 :f(5):i=15:f(i)=1:i:f(2)=0:8700! 0:7:16,0;"Kade sowo kluczowe w jzyku BASIC komputera Spectrum wprowa-dzane jest przez nacinicie odpowiedniego klawisza(klawiszy)a nie przez jego przeliterowanie" ch="i":9971&:0::7:0,0;"Zaczniemy od sw kluczowych napisanych na klawiszach biaym kolorem." 7y=5:f(5):f(4)=1:8700! 0:7:12 ,0;"Te sowa kluczowe s najczciejuywane w programach i wystpujzawsze na pocztku instrukcji lub po sowie kluczowym THEN." '"Komputer wykorzystuje tu zdol- no rozpoznawania,czy nacini-cie klawisza zinterpretowa jakoliter,czy jako sowo kluczowe." "ch="I":9971& ,9940&:9960&:4,0;"W tecie,ktry zacznie si za chwil komputer oczekuje od Ciebie wprowadzania sw kluczo-wych jzyka BASIC.":i=1700:i 6 9942& @)k$=º(25*+230):7100 Jd$=d$+" ENTER":y=32 :9960&:7:9700%:9250"$:l=08000@:k$=k$(1̱k$-1):3106 Tz226320@ ^87010b::y=4:d$="SYMBOL SHIFT":9700% h4,0;"Sowa kluczowe i symbole ozna- czone na klawiszach kolorem czerwonym otrzymuje si przez rwnoczesne nacinicie odpo- wiedniego klawisza i klawisza SYMBOL SHIFT":i=1100d:i jMy=12 :f(5):f(3)=1:8700!:0:9970& r 9940& w 9942& |9k$=f$(3,(1+37%*)):k$=" "380| ~7100:d$=d$+" ENTER":y=32 :9960&:7:9700%:9250"$:l=08000@:k$=k$(1̱k$-1):375w %z226ch=226380|  7010b pi0:6::d$="KONIEC":xs=5:ys=5:cs=8:y=16:x=16:9400$ zd$="ta sama lekcja - klawisz t":y=80P:9390$:y=120x:d$="lekcja 4 - inny klawisz":9390$:9200#:z="t"z="T"  9995 ' X3ch=(*26+65A)+(2*)*32 : b=9960&:d$="O.K.":9930&:i=0100d:i: k$=d$ k$>317180  k$=13 d$="ENTER":  d$="???":  0;0;21,0;"00000000000000000000000000000000";21,0;k$:d$="":x=09 :e$=(21,x):e$="0" d$=d$+e$:x:  5j=13:i=138&:d$=f$(j,i) *i:j: 'q=i-1:d=d(j):e$=f$(1,i) Ey=(q/10 ):x=(q-y*10 )*3+y:y=y*3+10 -d 18;8;1;y,x;1;" ": "ch>229d$=(ch-133) %7200 :7300:j=2 #j=3i=38&:7300 .j=4j=1:i=38&:7300 aj=1z=(23658j\/8):2*(z/2)=z19,0;1;" ":  @X0:0::y=10 :x=0:n=9 :c=7:s=1:85004! J=x=x+1:y=y+3:s=11 :c=4:85004! T=x=x+1:y=y+3:s=21:n=8:85004! ^=x=x+1:y=y+3:s=31:n=6:85004! h8x=29:y=16:d$=" ":n=7:8600! r#x=0:y=19:8600! |#x=27:d$=" ":8600! ,x=24:d$=" ":n=2:8600! ^x=0:y=0:xs=2:ys=2:cs=6:d$="sinclair":4:9400$ acs=7:x=2:y=16:xs=1:ys=1:d$="ZXSpectrum":7:9400$  !42y-1,x;:i=ss+n:c;"";0;" ";:i !>=y,x;:i=ss+n:5;f$(1,i);" ";0;" ";:i !HAy+1,x;:i=ss+n:5;2;"";0;" ";:i !R !n:y,x;d$;y+1,x; !#i=1̱d$:"";:i:0: ! x=12 "ky,x;5;"":i=13:y+i,x;5;" ":i:y+4,x;5;"" "Qy-1,x;4;f(1);"CODE";y+5,x;2;f(5);"IN" "k5:y+1,x+4;2;f(3);"AT";7;y+3,x+2;f(4);"INPUT" "$wf(2):x=8*x+2:y=8*y+8:7:d$="I":xs=2:ys=2:cs=8:9400$ "V 0: "رy=32 :d$="PRZEWODNIK":9700%:y=546:d$="UYTKOWNIKA":9700%:d$="ZX Spectrum":y=85U:9700%:y=150:1:d$="POLMER 1986":9700% #U9200#:ch>229z+133<256z+133>229z=z+133 #!ch=zz=226ch226 # 9950& #23560\,0 #'z=23560\:z=09210# $ $"N0,22;" ";0,22;:l=0:k$=k$+13 $6Hl=l+1:ch=k$(l):9150#:l=0z=13 z=226 $@z;:92706$ $Ld$="ENTER":9950& $T6:6:0:: $6xs=1:ys=2:x=(256-cs*d$)/2 $ala,x,y,xs,ys,d$: %Tx=(256-24*d$)/2:xs=3:ys=4:cs=8:9400$ %Tx=(256-16*d$)/2:xs=2:ys=2:cs=8:9400$ &8"Nacinij klawisz ";1;ch;0:9150# &0i=300-1:.003xD,i:i: &-9960&:y=32 :7:9600% &08000@:d$="TEST":9930&:150: &֞6:0:d$="Przerwanie testu - klawisz STOP":xs=1:ys=2:cs=8:x=4:y=176:9400$:0:7:9960& &ޡ9960&:d$="NIE TAK!":9930&:9920&:8000@:l=0:7:k$=z:7100:d$="nie "+d$:y=24:cs=7:9390$:d$=ch &-7600:d$=ch:ch=13 d$="ENTER" &k$=d$:7100:d$="powinno by "+d$:y=40(:cs=7:9390$:6;1;8,11 ;"JESZCZE RAZ":9980&:9150# &Oj=05:3+j,0;" ":j: &ch=(26*+97a) &_0:6:d$="Nacinij klawisz "+ch:y=176:cs=8:9390$:9150# &l6:0:d$="Nacinij migajce klawisze":y=176:cs=8:9390$:0:7: ' I65367W:: 10 ,8;1;"WCZ MAGNETOFON":502 ' f23765\,0,120x,1,2," WPROWADZANIE LEKCJI 4 ":0,0; ' u23675{\,88X:23676|\,255:23613=\,84T:23614>\,255:23755\,255:"" 2   "\2 \ "8715 " lekcja 4    ""  (#\ G **# # <@TT8~\\\|_\~~{_~#\)X![!PP!88 W K SR Pl Ï]]!j\˞:j\2j\8>> >>>~ ~@HP`@~0 JbRJFB,2"""8DDD82[$+[>^*=\++![~#"[o<&)))=( K{\RK6\ >2[: [2 [: [2[> 2[~#"[2[:[= 0:[= :[G: [O: [ 2 [*[2[: [G: [2 [*[2[: [G: [2[: [O^:[<2[ :[<2[ :[@ :[G:\G:[o:[g>Xg:\w:[G@gxgxo:[Go!^xO F![F(//Ð =22+3+0+" "23560\,9000(#  4 -23675{\,231:23676|\,92\ 23762\ 8ala=23765\:q$=" " 6:0:7: f$(3,38&) f$(1)=7+6+4+5+8+10 +11 +9 +15+12 +"QWERTYUIOPASDFGHJKL ZXCVBNM"+14 Bf$(2)="1234567890qwertyuiopasdfghjkl"+13 +"zxcvbnm " 7f$(3)="!@#$%&'()_<>Ŭ;""^-+= :`?/*,. " 5d(5):d(4)=-1:d(5)=1 dB8920":y=0:d$=" LEKCJA 4 ":9700%:9970& n8000@:d$="NIE NACISKAJ BREAK!":y=40(:9390$:1;19,0;" ";19,27;" ":100d x9960&:4,0;"Nacinicie BREAK powoduje przerwanie programu i ponowne rozpoczcie go od pocztku.":9970& 90:7::y=4:d$="KURSORY":9700% Ҭ3,0;"Interpretacja klawisza zaley nie tylko od klawisza CAPS SHIFTale rwnie od biecego trybu pracy,o ktrym mona si zorien-towa po typie kursora." mx=2:y=9 :c$="KLCEG":5;'"KURSOR":i=15:1;y+2*i,x;c$(ii):i x=5:11 ,x;"Tryb sw kluczowych";13 ,x;"Tryb literowy - mae litery";15,x;"Tryb literowy - due litery";17,x;"Tryb rozszerzony";19,x;"Symbole graficzne" -9970&:0:7::y=4:d$="KONTROLA TRYBU":9700%:4,0;"Zwykle aktywny jest kursor L chyba, e komputer spodziewa sisowa kluczowego i wtedy aktywnyjest kursor K . Pozostae trzy tryby-kursory mona uzyska na- ciskajc nastpujce pary klawi-szy:" n'" C CAPS SHIFT i 2 (CAPS LOCK)"''" E CAPS SHIFT i SYMBOL SHIFT"''" G CAPS SHIFT i 9 (GRAPHICS)" _'"Naciniecie tej samej kombinacjiklawiszy powoduje powrt do kursora L.":9970& ,9940&:9960&:7020l:4,0;"Biecy kursor pokazany jest powyej.Nacinij klawisze, ktrezamieni biecy kursor na kur- sor dany w tecie.":9970& 69942&:7050 @9960&:7020l:k$="CEG"+6+14+15:i=(3*+1):c$=k$(ii):ch=k$(i+3):7030v E9l=1:9150#:l=08000@:3106 Fz=226340T G,9960&:7020l:c$="L":7030v H9l=1:9150#:l=08000@:3106 Jz226320@ T$7050:7010b:1300 p7:7:0: zd$="ta sama lekcja - klawisz t":y=80P:9390$:y=120x:d$="lekcja 5 - inny klawisz":9390$:9200#:z="t"z="T"  9995 ' b=9960&:d$="O.K.":9930&:i=0100d:i: ld$="KURSOR":x=130:y=8:3:9710%:7:7900:1:d$=c$:y=8:x=232:9710%:0: vgd$="ZMIE NA":x=30:y=40(:9710%:d$=c$:x=190:1:9710%:0: '23617A\,0:w=23768\: k$=d$ k$>317180  k$=13 d$="ENTER": (k$=14d$="CAPS/SYMBOL SHIFT": 2i=110 :k$=f$(1,i)7130  i:d$="?": d$="CAPS SHIFT-"+i:  0;0;21,0;"00000000000000000000000000000000";21,0;k$:d$="":x=09 :e$=(21,x):e$="0" d$=d$+e$:x:  5j=13:i=138&:d$=f$(j,i) *i:j: 'q=i-1:d=d(j):e$=f$(1,i) Ey=(q/10 ):x=(q-y*10 )*3+y:y=y*3+10 -d 18;8;1;y,x;1;" ": "ch>229d$=(ch-133) %7200 :7300:j=2 #j=3i=38&:7300 .j=4j=1:i=38&:7300 Mj=17900:c$="L"i<11 19,0;1;" ":  'x=23617A\:x07930 =y=(23658j\/8):2*(y/2)yc$="C":  c$="L": x=2c$="G" x=1c$="E"  @n0:0::y=10 :x=0:n=9 :c=7:s=1:j=2:85004!:j=1 J=x=x+1:y=y+3:s=11 :c=4:85004! T=x=x+1:y=y+3:s=21:n=8:85004! ^=x=x+1:y=y+3:s=31:n=6:85004! h8x=29:y=16:d$=" ":n=7:8600! r#x=0:y=19:8600! |#x=27:d$=" ":8600! ,x=24:d$=" ":n=2:8600! ^x=0:y=0:xs=2:ys=2:cs=6:d$="sinclair":4:9400$ ax=2:y=16:xs=1:ys=1:cs=7:d$="ZXSpectrum":7:9400$  !42y-1,x;:i=ss+n:c;"";0;" ";:i !>7y,x;:i=ss+n:5;f$(j,i);" ";0;" ";:i !HAy+1,x;:i=ss+n:5;2;"";0;" ";:i !R !n:y,x;d$;y+1,x; !#i=1̱d$:"";:i:0: ! x=12 "ky,x;5;"":i=13:y+i,x;5;" ":i:y+4,x;5;"" "Qy-1,x;4;f(1);"CODE";y+5,x;2;f(5);"IN" "k5:y+1,x+4;2;f(3);"AT";7;y+3,x+2;f(4);"INPUT" "$wf(2):x=8*x+2:y=8*y+7:7:d$="I":xs=2:ys=2:cs=8:9400$ "V 0: "P6:6::0::17,7;1;"WYCZ MAGNETOFON": "رy=32 :d$="PRZEWODNIK":9700%:y=546:d$="UYTKOWNIKA":9700%:y=95_:d$="ZX Spectrum":9700%:y=144:1:d$="POLMER 1986":9700% #U9200#:ch>229z+133<256z+133>229z=z+133 #!ch=zz=226ch226 # 9950& #23560\,0 #'z=23560\:z=09210# $8z=14ƾ23617A\123617A\,1: $8z=15ƾ23617A\223617A\,2: $z=6w=23774\ $23617A\,0: $"N0,22;" ";0,22;:l=0:k$=k$+13 $6Hl=l+1:ch=k$(l):9150#:l=0z=13 z=226 $@z;:92706$ $Ld$="ENTER":9950& $6xs=1:ys=2:x=(256-cs*d$)/2 $ala,x,y,xs,ys,d$: %Tx=(256-24*d$)/2:xs=3:ys=4:cs=8:9400$ %$x=(256-16*d$)/2 %0xs=2:ys=2:cs=8:9400$ &:ch=(24*+97a) &8"Nacinij klawisz ";1;ch;0:9150# &0i=300-1:.003xD,i:i: &-9960&:y=32 :7:9600% &/8000@:d$="TEST":9930&:502: &֞6:0:d$="Przerwanie testu - klawisz STOP":xs=1:ys=2:cs=7:x=4:y=176:9400$:0:7:9960& &ޕd$="NIE TAK!":9930&:9920&:8000@:l=0:7:k$=z:7100:d$="nie "+d$:y=24:cs=7:9390$:d$=ch &7600:k$=ch:7100:d$="powinno by "+d$:y=40(:cs=7:9390$:6;1;8,11 ;"JESZCZE RAZ":9980&:9150# &Oj=05:3+j,0;" ":j: &{6:0:ch=(26*+97a):d$="Nacinij klawisz "+ch:y=176:cs=8:9390$:9150# &X6:0:d$="Nacinij migajce klawisze":y=176:cs=8:9390$ ' I65367W:: 10 ,8;1;"WCZ MAGNETOFON":502 ' e23765\,0,120x,1,2," WPROWADZANIE LEKCJI 5 ":0,0; ' u23675{\,88X:23676|\,255:23613=\,84T:23614>\,255:23755\,255:"" 2   (#\ \(#3lekcja 5    ""  "\2 *9" # <@T8\~\\\|_\]~_~{_g~~~"\-X![!@P!!88  W K SR Pl Ï]]!j\˞:j\2j\8>> >>>~ ~@HP`@~0 JbRJFB,2"""8DDD82[$+[>^*=\++![~#"[o<&)))=( K{\RK6\ >2[: [2 [: [2[> 2[~#"[2[:[= 0:[= :[G: [O: [ 2 [*[2[: [G: [2 [*[2[: [G: [2[: [O^:[<2[ :[<2[ :[@ :[G:\G:[o:[g>Xg:\w:[G@gxgxo:[Go!^xO F![F(//Ð =22+3+0+" "23560\,8850"  4 -23675{\,231:23676|\,92\ %24003],110n:23762\ 8ala=23765\:q$=" " 6:0:7: f$(5,40() f$(1)=7+6+4+5+8+10 +11 +9 +15+12 +"QWERTYUIOPASDFGHJKL ZXCVBNM"+14 Bf$(2)="1234567890qwertyuiopasdfghjkl"+13 +"zxcvbnm " 7f$(3)="!@#$%&'()_<>Ŭ;""^-+= :`?/*,. " 6f$(4)="Ψҩе[]~|\{}خ " 7f$(5)=" ¯伽 Ħ " 5d(5):d(4)=-1:d(5)=1 dB8920":y=0:d$=" LEKCJA 5 ":9700%:9970& n8000@:d$="NIE NACISKAJ BREAK!":y=40(:9390$:1;19,0;" ";19,27;" ":100d x9960&:4,0;"Nacinicie BREAK powoduje przerwanie programu i ponowne rozpoczcie go od pocztku.":9970& ȥ8000@:4,0;"Kursor G umoliwia uycie symbo-li graficznych umieszczonych na klawiszach od 1 do 8 i symboli zdefiniowanych przez uytkownika" 9d=0:q=07:7310:q:9970& 0:7::y=5:d$="KURSOR E ":9700%:3,0;"Kursor E umoliwia uzyskanie sw kluczowych i symboli umie- szczonych nad lub pod klawiszem." Ky=9 :f(5):f(1)=1:f(5)=1:8700! 0:7:17,0;"Grne (zielone) symbole otrzymu-je si pod warunkiem,e klawisz SYMBOL SHIFT nie jest naciskany,bo wtedy otrzymamy symbol dolny.":9970& ,9940&:9960&:7020l:4,0;"Pamitaj! Musisz uzyska kursor E w celu otrzymania symboli umieszczonych nad lub pod klawi-szem.":9970& 69942&:7050 @9960&:7025q EBch=(33!+193*):ch>127ch<165325E Jyk$=ch:7100:d$="NACINIJ "+d$:y=40(:9390$:l=1:9150#:l=08000@:3106 Tz226320@ ^ 7010b ph0:6::d$="KONIEC":xs=5:ys=6:cs=8:y=16:x=8:9400$ zd$="Ta sama lekcja - klawisz t":x=0:y=80P:9390$:y=120x:d$="Vademecum - inny klawisz ":9390$:9200#:z="t"  9995 ' b=9960&:d$="O.K.":9930&:i=0100d:i: l:d$="KURSOR":x=130:y=8:3:9710% qT7:7900:1:d$=c$:y=8:x=232:9710%:0: vd$="ZRB":x=8:y=40(:9710%:d$=c$:x=88X:1:9710%:0:3:d$="KURSOR=":x=120x:9710% '23617A\,0:w=23768\: k$=d$ (w=k$:w>31w<165d$=k$: w>317180  w=13 d$="ENTER": &w=14d$="CAPS/SYMBOL SHIFT": 2i=110 :k$=f$(1,i)7130  i:d$="?": d$="CAPS SHIFT-"+i:  0;0;21,0;"00000000000000000000000000000000";21,0;k$:d$="":x=09 :e$=(21,x):e$="0" d$=d$+e$:x:  5j=15:i=138&:d$=f$(j,i) *i:j: 'q=i-1:d=d(j):e$=f$(1,i) Ey=(q/10 ):x=(q-y*10 )*3+y:y=y*3+10 -d 18;8;1;y,x;1;" ": "ch>229d$=(ch-133) %7200 :7300:j=2 #j=3i=38&:7300 ;j=4j=1:i=38&:7300:j=4: Bj=17900:c$="L"19,0;1;" ":  'x=23617A\:x07930 =y=(23658j\/8):2*(y/2)yc$="C":  c$="L": x=2c$="G" x=1c$="E"  @n0:0::y=10 :x=0:n=9 :c=7:s=1:j=2:85004!:j=1 J=x=x+1:y=y+3:s=11 :c=4:85004! T=x=x+1:y=y+3:s=21:n=8:85004! ^=x=x+1:y=y+3:s=31:n=6:85004! h8x=29:y=16:d$=" ":n=7:8600! r#x=0:y=19:8600! |#x=27:d$=" ":8600! ,x=24:d$=" ":n=2:8600! ^x=0:y=0:xs=2:ys=2:cs=6:d$="sinclair":4:9400$ ax=2:y=16:xs=1:ys=1:cs=7:d$="ZXSpectrum":7:9400$  !42y-1,x;:i=ss+n:c;"";0;" ";:i !>7y,x;:i=ss+n:5;f$(j,i);" ";0;" ";:i !HAy+1,x;:i=ss+n:5;2;"";0;" ";:i !R !n:y,x;d$;y+1,x; !#i=1̱d$:"";:i:0: ! x=12 "ky,x;5;"":i=13:y+i,x;5;" ":i:y+4,x;5;"" "Qy-1,x;4;f(1);"CODE";y+5,x;2;f(5);"IN" "k5:y+1,x+4;2;f(3);"AT";7;y+3,x+2;f(4);"INPUT" "$wf(2):x=8*x+2:y=8*y+8:7:d$="I":xs=2:ys=2:cs=8:9400$ "V 0: "ضy=32 :d$="PRZEWODNIK":9700%:y=568:d$="UYTKOWNIKA":9700%:y=96`:d$=" ZX Spectrum ":9700%:y=144:1:d$="POLMER 1985":9700% #8900":1 #U9200#:ch>229z+133<256z+133>229z=z+133 #!ch=zz=226ch226 # 9950& #23560\,0 #'z=23560\:z=09210# $Nz=14ƾ23617A\123617A\,1:7025q:9200# $8z=15ƾ23617A\223617A\,2: $z=6w=23774\ $23617A\,0: $"N0,22;" ";0,22;:l=0:k$=k$+13 $6Hl=l+1:ch=k$(l):9150#:l=0z=13 z=226 $@z;:92706$ $Ld$="ENTER":9950& $6xs=1:ys=2:x=(256-cs*d$)/2 $ala,x,y,xs,ys,d$: %Tx=(256-24*d$)/2:xs=3:ys=4:cs=8:9400$ %$x=(256-16*d$)/2 %0xs=2:ys=2:cs=8:9400$ &:ch=(24*+97a) &7"Nacinij klawisz ";1;ch;0:9150# &0i=300-1:.003xD,i:i: &-9960&:y=32 :7:9600% &/8000@:d$="TEST":9930&:502: &֓6:0:d$="Przerwanie testu - klawisz STOP":xs=1:ys=2::x=4:y=176:9400$:0:7:9960& &ޣd$="NIE TAK !":9930&:9920&:8000@:7:7020l:l=0:k$=z:7100:d$=" nie "+d$:y=24:cs=7:9390$:d$=ch &7600:k$=ch:7100:d$="powinno by "+d$:y=40(:cs=7:9390$:6;1;8,11 ;" JESZCZE RAZ ":j<4d$="Nacinij migajce klawisze":9980&:9150# &?d$="Zobacz czy jest to poprawny tryb":9980&:9150# &X0:j=05:3+j,0;" ":j: &}6:0:ch=(26*+97a):d$="Nacinij klawisz "+ch+"":y=176:cs=8:9390$:9150# &K6:0:y=176:cs=8:9390$:0:7: ' I65367W:: 10 ,8;1;"WCZ MAGNETOFON":502 ' f23765\,0,120x,1,2," WPROWADZANIE VADEMECUM ":0,0; ' u23675{\,88X:23676|\,255:23613=\,84T:23614>\,255:23755\,255:"" 2   "\2 \"88508VADEMECUM  d ""  Y\6 Yv# <@TT0B%\\\\n_\CEm_LMooY\z&a\! !@P!!00  W K SR P] À]]8>> >>>~ ~@HP`@~0 JbRJFB,2"""8DDD82[$+[>^*=\++![~#"[o<&)))=( K{\RK6\ >2[: [2 [: [2[> 2[~#"[2[:[= 0:[= :[G: [O: [ 2 [*[2[: [G: [2 [*[2[: [G: [2[: [Oͷ^:[<2[ :[<2[ :[@ :[G:\G:[o:[g>Xg:\w:[G@gxgxo:[Go!^xO F![F(//Ð >22+3+0+" "23560\,23000Y N24100$^-112p,40(:24101%^-112p,35#:23762\ d?ala=23765\:q$="  " o2:7:1: s4ala,20,10 ,3,4,"VADEMECUM" x6,0; " Program ten stanowi vademecum sw kluczowych jzyka BASIC dla mikrokomputera ZX Spectrum";''';" Zawiera on krtki opis kadego sowa kluczowego."'''' " Nacinij klawisz z wybra- nym przez siebie sowem. Zwr uwag na kursor w lewym dolnym rogu." 7,ala,0,176,2,2,"K" 8Z#0;0,0;1;0;7;1;" ";1,0;" " ;23617A\,0 @23560\,0 E'i=23560\:i14340T JW23617A\=023617A\,1:ala,0,176,2,2,"C" Ke#0;0,0;1;0;7;1;" ";1,0;" ":320@ O 3106 Y'i>96`i<123{i=i+133 ^$i<165i>255325E _$i>198i<202325E c h 900  200  8204 %@19,4;5;0;" Typ sowa kluczowego: " *A20,4;0;5;;" f u n k c j a " / 41,e;1;q$(d) 52,e;1;q$(d) 73,e;1;q$(d) 84,e;1;q$(d) 9 R 8204 W@19,4;5;0;" Typ sowa kluczowego: " \A20,4;0;5;;" o p e r a t o r " ] a 8204 f@19,4;5;0;" Typ sowa kluczowego: " kA20,4;0;5;;" z d a n i e " n p 8204 u@19,4;5;0;" Typ sowa kluczowego: " zA20,4;0;5;;" k o m e n d a "   %l=1000+(i-165)*20 l .ala,88X,12 ,3,3,"RND" "e=9 :d=16:800  511 ,1;"Wyznacza kolejn liczb losow."  200 1ala,480,12 ,3,3,"INKEY$" "e=5:d=24:800  8,1;"Odczytuje klawiatur. Wynikiem jest znak (w trybie L lub C) okrelony wcinitym klawiszem."  200 -ala,98b,12 ,3,3,"PI" #e=10 :d=14:800  f9 ,7;"Staa matematyczna (3,14159265...)"  200 %.ala,100d,12 ,3,3,"FN" '#e=10 :d=14:800  )R9 ,1;"z liter wywouje zdefinio- wan przez uytkownika funkcj." - 200 90ala,68D,12 ,3,3,"POINT" ;"e=7:d=21:800  =9 ,1;"Gdy element obrazu o wsprzd- nych x,y ma kolor zapisu, to wynik jest rwny 1, w przeciwnym przypadku 0." A 200 M2ala,44,,12 ,3,3,"SCREEN$" O"e=4:d=27:800  Q9 ,3;"Na ekranie pojawi si znak w linii x i w kolumnie y. Wystpuje take z SAVE i LOAD." U 200 a/ala,80P,12 ,3,3,"ATTR" d"e=8:d=19:800  eq9 ,1; "Liczba, w ktrej zakodowane s atrybuty znakw - lini x i kolumny y." i 200 u.ala,100d,12 ,3,3,"AT" v#e=10 :d=14:800  y9 ,1;"Wprowadza znak sterujcy , po ktrym nastpuje jeden bajt okrelajcy m (numer wiersza) oraz jeden bajt okrelajcy n (numer kolumny)." } 200 .ala,88X,12 ,3,3,"TAB" "e=9 :d=16:800  p9 ,1;"Wprowadza znak sterujcy , po ktrym nastpuj dwa bajty okrelajce n (numer kolumny)."  200 /ala,80P,12 ,3,3,"VAL$" "e=8:d=19:800  ~9 ,3; "Szacuje x (bez cudzysoww ograniczajcych acuch) jako wyraenie acuchowe."  200 /ala,80P,12 ,3,3,"CODE" "e=8:d=19:800  a9 ,1;"Kod pierwszego znaku w acu- chu x lub 0, gdy x jest acu- chem pustym."  200 .ala,88X,12 ,3,3,"VAL" "e=9 :d=16:800  o9 ,3;"Szacuje x (bez cudzysoww ograniczajcych acuch) jako wyraenie numeryczne."  200 .ala,88X,12 ,3,3,"LEN" "e=9 :d=16:800  &9 ,7;"Dugo acucha."  200 .ala,88X,12 ,3,3,"SIN" "e=9 :d=16:800  R9 ,2;"Funkcja sinus x, gdzie x podajemy w radianach."  200 .ala,88X,12 ,3,3,"COS" "e=9 :d=16:800  R9 ,2;"Funkcja cosinus x, gdzie x podajemy w radianach."  200 .ala,88X,12 ,3,3,"TAN" "e=9 :d=16:800  R9 ,2;"Funkcja tangens x, gdzie x podajemy w radianach."  200 ).ala,88X,12 ,3,3,"ASN" +"e=9 :d=16:800  -G9 ,5;"Funkcja arcus sinus x Wynik w radianach." 1 200 =.ala,88X,12 ,3,3,"ACS" ?"e=9 :d=16:800  AG9 ,4;"Funkcja arcus cosinus x Wynik w radianach." E 200 Q.ala,88X,12 ,3,3,"ATN" S"e=9 :d=16:800  UG9 ,4;"Funkcja arcus tangens x Wynik w radianach." Y 200 e.ala,100d,12 ,3,3,"LN" g#e=10 :d=14:800  i(9 ,6;"Logarytm naturalny." m 200 y.ala,88X,12 ,3,3,"EXP" {"e=9 :d=16:800  }+9 ,5;"Staa 'e' do potgi x."  200 .ala,88X,12 ,3,3,"INT" "e=9 :d=16:800  G9 ,1;"Cz cakowita liczby zawsze zaokrglona w d."  200 .ala,88X,12 ,3,3,"SQR" "e=9 :d=16:800  09 ,3;"Pierwiastek kwadratowy z x."  200 .ala,88X,12 ,3,3,"SGN" "e=9 :d=16:800  8,3;"Znak liczby x: -1 dla x<0 0 dla x=0 1 dla x>0"  200 .ala,88X,12 ,3,3,"ABS" "e=9 :d=16:800  -9 ,4;"Warto bezwzgldna z x."  200 /ala,76L,12 ,3,3,"PEEK" "e=7:d=20:8204 A9 ,4;"Zawarto bajtu pamici o adresie m."  200 -ala,98b,12 ,3,3,"IN" #e=10 :d=14:8204 K9 ,2;"Wyprowadza bajt n do bramy m na poziomie procesora."  200 .ala,88X,12 ,3,3,"USR" "e=9 :d=16:8204  @9 ,1;"Przywouje podprogram w kodzie maszynowym."  200 /ala,76L,12 ,3,3,"STR$" "e=7:d=20:8204 B9 ,3;"Wywietla acuch znakw o dugoci x." ! 200 -/ala,76L,12 ,3,3,"CHR$" /"e=7:d=20:850R 1p9 ,1;"Znak, ktrego kodem jest liczba x zaokrglona do naj- bliszej liczby cakowitej." 5 200 A.ala,88X,12 ,3,3,"NOT" C"e=9 :d=16:850R E+9 ,4;"Logiczne zaprzeczenie." I 200 U.ala,88X,12 ,3,3,"BIN" W"e=9 :d=16:8204 Ya9 ,3;"Zamienia liczby binarne na liczby zapisane w systemie dziesitnym." ] 200 i.ala,100d,12 ,3,3,"OR" k#e=10 :d=14:850R m*9 ,5;"Logiczna alternatywa." q 200 }.ala,88X,12 ,3,3,"AND" "e=9 :d=16:850R )9 ,6;"Logiczna koniunkcja."  200 /ala,76L,12 ,3,3,"LINE" "e=7:d=20:8204 a9 ,2;"Uycie z SAVE powoduje po wczytywaniu automatyczny skok do linii n."  200 /ala,76L,12 ,3,3,"THEN" "e=7:d=20:865a *9 ,5;"Zobacz instrukcj IF."  200 .ala,100d,12 ,3,3,"TO" #e=10 :d=14:865a +9 ,5;"Zobacz instrukcj FOR."  200  /ala,76L,12 ,3,3,"STEP"  "e=7:d=20:865a  K9 ,5;"Krok w ptli FOR. Zobacz instrukcj FOR."  200 1ala,58:,12 ,3,3,"DEF FN" "e=5:d=25:865a !M9 ,2;"Okrelanie funkcji zdefinio- wanej przez uytkownika." % 200 1.ala,88X,12 ,3,3,"CAT" 3"e=9 :d=16:865a 519 ,2;"Dziaa tylko z 'microdrive'." 9 200 E1ala,58:,12 ,3,3,"FORMAT" G"e=5:d=25:865a I19 ,2;"Dziaa tylko z 'microdrive'." M 200 Y/ala,76L,12 ,3,3,"MOVE" ["e=7:d=20:865a ]19 ,2;"Dziaa tylko z 'microdrive'." a 200 m0ala,64@,12 ,3,3,"ERASE" o"e=6:d=22:865a q19 ,2;"Dziaa tylko z 'microdrive'." u 200 1ala,58:,12 ,3,3,"OPEN #" "e=5:d=25:865a 19 ,2;"Dziaa tylko z 'microdrive'."  200 2ala,44,,12 ,3,3,"CLOSE #" "e=4:d=27:865a 19 ,2;"Dziaa tylko z 'microdrive'."  200 0ala,68D,12 ,3,3,"MERGE" "e=6:d=23:880p 8,2;"Dziaa podobnie jak LOAD. Wprowadza nowy program nie kasujc zmiennych oraz linii starego programu, jeli nu- mery linii nie pokrywaj si."  200 1ala,58:,12 ,3,3,"VERIFY" "e=5:d=25:880p `10 ,3;"Porwnuje dane zapisane na tamie z danymi zapisanymi w pamici."  200 /ala,76L,12 ,3,3,"BEEP" "e=7:d=20:865a M10 ,4;"Generuje dwik trwajcy n sekund o wysokoci y."  200 1ala,58:,12 ,3,3,"CIRCLE" "e=5:d=25:865a D10 ,4;"Rysuje okrg o rodku x,y i promieniu r."  200 .ala,88X,12 ,3,3,"INK" "e=9 :d=16:865a .10 ,4;"Okrela kolor atramentu."  200  0ala,68D,12 ,3,3,"PAPER" "e=6:d=23:865a (10 ,7;"Okrela kolor ta."  200 !0ala,68D,12 ,3,3,"FLASH" #"e=6:d=23:865a %310 ,2;"Okrela czy znaki bd miga." ) 200 51ala,58:,12 ,3,3,"BRIGHT" 7"e=5:d=25:865a 9B10 ,2;"Okrela jaskrawo wywietlo- nych znakw." = 200 I2ala,44,,12 ,3,3,"INVERSE" K"e=4:d=27:865a M9 ,3;"Powoduje wywietlenie znakw w inwersji. Kolor ta zamienia si z kolorem atramentu." Q 200 ]/ala,76L,12 ,3,3,"OVER" _"e=7:d=20:865a aK10 ,5;"Powoduje nadruk kolejno wywietlanych znakw." e 200 q.ala,88X,12 ,3,3,"OUT" s"e=9 :d=16:865a uL10 ,3;"Wprowadza bajt n z bramy m na poziomie procesora." y 200 1ala,58:,12 ,3,3,"LPRINT" "e=5:d=25:865a S10 ,2;"Dziaa tak samo jak PRINT, ale z zastosowaniem drukarki."  200 0ala,68D,12 ,3,3,"LLIST" "e=6:d=23:865a S10 ,2;"Dziaa tak samo jak LIST, ale z zastosowaniem drukarki."  200 /ala,76L,12 ,3,3,"STOP" "e=7:d=20:865a Q10 ,2;" Zatrzymuje program i drukuje komunikat nr 9."  200 /ala,76L,12 ,3,3,"READ" "e=7:d=20:865a c10 ,4;"Nadaje zmiennym wartoci kolejnych wyrae z listy danych DATA."  200 /ala,76L,12 ,3,3,"DATA" "e=7:d=20:865a )10 ,6;"Cz listy danych."  200 2ala,44,,12 ,3,3,"RESTORE" "e=4:d=27:865a 9 ,4;"Przesuwa wskanik DATA do pierwszej instrukcji DATA w linii o numerze nie mniejszym od n."  200 .ala,88X,12 ,3,3,"NEW" "e=9 :d=16:880p ?9 ,5;"Usuwa program i zmienne z pamici."  200 1ala,58:,12 ,3,3,"BORDER" "e=5:d=25:865a K10 ,1;"Podaje kolor ramki i kolor ta dolnej czci ekranu."  200 %3ala,32 ,12 ,3,3,"CONTINUE" '"e=2:d=31:880p )f9 ,3;"Wznawia wykonanie programu, rozpoczynajc od miejsca jego zatrzymania." - 200 9.ala,88X,12 ,3,3,"DIM" ;"e=9 :d=16:865a =N10 ,1;"Wprowadza now tablic numery- czn lub alfanumeryczn." A 200 M.ala,88X,12 ,3,3,"REM" O"e=9 :d=16:865a Q310 ,2;"Pozwala wprowadza komentarz." U 200 a.ala,88X,12 ,3,3,"FOR" c"e=9 :d=16:865a e8,1;" FOR x=a TO b STEP c Ptla, w ktrej instruk- cje s wykonywane |(b-a)/c| razy. Ptla musi koczy si zawsze instrukcj NEXT." i 200 u0ala,68D,12 ,3,3,"GO TO" w"e=7:d=21:865a y310 ,2;"Skok do n-tej linii programu." } 200 1ala,58:,12 ,3,3,"GO SUB" "e=5:d=25:865a P10 ,2;"Wywoanie podprogramu rozpo- czynajcego si w linii n." 200 0ala,68D,12 ,3,3,"INPUT" "e=7:d=21:865a S10 ,2;"Zatrzymuje prac komputera i oczekuje na podanie danych." 200 /ala,76L,12 ,3,3,"LOAD" "e=7:d=20:880p @10 ,1;"Wprowadza do komputera program i zmienne." 200 /ala,76L,12 ,3,3,"LIST" "e=7:d=20:880p 510 ,1;"Powoduje wylistowanie programu." 200 .ala,88X,12 ,3,3,"LET" "e=9 :d=16:865a 310 ,2;"Nadaje zmiennej now warto." 200 0ala,68D,12 ,3,3,"PAUSE" "e=7:d=21:865a 10 ,1;"Zatrzymuje program na czas rwny ok. 0,02*n sek. Jeli n=0, to program jest za- trzymany a od nacinicia do- wolnego klawisza." 200 /ala,76L,12 ,3,3,"NEXT" "e=7:d=20:865a -10 ,4;"Koczy kad ptl FOR." 200 /ala,76L,12 ,3,3,"POKE" "e=7:d=20:865a J10 ,3;"Wpisuje warto n do bajtu pamici o adresie m."  200 )0ala,68D,12 ,3,3,"PRINT" +"e=7:d=21:880p -/10 ,4;"Powoduje wydruk na ekran." 1 200 =/ala,76L,12 ,3,3,"PLOT" ?"e=7:d=20:865a AJ10 ,2;"Rysuje kropk w kolorze atra- mentu w punkcie x,y." E 200 Q.ala,88X,12 ,3,3,"RUN" S"e=9 :d=16:880p Uh10 ,2;"Powoduje rozpoczcie wykonywa- nia programu od linii o naj- mniejszym numerze." Y 200 e/ala,76L,12 ,3,3,"SAVE" g"e=7:d=20:880p i@10 ,4;"Nagrywa na tam program i zmienne." m 200 y4ala,20,12 ,3,3,"RANDOMIZE" {"e=1:d=33!:865a }k10 ,1;"Ustawia zmienn systemow sto- sowan do generowania nastpnej wartoci funkcji RND." 200 -ala,98b,12 ,3,3,"IF" #e=10 :d=14:865a 7,1;"IF warunek THEN instrukcja Jeli 'warunek' jest prawdziwy, to jako nastpna wykonywana jest 'instrukcja' po sowie THEN. W przypadku przeciwnym nast- puje przejcie do nastpnej instrukcji." 200 .ala,88X,12 ,3,3,"CLS" "e=9 :d=16:865a R10 ,2;"Kasowanie zawartoci pamici obrazu (czyszczenie ekranu)." 200 /ala,76L,12 ,3,3,"DRAW" "e=7:d=20:865a 10 ,3;"Z biecej pozycji PLOT , podczas zataczania uku o kcie z, wykrela lini, przesuwajc punkt o war- to x poziomo i y pionowo." 200 0ala,68D,12 ,3,3,"CLEAR" "e=7:d=21:880p r10 ,2;" Kasuje wszystkie zmienne. Ustawia now warto RAMTOP." 200 1ala,58:,12 ,3,3,"RETURN" "e=5:d=25:865a 10 ,1;"Koczy podprogram i powoduje powrt do nastpnej instrukcji po GO SUB wywoujcej ten podprogram." 200 /ala,76L,12 ,3,3,"COPY" "e=7:d=20:880p h10 ,1;"Jeli wczona jest drukarka, to nastpuje wydruk grnych 22 linii z ekranu TV." 200 #(2:ala,68D,12 ,3,3,"BREAK" #)"e=7:d=21:8204 #n10 ,1;"Naciniecie klawisza powoduje zatrzymywanie wykonywanego w tym momencie programu." #r''" Jeli chcesz nagra inn cz programu nacisnij ENTER."''" Kady inny klawisz - kontynua- cja programu." #k$= $k$=""9200# $k$=13 9500% $" :10 %0:7:7:65367W:23675{\,88X:23676|\,255:23613=\,84T:23614>\,255:23755\,255:"" 2   Y\6 \Y00Y