8(!;B "II.COM.COM6* SAMP c}E q0 \C)CC8`DCeECiD` RP h1$E ȍ @y b Y)hܭ]L]` q  DMD   u j)`0  ,p2 &28jJ1f02 9 g iJf0, 0ihiX1xԍӭ232002XԦ`  *'  } *(L `(  L l pL[,L] C i0 } p  gފދLh ( LD 0  C  C  \i +$+0'}; $(%)  b L[C `D P^߰")(݃   $DD}G@НL]S")M T H0 G$Ș݃ b 8$}$%8(() T `$E0(0)8`$GE` P} Li 8GD }L[ PH >iJ ;  yyB } ' |L[ "E( % H$ H#`L]B  0 G LO<  ( d lH۪!A3 A }jA !B EIC Y$E0 F  < 7 JN8Ndâ!,P h0ʠJd,6 } ' r/ $ ɛ ` '  L[  l }-     }    L[L  }   ' L[   p  ` g  l }) g ' }L[) ̠,L]T-0 |LM N݃:ː6UV LM N L(TU N,)M}LL[IL3GDIɛ ɜ DI  , JȊGм  G I) GȦ=}*GG ȄI1200820I H1E 1h0hIGI2ȢI`FE 0ɛ rɛ$ l '}蚦TTUVD`M L$:;Pyȱ$` r  iȱ$/:ȱ$VWyA**⩀ / }`$***? mL]-+ȱ$ɛ m* ? g. $0f.?'@BrAsTt[ }0: gL  `$0`j`& CpCi s L0JCܢj? I#}𴽎F ގМގ& & 0 C4 08L`0   | 레L] EGȽGȽ}G | E` 8,  }EG)݀G)ȱGȱG`"!L] l!i}栠$8  (IƭIp  h,g+j? 8 ii(Lq)! }S S0$}) E9`H)N,L]8GH Lq`gNgfj****8jHi h` } 2J  &e2i`"%?&;^$IM ! ! <u hh`$}Ev옝^! 1EHFHjm GHm H`u$Ev`L=? +`!,pFE ȄD8 }q D&E`I0` i`+DOS SYSMOC.I  J ٍ = ) F)}8`Ll T!U Ln JM -18    HH =}D 1 :  /1[F:M #.! 0`>C #   #`>   e}L'>/b;\I\o@ @LK~ L  % /e  L ; H}H0S0N:;=91D,1ɛK$ɛ`:;ʾ  ,ɛ}`XYȄ #`DTDRLUFFFCICLRSJ==CIYEEONSMDLNOOUAOOOARPLNCL#####PANVBNFR*),-PQORa/%<}) j ө  RES L%-, # 3 0 %   4(H 4(` }( 3  #  ZOiۨ L4RE 3 =F S Z +8!} 0+  FF % 4 4& 4(X)Y    # 4 ʤ Ȅ L"}F F LH hL4`*J 0 B B 0a   8#}    Lkl  )  : ` 0 } T T 7̀΀$}LIl `l 3   #/ ! R( 7 7   7 89i L7 ,(&  %} L480  ` Ln    `   HJJJJ h) ii0HI B V`0  ,BLV&}[J  B Vso Fhh` GH ,H hɐɀɡ)HDCȱCɛeCD먥D h'}N MSп` ED` OIH`hhXhh  nL Free FilesBreakI/O-Error 170Disk f(}ullWrite protectedFile MismatchBad FilenameTURBO DOS (c) 1989 ver 2.5 RUN: Correction by KNS File lock)}edDevice doneDirectory fullFile not foundBad Load FileNot DOS 2JSBad HexAbort-> Source-> DestinationD1:MF..COM*}d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%+} DD˙`  }J)Lr J  ((  p L ()   J,}L= ( L 0q A    IB JC;? D W -} LL  ` W )LA!  ߰")-݆ p" .} $G@LL 08`Q")<2Q0 -G$Ș݆ UL# ; p8(()(0ʥ)NQ`/}$GȘ݆LU )L ݆ L GȘ ݆LL )W>Z   HH)H 0}p h  hyhy D L> L JJ    ! LA*` BF1}7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!L2}EE !E^ ^ E E7EȩEdE/EȩE  D3} .L }  ;F d  ;?F7F? ( .   Z D LL d 4} . D  L    p  E` , d)  D L) 0BM݊L݉5} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ G6} HLL GɛL  LFREE SECTORS G) *Gȩ GȽG GȌ*jj >G7}}8EEȱEEE` I !ʽ)E1F5I!  !ȘJHjm9Ghm:H`  ?}!`GHLl Z dLȩ8 lI0 ` _} ; $ %  pLl`@}ݚ I(`DOS SYShChDC IC`0I B0x D)D`}Need DOS2.5,type Y A}Λ "d\DOS SYS????????COM/B}B}C}CDOS SYSD} C C*(> C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISKE}.COMLu L1 L ;LHL  T`  `1  ɐ     `TU F} L ? .  t`GBJ ~DEHI B V0dVG}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEhH}DEL8HI4 0 HI,0 0  9 .G VLOI},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHIJ} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHIK} VY8 B V  @  /DE `E:D1:CP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO L}STILL RUN DOS B;DE J  (` 9 V⪍ ઍ  -M}LLu ÝDEHILV 9 .l 9 .l  `` s$B BHN}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu BO}d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%P} DD˙`  }J)Lr J  ((  p L ()   JQ}L= ( L 0q A    IB JC;? D W R}ōP   i ̀i΀i]πiЀS}i3рiҀʢ ӠG & #̀΀π Ѐ l } DOS 2.5 Command ProcesT}sor 3.08 (c) CHAOS software. Winter 1989. J `lXhh8hh  U} &Xآ   90ɛ @ miݦʈ0Θ0 ҁLlɛ."V}ք  Sǩ LTU`L&lɛ ɛ+0: AG80. W}l *M?Iɛ,ɛ*ɛ 𮅄  L  RLX}ʆlLt   L!RLV䮁L !ɛ  RZ V0= XHY}YR V0 B V0L V8S 샠(   }~ L& ɛ` {Z}|L&DE`m.`H) hJJJJ 0:i` 働H BILVB 僩&H V0%H[}:ɛɛ`ۄ˄rŃ-ւDIRRENERACARMEMRUNBOFLo=.... Hi=....BRK at ....\}MOC.Error ...D1:FILENAME.EXT *.*D1:#߅`#ϩҩӭԭ8ԅХՅѠ8fϥ#酐`$ph0'҅Α Ӆ @]}`) ѐF) ?҈遐#҈酰Цѐ$0ֆ8֑ Ӆב ӅLRґ ӅLR`N A^}#0!)C)Ϣ;?     08I` } `L0   0"L JG}GȽ_}G  L }`8L`Lp8`  04}G)݁,G)ȱGȱG`}Hh0})Hh` B! 8`8ii(ZE6!JS Sd!  E  ` Ta}E 8  8LFEh   r9L )  EiFi(LdEE` dE`H)b}h/H^ji hEEdEiEȱEiE` WE QEEHI8 *hd ) c}8EEȱEEE` I !ʽ)E1F5I!  !ȘJHjm9Ghm:H`  d}!`GHLl Z dLȩ8 lI0 ` _} ; $ %  pLl`e}ݚ I(`DOS SYShChDC IC`0I B0x D)D`}Need DOS2.5,type Y f}Λ# "d\DOS SYS????????COM/g}B}B}h}CDOS SYSi} C C*(> C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISKj}.COMLu L1 L ;LHL  T`  `1  ɐ     `TU k} L ? .  t`GBJ ~DEHI B V0dVl}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEhm}DEL8HI4 0 HI,0 0  9 .G VLOn},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHIo} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHIp} VY8 B V  @  /DE `E:D1:CP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO q}STILL RUN DOS B;DE J  (` 9 V⪍ ઍ  -r}LLu ÝDEHILV 9 .l 9 .l  `` s$B BHs}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu B}ōP   i ̀i΀i]πiЀu}i3рiҀʢ ӠG & #̀΀π Ѐ l } DOS 2.5 Command Procesv}sor 3.08 (c) CHAOS software. Winter 1989. J `lXhh8hh  w} &Xآ   90ɛ @ miݦʈ0Θ0 ҁLlɛ."x}ք  Sǩ LTU`L&lɛ ɛ+0: AG80. y}l *M?Iɛ,ɛ*ɛ 𮅄  L  RLz}ʆlLt   L!RLV䮁L !ɛ  RZ V0= XH{}YR V0 B V0L V8S 샠(   }~ L& ɛ` {|}|L&DE`m.`H) hJJJJ 0:i` 働H BILVB 僩&H V0%H}}:ɛɛ`ۄ˄rŃ-ւDIRRENERACARMEMRUNBOFLo=.... Hi=....BRK at ....~}MOC.Error ...D1:FILENAME.EXT *.*D1:#߅`#ϩҩӭԭ8ԅХՅѠ8fϥ#酐`$ph0'҅Α Ӆ @}`) ѐF) ?҈遐#҈酰Цѐ$0ֆ8֑ Ӆב ӅLRґ ӅLR`҅Α Ӆ @k[i B VBTD[EJ VBDcEHIJ V B VLxD:FAEDITOR.COM}}6l<ffnf 6 ```?>x`f;`x``?0ppv ffff6 fff<0~}6l<|<nvf<8<|<``~| f<`f>|`<|<`|ff<~ 00|06l0`~ ~0`}|00*>*<ffnflff|>```?fff|>x``?>x```>`nf<fnfff<<~|flfff````?b}~~ff|ffff<fff<f|``<ffl6f|ff>`<|~ffff?fff<fn~vbf|~ 0`}}}<}}^}}}}}}}}}}}}}}}}}}}}}}{}}d}}}}}}}}}UVjDժ}WfDDDD鮹ffeUVf`DDD`B fdfffBJ *****f***馩XD}UUDDDT檥ժ**XQffffDDDX}*******fQ***************ꕪV错DDDDDDDDDXXXXX榦橪}鶹V错`` jR櫚ffVffefffff adc #32+98 }tay ldx #0kurs lda ksztalt,x sta $9600,y inx iny cpx #8 bne kurs rtsplot}1 ldx taki lda jak bne omin lda hpos asl @ tay lda vpas asl @ tax } lda dane2,x sta $b0 lda dane2+1,x sta $b1 ldx colors lda ($b0),y cmp colors } bne omin ldx #0omi((((('''&&&%%$##"!!   } !!"##$%%&&&'''((((}LZ|LcuLwL_9g(:g9fǐ  0}}}pX8~~~QuRuSu)pJJJuuuuҩbuSuRuQuLuuuv.vhvvv5vZu[uɏ T T` u}AuDuJu uMuOuVuWuZu[u u iU0L'vɏTuUu`TuUu`VuWuiXuiYuiZ}ui[uTuUuҩbu u(u쩀Ju`Qu)JuSuRuQuSu1u(u+u Vui0HWuihe\u}i_uVuiWuiSu mSu Suȱ:u7u4u.u)wwSuȱJJJJmQuQuw.u) }uȌQuLiwuSuȱ)mQuQuQu.u)(u8uSuH)D|%uhJJJJ>7 0 i D{"u`D{{{إHHHH}buL#{MuLxyTuUuLey uLxJu0JuAuZu[u uxOuPu uNu uPu u>uiU u}̎x7 uL x u3/JJJ)xtxxux?u s[ uU̎xЋx uL#{Lxxxxxxxx v`0`08`0e`0ߍT}uUu`0ӭ@u0ȌNueOu@uPuT`0 ɏ`DuDuWJuR>u@KXuYui@Au) )?GuAu@ )}?Gu vLUyɀ )?DuAu u)? uUuTuUu u uu.u)u(u.u)u\u_u(u7}!+u.+u+u& u u4u+uLy(uJJJJJ) uu.u)u( =1u u uu=u(u8)P|(u)}(i7u%"uu=uuu%uu(u)(u(u)4u+uJu u@Ju1u.uJJJJJ}uuu}}uu0Lyuu.u)=u H0{)) uҽ u uu(h)Эuhhhh`}xrke_ZUPKGC?<852/,*'%#! οzqke_VPg`ZUQLHC?=9439-*(%$!} 8 j jFAn0R"zU4w`N8'}xpjd^WR2 @5?@ |hBhh`$|%|X|$Y|%hh8|hhp cuLcu|$}|%@Lcu w |L_%` ĥυ`Ɔ$pL}L}$ʥ˰ 堎 Bo/6*} } Pp p@P}hE##hE##Fh4#6W83"h$"F3""yE43"""{5tzE3#"} }  }  ZfZfZfZfXdZfZ}fZfZfXdZfZfZfZfXdZfZfZfZfXdGGSGSGGSGSGGSEEQGGSGSGGSGSGGSEEQGGSGSSGSGSSGSEEQ@@L@@L@LBBNBNBBN GGGGEEG}GGGEEGGGGEEGGGGHH GSGSGSGSEQGSGSGSGSHTGSGSGSGSEQGS ffffff GSGSGSGSEQGSGSGSGS}HTGSGSGSGSEQGSGSGSGSHTLLq|qqqLqL{LLq|qqqLqL{LLq|qqqLqL{LLq|qqq}LqL{L~L~L~L~L~L~L~L~L~L~L~L~Lrrrrrrr fffffffffdffffff}fgggffffffffdfffffffgdd XZZZZZZZXZZZZZZZZ[ZZZZZZZXXZZZZZZZZXXXX GEGGEGGGEGEH}HGGEGGEGGEGHHHHG spupupwpwpxpxpwpspupupwpwpxpxpwpspupupwpwpxpxpwpspupupwpwpxpxpwpBNBNBNBN@LBNBNBNB}N@LBNBNBNBN@LBNBNBNBN@LLLq|qqqLqL{LLq|qqqLqL{LLq|qqqLqL{Lrr|rr}qrrLr` 709* z?#  |ȹ` Lz LzLz恟ꂦ'B#omplete&ailure}}L8pppD8ppppRR\R9RRRRR9R\RA "#$% /1 " /?%  } &'()&'2 &'9&'C  *,- *02 *0:8>DEB  +. +2 +;7FG7  <=6HI6 }  ! ! !345!3@A! 01/p} u u!/01 }^池ˆÈˈĈΈԩψ̈PLj͊\Ί(PQRS    } u!/ԩ@ uL[e`ψʎψ`ψ̈ʎ̈`̈ϊ͊ЊΊ&\ )? }`PQRSΈ͈&ƈ͊Ί͈tP͈͈͈͈͈͈ƈΈΈΈΈΈ}`ˆňЈ8ٮ mˆˆL빮ň8ÈÈÈĈLj池ˆ`ˆ8ٮ mˆˆLbÈÈ}FÈĈ@Lj汥p^ˆˈˈˈ Ȉ`dxDX$8, $\}48thl8`H!ԩp ԭȈЭɈЭʈЩMЩ/h(@HHHԩP ԩ!ԭ̈ԩЩЭLjLjLmĈ} ALm ~hhh(@HHHԍ ꩄЍЩ  uhhh(@   d} "#$% /1 " /?%  &'()&'2 &'9&'C  *,- *02 *0:8>DEB  +.} +2 +;7FG7  <=6HI6   ! ! !345!3@A! } %+17=CIOU[agms &,28>DJPV\bhnt !'-39?EKQW]ciou "(.4:@FLRX^djpv} #)/5;AGMSY_ekqw $*06<;9865321/.,+)(&%#"   }  "#%&()*,-/0235689;<=?@BCDEGHIJKMNOPQRRSTUVVWXXYYYZZZ[[[[[ }~}{zywvtrqonljigedb`_][ZXVTSQOMLJHGECA@><;976421/.,+)(&%#"  }   "#$&')*,./124679;<>@ACEFHJLMOQSTVXY[]_`bdegijlnoq }rtuwxz{}~Z,000Ϗ΋ϋ믮ಣ>.>./;?ȌNJ } KF𰰱+::****:ƅŅūeUVib/%&[꺺戈oiUVeUYinZ }[VVX,000 333 :>Z ZbS첣⢠n/Z }f[%).Z[VVYLL 112 oi  ̈ȌȈĀĈȌ̌HĽ 𰰱?? }b 0 긲>Ή>LZoLchLj L_ZZY@À@ @G }QhRhSh)pJJJhhhhҩbhShRhQhLhihhi.ihiii5iZh[hɏ T T` hAhDh }Jh hMhOhVhWhZh[h h iU0L'iɏThUh`ThUh`VhWhiXhiYhiZhi[h }ThUhҩbh h(h쩀Jh`Qh)JhShRhQhSh1h(h+h Vhi0HWhihe\hi_h }VhiWhiSh mSh Shȱ:h7h4h.h)jjShȱJJJJmQhQhj.h) hȌQhLi }jhShȱ)mQhQhQh.h)(h8hShH)Do%hhJJJJ>7 0 iDn"h`DnnnإHHHHbhL#n }MhLxlThUhLel hLkJh0JhAhZh[h hkOhPh hNh hPh h>hiU h̎k7 }hL k h3/JJJ)ktkkuk?h s[ hU̎kЋk hL#nLkkkkkkkk i`0`08`0e`0ߍThUh` }0ӭ@h0ȌNheOh@hPhT`0 ɏ`DhDhWJhR>h@KXhYhi@Ah) )?GhAh@ )?Gh i }LUlɀ )?DhAh h)? hUhThUh h hh.h)h(h.h)h\h_h(h7!+h }.+h+h& h h4h+hLl(hJJJJJ) hh.h)h( =1h h hh=h(h8)Po(h)( }i7h%"hh=hhh%hh(h)(h(h)4h+hJh h@Jh1h.hJJJJJ}hhh}hh0 }Llhh.h)=h H0n)) hҽ h hh(h)Эhhhhh` }xrke_ZUPKGC?<852/,*'%#! οzqke_VPg`ZUQLHC?=9439-*(%$! } 8 j jFAn0R"zU4w`N8'xp }jd^WR2 @5?@ ohBhh`$o%oXo$Yo%hh8ohhp chLcho$o% }@Lch j oL_w>wwww;vppw>>wxpv; }pp|pw>8p8888p{vwwww;vwww>8~;v>w>>www><>>pw~>ww>pww?p~ }w>>p~ww>88>w>ww>>w?w>8o68w?8w>t>w>>w>wwww~w~ww~>wppw>~wwww~ }>wxpw>>wxppp>wpw>wwwwwww>ww~wwwppppw>cwww~wwwww>wwww>~ww~pp>wwwv;~ww~ww>p>w> }wwwww?wwww>wwwcww>wwwww?w>?8wUUUUUUUUw>>wZ },000Ϗ΋ϋ믮ಣ>.>./;?ȌNJ KF𰰱+::****:ƅŅ }eUVib/%&[꺺戈oiUVeUYinZ[VVX,000 333 :> }Z ZbS첣⢠n/Zf[%).Z[VVYLL 112 oi  } ̈ȌȈĀĈȌ̌HĽ 𰰱??b 0 긲>Ή> } } } } } } } } }LBppOR~O~pby"""""""""T>}Tl}T}T}T}R$~B>xOR~O~Ax%3# 7%*#)%$/%$94/2! } } } } 30)3/0#*) }/$!54/2!!.)-!#*!79" 2-!429#9:-)!.!!$2%35:-)! }.!+/,/2 7:!0)3$!.9#(%$9#*!/$#:94$!.9#(+/0)/7!.)% } } } }`CDab_`CDEF@@_`CDabABCDEFABu_`CD }ab_`CDEFABCDEFHIcdeGHjJKL@@GHIcdeGHIJKLGHvGHI{deGHjJKLGHIJKLNfg@@MNOPQR@@MNfg@@MNOPQRMNwMNz@@@MNOPQRMNOPQRTh@@@STklWX@@STUrst }STUVWXSTxSTh@@@ST|VWXSTkl~}Zi@@@YZimno@@pq[\noYZ[\]^YZyYZi@@@pq[\]^YZimno%+345 74%+34!#(*/934)#+' 2! $  :-)!.!#Eg }ܺvT2#EgܺvT2#EgܺvT22#EgܺvT2#EgܺvT2#EgܺvT } 30)3/0#*) !}/$!54/2!!.)-!#*!79" 2-!429#9:-)!.!!$2%35:-)!.!+/,/2 7:!0)3$!.9#(%$ "}9#*!/$#:94$!.9#(+/0)/7!.)%ШR~ #}~$~.fxfyfzf{f|f}빱 @@ @@ ` Xp h h#/0x1ԩЍЍ $}υfxxx X 傩 X0L} L L耘 EՂ _ԍ/@ԩP h `  %}h X"/ԩԩĩŠyȰzȐ o 傩 X _ ` oL傭x'͠ _ť &}iĐ t o L д _Οť8鐅p t o L350B՝DEJ VBDEHI V '}BLVD:AUTOR.INS D:MATRYCA.INS D:KOLOR.INS D:EDYCJA.INS D:KOPIA.INS D:ANIMACJA.INS D:ADRES.INS D:ZAPIS. (}INS D:ODCZYT.INS QX  XHH  X̛򮞅`f©xùe)ԹeJJJ )}i(xÍx` ,@CE ,@CEGH  X`  X`@ h01/L0HHH#ԩp ԩ@Ѝ ԩ`Ѝ ԩP *}Ѝ ԩ"ԩЍЍЩ ЬR~0~0Ζ hʎLW%~ +}$~- υQ~ԩnhhh(@HHH ԭԩd ԩЩЩЩhhh(@HЍ ԭ ,}ԩp ԩ Щɍh(@HHH#ԩ@Ѝ ԩ`Ѝ ԩPЍ ԩЍЩ!Ԭd)IdJJ>}ꅝl}#}\}} -}9.hhh(@e`~yzzȐ`Ņåiȅàęy™zȐ` 1EG#Eg .}vT2@@@@@@@@@@_`CDab_`CDEF@@_`CDabABCDEFABu_`CDab_`CDEFABCDEF@@@@@@@@@@GHIcdeGHjJKL@@GHIcdeGHIJKLGHvGHI{deGHjJKLGHIJKL@@@@@ /}@@@@@MNfg@@MNOPQR@@MNfg@@MNOPQRMNwMNz@@@MNOPQRMNOPQR@@@@@@@@@@STh@@@STklWX@@STUrstSTUVWXSTxSTh@@@ST|VWXSTkl~}@@@@@@@@@@YZi@@@ 0}YZimno@@pq[\noYZ[\]^YZyYZi@@@pq[\]^YZimno@/"35'!).3425+#*)+,!7)3:%  79" 24%+345 74%+34!#(*/ 1}934)#+' 2! $  :-)!.!342/.9 02:9#)3+ 0/72 4$/-%.5堎 €pg% 2}VKǐ l9p 3}@  4}i4""""""""F"ϊV4xgfUUUxgVE4#hUD3"F3#""""""""""xgVUUU 5}   6}       7}  SSSSSS 8}SSSSSSSSSSSSSSSSSSSSSSSSSSGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGpGpGGGpGGGpG@ 9}G@@EIIIuIIIEIIIuIIIEIIIuIIIEIIIuIIIEEEEuEEEEEEEuEEEEEEEuEEEEEEEuEEEUUUUUUUUUUUU :}UUUUUUQQQQQQQQQQQQQQQQQQQiiiiiiiiELLLuLLLELLLuLLLELLLuLLLELLLuLLLEGGGuGGGEG ;}GGuGGGEGGGuGGGEGGGuGGGXXXXXXXXXXXXXXXXSSSSSSSSSSSSSSSSXWWSSUXWWSSU <}WXZ\___S_SUSPQSSNLKWXWXWXQQQQ]QQ]QQQQ]QQQ]SSSS_SS_SSSSS_S___EEEEE =}EEEEEEEEEEEEEEEEEEEEEEEEEEEEGGGEGGGEGGGEGGGEGGGEGGGEGGGEGGGU\]_UUWXXXXWXZSSQS >}SZSXSWSUXXUZU\UXUXUPUXWXWPUWSXSZSWSWSNSUWXZSUUUUaaUUUaaaaaUUUUSSSS___SS ?}____SSSS_QQQQQQ]]QQ]]]QQQ]]]SSSSSSS_SSSS__SSSSE IIIy IIIEIIIy IIIE IIIy III @}EIIIy IIIE GGGy GGGEGGGy GGGE GGGy GGGEGGGyy GG QPLIQPLINE EEEy EEEEEEEy EEEE EEEy E A}EEEEEEy EEEE GGGy GGGEGGGy GGGE GGGy GGGEGGGyy GGE IIII IIEEIIII IIEE IIII IIEEIIII IIEE G B}GGG GGEEGGGG GGEE GGGG GGEEGGGGG GE PLIQIPNSLN IG I NSUNSUNSUNSUNSUNSUNSUNS C}UNSUNSUNSUNSUNSUXE BBBB BBEEBBBB BBEE BBBB BBEEBBBB BBEE BBBu BBEEBBBuu BEE BBEu BBEE BEu Bu B D}u QPLIQPLIG QPLIQPLIGDGLUUUUUUUaUUUaaaUUUUUUUaUUUUUaUaUUUUUU I @E E}IIIy IIIEIIIy IIIE IIIy IIIEIIIy IIIE I @LppD]pB] B BՓA3 F};;<< G}== H}@A I} J}#-!429#!>+,!4+!!$2%3! ! K}&!%$)4/26!54/25+!3:0!:%2!4!2. 7 L}+/0)/7!.)%:.!!.)-!#*!/$$/:02$+/#):-)!.!!$2%35 M}:-)!.!+/,/2 7#/.42/,)) ).3425+#*!%$9#*!/")%+457 N}9" 2-!429#9/$#:940,)+5$:!0)30,)+5$"$/ O}$#:945"$:!0)35001//ԩ 301 P} ԠtuvwpԩЩo:/5-.Э9:' V ᤩQR Q}[ [  ȗ" L, LіRn՚,xe001 R}Щ@ԥ/l ōQR  QRLі ȗx٢y L\L\    𗼪 S}]^` 5[ k[5LV`H)hJJJJ)`!"#$%&=QR-. '  T}  QRLіx  L4 ĭ L4 & ~' (  % & U}%& ʤ)*'(+, Lիג7`ׅ@iHi h` 0 V}@0H` @`~v`~v`(8HXhגKOS7W ! J W}K!KmLΙ=m ܙ!Ln)? ["[r)JJJJJJjȮ[r)0JJJJjȮ[r) JJjȮ[r) X}ji["`koswkosw;<=]k,im+淢[ȑ Y}泬[ 襲i泥i`MQR ݞ Ꞣ Ь0tF0oM   ݞM Z}8;;ƞ 6<ƞ 66=ƞ 7>ƞ 77 QRLіQR ݞLі L LL [}LLM`'6m 泈7m 淈 LQR ݞ ꞢЩ \} 0MF0Hޢ8;;ƞ <ƞ=ƞ >ƞ իL իQR ݞLі L< ]}L'6 ם;<6 8Ȉ _} !=>`!L7 ;ƞ 77 `}?ƞ 8@ƞ 88`u`dh&'#"%&$! a} w`w`kk`eQR b} ݞ ꞩ{ , Lb iЮ0נ0 ݞL ݞQRhhLі LR4 c}М LRL.Y8 `i Y `  BWDEJ V BD&EHI V0L d}QR B V&&IH8 ƵIJi'ȱ. IJ իH e}H'- L /ԩ@` 9/ԩ`,*+/05) 6#"8:.-2%9 f}471&($'3!D: QR ݞ ꞩ q}s !#%'OP 2xyBpDOS SYSB tCP SYSBiINTRO COMBFAEDITORCOMB AUTOR INSBMATRYCA INSBKOLOR INSBEDYCJA INSBKOPIA INSBANIMACJAINSBADRES INSB ZAPIS INSBODCZYT INSBKROPLA EDRBCIENIE EDRBGWIAZDY EDRB WYBUCH EDRB"BALL EDRB$BALL2 EDRB&DYSK EDRB((SINBOB3 ASMBPSZTRZ EDRBJQJAKCI4 ASMBRZZASM ALLBFJAKCI5 ASMBCHHASM ALLB OOUASM ALLBOOUASM AL2BF3JAKCI6 ASMByEDITOR ASMBzLOAD ASMBFJAKCI7 ASMB LOADER ASMB RZZ COMB CHH COMBOOU COMBDOLOAD COMB CH SPLBCHHASM1 ALL , Lb i';񱶙;ȱ;.&&&&e&e&i&&i  r} BWDEJ V BD&EHI V0LW ݍQR B V;LQR s}  QRLі9 #$ іL{ ȗ./5/ D L D  L/ t}x FL{  hL{ L{  L{@mΧɨߩ? +'JJ1(JJJ2')3()42 m1K)? u} m42 m1e泠)` `3r9>3JJ$9$!3 $r39 v}B $r`r39Br5`3r9B$93  $r`0 ?'%) '+Ln)'L`' w}) '+Ln)'L`(* (,Ln ʤ*(L`(&* (,Ln ʤ*(L`* i t`* i x}t) i@`-`..m  ի- m  ƫL-'- 8 #8 #ƹ y}L` ƫr L-.m 浈i'8 #8 #ƹLիr)JJJJJJsr)0JJssr) ss z}r) ss 8 &' "#!# G#m"#! Lsrsr`srsr {}sr`srsrsrsr`GTgrr L JJJ;<rsi<;ڭ8  |}sr = +i L+I `H;m=h;`H;m=m=h }};;m=;`H;m=m=m=h;ߠ;m=H<m=h<;`r ~} ?8 èĨ@ m?@ L;) *<i <;*`;) *<i= }i <=*;*`;) *<i=i>i <>*=*;*`@{r } ?8 ٩ک@ m?@ L;i=)Jj<;J <=j;`;i }=i>)Jj<;J <=j>j;`;i=i>iA)Jj<;J <=j>jAj };` Dr JJJ#;i#i#Q];r# } L &26>J'/7?'/'/7?G'/OW_'/7?G'/7?GOW_'/7?gow'/7?GOW_r JJJ# };i#ȑi#Q';r# L ( (08 ( } (08@ (08@HPX (08 (08@HPX (08@HPX`hpxr `r `-  }`rr `:e9e波 ]^`CAIGH ԭЭЭЭЭЩ9 }p ԩЩUh(@H ЍЩ Щ:ԩzh(@HH ԍЭLӬ P ` } PMhh(@   e`  }@A } } } } } W /$!54/2! 02}/'2!-&!%$)4/2*%3402/'2!-%-594+/79-359/.02:%$%73:934+)-$/47/2:%.)!.!7%4://.9#(!.)-!#*) !,%-/.!.!}.)-$%&).)/7!.0/")%+49$/*!+)%*'2902!#5*%7429")% +4 2%'/!54/2:9')%2597!*.!*#:}#)%*737/)#(02/'2!-!#( 0/3)!$!7)%,%$/$!4+/79#(/0#*)5!47)! *#9#(%$9#* .0+/0)/7!.)%&!%$)4/2:/3}4!.!0)3!.9.)%49, +/$,!!54/2 7')%2 '$9-/':.)%'/+/2:934!/3/"9.)%:.!*#%",)%*+/- 054%2!!4!2)7)%/50})%#:%.)'2!&)#9 !4!+%#)702!7)%.)-/'0/7)#:9.!.)-2/")%.)%!.)-!#*))47/2:%.)%'2!&) +) 4!+7)#&!%$)4/2}-/.!5:.!4%:!02/'2!-#:#)/7/%$5+!#9*.9.!293/7!.%/")%+49-/.!.!'297!.!$93+ ,5"*%:.)%'//$#:9497!}$/02/'2!-5$/#:/.%302:9+!$/7%!.)-!#*%:2/")/.%7!.)%49-02/'2!-%-7#%,5/"%*2:%.)!30)350,)+ 7.!$93} +)%4#%.!,%979*:02/'2!-5.!#)3+! *#+,!7)3:%#/.42/,)%3#$/$/3! 79+/.!/0#*$)2 )0/72 #)$/&!%$)4}/??Y?????///////3! 79+/.!/0#*$)2 )0/72 #)$/&!%$)4L 79" 2-!429#9 02}:%$%$94/7!.)%-+,!4%+-53)-979"2!3/")%$,!.)#(-!429#5-/,)7)!.!-4//0#*!79" 2-!429#9 +4 279")%2!-9:' 7.%'}/-%.50/02:%:.!#).)#)%+,! 7)3:9#/.42/,)-4%2!:253:!*#*/934)#+)%-7,%7/,5"702!7/:-)%.)}!-9.5-%2-!429#9 !749-#:!3)%+/-054%2.!$/,%%+2!.5797)%4,!),%:.!+ 770/:)/-)%)0)/.)%-!!+45 !,.)%79"2!.!-!429}#!.!*-).)%*3:92/: -)!2+,!4+)4/>:.!+ !.!*7)+3:9>:.!+)'$9:$%#9$5*%-93).!}+4 2:-!4 29# :/0#*)79#(/$:)-9+,!7)3:%-%3#}%3#3 :-)!.!+/,/2 7 /0}#*479")%2!-9:' 7.%'/-%.5.!#)3+!*#*%$./#:%.)%#/.42/,)+*!+3!-!.!:7!- 7) 359/.!$/$/7/, .%'/53}4!7)%.)!+/,/2 7!.)-/7!.%'//")%+45+,!7)3:!-) 79")%2!-9+/,/202:%:.!#:/.9}$/:-)!.9 .!4/-)!34*/9 34)#+%-:-)%.)!-9+/,/27%$5'.!3405 *#9#(:!3!$' 2! :7)+3:%}.)%+/,/25/ $  :-.)%*3:%.)%+/,/25/ 02!7/ :7)+3:%.)%*!3./#)/ ,%7/ :-.)%*3:%.)%}*!3./#)/+/$973:934+)#(+/,/2 73797)%4,!.%3:%3.!34+/7/.!$/,%%+2!.50/$/+/.!.)50/42:%".9#(:}-)!./0#*/053:#:!-9+,!7)3:%-%3#4,!.%3:%3.!34+/7/.!$/,%%+2!.50/$/+/.!.)50/42:%".9#(:3 %$9#*! .!}*7!.)%*3:/0#*02/'2!-5&!% $)4/2*%34%$9#*! +4 279")%2!-9:' 7.%'/-%.5+,!7)3:!-)#/.42/,)%0}/:7!,!/.!.!$/7/,.%:$%&).)/ 7!.)%-!+3)-5-+,!4%+0/.)%7!02/'2!-02!#5*%7 49-429 ")%!.4)#!$/}$930/:9#*)-!-9+/,/ 2 7 :49- %7/"2")%*%$.%'/:.!+5-/'79340)+/,/29*%344!+$,!4% '/ '$949,+/.!4}9,%+/-").!#*)")4 70/:7!,!!4!2)7:7):+5:49-+/,/29)793405*.!02:%-)!. #:9,)*%,)%$945*#+,!4+79")%2:%}-9+/,/2 4/7/"2")%*%$.%'/:.!+5.)%-/%7934 0)+/,/2.5-%2+/,/2579:.!#:!-9}+,!7)3:!-) 0/7#).)#)5+4 2%'/:49#(+,!7)3:9+523/273+!%79"2!.9+/,/24%2!:-/%-902:9340)$/%}$9#*)0/%+2!.)%0/253:!-93)+523/2%-:!0/ -/#*/934)#+!7%$5'/' ,.)%02:9* 49#(:!3!$.!4/-)!3402:9#)3+)%-34!} 7)!-905.+49)4!+ *%%,).!0/:9#*)+523/2!:.!*$5*%3)0)8%,/+/,/2:% !-9$930/.5 *}%-9+/,/2%- 4/0/34!7)/.90)8%,"$:)%-)!+/,/2 .!4/-)!34*%,)"$:)%-9$930/./7!2 7.)%}+/,/2%- 4/0/34!7)/.90) 8%,:!73:%"$:)%-)!+/,/2*%$.!+3$: %,%0)%**%344/302!7 $:)3!-%-5}0/.!$4/02/'2!-0/3)!$!+),+!$/$!4+/ 79#(/0#*) $/340.9#(49,+/7%$9#*)#,%!2 7#:!-9}+,!7)3:%-#0/7/ $5*%/.! %$!.!+,!4+!:/34!.)%79#:93:#:/.! 5.$/ +,!7)3:5 }02:972!#!4!+)79',$+,!4#%*!+)-)!!02:97%*#)5$//0#*)%$9#*! 8&,)0 /$72!#!$!.+,!4}+70/:)/ -)% 525#(!-)!-902:%:8 9&,)0 /$72!#!$!.+,!4+70)/.)% 525#(!-)!-902:%:9 }!$2 0/02:%:.!#).)#)%! 0/$! *%-9+/-054%2/7)),%+,!4%+-!.!'2!02:90 .)%*3:9-+/2:934!.)5:/0#*}):!0)3$!.9#( #:9,)*%,)30/2 $.0/-)5:%$94/7!.9#(+,!4%+#(#%-9.!'2!49,+/ 7#:!-9+,!4+/.5 -}%2:%.5-%2+,!4+)*%34,)#:/.9/$:%2! ).!#)3+!-9!/2!:#:4%29/0#*% +4 2%02:%357!*:!7!24}/+,!4+)/*%$%.0)8%,7$!.342/. 79")%2!-9*%:!0/-/#+,!7) 3:!#/.42/,)/$0/7)%$.)%*342:! +)}+,!4+)02:%#:!-9:!0/-/#+,!7)3:9/:.!#:/.9#(342:!+!-)7,%7/)02!7/.5-%2!+45!,.)%%$}94/7!.)%*+,!4+)*%34797)%4,!.9.!$/,%%+2!.5'$9%$9#*"$:)%-957!!:!:!+/ #:/.:/0#*)79#(/$:)-9}.!#)3+!*#+,! 7)3:%3#}3 +/0)/7!.)% 7!}02:90!$+5 +)%$9*%$.!+,!4+!-!3).)%7)%,%2 .)/$$25')%* ,5"/")%-!*"94!+)%3!-% -/%-93+/2:934!:/0#*)!}+/0)/7!.)% +4 25!+497.)!-9+/-").!#*+,!7)3:9#/.42/,)+359/.!$/+/0)/7!.)!+,!4%+0/*%*7#:%.)5+/-0!}54%2:!094!3)/.5-%2+,!4+)$/3+/0)/7!.)!).5-%2+,!4+) .!+4 2:!-)%2:!-9+/0)/7!$!.%,)#:"90/$!*%-97./4!#*)!}3:%3.!34+/7%*597! *#+,!7)!452979" 2-/.!:!47)%2$:)+,!7)3:%-2%452. !,"/+/-054%2!}:2/")4/3!-0/0/$!.)5/34!4.)%'/0!2!-%4254%2!:0/ $!.!+,!4+!:/34!.)%3+/0)/7!.!+,!7)3:%-%3#-!-9-/,)!}7//053: #:%.)!+/0)/7!.)!:0/ $!.!+,!4+!:/34!.)%3+/0)/7!.!+,!7)3:%-%3#-!-9-/,) 3 !.)-!#*! +)%}%$9%$9#*!:/34!.)%:!+/ #:/.!/0#*!.)-!#*!-/%-9:!.)-/7!:%$94/7!.%+,!4+)$/5!+497.)%.)!!.)-!#*)359+/-").!#*%}!#/.42/,)!0/.!#).)#)549#(+,!7)3:9+/-054%2:!094!3)/.5-%2+,!4+)/$+4 2%*-!!.)-/7!).%}5-%2+,!4+)$/+4 2%*-!!.)-/7! !.!340.)%/3:9"+/!.)-! #*)02$+/0/$!*%-974:72!-+!#( .0'$9.!0)3:%-9%}4/+,!4+)"$3)!.)-/7!#/2!-%+ #:9,)#/0) $:)%3)49#(3%+5.$970)397!.)%,)#:"/$"97!3)4!+*!+7/0#%}*)+/0)/7!.)%!.)-!#*02:%297!-9+,!7)3:%-30!#% .!4/-)!34/0#*/053:#:!-9+,!7)3:%-%3#%}!#% .!4/-)!34/0#*/053:#:!-9+,!7)3:%-%3#$3 :-)!.!!$2%35 0/)}02:%:*%$./#:%3.%7#).)#)%+,!7) 3:9#/.42/,):7#:9-9/0#*5-/ ,)7)!*#534!7)%.)%!$2%350/#:4+/7%'/$!.9#( )}0/$+4 29:/34!.7#:94!.%0/.!'2!.)5)#(.!$93+"$+!3%470)397!.)%,)#:"/$"97!3)0/$/".)%*!+702:90!$+)}5/0#*)+/0)/7!.)%!$2%3-/%"9,)#:":02:%$:)!5 &&&&02/'2!-.)%.!+!$!45!$ .9#(/'2!.)#:% *%)}$.!+.!,%90!-)4! %0/$!.)%:%'/!$2%35-/'/"930/7/$/ 7!.0:7)%3:%.)%+/-054%2!,)#:"!:.!*$5*#!3))}/"/+!$2%350/ #:4+/7%'/$!.9#(34!./7)!$2%3.!34 0.%'/7/,.%'/"!*45 .)%79+/2:93497!.%'/02:%:02/'2!-)}!34 0.%'/7/,.%'/"!*45 .)%79+/2:93497!.%'/02:%:02/'2!-(3 :!0)3$!.9#( +,-}!7)3:!-)#/.42/,)3525#(!-)! -9/0#*:!0)3$!.9#(0/:7!,!/.!.! '2!7#:%.)%*:%$94/7!.%+,!4+)02/'2!--}.!'297!$!.%$/$!*#.!0/#: 4+53:%#)/"!*4/79.!' 7%+ 4!+!"9:!0)3/$#:9497!3):!0/-/#$/3!0,)+"$:)%-}3)7#:9497!0/$534!7)/ .97#:%.)%*!$2%30/#:4+/790!2!-%42/"/+!$2%350/#:4+/7%'/4/ #/02!7$!!$2%3.!3-}40.%'/7/,.%'/"!* 45 !,%02/'2!-0/$#:!3.!'297!.)!$/$! *%*%3:#:%.!3405*#%"!*49 +/,/29"!*4 7 -} .5-%2-!429#9),)#:":$%&).)/7!.9#(+,!4%+"!*49 7:7):+5:49-42:%"!0!-}-)4! %0,)+"$:)%-)!$5'//"!*4 77)+3:.)4/0/+!:5*%02/'2!-.!:70,)+570)35*%-9:+,!7)-}!4529:!47)%2$:!-9*+,!7)3:%-2%452. !,"/+/-054%2:2/")4/3!- '$9.!:7!/3) '.)%0%.,)#:":.!+ 7-})57!'!#:!3%-0/.!'2!.)50,)+5+52 3/29-/'.)%-)'!.!,%9749-#%,5/$#:94!*!+)+/,7)%+0,)+2!:9)74%$973:9-}34+/"$:)%70/2:$+5:!0)3$!.9#(/053:#:!-9%3#%-#%,5/$#:94!*!+)+/,7)%+0,)+2!:9)74%$973:9,L /$#:94$!.9#( /1}$#:94$!.9#(359$/7#:94!.)!$/%$94/2!$!.9#(5!+497.)!-9'/0/02:%:*%$./#:%3.%7#).)#)%#/.42/,),0/0/$!1}.)5.!:79:+,!7)!4529+/-054%2/$#:94!4%.0,)+ *%%,)/#:97)#)%4!+))34.)%*% 534!7)+/,/29)-!429#7%$5'.!' 7+!.!1}+/ #50,)+573:934+/" $:)%70/2:$+5 *%,)0,)+:/34!.!' 2!.9&!%$)4/2%-02/'2!-7#:94!4!+%+!$9$/3/791}0,)+ !,%-/'793 40)0%7.%+/-0,)+!#*% +4 2%.!3:#: #)%$!3).!02!7)#:!3%--/%3):$!2:91} %0/:!+/ #:/.9-/$#:9#)%.)%"$-)'!+523/290/3405*%-974%$94!+ *!+7/0#*):! 0)3$!.9#( !:/$#:945$!1}.9#(-/.!79*+,!7)3:%-%3#3/290/3405*%-974%$94!+ *!+7/0#*):! 0)3$!.9#( !:/$#:945$!03)@A@P@j@)@@5}PAj@@)@@AjP@@5})@Aj@P@@5})@A@Pj@@5})@@AjP@@5})@A@P@j@)@5}@AjP@@)@@jU@P@T5} )@EePdU5}8@&Z& AV@PTd5}`&Yia@YTe@P nYA5}Yi@@  *eDQYf5} @e5}V@fj5}@QfU5}UUU5}UUU5}UUUtxUUU4f+kkoooV0?9}[_ookjVZ +o o9}_Zko??? 9}@`//+ 9}VPZkkkk[[[Z9}T9}U9}@???<9}??@TА?(PP@@@@ ?PP@9}@ ??:Ԕ? @@>*%@9}*PP:} jTUT:}????????????АP/**PPP:}PP@ ??????АP/**PPP8ƣ>}Y@dnP >} d @>}  >}@P>}> }> }tx <b PB }@ PB }@ B}P@ PB}@ P@B} P@B} P@B} P@B} P@B}$:)9%B}PP.TCB}@ @@P @ @PB}P9$@@P8$@B}@$@$PB}@ @@@@B}@@@B}@@@@B}@@B}@@@B}@B}B }B!}dh @OZoTP@@@P^ieTP@@TPPdUjjUVkUTF#}P@@tx ZoTP@@@P^ieTP@@TPPdUjjUVkUTDZoTP@@@P^ieTP@@TPPyUjjUZkUTJ%}P@@tx ZoTP@@@P^ieTP@@TPPyUjjUZkUTHVVVWWVWWVWWVWՕՕWVWVUUUUUUUUUUUUՕՕUUUUUUUU57׿N'}Օrxt VWWVWWVWՕՕWVWVUUUUUUUUUUUUՕՕUUUUUUUU57׿L opt 21 org $8000tc equ $0600pom equ 203char equ 0po2 equ 205co1 equ $feco2 equ $ffco3 equ $fcco4 equ $fdile equ $fR)}b lda #0 sta co1 sta co2 lda
dl sta 561 ldy #0kkk lda #0 taxggg sta tc,y clc adc #6 iny beq tR*}g inx cpx #8 bne ggg jmp kkktg ldy #0ddd lda f1,y sta $ba00,y lda f2,y sta $bb00,y iny cpy #48 bne ddd lda #33 R+}sta 559 lda #1 ldy #0 tyakas sta $bc40,y sta $bd00,y iny bne kas ldy #0 tyaloop sta $9000,y sta $9100,y sta $9200R,},y sta $9300,y iny bne loop lda #14 sta 709 lda #0 sta 710 lda #$90 sta 756 ldy #1 sty char deylp1 ldx #0 lda 8R-}8 clc adc #11 sta 203 lda 89 sta 204lp2 lda char sta (203),y inc char lda 203 clc adc #32 sta 203 bcc lp3 inc 2R.}04lp3 inx cpx #10 bne lp2 iny cpy #10 bne lp1run lda #55wait cmp $d40b bne wait sta $d40a lda #14 sta $d01a ldy R/}#0 tyalaap equ * sta $9000,y sta $9100,y sta $9200,y iny bne laap ldy #40fff equ * sta $9300,y dey bpl fff lda cR0}o1 sta co3 lda co2 sta co4 lda #59 sta ilejjj ldx co3 ldy $8f00,x ldx co4 lda $8f00,x tax lda tc,x sta loop1+1 R1}sta loop2+1 lda poss,x sta pm1+2 sta pm2+2 lda posm,x sta pm1+1 sta pm2+1 lda poss+8,x sta pm3+2 sta pm4+2 lda posmR2}+8,x sta pm3+1 sta pm4+1 ldx #5loop1 lda $ba00,xpm1 ora $9000,ypm2 sta $9000,yloop2 lda $bb00,xpm3 ora $9000,ypm4 stR3}a $9000,y iny dex bpl loop1 lda co3 clc adc #2 sta co3 lda co4 clc adc #1 sta co4 dec ile bne jjj lda co1 clcR4} adc #1 sta co1 lda co2 clc adc #2 sta co2 lda #128 sta $d01a jmp rundata dta b(128),b(64),b(32),b(16),b(8),b(4),b(R5}2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64)R6},b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(R7}2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64)R8},b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(R9}2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64)R:},b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(R;}2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64)R<},b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(R=}2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64)R>},b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(R?}2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64)R@},b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(RA}2),b(1) dta b(128),b(64),b(32),b(16),b(8),b(4),b(2),b(1)posm dta d'((((((((',d'',d'' dta d'',d'RB}',d'' dta c'',d'XXXXXXXX',d'',d''poss dta d'',d'',d'' dta d'RC}',d'',d'' dta d'',d'',d'',d''f1 dta b(%01111000) dta b(%11111100)RD} dta b(%11111100) dta b(%11111100) dta b(%11111100) dta b(%01111000) dta b(%00111100) dta b(%01111110) dta b(%01111110RE}) dta b(%01111110) dta b(%01111110) dta b(%00111100) dta b(%00011110) dta b(%00111111) dta b(%00111111) dta b(%001111RF}11) dta b(%00111111) dta b(%00011110) dta b(%00001111) dta b(%00011111) dta b(%00011111) dta b(%00011111) dta b(%0001RG}1111) dta b(%00001111) dta b(%00000111) dta b(%00001111) dta b(%00001111) dta b(%00001111) dta b(%00001111) dta b(%00RH}000111) dta b(%00000011) dta b(%00000111) dta b(%00000111) dta b(%00000111) dta b(%00000111) dta b(%00000011) dta b(RI}%00000001) dta b(%00000011) dta b(%00000011) dta b(%00000011) dta b(%00000011) dta b(%00000001) dta b(%00000000) dta RJ}b(%00000001) dta b(%00000001) dta b(%00000001) dta b(%00000001) dta b(%00000000)f2 dta d' ' dta d' ' dta d'RK} ' dta b(%00000000) dta b(%10000000) dta b(%10000000) dta b(%10000000) dta b(%10000000) dta b(%00000000) dta b(%RL}10000000) dta b(%11000000) dta b(%11000000) dta b(%11000000) dta b(%11000000) dta b(%10000000) dta b(%11000000) dta bRM}(%11100000) dta b(%11100000) dta b(%11100000) dta b(%11100000) dta b(%11000000) dta b(%11100000) dta b(%11110000) dtaRN} b(%11110000) dta b(%11110000) dta b(%11110000) dta b(%11100000) dta b(%11110000) dta b(%11111000) dta b(%11111000) dRO}ta b(%11111000) dta b(%11111000) dta b(%11110000)dl dta d'ppp',b(66),a($bc40),d'"""""""""',b(65),a(dl)dta b(%11111000) dPjfj ``Php @00=pp@  b(%11111000) dTm opt 21ERR EQU $610RIGHT EQU $620stick equ $0278strig equ $0284dos equ $7800dol equ $7f00mus equ $9000ply equ $96a4kZR}om1 equ $6fekom2 equ $6ff*-licZ1 equ $b6adr equ $b0adr1 equ $b2licz equ $b4*-eof equ $88eol equ $9b*--kateg equ $ZS}605KATEG1 EQU $606lmuz equ $607VVL EQU $660TZN EQU $663word equ $Fdczy equ $F2dwie equ $F3gdzie equ $F5fajka equ $F7ZT}pom equ $F8dek equ $F0*-- org $A000 LDA #0 STA CZY* LDA KATEG* CMP #$FF* BNE WC* JMP DAL*WC JMP WCZ*DAL EQU * lZU}da #36 sta tzn+1 lda #2 sta tzn lda #$1 sta tzn+4 LDA $224 STA VVL LDA $225 STA VVL+1 lda >$8000 sta 756 lda #$fZV} sta 709 LDA #0 STA 710 lda #34 sta 559 lda #$70 ldx mus jsr ply+3 lda #0 tax jsr ply+3 lda dlmen sta 561 lda dlim1 sta 513 lda #$c0 sta $d40e jsr rolin lda text sta adr+1 lda #0 sta licz lda tekst sta $b8 lda #0 sta $b9 lda #7 ldy scr1ZY}x1 jsr $e45c lda proc sta $0229 lda #1 sta $021a jsr timfil* jsr napclr JSR DISP JMP LOS*---ZZ}----------FLI PHA LDA $BFFF JSR PRUNE PLA CMP $BFFF BEQ GOODPOOR LDA TX2 STA ADR+1jmp INC ERRNEZ[}XT LDA #$2BEZ CMP TZN BNE BEZ JMP LOSTOVER LDA $BFFF JSR PRUNE JSR TIMFIL LDA #36 STA TZN+1 LDA #$FF STA TZN LDA TX3 STA ADR+1 JMP jmpGOOD LDA TX1 STA ADR+1 INC RIGHT JMP NEXTkey lda #$ff staZ]} 764spr LDA TZN BNE LL LDA TZN+1 BEQ TOVERLL lda 764 cmp #$FF BEQ SPR cmp #$1c beq a1 cmp #33 beq a2 cmp #7 beq Z^}key1x cmp #6 beq key2x bne sprkey1x LDA #0 BEQ YOUKEY2X LDA #1YOU PHA JSR TIMFIL LDA #36 STA TZN+1 LDA #$FF Z_}STA TZN PLA JMP FLIa1 lda #0 sta 559 sta $d409 sta 53760 sta 53761 sta 53762 sta 53763 sta 53767 sta 53768 ldy Z`}vvl ldx vvl+1 lda #7 jsr $e45c lda #64 sta $d40e jmp $b000a2 lda #0 sta 559 sta $d409 sta 53760 sta 53761 sta 537Za}62 sta 53763 sta 53767 sta 53768 ldy vvl ldx vvl+1 lda #7 jsr $e45c lda #64 sta $d40e jmp $b02c*--proc lda #1 stZb}a $021a ldx tzn+4 beq dal1 dex stx tzn+4 jmp timedal1 equ * ldx licz beq char dex stx licz jsr rolexit JMP TIMEcZc}har lda #7 sta licz jsr rolin ldy #0 lda (adr),y cmp #$ff bne h1 lda text sta adr+1 lda (adr),yZd}h1 ldx #3h7 asl @ asl @ asl @ bcc h2 inc adr1+1h2 sta adr1 ldy #0h4 lda (adr1),y sta free,y iny cpy #8 bne h4 jZe}sr rol lda adr clc adc #1 bcc h5 inc adr+1h5 sta adrtime ldx tzn beq dal dex stx tzn rtsdal lda #$2 sta tzn ldaZf} tzn+1 beq eksit lda tzn+2 beq one lda #128 ldy tzn+1 sta tim,y iny lda #0 sta tzn+2 rtsone lda #89 ldy tzn+1 stZg}a tim,y lda #0 sta tim,y iny sta tim,y dec tzn+1 lda #1 sta tzn+2 rtseksit lda #0 sta tim lda #2 jsr wait jsr tiZh}mfil lda #36 sta tzn+1 rtsscr1x1 equ * ldx $b9 beq sc1 dex stx $b9 stx $d404 jsr ply+6 jmp $e462sc1 lda #3 sta $Zi}b9 sta $d404 ldy #0sc2 lda wol+1,y sta wol,y iny cpy #46 bne sc2 ldy #0 lda ($b7),y cmp #$ff bne sc3 lda tekst sta $b8 lda ($b7),ysc3 sta wol+$2d inc $b7 bne sc4 inc $b8sc4 EQU * jsr ply+6 jmp $e462rol ldZk}x #0loop asl free,x rol $8008,x rol $8010,x rol $8018,x rol $8020,x rol $8028,x rol $8030,x rol $8038,x rol $8040,xZl} rol $8048,x rol $8050,x rol $8058,x rol $8060,x rol $8068,x rol $8070,x rol $8078,x rol $8080,x rol $8088,x rol $80Zm}90,x rol $8098,x inx cpx #8 bne loop rtsrolin lda <$7800 sta adr1 lda >$7800 sta adr1+1 rtsTIMFIL LDX #36 LDA #12Zn}8TI1 STA TIM,X DEX BPL TI1 RTSNAPCLR LDX #39 LDA #0NA1 STA DM1,X STA DM2,X STA DM3,X STA DM4,X DEX BPL NA1 RTSWZo}CZ STA KATEG1 ASL @ LDY #0 LDA WCZT,Y STA W1+1 LDA WCZT+1,Y STA W1+2 LDA #$FF STA KATEGW1 JMP $0000 RTSdlim1 PHPZp} pha txa pha tya pha ldy #0q1 lda dlit,y sta $d40a nop nop ora #$70 sta $d01a sta $d018 iny cpy #8 bne q1 ldaZq} #0 sta $d40a sta $d01a sta $d018 lda >$7c00 sta $d409 lda #0 sta $d01a lda #$0f sta $d018 lda #$0f sta $d017 ldZr}a #$0f sta $d016 lda dlim2 sta 513 pla tay pla tax pla PLP rtidlim2 PHP pha tya pha txaZs} pha ldy #0q2 lda dlit,y sta $d40a nop nop ora #$70 sta $d01a sta $d018 iny cpy #8 bne q2 LDA #14 STA $D018 ldaZt} #0 sta $d01a* lda #$f* sta $d017 lda dlim3 sta 513 pla tax pla tay pla PLP rtidlim3 PHP Zu}pha tya pha txa pha ldy #0q3 lda dlit,y sta $d40a nop nop ora #$70 sta $d01a sta $d018 iny cpy #8 bne q3 lda Zv}#0 sta $d018 sta $d01a lda #$f sta $d017 lda >$7800 sta $d409 lda dlim4 sta 513 pla tax plaZw} tay pla PLP rtidlim4 PHP pha tya pha txa pha ldy #0q4 lda dlit,y sta $d40a nop nop ora #$70 sta $d01a sta $Zx}d018 iny cpy #8 bne q4 lda #0 sta $d018 sta $d01a lda #$f sta $d017 lda >$8000 sta $d409 lda #33 sta $d400 lda dlim5 sta 513 pla tax pla tay pla PLP rtidlim5 PHP pha tya pha txa pha ldy #0q5 lda dlitZz},y sta $d40a nop nop ora #$70 sta $d01a sta $d018 iny cpy #8 bne q5 lda #0 sta $d018 sta $d01a lda #$f sta $d01Z{}7 lda >$7800 sta $d409 lda dlim1 sta 513 pla tax pla tay pla PLP rtiwait taxwal lda $14 cZ|}mp $14 beq *-2 dex bne wal rtslos lda 53770 and #127 tax cpx czy beq los cpx #0 beq tu cpx #100 bcc tu jmp losZ}}tu LDA 20PRG CMP 20 BEQ PRG LDA 20PRG2 CMP 20 BEQ PRG2 LDA 20PRG3 CMP 20 BEQ PRG3 lda adwyrZ~} sta dwie+1 txa stX czy beq juz LDY #0lAop lda (dwie),y cmp #$ff bne ty inc dwie bne yu inc dwie+1yu dex beq juzZ} JMP lAopty inc dwie bne lAop inc dwie+1 jmp lAopjuz LDA #0 LDY #80CLR STA DM1,Y DEY BPL CLR LDY #0LEN LDA (DWIE),Z}Y CMP #14 BEQ TAK INY JMP LENTAK TYA LSR @ STA POM LDA #10 SEC SBC POM ASL @ STA FAJKA INY LDA (DWIE),Y STA $BZ}FFF ldy #0pwys lda (dwie),y cmp #14 beq ok sty pom CMP #10 BNE JUP PHA LDA FAJKA STA $BFFE PLAJUP jsr onef ldy pZ}om iny jmp pwysok JMP KEYonef ldx fajka and #63 asl @ asl @ sta $E0 lda #0 adc #0 sta $E1 lda $E0 clc adc font sta $E1 ldy #0 lda ($E0),y sta DM1,x iny lda ($E0),y sta DM1+1,x iny lda ($E0),y sta Z}DM2,x iny lda ($E0),y sta DM2+1,x inx inx stx fajka rtsDISP LDY #0MOVE LDA PROS,Y STA DM3,Y LDA PROS+40,Y STA DM3Z}+40,Y INY CPY #40 BNE MOVE RTSfont equ * dta d' VWXY ' dta d' Z} ^ /] [ ' dta d' Z U UU 4 T RSIJQHIJ!S+;?PA)' dta d'!"#$%&()!*+,-"(.%*(,%*/ !*1023/$4 / 'Z} dta d'536$27/84 (,9:/$-"/$!"+;%LE,MUSISZ SI% POPRAWI\ !!',B($FF)tx3 dta d'WOLNO SI% ZASTANAWIASZ !!!',B($FF)PROS Z}DTA D'!*23 23' DTA D'+,/$ /$'ETYK DTA D' !',D'HCH'adZ}wyr dta d'*E^M.!',b($ff) dta d'*^ODNIA.!',b($ff) dta d'*AMAK. ',b($ff) dta d'*OWA\.!',b($ff) dta d'*RZ}Y_. ',b($ff)M.!',b($ff) dta d'*^ODNIA.!',b($ff) dta d'*AMAK. ',b($ff) dta d'*OWA\.!',b($ff) dta d'*RX dta d'%&GH RS' dta d'/8IJ IJ' dta d' !',d'=RZ' dta d'AB^}A*UR. ',b($ff) dta d'A*. ',b($ff) dta d'ARTYLE*YSTA.!',b($ff) dta d'BAGA*. ',b($ff) dta d'BARBA*Y_CA.!',b($ff) dta d'B*U^}CH.!',b($ff) dta d'B*OSKWINIA.!',b($ff) dta d'BIA^OWIE*A. ',b($ff) dta d'BIBLIOTEKA*.!',b($ff) dta d'BANDA*. ',b($ff) dt^}a d'BEZU*YTECZNY. ',b($ff) dta d'BLACHA*.!',b($ff) dta d'BLI*EJ. ',b($ff) dta d'B*EG.!',b($ff) dta d'BU*A.!',b($ff) dta ^}d'OG*EWANIE.!',b($ff) dta d'CESA*.!',b($ff) dta d'CHOCIA*. ',b($ff) dta d'CHOR[?y. ',b($ff) dta d'CH*AN.!',b($ff) dta d'^}CH*[KA\.!',b($ff) dta d'CH*[SZCZ.!',b($ff) dta d'CH*[STKA.!',b($ff) dta d'CHY*O. ',b($ff) dta d'CI]*AR. ',b($ff) dta d'C^}IET*EW.!',b($ff) dta d'CZY*YK. ',b($ff) dta d'D[*Y\. ',b($ff) dta d'D^U*EJ. ',b($ff) dta d'DOJ*EWA\.!',b($ff) dta d'DO^O^}*Y\. ',b($ff) dta d'DORO*KA. ',b($ff) dta d'DORO=KA*.!',b($ff) dta d'DO*ECZE.!',b($ff) dta d'DOST*EC.!',b($ff) dta d'DO*^}YNKI. ',b($ff) dta d'DRAPIE*NY. ',b($ff) dta d'DRA*NI\. ',b($ff) dta d'DR[*EK. ',b($ff) dta d'DRO*SZY. ',b($ff) dta d'DR^}O*D=E. ',b($ff) dta d'DRO=D*E. ',b($ff) dta d'DRUKA*.!',b($ff) dta d'DRU*YNA. ',b($ff) dta d'DR*E\. ',b($ff) dta d'D*EWO^}.!',b($ff) dta d'DWO*EC.!',b($ff) dta d'D*WI.!',b($ff) dta d'DWUNO*NY. ',b($ff) dta d'DWU*[D. ',b($ff) dta d'D*AZGA.!',b^}($ff) dta d'D=D*OWNICA. ',b($ff) dta d'D*UMA. ',b($ff) dta d'D*UNGLA. ',b($ff) dta d'EGZEMPLA*.!',b($ff) dta d'ELEMENTA*^}.!',b($ff) dta d'EL?BIETA. ',b($ff) dta d'ETA*ERKA. ',b($ff) dta d'FURA*ERKA. ',b($ff) dta d'FILI*ANKA. ',b($ff) dta d'G^}ARA*. ',b($ff) dta d'GARNCA*.!',b($ff) dta d'GOSPODA*.!',b($ff) dta d'G*EBYK.!',b($ff) dta d'G*EBIE_.!',b($ff) dta d'G*E^}CZNY.!',b($ff) dta d'G*YWA.!',b($ff) dta d'GWI*D=E. ',b($ff) dta d'GWI=D*E. ',b($ff) dta d'HARCE*.!',b($ff) dta d'HUSA*.^}!',b($ff) dta d'JA*ENI?WKA.!',b($ff) dta d'JAK*E. ',b($ff) dta d'JA*]BINA.!',b($ff) dta d'JA*YNA.!',b($ff) dta d'JAST*[B^}.!',b($ff) dta d'JE*. ',b($ff) dta d'JE*ELI. ',b($ff) dta d'JE*YNA. ',b($ff) dta d'JU*. ',b($ff) dta d'KALENDA*.!',b($ff^}) dta d'KA^AMA*.!',b($ff) dta d'KA^U*A. ',b($ff) dta d'KAPELMIST*.!',b($ff) dta d'KA*DY. ',b($ff) dta d'KOLEJA*.!',b($ff^}) dta d'KOMENTA*.!',b($ff) dta d'KOMISA*.!',b($ff) dta d'KOMINIA*.!',b($ff) dta d'KO*E_.!',b($ff) dta d'KO*ONEK.!',b($ff^}) dta d'KSI]*A. ',b($ff) dta d'KO*Y@^.!',b($ff) dta d'KOSIA*.!',b($ff) dta d'KOSYNIE*Y.!',b($ff) dta d'KRADZIE*. ',b($ff^}) dta d'KR[*EK. ',b($ff) dta d'KR[*OWNIK. ',b($ff) dta d'KR[*Y\. ',b($ff) dta d'K*AK.!',b($ff) end of fileZIE*. ',b($ff\p opt 21ERR EQU $610RIGHT EQU $620stick equ $0278strig equ $0284dos equ $7800dol equ $7f00mus equ $9000ply equ $96a4kb}om1 equ $6fekom2 equ $6ff*-licZ1 equ $b6adr equ $b0adr1 equ $b2licz equ $b4*-eof equ $88eol equ $9b*--kateg equ $b}605KATEG1 EQU $606lmuz equ $607VVL EQU $660TZN EQU $663word equ $Fdczy equ $F2dwie equ $F3gdzie equ $F5fajka equ $F7b}pom equ $F8dek equ $F0*-- org $A000 LDA #0 STA CZY* LDA KATEG* CMP #$FF* BNE WC* JMP DAL*WC JMP WCZ*DAL EQU * lb}da #36 sta tzn+1 lda #2 sta tzn lda #$1 sta tzn+4 LDA $224 STA VVL LDA $225 STA VVL+1 lda >$8000 sta 756 lda #$fb} sta 709 LDA #0 STA 710 lda #34 sta 559 lda #$70 ldx mus jsr ply+3 lda #0 tax jsr ply+3 lda dlmen sta 561 lda dlim1 sta 513 lda #$c0 sta $d40e jsr rolin lda text sta adr+1 lda #0 sta licz lda tekst sta $b8 lda #0 sta $b9 lda #7 ldy scr1b}x1 jsr $e45c lda proc sta $0229 lda #1 sta $021a jsr timfil* jsr napclr JSR DISP JMP LOS*---b}----------FLI PHA LDA $BFFF JSR PRUNE PLA CMP $BFFF BEQ GOODPOOR LDA TX2 STA ADR+1jmp INC ERRNEb}XT LDA #$2BEZ CMP TZN BNE BEZ JMP LOSTOVER LDA $BFFF JSR PRUNE JSR TIMFIL LDA #36 STA TZN+1 LDA #$FF STA TZN LDA TX3 STA ADR+1 JMP jmpGOOD LDA TX1 STA ADR+1 INC RIGHT JMP NEXTkey lda #$ff stab} 764spr LDA TZN BNE LL LDA TZN+1 BEQ TOVERLL lda 764 cmp #$FF BEQ SPR cmp #$1c beq a1 cmp #33 beq a2 cmp #7 beq b}key1x cmp #6 beq key2x bne sprkey1x LDA #0 BEQ YOUKEY2X LDA #1YOU PHA JSR TIMFIL LDA #36 STA TZN+1 LDA #$FF b}STA TZN PLA JMP FLIa1 lda #0 sta 559 sta $d409 sta 53760 sta 53761 sta 53762 sta 53763 sta 53767 sta 53768 ldy b}vvl ldx vvl+1 lda #7 jsr $e45c lda #64 sta $d40e jmp $b000a2 lda #0 sta 559 sta $d409 sta 53760 sta 53761 sta 537b}62 sta 53763 sta 53767 sta 53768 ldy vvl ldx vvl+1 lda #7 jsr $e45c lda #64 sta $d40e jmp $b02c*--proc lda #1 stb}a $021a ldx tzn+4 beq dal1 dex stx tzn+4 jmp timedal1 equ * ldx licz beq char dex stx licz jsr rolexit JMP TIMEcb}har lda #7 sta licz jsr rolin ldy #0 lda (adr),y cmp #$ff bne h1 lda text sta adr+1 lda (adr),yb}h1 ldx #3h7 asl @ asl @ asl @ bcc h2 inc adr1+1h2 sta adr1 ldy #0h4 lda (adr1),y sta free,y iny cpy #8 bne h4 jb}sr rol lda adr clc adc #1 bcc h5 inc adr+1h5 sta adrtime ldx tzn beq dal dex stx tzn rtsdal lda #$2 sta tzn ldab} tzn+1 beq eksit lda tzn+2 beq one lda #128 ldy tzn+1 sta tim,y iny lda #0 sta tzn+2 rtsone lda #89 ldy tzn+1 stb}a tim,y lda #0 sta tim,y iny sta tim,y dec tzn+1 lda #1 sta tzn+2 rtseksit lda #0 sta tim lda #2 jsr wait jsr tib}mfil lda #36 sta tzn+1 rtsscr1x1 equ * ldx $b9 beq sc1 dex stx $b9 stx $d404 jsr ply+6 jmp $e462sc1 lda #3 sta $b}b9 sta $d404 ldy #0sc2 lda wol+1,y sta wol,y iny cpy #46 bne sc2 ldy #0 lda ($b7),y cmp #$ff bne sc3 lda tekst sta $b8 lda ($b7),ysc3 sta wol+$2d inc $b7 bne sc4 inc $b8sc4 EQU * jsr ply+6 jmp $e462rol ldb}x #0loop asl free,x rol $8008,x rol $8010,x rol $8018,x rol $8020,x rol $8028,x rol $8030,x rol $8038,x rol $8040,xb} rol $8048,x rol $8050,x rol $8058,x rol $8060,x rol $8068,x rol $8070,x rol $8078,x rol $8080,x rol $8088,x rol $80b}90,x rol $8098,x inx cpx #8 bne loop rtsrolin lda <$7800 sta adr1 lda >$7800 sta adr1+1 rtsTIMFIL LDX #36 LDA #12b}8TI1 STA TIM,X DEX BPL TI1 RTSNAPCLR LDX #39 LDA #0NA1 STA DM1,X STA DM2,X STA DM3,X STA DM4,X DEX BPL NA1 RTSWb}CZ STA KATEG1 ASL @ LDY #0 LDA WCZT,Y STA W1+1 LDA WCZT+1,Y STA W1+2 LDA #$FF STA KATEGW1 JMP $0000 RTSdlim1 PHPb} pha txa pha tya pha ldy #0q1 lda dlit,y sta $d40a nop nop ora #$70 sta $d01a sta $d018 iny cpy #8 bne q1 ldab} #0 sta $d40a sta $d01a sta $d018 lda >$7c00 sta $d409 lda #0 sta $d01a lda #$0f sta $d018 lda #$0f sta $d017 ldb}a #$0f sta $d016 lda dlim2 sta 513 pla tay pla tax pla PLP rtidlim2 PHP pha tya pha txab} pha ldy #0q2 lda dlit,y sta $d40a nop nop ora #$70 sta $d01a sta $d018 iny cpy #8 bne q2 LDA #14 STA $D018 ldab} #0 sta $d01a* lda #$f* sta $d017 lda dlim3 sta 513 pla tax pla tay pla PLP rtidlim3 PHP b}pha tya pha txa pha ldy #0q3 lda dlit,y sta $d40a nop nop ora #$70 sta $d01a sta $d018 iny cpy #8 bne q3 lda b}#0 sta $d018 sta $d01a lda #$f sta $d017 lda >$7800 sta $d409 lda dlim4 sta 513 pla tax plab} tay pla PLP rtidlim4 PHP pha tya pha txa pha ldy #0q4 lda dlit,y sta $d40a nop nop ora #$70 sta $d01a sta $b}d018 iny cpy #8 bne q4 lda #0 sta $d018 sta $d01a lda #$f sta $d017 lda >$8000 sta $d409 lda #33 sta $d400 lda dlim5 sta 513 pla tax pla tay pla PLP rtidlim5 PHP pha tya pha txa pha ldy #0q5 lda dlitb},y sta $d40a nop nop ora #$70 sta $d01a sta $d018 iny cpy #8 bne q5 lda #0 sta $d018 sta $d01a lda #$f sta $d01b}7 lda >$7800 sta $d409 lda dlim1 sta 513 pla tax pla tay pla PLP rtiwait taxwal lda $14 cb}mp $14 beq *-2 dex bne wal rtslos lda 53770 and #127 tax cpx czy beq los cpx #0 beq tu cpx #100 bcc tu jmp losb}tu LDA 20PRG CMP 20 BEQ PRG LDA 20PRG2 CMP 20 BEQ PRG2 LDA 20PRG3 CMP 20 BEQ PRG3 lda adwyrb} sta dwie+1 txa stX czy beq juz LDY #0lAop lda (dwie),y cmp #$ff bne ty inc dwie bne yu inc dwie+1yu dex beq juzb} JMP lAopty inc dwie bne lAop inc dwie+1 jmp lAopjuz LDA #0 LDY #80CLR STA DM1,Y DEY BPL CLR LDY #0LEN LDA (DWIE),b}Y CMP #14 BEQ TAK INY JMP LENTAK TYA LSR @ STA POM LDA #10 SEC SBC POM ASL @ STA FAJKA INY LDA (DWIE),Y STA $Bb}FFF ldy #0pwys lda (dwie),y cmp #14 beq ok sty pom CMP #10 BNE JUP PHA LDA FAJKA STA $BFFE PLAJUP jsr onef ldy pb}om iny jmp pwysok JMP KEYonef ldx fajka and #63 asl @ asl @ sta $E0 lda #0 adc #0 sta $E1 lda $E0 clc adc font sta $E1 ldy #0 lda ($E0),y sta DM1,x iny lda ($E0),y sta DM1+1,x iny lda ($E0),y sta b}DM2,x iny lda ($E0),y sta DM2+1,x inx inx stx fajka rtsDISP LDY #0MOVE LDA PROS,Y STA DM3,Y LDA PROS+40,Y STA DM3b}+40,Y INY CPY #40 BNE MOVE RTSfont equ * dta d' VWXY ' dta d' b} ^ /] [ ' dta d' Z U UU 4 T RSIJQHIJ!S+;?PA)' dta d'!"#$%&()!*+,-"(.%*(,%*/ !*1023/$4 / 'b} dta d'536$27/84 (,9:/$-"/$!"+;%.!',B($FF) DTA D'^*SKA. ',B($FF) DTA D'M*CHA. ',B($FF) DTA D'MR*WKA.!',B($FF) DTA Dk}'M*WCA.!',B($FF) DTA D'M*RARZ. ',B($FF) DTA D'M*RZYN. ',B($FF) DTA D'M*SZTRA. ',B($FF) DTA D'M*ZEUM. ',B($FF) DTA D'N*=.k}!',B($FF) DTA D'ODBI*R.!',B($FF) DTA D'OB*WIE. ',B($FF) DTA D'OB*R[CZ. ',B($FF) DTA D'ODK*RZACZ. ',B($FF) DTA D'OGR*DEK.k}!',B($FF) DTA D'OK*LISTA. ',B($FF) DTA D'*SEMKA.!',B($FF) DTA D'*SMY.!',B($FF) DTA D'*W.!',B($FF) DTA D'*WCZESNY.!',B($Fk}F) DTA D'*WDZIE.!',B($FF) DTA D'*BOGI. ',B($FF) DTA D'*B?STWO. ',B($FF) DTA D'*CHO. ',B($FF) DTA D'*CZE_. ',B($FF) DTA k}D'*^AMEK. ',B($FF) DTA D'*NIA. ',B($FF) DTA D'*ROCZYSTY. ',B($FF) DTA D'*RLOP. ',B($FF) DTA D'UPI*R.!',B($FF) DTA D'UR*@k}\.!',B($FF) DTA D'*RZ[D. ',B($FF) DTA D'USTR*J.!',B($FF) DTA D'UTW*R.!',B($FF) DTA D'W*JT.!',B($FF) DTA D'W*ZEK.!',B($FFk}) DTA D'WR*=Y\.!',B($FF) DTA D'WR*BEL.!',B($FF) DTA D'W @RODK*. ',B($FF) DTA D'W*J. ',B($FF) DTA D'WYB*J.!',B($FF) DTA k}D'ZI*^KO.!',B($FF) DTA D'>R*D^O.!',B($FF) DTA D'=*RAW. ',B($FF) DTA D'=*ZEL. ',B($FF) DTA D'=*\. ',B($FF) DTA D'=*PAN. 'k},B($FF) DTA D'STR*J.!',B($FF) DTA D'STO^*WKA.!',B($FF) DTA D'STR*=.!',B($FF) DTA D'ST*DNIA. ',B($FF) DTA D'=*PAN. 'hm DTA D'!O 43' DTA D'+; +$' DTA D' ',D'U? ' DTA D'B*o }B.!',B($FF) DTA D'B*J.!',B($FF) DTA D'B*R.!',B($FF) DTA D'BR*D.!',B($FF) DTA D'BR*K. ',B($FF) DTA D'BR*KARZ. ',B($FF) Do!}TA D'BR*KIEW. ',B($FF) DTA D'BR*LION. ',B($FF) DTA D'B*KIET. ',B($FF) DTA D'B*^KA. ',B($FF) DTA D'B*^GAR. ',B($FF) DTA Do"}'B*RZA. ',B($FF) DTA D'CH*DY. ',B($FF) DTA D'CH*STKA. ',B($FF) DTA D'CH^*D.!',B($FF) DTA D'CHM*RA. ',B($FF) DTA D'CZ*^NOo#}.!',B($FF) DTA D'D^UGI. ',B($FF) DTA D'DNI*WKA.!',B($FF) DTA D'DOP*KI.!',B($FF) DTA D'DO P*ZNA.!',B($FF) DTA D'DOW*DZTWOo$}.!',B($FF) DTA D'DR*ZNIK.!',B($FF) DTA D'DZI*B.!',B($FF) DTA D'DW*NASTY. ',B($FF) DTA D'DW*CH.!',B($FF) DTA D'D=*MA.U',Bo%}($FF) DTA D'DZI*BEK.!',B($FF) DTA D'F*RTKA. ',B($FF) DTA D'G^*G.!',B($FF) DTA D'G^*WNY.!',B($FF) DTA D'G^*CHY. ',B($FF)o&} DTA D'GN*J.!',B($FF) DTA D'GR*BY. ',B($FF) DTA D'GR*D.!',B($FF) DTA D'H*TA. ',B($FF) DTA D'KONW*J.!',B($FF) DTA D'KR*CHo'}Y. ',B($FF) DTA D'KR*L.!',B($FF) DTA D'KR*LESTWO.!',B($FF) DTA D'KR*=GANEK. ',B($FF) DTA D'KRYJ*WKA.!',B($FF) DTA D'K*CHo(}NIA. ',B($FF) DTA D'K*FEL. ',B($FF) DTA D'K*RHAN. ',B($FF) DTA D'K*@NIERZ. ',B($FF) DTA D'L*D.!',B($FF) DTA D'^*=KO.!',Bo)}($FF) DTA D'L*J.!',B($FF) DTA D'^*D>.!',B($FF) DTA D'^*SKA. ',B($FF) DTA D'M*CHA. ',B($FF) DTA D'MR*WKA.!',B($FF) DTA Do*}'M*WCA.!',B($FF) DTA D'M*RARZ. ',B($FF) DTA D'M*RZYN. ',B($FF) DTA D'M*SZTRA. ',B($FF) DTA D'M*ZEUM. ',B($FF) DTA D'N*=.o+}!',B($FF) DTA D'ODBI*R.!',B($FF) DTA D'OB*WIE. ',B($FF) DTA D'OB*R[CZ. ',B($FF) DTA D'ODK*RZACZ. ',B($FF) DTA D'OGR*DEK.o,}!',B($FF) DTA D'OK*LISTA. ',B($FF) DTA D'*SEMKA.!',B($FF) DTA D'*SMY.!',B($FF) DTA D'*W.!',B($FF) DTA D'*WCZESNY.!',B($Fo-}F) DTA D'*WDZIE.!',B($FF) DTA D'*BOGI. ',B($FF) DTA D'*B?STWO. ',B($FF) DTA D'*CHO. ',B($FF) DTA D'*CZE_. ',B($FF) DTA o.}D'*^AMEK. ',B($FF) DTA D'*NIA. ',B($FF) DTA D'*ROCZYSTY. ',B($FF) DTA D'*RLOP. ',B($FF) DTA D'UPI*R.!',B($FF) DTA D'UR*@o/}\.!',B($FF) DTA D'*RZ[D. ',B($FF) DTA D'USTR*J.!',B($FF) DTA D'UTW*R.!',B($FF) DTA D'W*JT.!',B($FF) DTA D'W*ZEK.!',B($FFo0}) DTA D'WR*=Y\.!',B($FF) DTA D'WR*BEL.!',B($FF) DTA D'W @RODK*. ',B($FF) DTA D'W*J. ',B($FF) DTA D'WYB*J.!',B($FF) DTA o1}D'ZI*^KO.!',B($FF) DTA D'>R*D^O.!',B($FF) DTA D'=*RAW. ',B($FF) DTA D'=*ZEL. ',B($FF) DTA D'=*\. ',B($FF) DTA D'=*PAN. 'o2},B($FF) DTA D'STR*J.!',B($FF) DTA D'STO^*WKA.!',B($FF) DTA D'STR*=.!',B($FF) DTA D'ST*DNIA. ',B($FF) DTA D'=*PAN. 'lm opt 21doczyt equ $b300ERR EQU $610RIGHT EQU $620stick equ $0278strig equ $0284dos equ $7800dol equ $7f00mus equ $900s4}0ply equ $96a4kom1 equ $6fekom2 equ $6ff*-licZ1 equ $b6adr equ $b0adr1 equ $b2licz equ $b4*-eof equ $88eol equ $9s5}b*--kateg equ $605KATEG1 EQU $606lmuz equ $607VVL EQU $660TZN EQU $663word equ $Fdczy equ $F2dwie equ $F3gdzie equ s6}$F5fajka equ $F7pom equ $F8dek equ $F0*-- org $A000 LDA #0 STA CZY STA ERR STA ERR+1 STA RIGHT STA RIGHT+1 LDA s7}KATEG jsr doczyt lda #36 sta tzn+1 lda #2 sta tzn lda #$1 sta tzn+4 LDA $224 STA VVL LDA $225 STA VVL+1 lda >$800s8}0 sta 756 lda #$f sta 709 LDA #0 STA 710 lda #34 sta 559 lda #$70 ldx mus jsr ply+3 lda #0 tax jsr pls9}y+3 lda dlmen sta 561 lda dlim1 sta 513 lda #$c0 sta $d40e jsr rolin lda s:}text sta adr+1 lda #0 sta licz lda tekst sta $b8 lda #0 sta $b9 lda #7 lds;}y scr1x1 jsr $e45c lda proc sta $0229 lda #1 sta $021a jsr timfil* jsr napclr JSs<}R DISP JMP LOS*-------------FLI PHA LDA $BFFF JSR PRUNE PLA CMP $BFFF BEQ GOODPOOR LDA TX2 STA s=}ADR+1jmp INC ERRNEXT LDA #$2BEZ CMP TZN BNE BEZ JMP LOSTOVER LDA $BFFF JSR PRUNE JSR TIMFIL LDA #36 STA TZN+1 LDA s>}#$FF STA TZN LDA TX3 STA ADR+1 JMP jmpGOOD LDA TX1 STA ADR+1 INC RIGHT JMP NEs?}XTkey lda #$ff sta 764spr LDA TZN BNE LL LDA TZN+1 BEQ TOVERLL lda 764 cmp #$FF BEQ SPR cmp #$1c beq a1 cmp #33 s@}beq a2 cmp #7 beq key1x cmp #6 beq key2x bne sprkey1x LDA #0 BEQ YOUKEY2X LDA #1YOU PHA JSR TIMFIL LDA #36 STAsA} TZN+1 LDA #$FF STA TZN PLA JMP FLIa1 jsr off jmp $b000a2 jsr off jmp $b02coff lda #0 sta 559 sta $d409 sta sB}53760 sta 53761 sta 53762 sta 53763 sta 53767 sta 53768 sta $021a ldy vvl ldx vvl+1 lda #7 jsr $e45c lda #64 sta sC}$d40e ldx #$10 lda #12 sta $840+2,x jsr $e456 rts*--proc lda #1 sta $021a ldx tzn+4 beq dal1 dex stx tzn+4 jmp tsD}imedal1 equ * ldx licz beq char dex stx licz jsr rolexit JMP TIMEchar lda #7 sta licz jsr rolin ldy #0 lda (adr),sE}y cmp #$ff bne h1 lda text sta adr+1 lda (adr),yh1 ldx #3h7 asl @ asl @ asl @ bcc h2 inc adr1sF}+1h2 sta adr1 ldy #0h4 lda (adr1),y sta free,y iny cpy #8 bne h4 jsr rol lda adr clc adc #1 bcc h5 inc adr+1h5 sG}sta adrtime ldx tzn beq dal dex stx tzn rtsdal lda #$2 sta tzn lda tzn+1 beq eksit lda tzn+2 beq one lda #128 ldsH}y tzn+1 sta tim,y iny lda #0 sta tzn+2 rtsone lda #89 ldy tzn+1 sta tim,y lda #0 sta tim,y iny sta tim,y dec tznsI}+1 lda #1 sta tzn+2 rtseksit lda #0 sta tim lda #2 jsr wait jsr timfil lda #36 sta tzn+1 rtsscr1x1 equ * ldx $b9sJ} beq sc1 dex stx $b9 stx $d404 jsr ply+6 jmp $e462sc1 lda #3 sta $b9 sta $d404 ldy #0sc2 lda wol+1,y sta wol,y isK}ny cpy #46 bne sc2 ldy #0 lda ($b7),y cmp #$ff bne sc3 lda tekst sta $b8 lda ($b7),ysc3 sta wsL}ol+$2d inc $b7 bne sc4 inc $b8sc4 EQU * jsr ply+6 jmp $e462rol ldx #0loop asl free,x rol $8008,x rol $8010,x rolsM} $8018,x rol $8020,x rol $8028,x rol $8030,x rol $8038,x rol $8040,x rol $8048,x rol $8050,x rol $8058,x rol $8060,xsN} rol $8068,x rol $8070,x rol $8078,x rol $8080,x rol $8088,x rol $8090,x rol $8098,x inx cpx #8 bne loop rtsrolinsO} lda <$7800 sta adr1 lda >$7800 sta adr1+1 rtsTIMFIL LDX #36 LDA #128TI1 STA TIM,X DEX BPL TI1 RTSNAPCLR LDX #39 sP}LDA #0NA1 STA DM1,X STA DM2,X STA DM3,X STA DM4,X DEX BPL NA1 RTSWCZ STA KATEG1 ASL @ LDY #0 LDA WCZT,Y STA W1+1sQ} LDA WCZT+1,Y STA W1+2 LDA #$FF STA KATEGW1 JMP $0000 RTSdlim1 PHP pha txa pha tya pha ldy #0q1 lda dlit,y stasR} $d40a nop nop ora #$70 sta $d01a sta $d018 iny cpy #8 bne q1 lda #0 sta $d40a sta $d01a sta $d018 lda >$7c00 ssS}ta $d409 lda #0 sta $d01a lda #$0f sta $d018 lda #$0f sta $d017 lda #$0f sta $d016 lda dlim2sT} sta 513 pla tay pla tax pla PLP rtidlim2 PHP pha tya pha txa pha ldy #0q2 lda dlit,y sta $d40a nop nop orsU}a #$70 sta $d01a sta $d018 iny cpy #8 bne q2 LDA #14 STA $D018 lda #0 sta $d01a* lda #$f* sta $d017 lda dlim3 sta 513 pla tax pla tay pla PLP rtidlim3 PHP pha tya pha txa pha ldy #0q3 lda dlit,y sta sW}$d40a nop nop ora #$70 sta $d01a sta $d018 iny cpy #8 bne q3 lda #0 sta $d018 sta $d01a lda #$f sta $d017 lda >sX}$7800 sta $d409 lda dlim4 sta 513 pla tax pla tay pla PLP rtidlim4 PHP pha tya pha txa sY}pha ldy #0q4 lda dlit,y sta $d40a nop nop ora #$70 sta $d01a sta $d018 iny cpy #8 bne q4 lda #0 sta $d018 sta $sZ}d01a lda #$f sta $d017 lda >$8000 sta $d409 lda #33 sta $d400 lda dlim5 sta 513 pla tax plas[} tay pla PLP rtidlim5 PHP pha tya pha txa pha ldy #0q5 lda dlit,y sta $d40a nop nop ora #$70 sta $d01a sta $s\}d018 iny cpy #8 bne q5 lda #0 sta $d018 sta $d01a lda #$f sta $d017 lda >$7800 sta $d409 lda dlim1 sta 513 pla tax pla tay pla PLP rtiwait taxwal lda $14 cmp $14 beq *-2 dex bne wal rtslos lda 53770 s^}and #127 tax cpx czy beq los cpx #0 beq tu cpx #100 bcc tu jmp lostu LDA 20PRG CMP 20 BEQ PRG LDA 20PRG2 CMP 20s_} BEQ PRG2 LDA 20PRG3 CMP 20 BEQ PRG3 lda adwyr sta dwie+1 txa stX czy beq juz LDY #0lAop ldas`} (dwie),y cmp #$ff bne ty inc dwie bne yu inc dwie+1yu dex beq juz JMP lAopty inc dwie bne lAop inc dwie+1 jmp lAsa}opjuz LDA #0 LDY #80CLR STA DM1,Y DEY BPL CLR LDY #0LEN LDA (DWIE),Y CMP #14 BEQ TAK INY JMP LENTAK TYA LSR @ Ssb}TA POM LDA #10 SEC SBC POM ASL @ STA FAJKA INY LDA (DWIE),Y STA $BFFF ldy #0pwys lda (dwie),y cmp #14 beq ok stysc} pom CMP #10 BNE JUP PHA LDA FAJKA STA $BFFE PLAJUP jsr onef ldy pom iny jmp pwysok JMP KEYonef ldx fajka and #6sd}3 asl @ asl @ sta $E0 lda #0 adc #0 sta $E1 lda $E0 clc adc font sta $E1 ldy #0 ldase} ($E0),y sta DM1,x iny lda ($E0),y sta DM1+1,x iny lda ($E0),y sta DM2,x iny lda ($E0),y sta DM2+1,x inx inx stxsf} fajka rtsDISP LDY #0MOVE LDA PROS,Y STA DM3,Y LDA PROS+40,Y STA DM3+40,Y INY CPY #40 BNE MOVE RTSfont equ * dtasg} d' VWXY ' dta d' ^ /] [ ' dta d' Z U sh}UU 4 T RSIJQHIJ!O+;?PA)' dta d'!"#$%&()!*+,-"(.%*(,%*/ !*1023/$4 / ' dta d'536$27/84 (,9:/$-"/$!"+;%na1 sta nom+1 lda <$7800-6 sta adr lda >$7800-6 sta adr+1 jmp $a000ort2 lda na2 sta nom+1 lda <$7800-6 sta adr lda >$7800-6 sta adr+1 jmp $a000ort3 lda na3 sta nom{}+1 lda <$00-6 sta adr lda >$7800-6 sta adr+1 jmp $a000dta1 lda dt1 sta nom+1 lda <$7800-6 sta ad{}r lda >$7800-6 sta adr+1 lda #$ff sta kateg jmp $a000dta2 lda na1 sta nom+1 lda <$7800-6 sta adr{} lda >$7800-6 sta adr+1dta3 lda na1 sta nom+1 lda <$7800-6 sta adr lda >$7800-6 sta adr+1ta adrxw opt 21doczyt equ $b300ERR EQU $610RIGHT EQU $620stick equ $0278strig equ $0284dos equ $7800dol equ $7f00mus equ $900}0ply equ $96a4kom1 equ $6fekom2 equ $6ff*-licZ1 equ $b6adr equ $b0adr1 equ $b2licz equ $b4*-eof equ $88eol equ $9}b*--kateg equ $605KATEG1 EQU $606lmuz equ $607VVL EQU $660TZN EQU $663word equ $Fdczy equ $F2dwie equ $F3gdzie equ }$F5fajka equ $F7pom equ $F8dek equ $F0*-- org $A000 LDA #0 STA CZY STA ERR STA ERR+1 STA RIGHT STA RIGHT+1 LDA }KATEG jsr doczyt lda #36 sta tzn+1 lda #2 sta tzn lda #$1 sta tzn+4 LDA $224 STA VVL LDA $225 STA VVL+1 lda >$800}0 sta 756 lda #$f sta 709 LDA #0 STA 710 lda #34 sta 559 lda #$70 ldx mus jsr ply+3 lda #0 tax jsr pl}y+3 lda dlmen sta 561 lda dlim1 sta 513 lda #$c0 sta $d40e jsr rolin lda }text sta adr+1 lda #0 sta licz lda tekst sta $b8 lda #0 sta $b9 lda #7 ld}y scr1x1 jsr $e45c lda proc sta $0229 lda #1 sta $021a jsr timfil* jsr napclr JS}R DISP JMP LOS*-------------FLI PHA LDA $BFFF JSR PRUNE PLA CMP $BFFF BEQ GOODPOOR LDA TX2 STA }ADR+1jmp INC ERRNEXT LDA #$2BEZ CMP TZN BNE BEZ JMP LOSTOVER LDA $BFFF JSR PRUNE JSR TIMFIL LDA #36 STA TZN+1 LDA }#$FF STA TZN LDA TX3 STA ADR+1 JMP jmpGOOD LDA TX1 STA ADR+1 INC RIGHT JMP NE}XTkey lda #$ff sta 764spr LDA TZN BNE LL LDA TZN+1 BEQ TOVERLL lda 764 cmp #$FF BEQ SPR cmp #$1c beq a1 cmp #33 }beq a2 cmp #7 beq key1x cmp #6 beq key2x bne sprkey1x LDA #0 BEQ YOUKEY2X LDA #1YOU PHA JSR TIMFIL LDA #36 STA} TZN+1 LDA #$FF STA TZN PLA JMP FLIa1 lda #0 sta 559 sta $d409 sta 53760 sta 53761 sta 53762 sta 53763 sta 53}767 sta 53768 ldy vvl ldx vvl+1 lda #7 jsr $e45c lda #64 sta $d40e jmp $b000a2 lda #0 sta 559 sta $d409 sta 53760} sta 53761 sta 53762 sta 53763 sta 53767 sta 53768 ldy vvl ldx vvl+1 lda #7 jsr $e45c lda #64 sta $d40e jmp $b02c}*--proc lda #1 sta $021a ldx tzn+4 beq dal1 dex stx tzn+4 jmp timedal1 equ * ldx licz beq char dex stx licz jsr} rolexit JMP TIMEchar lda #7 sta licz jsr rolin ldy #0 lda (adr),y cmp #$ff bne h1 lda text st}a adr+1 lda (adr),yh1 ldx #3h7 asl @ asl @ asl @ bcc h2 inc adr1+1h2 sta adr1 ldy #0h4 lda (adr1),y sta free,y in}y cpy #8 bne h4 jsr rol lda adr clc adc #1 bcc h5 inc adr+1h5 sta adrtime ldx tzn beq dal dex stx tzn rtsdal l}da #$2 sta tzn lda tzn+1 beq eksit lda tzn+2 beq one lda #128 ldy tzn+1 sta tim,y iny lda #0 sta tzn+2 rtsone ld}a #89 ldy tzn+1 sta tim,y lda #0 sta tim,y iny sta tim,y dec tzn+1 lda #1 sta tzn+2 rtseksit lda #0 sta tim lda }#2 jsr wait jsr timfil lda #36 sta tzn+1 rtsscr1x1 equ * ldx $b9 beq sc1 dex stx $b9 stx $d404 jsr ply+6 jmp $e4}62sc1 lda #3 sta $b9 sta $d404 ldy #0sc2 lda wol+1,y sta wol,y iny cpy #46 bne sc2 ldy #0 lda ($b7),y cmp #$ff b}ne sc3 lda tekst sta $b8 lda ($b7),ysc3 sta wol+$2d inc $b7 bne sc4 inc $b8sc4 EQU * jsr ply+6} jmp $e462rol ldx #0loop asl free,x rol $8008,x rol $8010,x rol $8018,x rol $8020,x rol $8028,x rol $8030,x rol $}8038,x rol $8040,x rol $8048,x rol $8050,x rol $8058,x rol $8060,x rol $8068,x rol $8070,x rol $8078,x rol $8080,x }rol $8088,x rol $8090,x rol $8098,x inx cpx #8 bne loop rtsrolin lda <$7800 sta adr1 lda >$7800 sta adr1+1 rtsTIM}FIL LDX #36 LDA #128TI1 STA TIM,X DEX BPL TI1 RTSNAPCLR LDX #39 LDA #0NA1 STA DM1,X STA DM2,X STA DM3,X STA DM4,X} DEX BPL NA1 RTSWCZ STA KATEG1 ASL @ LDY #0 LDA WCZT,Y STA W1+1 LDA WCZT+1,Y STA W1+2 LDA #$FF STA KATEGW1 JMP $0}000 RTSdlim1 PHP pha txa pha tya pha ldy #0q1 lda dlit,y sta $d40a nop nop ora #$70 sta $d01a sta $d018 iny} cpy #8 bne q1 lda #0 sta $d40a sta $d01a sta $d018 lda >$7c00 sta $d409 lda #0 sta $d01a lda #$0f sta $d018 lda} #$0f sta $d017 lda #$0f sta $d016 lda dlim2 sta 513 pla tay pla tax pla PLP rtidlim2 PHP} pha tya pha txa pha ldy #0q2 lda dlit,y sta $d40a nop nop ora #$70 sta $d01a sta $d018 iny cpy #8 bne q2 LDA} #14 STA $D018 lda #0 sta $d01a* lda #$f* sta $d017 lda dlim3 sta 513 pla tax pla tay pla }PLP rtidlim3 PHP pha tya pha txa pha ldy #0q3 lda dlit,y sta $d40a nop nop ora #$70 sta $d01a sta $d018 iny }cpy #8 bne q3 lda #0 sta $d018 sta $d01a lda #$f sta $d017 lda >$7800 sta $d409 lda dlim4 sta} 513 pla tax pla tay pla PLP rtidlim4 PHP pha tya pha txa pha ldy #0q4 lda dlit,y sta $d40a nop nop ora #$}70 sta $d01a sta $d018 iny cpy #8 bne q4 lda #0 sta $d018 sta $d01a lda #$f sta $d017 lda >$8000 sta $d409 lda #}33 sta $d400 lda dlim5 sta 513 pla tax pla tay pla PLP rtidlim5 PHP pha tya pha txa pha} ldy #0q5 lda dlit,y sta $d40a nop nop ora #$70 sta $d01a sta $d018 iny cpy #8 bne q5 lda #0 sta $d018 sta $d01}a lda #$f sta $d017 lda >$7800 sta $d409 lda dlim1 sta 513 pla tax pla tay pla PLP rtiwai}t taxwal lda $14 cmp $14 beq *-2 dex bne wal rtslos lda 53770 and #127 tax cpx czy beq los cpx #0 beq tu cpx #}100 bcc tu jmp lostu LDA 20PRG CMP 20 BEQ PRG LDA 20PRG2 CMP 20 BEQ PRG2 LDA 20PRG3 CMP 20 BEQ PRG3 lda adwyr sta dwie+1 txa stX czy beq juz LDY #0lAop lda (dwie),y cmp #$ff bne ty inc dwie bne yu inc dwi}e+1yu dex beq juz JMP lAopty inc dwie bne lAop inc dwie+1 jmp lAopjuz LDA #0 LDY #80CLR STA DM1,Y DEY BPL CLR LD}Y #0LEN LDA (DWIE),Y CMP #14 BEQ TAK INY JMP LENTAK TYA LSR @ STA POM LDA #10 SEC SBC POM ASL @ STA FAJKA INY }LDA (DWIE),Y STA $BFFF ldy #0pwys lda (dwie),y cmp #14 beq ok sty pom CMP #10 BNE JUP PHA LDA FAJKA STA $BFFE PLA}JUP jsr onef ldy pom iny jmp pwysok JMP KEYonef ldx fajka and #63 asl @ asl @ sta $E0 lda #0 adc #0 sta $E1 lda} $E0 clc adc font sta $E1 ldy #0 lda ($E0),y sta DM1,x iny lda ($E0),y sta DM1+1,x in}y lda ($E0),y sta DM2,x iny lda ($E0),y sta DM2+1,x inx inx stx fajka rtsDISP LDY #0MOVE LDA PROS,Y STA DM3,Y LD}A PROS+40,Y STA DM3+40,Y INY CPY #40 BNE MOVE RTSfont equ * dta d' VWXY ' }dta d' ^ /] [ ' dta d' Z U UU 4 T RSIJQHIJ!O+;?PA)' dta d'!"#$%&()!*+,-"(.%}*(,%*/ !*1023/$4 / ' dta d'536$27/84 (,9:/$-"/$!"+;%buf sta $0355 lda #6 sta $0358 lda #0 sta $0359 txa }jsr _ciov bmi err1 ldy #2 lda buf,y sta $0354 sta vec lda buf+1,y sta $0355 sta vec+1} iny iny lda buf+1,y sta der lda #0 sta $0358 lda #$e0 sta $0359 txa jsr _c}iov cpy #$88 beq end tya bpl enderr1 jsr _close jmp tutajend jmp _close_open sta _iocb+4,X } tya sta _iocb+5,X lda #3 sta _iocb+2,X lda #4 sta _iocb+10,X lda} #0 sta _iocb+11,X jmp _ciov_iomode dta b(3)_close lda #12 sta $352 jmp _ciovbuf d}ta d' 'plik dta a(p1),a(p2),a(p3)p1 dta c'D:RZZ.COM',B($9B)P2 DTA C'D:CHH.COM',B($9B)P3 DTA C'D:OOU.COM',B($9B) dz'(23)*)*2:!"! 52! !249,% 934!"!'! }"!2"! 9?#!" 5#(" /3+7).)!")!>/7)% !")",)/4%+! "!.$! "%:5 94%#:.9",!#(! ",) %*" %'"5 !/' %7}!.)%#%3! }1"$Q1iw| } L 4'/;&$25 9.!$2 %<$ %7/$7/ %#$ 7)$75./ .9$75 ;$$ !:'!$$ /7.)#!$ 5-!$ 5.',!%':}%-0,! %,%-%.4! %,")%4!%4! %2+!&52! %2+!&),) !.+!'!2! '!2.#! '/30/$! ' %"9+' %")%?' %#:.9}' 97!'7) $%'7)$ %(!2#% (53! *! %.)7+!*!+ %*! =").!*! 9.!*!34 ;"*% *% %,)*% 9.!*5 }+!,%.$! +!>!-! +!>5 !+!0%,-)34 +! $9+/,%*! +/-%.4! +/-)3! +/-).)! +/ %?+/ /.%++3)= !+/ 9} >+/3)! +/39.)% 9+2!$:)% +2; %++2; /7.)++2; 9<+ !+}}}}*  (#("2:5  /#)!2: !"%2 !>50!} !. !/3 !2!+4%20/ 7!>!0/#)% !0/ 9>93:452 !.)%#/ /4! )#(/4!< >$ !#:9+"/ !4%2 !&4 !,}! 5 4!<}1"$Qf }D:7y4'/;&/+%* 5+ !2-/.)*+! !3!< %*.!> /2/7!<#% ! 2534 /).+! /,%2! /,%7+! /-;4/ /}-)+ 5$9 5#(!< 534%#:+! 7!34 /27!#+) $ 2/.)#:.9 2 !>$! %+4/,)42 %4-!. %, %2/,$ /24}%.3*! 2%#:!.9 5"+! 5-!.)4!2.9 )4,%2/7)%# )3:0!?3+) %2"!4! %2+5,%3 %+!4/-"! )%.! /22/2/2 )$%!}-! /-%4-! /?-!2 %7+/> /:-)% .)% =4.925 /-9./7/ 5#+)2! 5.%+:!-! /7)%#0/ /0.97% )+5>&!24}5 }}}}*(%11100000) dta b(%11100000) dta b(%11100000) dta b(%11100000) dta b(%11000000) dta b(%11100000) dta b(%11110000) dta} b(%11110000) dta b(%11110000) dta b(%11110000) dta b(%11100000) dta b(%11110000) dta b(%11111000) dta b(%11111000) d}ta b(%11111000) dta b(%11111000) dta b(%11110000)dl dta d'ppp',b(66),a($bc40),d'"""""""""',b(65),a(dl)dta b(%11111000) dj iHHhh ` uRTUXY V0.TUȹXY V  LLD}EBJKLV RLVD:RZZ.COMD:CHH.COMD:OOU.COM}JKLV RLVD:RZZ.COMD:CHH.COMD:OOU.COM   (#("2:5  /#)!2: !"%2 !>50! !.} !/3 !2!+4%20/ 7!>!0/#)% !0/ 9>93:452 !.)%#/ /4! )#(/4!< >$ !#:9+"/ !4%2 !&4 !,! 5 4}!< 5#:%< 524 52!'!. !>!3 !-!+ %* %4-!. %2/,$ %2" %>- %+4!2 %"%, !24/7!< !2/7!< !}2-/./'2!- !2$9 )')%.! >/$.9 /#(/> -)%, -52:9<3)= /2;')%7 9$2!.4 5 4!7+! 54! 52! /29:/.4} />$ /+%* 5+ !2-/.)*+! !3!< %*.!> /2/7!<#% ! 2534 /).+! /,%2! /,%7+! /-;4/ /-)+ 5}$9 5#(!< 534%#:+! 7!34 /27!#+) $ 2/.)#:.9 2 !>$! %+4/,)42 %4-!. %, %2/,$ /24%.3*!} 2%#:!.9 5"+! 5-!.)4!2.9 )4,%2/7)%# )3:0!?3+) %2"!4! %2+5,%3 %+!4/-"! )%.! /22/2/2 )$%!-! /-}%4-! /?-!2 %7+/> /:-)% .)% =4.925 /-9./7/ 5#+)2! 5.%+:!-! /7)%#0/ /0.97% )+5>&!245 }#omplete&ailure0 & / 05 ǂ i0 0euiaqm}y%5)!1-=9 $,0PpX͗}ʈEUIAQM]YLl JFVN^  Hh(*&6.>jfvn~@`8xʆ BƗ} N,CAAABBBBBBBBBBCCCCCCCDDDDEEEEIIIIJJLLLLNOOOPPPPRRRRSSSSSSSTTTTTTDNSCCEIMNPRVVLLLLMPPEEETNOQXCNN}NMSDDDSOPRRHHLLOOTTBEEETTTAASXXYCDLCSQTIELKCSCDIVPXYCXYADRUTLCXYPRAXYRPTAGAPAPLRISCCDIAXYXYXASA !"#$,/2678}@DEFHIQV[`aijklmrwxyCSQTIELKCSCDIVPXYCXYADRUTLCXYPRAXYRPTAGAPAPLRISCCDIAXYXYXASA !"#$,/2678$ dta d'!*23 23' dta d'+,/$ /$' dta d' !',d'HCH' dta d'BR}