ZXTape!ReaTerNuk e 7:23693\,63?:37368:23659k\,0:22,5;0;1;1;" WCZYTYWANIE PROGRAMU ":"":37347P<:23739\,111o:"":23739\,244w6:236599xrh,2 U:'0': LOADER BY D & M 1987 6RTN.SCR P/ "     ~8  @       ~8 @       ~8 8       ~8 0L       ~8  ~          ~8  ~        ~8  ~         ~8 `   `   Éa Ju\  5@@ >f=         \ Cd -j  *Ơd f00 =        8 @2  &  Lш B <07A aa S g       NJ  j  F~ <  A aa  ffff`    c?@(@    < L0&  ! aa  fffg`    ~c?@WL@ D  0 B<<~ 8   ! aa L ff    Bc0Lc " l   0@ 8ff   8  `8 fff    B0Lca> E*\   @  f< ΂  @T    cc`    ~? `8       #. "!\>7>!P O0À>2k\v ``8       #. n.$ VB<~B~||<<|~@B<< B< #F    ;   # p x p x0 p x0 p x0 p x0p h x0p h x0p h 0p h 0 p h 0 p ` p h 0 p ` 0pp h 0 p ` 0pp h 0 p ` 0pp h 0 p ` 0pp h 0 p ` 0 p 0 p ` 0 p ` 0pp zpp ` 0pp z6p ` 0pp z6pp 0 pvv 6 v2pp  p v p!P@~ #~#F#RTN.COD EGllllllll>X<|0f8l8vv0 000 0 0f<f<0 0`0 ~~`0 0`fff~fff~~ xflxlf```bf8ll8ff|``8lvff|lfff>|`lvff8<ff<`flxl8<lfffffff<ll8lfff>|~ 0~pppv""""8}8cIIc@HHHȀHHH@@1$D@_@D@$1`$@$@$@d@@$@$@ @" /" @0P   2 R    `  `(   )  /h.!!1!).)%%##!4T * @L@J@ @ @@H@  & %  $`D`  PP0"0B@x@@q  HqH(y( ! @@< ^P\BBbBR\RJJFFB0 ?{GCAC'd?~o}=#!A@! BDx 2??7> P@@ `!"<}~|@( p @0̀@@?p> 8| `}H@HO@f@  p|? >0> $@' 3 8|`R `~O?)  0T  'd(/($(D'*Jz  @2@J @"@x %=   %   <  B BBBBp~B BBBBp8?D!D|@!D!8@PPЀPPPP `@(@@(@(NQ(_(PHQN0 0  HDDH DDD|D DDDp$""$p""">""""8}8cIIc@HHHȀHHH@@1$D@_@D@$1`$@$@$@d@@$@$@ @" /" @0P   2 R    `  `(   )   ~A!A!@y9#e7sE:\&o)0&))K6\ ́>t́K\>O> GC\ B)) K{\ > t~#́= !\^(/K\ͪ"(=~w#~w!\5|;; *=\s#r͎{ ::\ ( ((<2\6!%"B\!"D\;;} x !~ (;yo&0$^ V F 6 JO{_8zWOz(~, !~ (@y_0nf u t F p Jà}o8|gà$|(--~ !~ Jyه^Wn f F ~98##81}o8 |g$|(-w#w?} o8 |g$|(w$}o8|g9$|(--w,w,w ³!~r~(&_!~_w#{z(=w#~w~(< ~0r c686~8686o~<ݾ8~w >ݖgw }w}ǬwX:(R o&~,fo(=~08#O(3qOxهWX!@F?w,w,w, w>22a22W/22=!q#q!p6#>G^VWWWWWD P "5"(i$"_"o=1o>3))520 @i$="0".2~L,20:8010J:1000*o:510 >i$="_".2~L,20:1000*o+500:510 &d2*o+4,3;0;s$:o=(i$):2*o+4,3;1;s$:520 M0,0:255,0:3,5;"REAKCJE TERMONUKLEARNE":x=0:y=141:a$=" TO PROGRAM EDUKACYJNY POKAZU- JCY PRZEBIEG REAKCJI SYNTEZY 4 JDER WODORU W JDRO HELU.":8060|:x=0:y=111o:a$=" KLAWISZAMI: ":8060|:1:a$="1-5":8065:0:a$=" MONA ZMIENIAOPCJE PROGRAMU. W OPCJACH 2 i 3 MONA ZATRZYMA AKCJ KLAWISZEM ":8065:1:a$="SPACE":8065:0:a$=" LUB PRZEZ ":8065:1:a$="BREAK":8065:0:a$=" WRCI DO MENU. KAD REAKCJ MONA POWT-RZY PRZYCISKAJC ":8065:1:a$="R":8065:0:a$=". SYMBOL '' OZNACZA CZEKANIE NA WCINICIE DOWOLNEGO KLAWISZA. W OPCJACH 2 i 3 STARTUJC PRZEZSYMBOL SHIFT+0 (ZAMIAST PRZEZ 0)MONA WYBRA POJEDYCZE REAKCJE.":8065:8040h wo0,0:255,0:x=24:y=151:a$="JAKO PRZYKAD ZWYKEJ SYNTEZYJDROWEJ ROZPATRYWA MONA PRZE-TWORZENIE CZTERECH JDER WODORU W JDRO HELU.JEDNAK PRAWDOPODO- BIESTWO JEDNOCZESNEGO ZDERZENIASI CZTERECH PROTONW JEST MAE,NAWET W WARUNKACH JAKIE PANUJ WE WNTRZU GWIAZD.PRZETWORZENIE PROTONW W JDRO HELU MOLIWE JEST W WYNIKU CYKLICZNEJ REAKCJIJDROWEJ,NP.TZW.CYKLU PROTONOWO-PROTONOWEGO,KTRY ZACHODZI W TEMPERATURZE RZDU 10 MILIONW KELWINW.":8060|:8040h:8010J .6010z:r=13:7010b:r ;8010J:0,4:255,0:y=151:r=13:x=0:y=y-10 *wo:6000p+10 *r:a$:8060|:y=y-12 :r:x=0:y=107k-40(*wo:a$="H+H+H+H-He+2e+2v+2+27MeV":8060|:wo11 ,3;"UWAGA":x=64@:y=88X:a$="-W JEDNYM CYKLU PIERWSZEDWIE REAKCJE ZACHODZ DWUKROTNIE W TEMPERATURACH POWYEJ 16 MILIONW KELWINW CYKL PROTONOWYKOCZY SI INNYMI REAKCJAMI NI TRZECIA Z PODANYCH POWYEJ,ALE I ONE PROWADZ DO WYPRODUKOWANIAHe I WYZWOLENIA ENERGII.":8060| Κ#0;0,0;"1-3 POWTORZENIE WYBRANEJ REAKCJI":8040h:i$>"0"i$<"4"6000p+10 *i$:8010J:7010b:2500  wo0,0:255,0:x=32 :y=119w:a$="W GWIAZDACH O MASACH RZDU KILKU,LUB WICEJ MAS SOCA SPA-LANIE WODORU ZACHODZI W CYKLU WGLOWO-AZOTOWYM,W TEMPERATURZE RZDU 20 MILIONW KELWINW.":8060|:8040h:8010J .6500d:r=16:7010b:r x8010J:0,4:255,0: y=151:r=16:x=0:6490Z+10 *r:a$:8060|:y=y-16:r:y=47/:x=0:a$="H+H+H+H-He+2e+2v+3+27MeV":8060|:#0;0,0;"1-6 POWTORZENIE WYBRANEJ REAKCJI":8040h:i$>"0"i$<"7"6490Z+10 *i$:8010J:7010b:3500  `9 ,3;wo;"1. WERSJA Z KOMENTARZAMI ";11 ,3;wo;"2. WERSJA BEZ KOMENTARZY ";0;14,3;"0. S T A R T";6,1;" ":i=716:i,1;" ";i,30;" ":i:17,1;" ":8080 Y="1"9 +2*wo,3;0;s$;9 ,3;1;s$:wo=0 Z="2"9 +2*wo,3;0;s$;11 ,3;1;s$:wo=1 "0"4020  _x=24:y=104h:a$="CZY JESTE PEWIEN (t/n) ":8060|:9 ,27;"?"  ="n" =">"5050 "t"5020  0 6h$="Stop.":i=15:j=1502:j =""5060  h$(i) i N236066\,0:236077\,60<:0:23624H\,568:: z"H +H - D + e + v + 1.44 MeV",10 ,2,0,0,0,0,2,3,0,4,0,5 " D +H - He + + 5.49 MeV ",12 ,2,0,0,0,0,4,6,0,7,8,0 "He+He - He+H+H + 12.85 MeV",11 ,7,8,7,8,14,0,2,0,9 ,10 ,2 d" C12 +H - N13 + + 1.95 MeV ",12 ,2,0,11 ,13 ,22,0,6,0,11 ,14,0 n"*N13 - C13 + e + v + 2.22 MeV ",8,0,0,11 ,14,23,0,3,0,11 ,15,5 x" C13 +H - N14 + + 7.54 MeV ",12 ,2,0,11 ,15,22,0,6,0,11 ,16,0 " N14 +H - O15 + + 7.35 MeV ",12 ,2,0,11 ,16,22,0,6,0,11 ,17,0 "*O15 - N15 + e + v + 2.71 MeV ",8,0,0,11 ,17,23,0,3,0,11 ,18,5 " N15 +H - C12 +He + 4.96 MeV ",12 ,2,0,11 ,18,22,0,9 ,10 ,11 ,13 ,0 b0b$,l,pg1,pg2,ps1,ps2,pss,pd,qg1,qg2,qs1,qs2,qd la$=b$(l):x=0:y=39':8060|:17,l;"?":8030^:65200,pg1:65201,0:65202,0:65203,149:65216,pg2:65220,1:65221,19:65222,0:65232,ps1:65233,0:65234,0:65235,95_:65248,ps2:65252,3:65253,19:65254,0:65264,pd:65265,0:65266,0:65267,40(:i=1128:65201,i:65203,149-.43\(*i:65233,i:65235,95_:65265,i:65267,40(+.43\(*i:65232,ps1:ps1=pss-ps1:=" "8030^:8040h:8030^ vi:65216,0:65232,0:65248,0:65264,0:65200,1:1:.5,20:a$=b$(l+1):17,l;0;" ":8065:65200,qg1:65216,qg2:65232,qs1:65248,qs2:65264,qd:i=128255:65201,i:65203,95_+.43\(*(i-128):65233,i:65235,95_:65265,i:65267,95_-.43\(*(i-128):=" "8030^:8040h:8030^ i:i=064@8:65200+i,0:i:3,1;0;" ":8030^:8050r:8040h:17,0;0;" ":i$="r"3,1;"R":8050r:7020l 8050r: JB65312 :x=24:y=165:a$=(o)+o$(o):8060| T1,157:0,9 :2,166:252,0:254,165:0,-9 :253,156:-252,0: ^0,15:0;255,0:21,0;"SPACE-ZATRZYMANIE AKCJI PROGRAMU":#0;0,11 ;"BREAK-MENU": hQ#0;1,0;"";1,31;"":0:i$=:;: r%21,12 ;"R-REPLAY": |23728\,x:23729\,y ji=1̱a$:23681\,a$(i):64300,:23728\=023729\,23729\-10 i: 21,0;"";#0;0,0;" 1987  DOMINIK ROLLAUER ": %'64427:65137q:500 "RTN.BAS"23552\,8920": RTN.BAS "\