8(CA;UTOEXECXEC038 AUTOE c}E q0 \C)CC8`DCeECiD` RP h1$E ȍ @y b Y)hܭ]L]` q  DMD   u j)`0  ,p0i2 &28jJ1f02 9 g iJf0i1)xԍӭ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 <;`<LU 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 128Disk f(}qllWrite protectedFile MismatchBad Filename}Disketovy magazin FLOP 32, 6/94 --------------------------------File lock)}edDevice doneDirectory fullFile not foundBad Load FileNot DOS II+Bad HexAbort-> Source-> DestinationD2:+DOS SY}^^<s3>00x|73>00x`c6<9c` 33c366fffg~33>00xgfffff<11111+}{!!\]_\ED!EOHI B V`}   TUR,}BO-BASIC XL 1.5 (c) 1985 Frank Ostrowski!  ө)6L]""$$ (p%-}J[WܠjeC /D%Zub2gTSt$8®݊Ò2% 5RŢt.}d.’$3@X7t5w5$?## $#L+D:*.*S:C:P:$#.#) `:#(6ENeU\l؏&/ؕ؄sأ$L/}ENeU\lأ$8آǔƐƉƐƇ4cY%٦rULۉCۄړp^gyض%iwܸJڅ*ܣ$ڭڞجئأأ$0} ,(""(222000000..222222222222222222222222222222**22*22&222$2222222222 ,(""(01}000000--**2*&22$2222222 V`hh@,lHH$HHHHHHӍl"H$H2}Hl $`GHFH\` ` 4ӭ l 4Lq ӠԪӅԆL} Ӡ L( ӑ)3} ` b% +L:#HH 0 HHLj%ӥHlL{ee 8eeee4}Ӧee褢%ƚƜ`88夅奅8夕5}奕Ӡȱȱȱ㦢`L+`8` .E)))8@8e0 *څۅ6}܅݅ޅ߄ԠF0y"ޥy"ݥy"ܥy"ۥy"ڥy"و0ǠF0y"ݥy"ܥy"ۥy"ڥy"٥y"؈07}ǠF0y"ܥy"ۥy"ڥy"٥y"إy"׈0ǠF0y"ۥy"ڥy"٥y"إy"ץy"ֈ0ǠF8}0y"ڥy"٥y"إy"ץy"֥y"Ո0L-`8`E)))8i@0 *ڄԠ"(9}"!""" "L**""""""&О"("!""":} "L**""""""&О"("!""" "L**";}"""""&О"("!""" "L**"""""<}"&О"("!""" "L**""""""&Оd=}"("!""" "L**""""""&ОL-6"e""e>}""e""e""e""i""}"""}"""}"""}"""}"""}""ǭ"m"""m"""m?}"""m"""m"""m"""}"""}"""}"""}"""}"""}""ǥՅօׅ؅مԅՅօׅ؅`@}` ` ` `80 `ԥՅ +.JJJJ)iFiFi1FicFi'ȐȦoFiUȐFA}iiFi#iFiGi Fii@F iiFiiciՊFigi'iՊօשBL-`I)B})83Ԥԥդե֤֥פץؤإ٤L,K6"ХL--L--L--C}E0:e٥eإeץe֥eՐ؅٥ׅإօץՅ֩L-8٥إץ֥հ'I8م٘D}؅ؘׅטօ֘ՅL-ؤm\G0Q@Ն֩م؅2եمֆשم"ե؅֥م׆ةեׅ֥؅ץمE}؆لԘ)q +` . |. &7i |. ,%!L?.`刱䈱㈱∱ሱF}`ԅՅօׅ؅م`ԍՍ֍׍؍ٍ`ԍՍ֍׍؍ٍ`L.L. Խսֽ׽G}ؽ` L%/`ӽޕ &ԅ)@إ)JJJe)e - M 1.H} &Je0F 2 . /L(8`@ԠՈքׄ؄` . |. , . . |. , #/L(8`0 I@ԥ) 2I}f / . & r 1. #/ &?P , .Iiԩ +)ԅ ,ӽޕL(`8`$J})Ԧ61718191:1;1 (ť)8@0$Յ)e)e -F . / , . &1 1. #/ &K}F I`U9>`D'RFuCU?b9dYdg@W2@?tS)%)@0)%ԅԢ / . &G  1.L}Ӱ6 #/ &.ӽߕ ,ԅԥ B1 (`8``0?i? . . / , #/ &ԍՍ֍M}׍؍ٍ . . ( / , O2 / ,0 .JeF 2`L+) .e٥eإeץe֥eՊiN}؊؅٥ׅإօץՅֆե1ԥ'JffffJffffJffffJffffم`ԩ&&&&*&&&&*&&&&*&&&&O}*`Pi`)JJJeԅԘ)Peԅ`եԆ8@EB)JJJeԅԥ)PeԅԘ)3eԅԽ3eՅ՘)JJJ}3ԥ}3P}`)JJJeԅԥ)PeԅԹ3eԅԹ3eՅդЧ` 0@P`'Nu pX@(#d,X L(  兢0Q}襙 bɥ⥋㩀 50ɥ0DȱȱȄ   ik#ZMkVgğe拰ㅋ⅊R}0 eee拰 L f5дƨħ 4LY4 f5К,樥ŧH 4h h5L4樤ܱ.* O %30  5S}Ԅ +(fԤԈ`ř嚰Ԥ`ڥۥड़0-԰eڅڐۈ0eeL+58` OT}#`,#5  6`]5 6DE 68DHEIHI V0$ 6Sл B V,#U} 6` $#LllBHI V0HH V0Ԩh``a$%Ȏ$$xө$Ѝ$ ` `@V}X a)6 Ӆʢ ʎD  _ɠ %` ɩHH `өL: gW}% D:AUTORUN.BASөjJHH`ՠԢӱԙ!ӹ!`֝DEIHB V0YڝDa۝EX}օܥׅݥܝHݝI V0+Ӡڑڑ0`l `  䅠 _ɠԐY}e拢 &L &Lħ © ¥4 䥝ň剰' k ɀ8@4= LY ĩ`OJ ]JZ}?L˜ KԪȱLRHHצ R, hhLRHHHHHH /0ȑȑޠhhhh[}hh`HHHHHHHHHH $H bɐhȥLHhhhhLň剰)\}i桰` )``L(兢ħ #$ x Hҩ h$襚ҥ ]}` UV #T` ` `,H ¥ȍ` JKhLŢ  #)I L ¤Ȣ`L¦ ¦ L^} ½J*K+ $LąLĩ …L~ …`H Ġh é`,H hH Ġ  ĭ 8}}_} L n [h`LkL © 8倝偝 Ġ  ĥ󥃅  Lĩ `}LHé éLH#h ĩ`H hKJ L+ , H hHHħ s hKhJ  Lĩ# qLa} ĩ ŘL ũ& QŽLM " ĽNL  ĥԝL՝M  ĥԝN%LV  ¤ħ` Ťħ` ƪ b}Ċ Ťħ` ¢`届 x݅ L ĽCӠɀ L]Ɉ L] Ln LŠc}IHEDBL$HH hh +L `ħ LĢl ¦`YDAER ԅՅ֦d}󅗄`L+ ¢p 0 Hp hɈL` ,#,$,!Lé ,H ĥDEԝH՝Ih e}L©L $`L© , k ĩԅ  + ĥ 夨ħ`2ƪƪ ! A!Ƚa!Ƚ!Ƚ!Ƚ!f}!``氤hhL1@$ƪư 0 0 n$P`L+FҐ֥װ綾إٰو LǠg}Ffؐ ee&ee* &eeeԪeըee$.ƪ@!Ƚ`!Ƚ!Ƚ!Ƚ!Ƚ!`h}!!!!`!@!^!` Ȅ 8 n奱 ٥Lǥ֤צưĘ=ŗ78֪א&i} eԥe$`L: L ԅՅօׄ 1פ& ٤ţĢԅeՅe8包卅j} ]& 8Ԩժ%אְ`ֆL夨ħ` FҰg8&0ei֥i0Tׅiإi0BJe؅eمk}0&ffff&0 &0 eeL+օפإ颎 %8包ԥ卅 L ɥl} ȱъŠe拰8``,ªȱȱI ѝ3ȥLɥHHO]m}  ȥe暰Х ȥL+ʅȱhh`Lħ OԪȱԨ``L :n}0 `L(奷 bɥ󥋅ȱȱȱȄ#鈄0B8eeŶo}ɛ,@LBˤ,ɛ`L?± ˤ樱f Oƨ x݅ + ~ [ˠ O樥0# +  L˥p}`LL :ɛ,$PH h $P润䧰 ʐLʦ䧐 +` ʐL3Lq}BˢԝD՝E֝HםI L 兢L]& 兢L% ,L6 ,L6 &L6 (L6妪@!I@!` ؐb`P KW ؐRBr} ؐ=;G ؐ4@ ;+ƪƪ@!=A! (ƪƪ@!A! ƪ@! ,@@檦@!`!!!!!!`ƪ@! ǩs}jҤ /L.٤ƪƪ@!@!, 舽`!`!!ـ!!٠!!!!!`@!jI*` . ֪ (t}ϰ`(8` ֤ׅԄ +҅L: Lyƪ8吪周Ly sũ + ŐL Ly sŠԄ h u}L} L}٩    e쪽pLyL( + ڥHJJJJ h) 0:i`  ک; n +ȱ)ȥ%v}ݓ Lh ԍՅԄׅ֩өL:ƪ?Ԣ )ɠ )  -L &Lڦ@!)@!` n)8@w} -L:` / n)8@I= n)8@/ѩ֔$ሄ ,L: + n 0Lx}8 n 0L8 n H1L8 n /L8 n /L8 n D/L8 n 1L8LLإL( &)ԥ)8@JjHy}@MC)JJJe)e .F / .P . &F . #/ &L.L(HHHHHH /hhhhhh z}& Y/hԅL:,` L _ܘ%ᨥ%Ly _ܘᨥLy _ܘEᨥELyٚ<|'g 0L`{}!!!!i ` &LإL٥LyɥLzvmZ ƨ!0 4 䦵 ¥ԝD՝E֝He|}םI Lܤį eį L` x݅ƨLLLܤ ©`#ۢ Lĩ_,}}ߤ ڄ . eڅԥeۅհ"8څ֥ۅא8ܥݰL۠Q%0ԅإՅ٥ަ0%Q~}% L-ե0LޥڤLyمօנ6&֐ eו`L( Hħ hբՅ `ޥԢ `ޥՅ}&&֐eܥeېڈ 7 \ 7 j N \ N j$0!ee80å/8ܥ۰uڕ}0eUiV`TUV`8UV`eTi`8TȢ` $L„')Q ȱ8} e新`8`L齀).Q Ӱȱ8e新 O :L䅫# *$Ŭ} Ʃ HL"䥫ș L` Ml/#樱0ZS'`ȱȱȱȱȱȱȄ`ȱօȘuԩׅu՘e֨҄}`樱I 屝Ҡȱȱȱȱȱ` n$҅J?eԨe` L 兙 兛 n %3 Ԥ` }, , , L檤 ٙ!ؙ!י!֙!ՙ`!ԙ@!ә !ҙ!` 䤪ƪ!ٹ!ع!׹!ֹ`!չ@!Թ !ӹ!`ƪ!}!乡!㹁!a!A!Lp ґȥӑȥԑȥՑȥ֑ȥבȥؑȥّ` ***j)e)e`ʭȅi}ȅiȅȩȩ Lfإ  4  \ +] ¥򄟄}   넨ɛ$0L祔 Z f0#ڠ쩀 ߩ6ei$0 녖چ + !5}ɛȑ @膔7 ɛ 襔!ɛL! _ɩ8$IȢ %e} &!$P* &8孨客 "&$ 1L~ L~ &L _ɰe拢 &L~ +0 %30Ԅ} 襡L 9:枢0 O L :H9Hhh tLHH`}hhLCL馩`ʆLC枢0ְşLC`A枢Ɣ!L!L}!T 򈩛LQLD ijq ߰,iŰD VD8` 覲`8` 넬 S( +饰}0 S0:$$ p8`$p (ȩ@҅ҥ򄬤 ߰ A L8򨢄 %Ӥ򈦬ʽ ʽ %} +HH 屝EҨhh$P0Ƭ 襯I `_A[`8`80 &Ո}ԅ` 넬$ +  + h갳 h) + , 褔ԙ!` "8` 襔 ɛ "ȱ"}嫤!`! `) ɛ%)a{)_0:A[_դ`RE͕DATINPUԑCOLOҝLISԖENTEҚLEԛI}FOҗNEXԑGOTϑGO TϑGOSU½TRAАBYŐCONԞCO͟CLOSŐCLҐDEǞDI͐ENĐNEנOPEΖLOAĖSAVŢSTATUӣNOTPOINԡXIϤOΒPOKťPRINԐRA}REAĨRESTORŐRETURΩRUΐSTOАPOХGEԫPUԑGRAPHICӒPLOԒPOSITIOΐDOӒDRAWTϓSETCOLOҬLOCATŔSOUNĦLPRINԐCSAVŐCLOAĚERR}OR- DPOKœMOVœ-MOVŪ*ƐREPEAԑUNTȊWHILŐWENĐELSŐENDIBPUBGEԒFILLTϐDϐLOOШEXIDIҖLOC˖UNLOC˖RENAMŖDELETőPAUS}ŖTIME$PROøEXEÐENDPROÑFCOLOҪ*̕-RENU͒DEDUMЪTRACTEXԖBLOAĖBRUθGO*’PAINԟCLӔDSOUNCIRCLū%PUԘ%GEԚ}GOTGOSUTSTETHEΣ<<>ުNOOANĨ<<>STRCHRUSASVALEADATCOPEESIRNFREXLOCLOSQSGA}BINPADDLSTICPTRISTRIDPEE˦INSTINKEYEXOHEXDEDIFRATIMETIMMOEXERNRANTRUN%%%%GOUINSTERER+,}%5&6(+8,<Xk`fghilm^deDѳHc?,Ќ,е,Y_Ҳ+7,/}01 2!3"4Ɛ"-"."-؂ٿ֐ː}ĐאŐbj+9,+;,ʐͭ}ͭ@ABC\=>[<+:е<,&%rvnnxc<}\-78s_XV+@D&0d*"'2GJh }NRl~&2 +饰(+VWZ ]a8`L`  ¤ħ.H h L5 䄡 } 䅭 bɠ04Ů .ŭ%) e拰 ĩ L+Ư0 Le}`毤Hɛ) h`  L ȱ R @ʆ ȱȄ Iğ` :62T F} :7 8 Lbԩ- L 8 8,I ɨ 8L.UH `ƨh $ %3   + \L L 8󅯩}" ¥ 8" ©" Ư" L8q :Z#]abj(=) W같  L樤ħ`hh`H Yh}Z L<>EO ƹƹ0`H f5h`I&` =? FQA` L񄳱ȱI }䦐Ħ ąŅ T k /䧰 k ,Ǡ ĩJH ThĥȑĥȑĦʊȑ`HHą}ŅH h hhhh ȱIELZ L`ȱI Hȱȱȱȱȱ } , h @ $L+L.*ȱȱȱȱȱjEE `EjI `e`ħ ¥}0 ` Lk 䦪`! 䧰L A@L `I&`L ©؅ L}.0`STOPPED륺 bɠhhL :ʅ` k %3Hƹ h5h`hbjH h} #ԤLQ #LLei  `LԑȥՑȥ֑ȥבȥؑȥّ``䈥}剰#)iiLɠL4űI&`048ץğ=ȱȄ }`L  L0e拠0ȱȄL  䦪`!' >?L (<ж`!  $Л +`,LőŐ78Ƒ8 Ƒ`8` - PѠ}`,,L L PQ 8,L ȱI ѝߠȱ`}ԩ,L E  $EL+L],,,؍ 0âLɀL ©7 F󦹩 RbL g }0g `Ո V fL{Ն + +􅕄L AT LINE?BLOAMEVALU>#VAR$LE?DAT>3276INPUDISTACOVERFLO?L}IN?FOTOO LON?DE?GOSUGARBAG?CHMEͣ?LOA?NES?WHIL?REPEA?D?EXIXPRO?EXE?PRO?IS OPE?DEWR ONLCMNOT OPEΣRD ONL}EOTRUNTIMEOUNA!FRAMCURSO!OVERRUCHKSUDONMODNOT IMPRA͠D?>#FILEDSK FULFATAL I/FILENAMPOINLOCKEDCM}>DI?FILPOIN?APPNBAD SECTORӥHՄ +h & .hԩ + ,҅L: ƪn (@Մ$ 0`} 0` 0LoH - . /h &@Յ՘JJJJ X) 0:i`AVC2 sŠ 5  <)  }< L L + e +e`e`&&&&&&eee` }&&eee&*`` 兙 䦪!0 4 ۄܱ **m ݤܱEۅڦڱ=} ܥeƥiեLN@ ` **)]` 00`` ( ((((((((}8`W)ߥ & &e &߽řِ׼JJJJ&eXޥeYߥ䥛 9 FfЎᰈ} `  M 8*` 兙 󥐅i祣L{ &}L  0 & L ȑ & L; # )ȱ L } )ȱ) )ȱ 8ƣŐő0eސ`ƙ8ް`)ȱJJJ}```=`]``` E߭H Ġ} hL±&Lv`[  ȱ R}]  L L  䅠 bɰhhğȱȄ L l"0e拱LjLx}ȱȄ L l"0e拱LjLx3=ONBASIC=OFFXEC.BAS" rogram tedy postupn% zjist) nejkrat&) mo(n[ p@)stupy ke v&em prvk+m a ulo() je do pole B23, L 䙣ލȎ!"` !"H h`lDD  }SAB.NUROTUA:D"NUR䙣ލȎ!"` !"H h`lDD  JK+&;DIR1DIR2DIR3AJMDR1DR2DR3KEYDEZNADRIWJPDDPEEKDH$} $}@ +N;@,;@,;@,;@d$@$},;@,n@@K:AR@ (}##(############################(# $} #(##(# Basic & Turbobasic #2##(# loader & runner #<##(# #$}F # (c) 1995.2 Jan Walla #P # #Z##(##########################dn--------------$}-xuvodni volba 6.D1:*.BAS 6.D1:*.LB5F:A,'6.D1:*.TBA56.D1:*.LT-@$}@(;-@@#;( Drive for UN or NTER)@6-&@H--+!* @$},)"@A@!!"@)"AA!!"@i)"AA  A67@<@$},.=:,67@<@,.=:, A`---------------"directory,6 6.6- A0$}@ 6.6-@J A`T, @@,6-^ Ah#6-@ #-@$}r-@ |]-@@$)@26-%@>67,.>:,B P6-%@])@]$}6-$@%$A87%@<%@,0 F6-&@I'S A@] A`X-@%@X() 7$}%@<%@,.7%@<%@,  >-@@#>(# for next or use  $} A"@xA0 6-&@=-@@#=(" ew disc "6@$}A>-@@#>(# ew disc or Use I-@$%@$%-@#E(>:&@$$}%@H%A(,I  A"@x%"@2A-----------&filename0:0$}@@06.7@<@,D=%6-+%$@,$@%@16-@=6-N16-@:7%<%,,$}#6-%@16-%@XK"@2)"@ A67@<&@,.7<%&@,K Ab Ag6-@$}l#6-@:7%<%,,#6-%@v!!"@2*"@ A`{d"@2)"@&67<,..Z67%@$}<%&@,.7%@<%&@,d A` A "A"@A)@$}"@2A0/"@x)"A%6-@x/ A0)6-&@H) )!A' Ap$}$-%@@ /-@%@/(  $ A ( }Now loading $},-@@,(LOAD >:@4,.-@@.(POKE 842,12:GR.0:RUN*-@@'AB$}@*& A (}Now entering -@@(NEW--@@-(ENTER >:@4,.$}-@@.(POKE 842,12:GR.0:RUN*-@@'AB@*&G +AR@%(}G6-$}F:A`,%F:Aa,$AVT6-P:'AV,$6-&$AV8%@@eF%@T%@ BU5$}$ D:AUTORUN.BAST6-P:'AV,$6-&$AV8%@@eF%@T%@ BU5$ SIO a data na disket% Mysl)m, (e zat)m m*lo program*tor+ p@i tvorb% sv`ch datov`ch b*z), kartot[k a p@i edi,}tov*n) textu pracuje p@)mo se sektory. Navykli jsme si z*znamyrecords$ odes)lat do soubor+ pomoc) PRINT #n a ')st s INPUT #n,}. Soubory ukl*d*me jako celek na disketu pomoc) SAVE zp%t s LOAD Dn:...$, nebo ve strojov[m kdu pou(it)m CIOMAIN a rutin z,} tabulky HATABS. P@)m* I/O manipulace se sektory na disket% pomoc) SIO Serial I/O$ a jej) DCB Data Control Block na adr,}es*ch 0300..030B$ je jednodu&&) a l[pe vyu()v* opera'n) pam%t i stopy traces$ na disket%. Pod)vejme se na kr*tkou uk*z,}ku SIODIR.TBA. Strojov* rutina na'ten* do 6.str*nky @.2..18$ najde a zpracuje VTOC sektory '. 361..368, 0169..0170$. Sek,}tor se jako celek ulo() do @et%zce Z p@)kazem na @.32. Parametr 5240 ur'uje, (e se jedn* o nata(en) sektoru do opera'n) pam,}%ti, 'ten). Pak se ]daje o jednotliv`ch souborech vyp)&) na obrazovku. Z v`pisu vid)me kolik a kter[ sektory jsou na disket% ,}obsazeny, a kter[ jsou voln[ pro na&e p@)padn[ pou(it). Na @.76 a d. je uk*z*no, jak vytvo@it/editovat sektor, ulo(it ho,} na disketu, a pak - podle pot@eby - ho z n) zase p@e')st. Samoz@ejm% (e ve skute'nosti bude Z/sektor p@edstavovat n*& z*zna,}m/record, a (e v n%m budou p@esn% stanoveny za'*tky a d[lky jednotliv`ch polo(ek/pol). Zvol)me si ')slo sektoru a tam z*znam,} ode&leme @.84$. Vid)me, (e pro z*pis sektoru m%n)me ve funkci USR 1.parametr za 5780, t.j. Write. A datab*ze ze dvou z*zn,}am+/sektor+$ je hotova, ulo(ena na periferii. P@e'teme ji a d*le zpracov*v*me ji( zn*m`m p@)kazem viz @*dek 94$. Je samoz@ej,}m[, (e vlastn) datab*zi si budete tvo@it podle sv`ch pot@eb; TurboBasic k tomu sk`t* dost mo(nost). Jist% jste si v&imli,} vysok[ho ')sla sektoru pro n*& p@)klad. Na ka(d[ disket%, form*tovan[ s FM# pou()v* opera'n) syst[m celkem 1024 sektor+ 3 ,}t.zv. Boot-sektory, 10 sektor+ pro tabulku VTOC a mapy diskety$; n*m DOS dovoluje obsadit 1009 sektor+. P@esto v&ak je disk,}eta form*tov*na na 1040 sektor+. T%ch posledn)ch 15 sektor+ lze bez obav pou()t na ka(d[ disket%, i na t%ch, na kter`ch je do,}d*v*n magaz)n Flop. M+(ete si to zkusit. Budeme-li s FM#-form*tovanou disketou zach*zet jako bychom m%li pro soubory jen ,}707 sektor+ "single"$, pak na disketu dostaneme u( 333 sektor+ s na&) datab*z). A kone'n%, vy'len)me-li celou disketu pro sv,}* data, ob% strany jenom sform*tujeme s FM# a budeme m)t 2080 sektor+, tedy 266 kB k dispozici. Ukl*dat sektory m+(eme i ,}do RamDisku RD$. Zrychl) se t)m jejich p@esun sem-tam asi 10-tin*sobn%. Tuto 'asovou v`hodu zase ztrat)me, kdy( budeme p@e,}souvat svou datab*zi z RD na disketu jen p@es opera'n) pam%, p@)mo to nejde$. RamDisk nejl[pe u t.zv. roz&)@en) pam%ti o 2,}56 kB$ mus) b`t definov*n bu jako D2:, nebo D3: 'i D4: DCB obsluhuje 4 @adi'e$. Pou()v*me-li Q-MEG, pak tento opera'n) syst,}[m automaticky definuje RamDisk A nejen jako D8:, ale i D3:, a RD B jako D4:. Do DCB a.0301$ mus)me tedy vlo(it ')slo @,}adi'e: POKE 1543,3 pro RD A$, nebo POKE 1543,4 RD B$, a u( putuj) na&e sektory z opera'n) pam%ti na p@)slu&n` RD nebo naopa,}k. Ale pozor: DOSem jsou p@i zapnut) p@)stroje p@esunuty 3 boot-sektory do RD A, kter[ my nesm)me obsazovat. M*me tedy k ,}dispozici v RD A 1040-3 sektory; v RD B boot-sektory nejsou, ale zato je tento RD men&): m* 467 sec 1..467$. Deklarovan,}* rychlost s[riov`ch operac) se sektory je 19,2 kBaud+ pro disketovou jednotku A 1050$. V praxi ale p@esuneme 100 sec * 128 ,}B z opera'n) pam%ti do RD jen za m[n% ne( 1 s; a stejn% tak i naopak. P@esun stovky sektor+ z opera'n) pam%ti na D1: bude t,}rvat asi 11,5 sekundy, co( i tak je rychlost dostate'n*. V&e co bylo uvedeno pro s[riovou manipulaci s mal`mi 128 B$ ,}sektory plat) v principu i pro SIO a sektory 256-ti bajtov[ disketov[ jednotky XF 551 nebo ATTACK 360$. Do DCB mus)me zapsa,}t po'et bajt+ p@en*&en`ch na jeden z*b%r DPOKE 0308,0100$. Na disket% form*tovan[ s dvojitou hustotou kup@. BIBODOSem$ m,}*me max. 1440 sektor+, co( p@edstavuje 368,64 kB, 'ili ji( ]tlou kn)(ku. Na jednu stranu diskety form*tovan[ s FD# lze u,}lo(it ne 707 sektor+, jak n*m ukazuje v`pis direktor*@e /-A$, ale dokonce 720 sektor+.Vladim)r Li&ka a Emil Sl*nsk`, Par,}dubicee 707 sektor+, jak n*m ukazuje v`pis direktor*@e /-A$, ale dokonce 720 sektor+.Vladim)r Li&ka a Emil Sl*nsk`, Par,ZFAOSEVEAMWRKEA6A@5A)Aa@ )<0} A` A A(EESektorovy vypis Directory, XI.'93, V.Liska, E.Slansky Pardubice$$1041},169,49,141,0,3,169,1,141,1%%3,104,141,2,3,104,133,208,141,3##3,104,141,5,3,104,141,4,3,169""0,141,7,3,141,9,3,161}9,15,141 $$6,3,169,128,141,8,3,104,141,11 %%3,104,141,10,3,169,4,133,207,32''89,228,16,11,198,207,48,7,166,2081}142,3,3,16,240,172,3,3,96%-A6A"!% ;A(,;@),,67A(,.  6-Aa,61}-*`*( SOUBORY na DISKU ''( Soubor Pocet sek. Od sek.+(( ___________________________1}_____+(< -!6-?:A6< BV#)ETF Editace sektoru/Z$(1..128)H467@,.*%67A(,.*467@,.JP-A9A@1 }167@`<@c,.=:,P67@d<@p,..sektorL!!6-?:A6< B$$, a m+(e5}me s programem pracovat. Budeme-li cht)t ')st disketu, kter* m* dvoun*sobn% velik[ sektory form*t D nebo Q$, pak nastanou po5}t)(e p@i 'ten) knihovny, ne( se disketov* jednotka p@eorientuje na tento form*t. Je proto lep&) p@ekop)rovat soubor DDR.COM n5}a takto form*tovanou disketu kup@.s TurboDosem XE$. Soubor DDR.COM m* startovac) adresu 5555, kon') na 6ABE a vyu()v* je&t5}% opera'n) pam% 7000..7FFF. Po uvodn)m obr*zku si vol)me ')slo drivu 1,2,8$ s p@edvolbou 1 sta') stisk kl*vesy $. Ramdisk je samoz@ejm% voliteln` ')slem 8. D*le si vybereme hustotu sektor+ na disket%, S nebo D p@edvolba S$. 5}A te se n*m vypisuje knihovna po 8-16 souborech v'etn% zru&en`ch soubor+$. V&echna ')sla jsou v cel[m programu v hexadecim*5}ln)m tvaru. Stiskneme libovoln[ tla')tko a vyp)&e se dal&) porce soubor+. Po skon'en[m v`pisu direktor*@e se dost*v*me k volb5}% tisku cel[ knihovny, a to s mo(nost) tisku vlevo-vpravo na pap)r. Program pracuje s tisk*rnou EPSON kondensovan`m typem p)5}sma$. V p@)pad% jin[ho typu tisk*rny by bylo nutn[ program upravit. Kdy( u( nepot@ebujeme tisknout direktor*@, p@ech*z) 5}program - po stisku libovoln[ kl*vesy - do sv[ druh[ '*sti a automaticky zobraz) 4.sektor 004$ diskety. M*-li sektor hustotu5} S, pak v hlavi'ce tabulky je uvedena jeho u(itn* d[lka, 7D, t.j. 125 bajt+. Posledn) t@i bajty ka(d[ho takov[ho sektoru - j5}ak jist% v&ichni program*to@i v%d) - vypov)daj) o po@adov[m ')sle souboru, o adrese n*sleduj)c)ho sektoru a o napln%n) tohoto5} sektoru. Pracujeme-li s hustotou D, tak do oken na obrazovce se vyp)&e jen polovi'ka sektoru, druhou p+lku tam dostanem5}e stiskem kl*vesy mezern)k . A m+(eme si p@e')st te ji( 4 posledn) bajty, kter[ ur'uj) sektorov` kontext. V hlavi'ce je 5}uvedena d[lka sektoru, t.j. 252 bajt+ FC$ a podle toho s kterou p+lkou sektoru pracujeme je inversn% zobrazena prvn) F$ ne5}bo druh* cifra C$. V lev[m okn% jsou skute'n* kdov* ')sla, v prav[m okn% jejich znaky. Pozn*mka: Kod 9B je pro jedno5}duchost zobrazen znakem p@)slu&ej)c)m kdu 1B.$ N*pov%du HELP$ si zobraz)me v okn%, kter[ vyvol*me stiskem a tak5 }t[( takto zru&)me. Dal&) sektor Sec  1$ si zvol)me tla')tkem <> bez CTRL, a u hustoty S lze pou()t t[( . Zp%t o 5!}jeden sektor se dostaneme po stisku <->. V`pis znak+ v prav[m okn%, odpov)daj)c) kd+m v lev[m okn% je automaticky prove5"}den v soustav% ASCII. Chceme-li tam m)t znaky p@)slu&ej)c) intern)mu kdu ATARI, pak stiskneme kombinaci kl*ves a , v zahlav) se zm%n) A v I. Navr*tit znaky ASCII do prav[ho okna m+(eme po stla'en) kl*vesy . Skokem se m+(eme 5$}dostat na libovoln` sektor, kdy( vyuk*me jeho ')slo - jako 3 znaky hexadecim*ln) cifry$ - a stiskneme . Pokud zvol)me5%} neexistuj)c) soubor nic se nestane, jenom se nezm%n) obsah obrazovky v oknech. Nedoporu'uji p@i pr*ci s D-sektory vola5&}t BOOT-sektory '.001 a( 003! U form*tu Single m*me max.720 sektor+ t.j.2D0$, u form*tu Enhanced je 1040 410$, u form5'}*tu Double je 720 dvojit`ch sektoru a kone'n% u Quad m*me 1440 5A0$ D-sektor+ k dispozici samoz@ejm% z tohoto po'tu mus)me5(} ode')st BOOT sektory, sektor s mapou diskety a VTOC sektory 169..170$. Chceme-li ukon'it pr*ci s danou disketou stisk5)}neme a <2> a vrac)me se na za'*tek programu. Odej)t od cel[ho programu je mo(n[ zvol)mw-li p@i v`b%ru driveru mo(nost 5*}0, nebo samoz@ejm% vypnut)m po')ta'e. Krom% uveden[ inspekce diskety lze je&t%: - cel` sektor vytisknout EPSON, 96 z5+}nak+ na @*dek$ kombinac) a <> - lev[ okno disassamblovat s a <>.Dop@edn` pohyb ukazuj)c) &ipky ovl*d*me kl*veso5,}u <> resp. a zp%tn% kl*vesou <-> - proj)(d%t lev[ i prav[ okno kurzorem ovl*dan`m &ipkami spolu s tla')tkem . P5-}ouh`m p@eklepnut)m p@)slu&n`mi kl*vesami lze m%nit kdy ev. znaky. Z hlavi'ky se dostaneme do lev[ho okna stiskem , dal5.}&)m stiskem p@ejdeme do prav[ho okna a kone'n% t@et)m stiskem se vr*t)me do hlavi'ky. P@ed t)mto posledn)m krokem m*me 5/}mo(nost trvale zaznamenat zm%ny do sektoru na disku. A nyn) m+(eme zadat dal&) p@)kaz. Zejm[na posledn) mo(nost - edita50}ci sektor+ - lze v`hodn% vyu()t k modifikaci nebo oprav% soubor+-dat p@)mo na disket*ch. Mus)me ov&em postupovat opatrn%, aby51}chom si soubory nezni'ili. Zaj)mav[ v`sledky dostaneme, kdy( budeme inspic)rovat sv+j RamDisk pokud ho v+bec m*me$, ale52} to u( si zjist)te sami.Vladim)r Li&ka, Pardubice---------------------------------Pozn*mka redakce: Tento program 53}pova(ujeme za velice zda@il` a jsme r*di, (e jej m+(eme uve@ejnit. Mus)me ale upozornit! Program netestuje STATUS I/O oper54}ace, tak(e pokud nem+(e splnit, co se od n%j (*d* nap@. z*pis neexistuj)c)ho sektoru, disketa chr*n%na proti z*pisu 'i cokol55}iv jin[ho$, v+bec to nezjist) a tv*@) se jako by to provedl.s neexistuj)c)ho sektoru, disketa chr*n%na proti z*pisu 'i cokol4=UUPVR2:b BƢ&c B c̩ˢ ˩] ɛi )`˩c̢ ˩] ɛ97}i SD٩ة٩ OxN x.}ڢ۠ܠxݩ(ީ `EY@Zڢe۠6ܠݩީ( ` ڢx۠6ܠ `LW) `ҠӄբԢ! ȱ9?}!)eρ֩(e҅ҐcLW eԅԐLYנTU U TT]i L[1 U9@} ]ĩUT TЯAZ<[TULY Ԡբ `LY Ԡբ `LY0:AG LYLZ9A}ש! LιU ^_фҢUȱi ȘHi)eɛ) h W LYTU #aU%9B}[ ɛ}L\ =[8\BԠբ֦U `L[Ԡբ֦U `L[;TTL[L[ #aUL[%9C}UT TL[T%UL[Ѣ҆צUӦцU #aJJJJ  0i6ϥ)  0i6Ц҆U Ѣ$гU9D} UӐL[LWTU ޠd B9\4]Ʃ@ Af˅IˠTU ^ȱ^|Ti ȱ^i)eϢ9E}˦UʠTUe B A _TU%e BLWxԢL\ԄTՆU թ ԩԄT9F}ՆU ]i ϩ ]i)eϢf5]0^ɀ  i͐Π͙x aL%^  a ax ax9G}L%^ X a a:i a:i)eυɀ -x8υϥJJJJ 0x) 0:ixL%^ " a ax ax ax a9H}x L%^ a ax ax ax ax L%^TU 1^,_򢁠x B +L\ L\\2-ԄTՆU զL\9I}ԠԐL\L\ԄTՆU TU %e BƩLW0 B V0BJ؝DdEIH V`JJJJ ^`) ^`  09J}i6`HJJJJ ^h)  0i6Lp̢˨` ^Mx -_(`^Nxȱ ^Dx ^Exȱ ^Bx ^CxL__ BxCxȱ ^Jx9K} ^Kxȱ ^Hx ^Ixȱ˙/x ˙0x4x!1x1xG 0x01x B :A1x`1R@̍؍9L}ٍ    Y`P؍ٍ  Y`͠΢`p̠ˢ)`$aբ֤ՌԎ WȄ ^ Ռ֎9M} WȄɛ e˅թL3``  W 0  ^`ҢӠI҈` ڑ܈eޅڐۥe9N}߅ܐ`UʆӤTՄTֆU UӐ`@`ɀi 8@`]%a b! a` 0ReJJJJ 0:iSe9O}) 0:iTe ^0 BJDeE HI V`OiͩeΠ͙x` UTU ]i ` #` V Y9P} P I S K N I H O V N Y # NAME EXT S. Od a. St. _________!bc________________________}9Q} | | | P R O G R A M | | 9R} | | na inspekci a editaci sektoru S/D | | V. Liska, Pardubice cd || 9S} | | (Klavesa) | }Cislo drivu (1/2/8/0): 1Hustota9T} (S/D): S}  | | |de 9U} Sec.: 004 Lgth: C} Vytisknout na tiskarne (A/-): N9V} Tisk vlevo (L) nebo vpravo (P): LP3:L8Zmeny nejsou zachyceny;do Buf: A/-?Zapsat upraveny sekeftor na disk A/- 9W} Sektor: ... A .. #.. ..,X ..,Y (..,X) (..),Y *+.. .... ....,X ....,9X}Y (....)QRRRRRRRRRRRRRRRRRRRRRRE|3ppulkasektoru|| 3ektor || 3ektor |f g||!3#)) )n9Y}tkod||4ab ,/kno 0/k (||<$isassambler||>4isksektoru%03||#trl +onec||%sc.avratz(%,0u9Z}|ZRRRRRRRRRRRRRRRRRRRRRRCBRKORA?????????ORAASL???PHPORAASL?????? ORA ASL??? BPLORA????????? ghORAASL??9[}?CLC ORA????????? ORA ASL??? JSRAND??????BITANDROL???PLPANDROL??? BIT AND ROL??? BMIAND?????????ANDROL9\}???SEC AND????????? AND ROL???RTIEOR?????????EORLSR???PHAEORLSR??? JMP EOR LSR??? BVCEOR?????? hi???9]}EORLSR???CLI EOR????????? EOR LSR???RTSADC?????????ADCROR???PLAADCROR??? JMP ADC ROR??? BVSADC???????9^}??ADCROR???SEI ADC????????? ADC ROR??????STA??????STYSTASTX???DEY???TXA??? STY STA STX??? BCCSTA???i9_}j???STYSTASTX???TYA STATXS??? STY STA STX???LDYLDALDX???LDYLDALDX???TAYLDATAX??? LDY LDA LDX??? BCSLDA9`}??????LDYLDALDX???CLV LDATSX??? LDY LDA LDX???CPYCMP??????CPYCMPDEC???INYCMPDEX??? CPY CMP DEC??? BNE9a}CMPjj?????????CMPDEC???CLD CMP????????? CMP DEC???CPXSBC??????CPXSBCINC???INXSBCNOP??? CPX SBC INC?9b}?? BEQSBC?????????SBCINC???SED SBC????????? SBC INC???UU??????CPXSBCINC???INXSBCNOP??? CPX SBC INC?8H Popis @e&en) hlavolamu z ')sla 31 Tentokr*t jsem to asi s obt)(nost) hlavolamu p@ehnal. Nakonec i m% se jej poda@iloAd} rozlousknout jen d)ky tomu, (e prost% nechci nech*vat nevy@e&en[ probl[my a po@*d jsem zkou&el a p@em`&lel, a( se mi to podaAe}@ilo. Pop)&u V*m ]vahu, kterou jsem nakonec dosp%l ke spr*vn[mu algoritmu. Pokud bych cht%l zkoumat v&echny cesty, v`sAf}ledku se nikdy nedoberu, proto(e je jich nekone'n% mnoho. M+(u ale sledovat v&echna ')sla v matici a zkoumat nejkrat&) mo(nouAq}) 5b*;?TbB&BРBB BB-----------B*TBASIC COMBBASIC BATBBASIC COMBAUTORUN BASB-----------B#SIO CAPBSIODIR TBAB* DDR CAPB-6DDR COMB-----------BcHLAV31 CAPBHLAV31 DATBHLAV31 LT B-----------B'SIRVYS CAPBSIRVYS TBABSIRVYS OBJB-----------B!METAM4V3CAPB+METAM4V3TBAB-----------B+LIFE CAPB<LIFE COMB-----------B@OMLUVA CAPB<UTVBINGO2TBABTVBINGO DATB-----------BBASICPRGCAPBLOVEC TBABkcHELPSAT TBAB KLAVES TBABZAPALKY TBAB----------- cestu k n%mu. Je nutn[ sm%ry n%jak ozna'it a proto(e s ')sly se pracuje nejsn*ze, rozhodl jsem se je o')slovat. Tak sm%r nahAr}oru jsem ozna'il jako 1, vpravo nahoru jako 2 atd. a( sm%r vlevo nahoru jako 8. Pokud jsem n%kam dosp%l tak, (e jsem &el nejdAs}@)ve nahoru a potom doprava, ozna'il jsem tuto cestu jako "13". Toto ozna'en) m% ale omezuje pouze na 10 ')slic, nebo potom At}doch*z) k zaokrouhlov*n). Jak se pozd%ji uk*zalo, nejdel&) cesty a zrovna ty spr*vn[$ m%ly 9 skok+, tak(e to nakonec sta'iloAu} a nemusel jsem se uchylovat ke komplikovan%j&)mu pou()v*n) @et%zc+. Mysl)m, (e dal&) popis uvedu p@)mo u ')sel @*dk+:10 - Av}130 tisk hlavi'ky a 'ek*n) na kl*vesu START140 - 250 na'ten) souboru HLAV31.DAT jako ')sel do pole A23,23$ - pokud je na'tAw}en znak "X" mimo obrazec$, je nahrazen "-12" - a vynulov*n) pole cest B23,23$260 - 370 sch[matick[ zobrazen) bludi&t% na Ax}monitoru. V pr+b%hu v`po'tu se budou te'ky reprezentuj)c) ')sla nahrazovat "d[lkou cesty".380 - 550 vlastn) v`po'et:420 vAy}ynulov*n) 'asu430 nastaven) aktu*ln)ho po'tu zkoum*n) ZZ zat)m 0$440,450 cykly definuj)c) sou@adnice proj)(d) se postupAz}n% cel* matice$460 provede se podprogram hvezda kter` zkoum* v&ech 8 mo(n`ch n*sleduj)c)ch odskok+, vysv%tlen d*le$, kdy( A{}je&t% nebyl v+bec proveden a narazilo se na v`choz) prost@edn) 'len v(dy nulov* cesta$. Inicializa'n) zkoum*n).470 narazilA|}o se na pozici, kter* m* kladnou a nenulovou cestu, tedy bude proveden podprogram hvezda a zapo')t* se do prom%nn[ ZZ. Z*pornA}}* cesta znamen*, (e podprogram byl ji( vol*n v minul[m pr+chodu a nem+(e nic zm%nit - viz d*le.480,490 konec pr+chodu maticA~}).530 b%hem pr+chodu matic) se zm%nila alespo jedna cesta, nutn` dal&) pr+chod.540,550 nic se nezm%nilo, konec.600 - 7A}90 podprogram hvezda:610 cyklus zkoumaj)c) v&ech 8 sm%r+ dal&)ho skoku.620 zji&t%n) o kolik se bude sk*kat, jak* je dosavA}adn) cesta k dan[ pozici a nastaven) pomocn`ch aktu*ln)ch sou@adnic.630 cyklus postupn% zkoumaj)c) skok po jedn[$ ur'it`m A}sm%rem.640 podprogram smer. prava sou@adnic X a Y - skok o jednotku dan`m sm%rem.650 zji&t%n), kam se sko'ilo:660 PokuA}d se sko'ilo na 0 a z*rove je&t% nebyl skok dokon'en, do&lo k chyb% a zkoum* se dal&) sm%r.680 nula je posledn)m prvkem skA}oku - ]sp%ch !!690 zvl*&tn) p@)pad. Sko'ilo se na v`choz) pozici.700 Sko'ilo se na prvek s nulovou cestou: prvn) p@)stup A}k tomuto prvku. Nastav) se na n%j cesta do prom%nn[ CES.710 sko'ilo se na prvek, kter` byl ji( "objeven" jinou cestou. ZnamA}[nko cesty viz d*le$ bylo ulo(eno do prom%nn[ ZN.720 nov* cesta je krat&), nahrad) p+vodn).730 cesta nebyla zm%n%na, je A}obnoveno p+vodn) znam[nko cesty.740 cesta se ulo() do BI,J$ a na monitor se do p@)slu&n[ pozice vyp)&e jej) d[lka.750 PoA}kud byla na @. 680 cesta vyhodnocena jako spr*vn*, je vyps*na na obrazovku.760 konec cyklu definice sm%r+.770 p+vodn) klaA}dn* cesta "zdrojov[ho" prvku prvku, kter` vyvolal podprogram hvezda$ se zm%n) na z*pornou, zafixuje se. P@i p@)padn[m dal&)mA} pr+chodu ji( tento podprogram nevyvol*.790,860 procedura upravuj)c) sou@adnice X, Y - viz @. 640870,920 vlastn) v`tisk sA}pr*vn[ cesty z @. 750 Tento program tedy postupn% zjist) nejkrat&) mo(n[ p@)stupy ke v&em prvk+m a ulo() je do pole B23,A}23$.[ cesty z @. 750 Tento program tedy postupn% zjist) nejkrat&) mo(n[ p@)stupy ke v&em prvk+m a ulo() je do pole B23,@XXXXXXXXX00000XXXXXXXXXXXXXXX00004770000XXXXXXXXXX000544833463000XXXXXXX00145111451713500XXXXX0049496755587668500XXXX037E}2983567391875850XXX001478429271182276300XX072185531131334286130XX042672524225432817730X004165111914344319827000435232232E}4253511355370027151131533242377542700252261244634121265188000437519344529419574800X041678343413123236240XX07326153923215E}7589540XX001673481212122894100XXX0254787561357872930XXXX0065646725226347400XXXXX00231233321321100XXXXXXX000744573447000XE}XXXXXXXXX00003340000XXXXXXXXXXXXXXX00000XXXXXXXXX30XXXX0065646725226347400XXXXX00231233321321100XXXXXXX000744573447000XD410 ? "}"20 ? "****************************"30 ? "* . . , . *"40 ? "* Reseni hlavolamu z c. 31 *"50 I}? "* *"60 ? "****************************"70 ? 80 POKE 752,1:? :? :? " press "I}90 ------------------------------100 REM 110 REM init + nacteni dat120 REM 130 # START:IF PEEK(53279)<>6 THEN GO# START1I}40 CLS :? "Nacitam data":DIM A$(23),A(23,23),B(23,23),B$(9),T$(1):UU=0:POKE 752,1150 OPEN #1,4,0,"D:HLAV31.DAT"160 FOR I}I=1 TO 23170 INPUT #1,A$180 FOR J=1 TO 23190 IF A$(J,J)="X"200 A(J,I)=-1:B(J,I)=0210 ELSE 220 AI}(J,I)=VAL(A$(J,J)):B(J,I)=0230 ENDIF 240 NEXT J250 NEXT I:CLOSE #1260 ------------------------------270 REM 280 RI}EM init obrazovky290 REM 300 CLS 310 FOR G=1 TO 23:FOR H=1 TO 23320 IF A(H,G)=-1 THEN T$=" "330 IF A(H,G)=0 THENI} T$=""340 IF A(H,G)>0 THEN T$="."350 POSITION H,G-1:? T$360 NEXT H:NEXT G370 POSITION 12,11:? "0"380 --------I}----------------------390 REM 400 REM vypocet410 REM 420 TIME$= "000000"430 ZZ=0440 FOR I=1 TO 23450 FOR J=1 TO 234I}60 IF I=12 AND J=12 AND ZZ=0 THEN EXEC HVEZDA470 IF B(J,I)>0 THEN EXEC HVEZDA:ZZ=ZZ+1480 NEXT J490 NEXT I500 REI}M 510 REM konec?520 REM 530 IF ZZ<>0 THEN 430540 POSITION 29,2:? "Potrebny":POSITION 28,3:? "cas:";TIME$550 GOTO 550560I} ------------------------------570 REM 580 REM podprogramy590 REM 600 PROC HVEZDA610 FOR Q=1 TO 8620 WW=A(J,I):CEI}STA=B(J,I):X=J:Y=I630 FOR QQ=1 TO WW640 EXEC SMER650 AA=A(X,Y)660 IF AA=0 AND QQ<>WW THEN POP :GO# I}NQ670 NEXT QQ680 IF AA=0 THEN USPECH=1690 IF X=12 AND Y=12 THEN GO# NQ700 CES=B(X,Y):IF CES=0 THEN CES=CEI}STA*10+Q:GOTO 740710 ZN=0:IF CES<0 THEN CES=ABS(CES):ZN=1720 IF LEN(STR$(CES))>LEN(STR$(CESTA))+1 THEN CES=CESTA*10I}+Q:ZME=1730 IF ZME=0 AND ZN=1 THEN ZN=0:CES=-CES740 ZME=0:B(X,Y)=CES:POSITION X,Y-1:? LEN(STR$(ABS(CES)))750 II}F USPECH=1 THEN USPECH=0:EXEC USPECH:B(X,Y)=-B(X,Y)760 # NQ:NEXT Q770 B(J,I)=-B(J,I)780 ENDPROC 790 ---------------I}---------------800 REM 810 PROC SMER820 IF Q=8 OR Q=1 OR Q=2 THEN Y=Y-1830 IF Q=2 OR Q=3 OR Q=4 THEN X=X+1840 IF QI}=4 OR Q=5 OR Q=6 THEN Y=Y+1850 IF Q=6 OR Q=7 OR Q=8 THEN X=X-1860 ENDPROC 870 ------------------------------880 REM 89I}0 PROC USPECH900 POSITION 26,10+UU:? "!";CES;910 UU=UU+1920 ENDPROC C 870 ------------------------------880 REM 89HLTvorba animac) - rychl* grafikaRadek t%rba, RASTER 1995.1Ka(d`, kdo n%kdy zkou&el naprogramovat n%co v Turbo$BASICU v gQ}rafick[m mdu, narazil jist% na probl[m s rychlost). Pokud chcete prov[st na obrazovce n%jakou grafickou animaci, bude to asiQ} p@)li( pomal[.Tak(e pro V*s, kte@) pot@ebujete rychle vykreslit na dan[ m)sto n%jak` grafick` objekt, je ur'en n*sleduj)c) Q}text:Dvojice strojov`ch podprogram+ soubor SIRVYS.OBJ$, kter[ jsem pro V*s vyrobil, jsou po nahr*n) um)st%ny v 6. str*nce Q}pam%ti. Volaj) se z Basicu 'i z TB$ takto:Tisknut) obrazu na obrazovku:A=USR1536,ODK,SIR,VYS,X,Y$1536 .. startovac) aQ}dresa podprogramu pro tiskODK .. m)sto v pam%ti RAM, od kter[ho m*te ulo(ena grafick* data dan[ho objektuSIR .. &)@ka grafiQ}ck[ho objektu ud*v* se v bytech$VYS .. v`&ka grafick[ho objektu ud*v* se v bodech$X .. x-ov* sou@adnice um)st%n) objektu Q}na obrazovku v bytech$Y .. y-ov* sou@adnice v bodech$Ulo(en) obsahu '*sti obrazovky do pam%ti:A=USR1539,KAM,SIR,VYS,XQ},Y$1539 .. startovac) adresa podprogramu pro vyfocen) '*sti obrazuKAM .. m)sto v pam%ti RAM, od kter[ho budou ulo(ena dataQ} grafick[ho objektu le()c)ho na dan[m m)st% obrazovkySIR .. &)@ka grafick[ho objektu ud*v* se v bytech$VYS .. v`&ka graficQ}k[ho objektu ud*v* se v bodech$X .. x-ov* sou@adnice m)sta na obrazovce v bytech$Y .. y-ov* sou@adnice v bodech$Pozn.:Q}daj "v bytech" znamen* v r+zn`ch grafick`ch mdech r+zn` po'et bod+:Gr.md: Bod+ na byte: Byt+ na 1 @*dek: 0 1 Q} 40 1 1 20 2 1 20 3 4 10 4 8 Q} 10 5 4 20 6 8 20 7 4 40 8 8 40 Q}9 2 40 10 2 40 11 2 40 12 1 40 13 Q}1 40 14 8 20 15 4 40P@.V GR.15 je 1 byte = 4 bod+m, a tedy parametr Q}X bude ud*vat po'et "'tve@ic". Skute'n* x-ov* sou@adnice = X4 . Na jeden @*dek je 40 byt+, proto parametr X m+(e b`t zad*n vQ} rozsahu 0 a( 39. Omezen) na "'tve@ice" bod+ obecn% na n-tice$ plat) obdobn% i pro &)@ku grafick[ho objektu.Pro ur'en) m)sQ}ta v pam%ti, kam je mo(n[ ulo(it nafocen[ pozice parametr KAM$, je nutn[ zjistit za'*tek a konec voln[ pam%ti. Za'*tek najdeQ}me zji&t%n)m obsahu adres 144,145 dvoubytov* hodnota; ?DPEEK144$$, konec na adres*ch 741,742 tak[ dvoubytov* hodnota$. P@iQ}tom mus)te br*t neust*le v ]vahu, (e prodlu(ov*n)m T$Basicovsk[ho programu se za'*tek voln[ pam%ti posunuje. Rovn%( DIMenzovQ}*n) pol) a @et%zc+ m* stejn` ]'inek. Na horn) mez voln[ho prostoru m* vliv pou(it` grafick` md - doporu'uji vyzkou&et aktivaQ}ci po(adovan[ho mdu, a pak zjistit DPEEK741$. Pam% mezi takto zadefinovan`m za'*tkem a koncem m+(ete pou()t pro vlastn) poQ}t@ebu.Velikost pot@ebn[ pam%ti pro n%jak` gr. objekt zjist)te vyn*soben)m jeho &)@ky a v`&ky SIZE=SIRVYS$. Pokud tedy chceQ}te zaznamenat v)ce objekt+, je v(dy nutno posunout parametr KAM o velikost p@edt)m zaznamenan[ho objektu, jinak dojde k jeho Q}p@ekryt) nov`m.Pokud m*te nafoceny z obrazovky n%jak[ objekty, m+(ete si je ulo(it na z*znamov[ m[dium a pozd%ji u( p@)mo zQ} tohoto m[dia na')st. Vyu(it)m tohoto zp+sobu odpad* nutnost vykreslovat a nafocovat na za'*tku programu grafick[ objekty, ktQ}er[ pak budou v programu pou()v*ny. Zp+sob s na'ten)m grafick`ch dat objekt+ ze z*znamov[ho m[dia je elegantn%j&) a &et@) pamQ}%, kterou by pot@eboval vlastn) T$BASIC progam na operace spojen[ s vykreslov*n)m a nafocov*n)m t%chto objekt+.P@.GR.8Q}REM Namalov*n) 3 grafick`ch objekt+...REM Nafocen):REM 1.objekt 5x30 z m)sta 0,0 ulo(it do pam%ti od adr. 30000A=USR1539Q},30000,5,30,0,0$REM 2.objekt 7x50 z m)sta 10,30 ulo(it do pam%ti od adr. 30150 velikost p@edchoz)ho objetu = 530 = 150 ; Q}30000150=30150$A=USR1539,30150,7,50,10,30$REM 3.objekt 4x16 z m)sta 20,50 ulo(it od adr. 30500 =30150750$A=USR1539,Q}30500,4,16,20,50$REM Posledn) ukl*dan` objekt kon') na adrese 30500416 = 30564. Velikost v&ech t@) objekt+ je 30564-30000Q}=564 byt+.REM Ulo(en) na z*znamov[ m[dium:OPEN#1,8,0,"D:NAZEV"BPUT#1,30000,564CLOSE#1ENDA( budete tyto objekty pot@Q}ebovat v n%jak[m programu, na jeho za'*tku data na'tete:OPEN#1,4,0,"D:NAZEV"BGET#1,30000,564CLOSE#1REM ...a pak je m+(eQ}te tisknout A=USR1536,30000,... $A=USR1536,30150,... $A=USR1536,30500,... $ENDNEZAPOME TE:Samoz@ejmost) je, (e v Q}ka(d[m programu, ve kter[m chcete tyto strojov[ podprogramy pou()vat, mus)te nejl[pe n%kde hned na za'*tku$ zajistit jejich Q}na'ten) p@)kazem BLOAD"D:SIRVYS.OBJ".Pro snaz&) pochopen) jsem napsal program v TurboBasicu, ve kter[m jsou uk*z*na n%kter*Q} mo(n* vyu(it) t%chto strojov`ch podprogram+.z&) pochopen) jsem napsal program v TurboBasicu, ve kter[m jsou uk*z*na n%kter*P.  ;TRAL SIRVYS.TBA!!Radek Sterba, RASTER 1995.1U}T(//Zavedeni strojoveho podprogramu do pameti2Z D:SIRVYS.OBJ<TF +@Phh(`Pomoci funkce CIRCLE je namalovU}an objekt, pak je vyfocen a bleskove vytisknut po cele obrazovce.Z-@db@@n xU}VYFOCENI OBJEKTU::6-?:A9<B<@<@!<<,TISK OBJEKTU-A@"U}-@0@..6-?:A6<B<@<@!<<,   )T +@nn(fNamU}alovany objekt je vyfocen, a potom je tisknut vicekrat na ruzna mista na obrazovce => iluze pohybu. @-U}@P@W,@#/@P%@7/@P&@QK/@Q&W/@ ' @U}'Y@@"ATARI::6-?:A9<B<@<@S<<,"-6@%@%,??6-?:A6U}<B<@<@S<<@%&O:,,6776-?:A6<B<@<@S<@ animace.))(@CC U}C CBC CBC ))(@CBC CBC CAC CAC ))(@ CACAC CCCAC CACCC ))(@ CBC U} BAABC CBAAB ))(@ CAC CCCCAC CACCCC ))(@ CAC CBC CBC ))(@ CBC U} C C ))(@ C -@FF6-?:A9<B%$@<@<@U}<$@<, -@6-$@%B-@@886-?:A6U}<<@<@<%@<$@, &%F:Ad,AU'% Ap0  A:)DT D:SU}IRVYS.TBA<@<%@<$@, &%F:Ad,AU'% Ap0  A:)DT D:ST L ͠ˠ͎hhhhhwhh_hhWhhϥW)cЍ XeԅͥYeՅΥi͐΢L( ((((((((iY}ː̥i͐Πˑ͈`Յ &Аeϐ`cЍ XeԅͥYeՅΥi͐΢L( ((((((((iXAMETAMO verze 4.3 RASTER Tento 'l*nek popisuje pr*ci s programem Metamo , kter` umo(uje prov*d%t plynul` p@echod mezi da}v%ma obrazy. Pr*ce s programem je velice jednoduch*. Nejprve si mus)me zvolit velikost pro v`choz) a koncov` blok zad*v*a} se pouze jedna &)@ka a v`&ka, kter* plat) pro oba bloky a tak[ pro v&echny f*ze mezi nimi$. N*sleduje ot*zka smaz*n) obrazova}ky - ta je zde implementov*na z d+vodu zachov*n) kreseb p@i op%tovn[m spou&t%n) programu. Na obrazovce se ohrani') dv% '*sti.a} Tyto jsou ur'en[ pro v`choz) a koncovou f*zi. Tyto f*ze do vyzna'en`ch '*st) namalujeme pomoc) joysticku, fire tla')tka a ka}l*ves 1,2,3 a 0 - kter[ ur'uj) aktu*ln) barvu$. Upozoruji p@edem, (e grafick` editor je na velice n)zk[ ]rovni Program m* sa}lou(it pro v`po'et metamorfzy - ne pro malov*n)$. Nab)z) se mo(nost pou()t n%jak` jin` gr. editor a grafick* data importovata} kl*vesa I$ do videopam%ti programem pou(it[ho mdu - t.j. grafick` md 7 4 barvy$. P@i kresb% v`choz)ho a koncov[ho oba}razce dbejte pros)m n*sleduj)c)ch z*sad: - pou()vejte pouze obrysy! v`po'et vypln%n`ch ploch by trval mnohem d[le a v`sledeka} by nest*l za to - jednotliv[ plochy by se p@es sebe p@ekr`valy a vznikl by jen nepou(iteln` chaos$ - ka(d* barva 1,2,3$, kta}er* je pou(ita v jednom obrazci mus) b`t obsa(ena i v obrazci druh[m. Po'et bod+ dan[ barvy nemus) b`t shodn`, ale je vhodn[,a} pokud jsou tyto po'ty alespo podobn[ Program toti( transformuje body odpov)daj)c)ch barev na sebe$. Nedodr(en) t[to podm)na}ky program detekuje a nepovol) prov[st metamorfzu. Jste-li s kreslen)m hotovi, stiskn%te kl*vesu M metamorfza$. Prograa}m se v*s zept* na po'et anima'n)ch f*z) - T)m je my&leno, kolik obr*zk+ mezi v`choz)m a koncov`m m* vygenerovat p@itom se zaa}po')t*v* v`choz) blok jako f*ze ')slo 0 a zadan* hodnota je ')slo, pod kter`m bude blok koncov`$. Tento parametr rozhoduje o a}plynulosti p@em%ny. Doporu'uji zad*vat hodnotu 7 nebo 15 skute'n` po'et v&ech f*z) je o 1 v%t&)$. Nyn) trp%livost - program a}bude prov*d%t v`po'et. Vy si zat)m zajd%te na sva'inku apod., nebo podle toho, jak slo(it[ obr*zky jste nakreslili, m+(e v`pa}o'et trvat i n%kolik 'tvrthodin resp. i p+lhodin!$. A( bude v`po'et ukon'en - program za'ne vyd*vat zvuk, kter` by V*s m%l pa}@ivolat pokud nem*te sta(enou hlasitost nebo vypnut` televizor$. Po odklepnut) V*m bude periodicky p@edv*d%t p@echod z v`choa}z)ho obrazu na koncov` a zp%t rychlost p@echodu m+(ete ovlivovat kl*vesami 0 a( 9$. Po zastaven) demonstrace libovoln* jina}* kl*vesa$ je mo(n[ si v&echny f*ze p@echodu ulo(it na m[dium. Toto m* v&ak v`znam pouze pro zku&en%j&), kte@) budou moci tata}o grafick* data pou()t nap@. ve sv`ch programech. Po nab)dce ulo(en) se program op%t zept* na po'et f*z). Pokud chceme prov[sa}t v`po'et t[(e p@em%ny - pouze s jin`m po'tem f*z), zad*me nyn) tento po'et. V`po'et, kter` bude proveden nyn) bude zna'n% kra}at&) ne( v prvn)m p@)pad% po stla'en) kl*vesy M z kresl)c)ho re(imu$, nebo se vyu()v* ji( zji&t%n`ch hodnot z p@ede&l[ho v`a}po'tu$. Pokud o to nem*te z*jem, ode&lete pr*zdn` @*dek a vr*t)te se do kresl)c)ho re(imu. Vznikne-li p@i b%hu programu ja}ak`koli probl[m, program ho ozn*m) i s jeho popisem. Form*t v`stupn)ch dat je jednoduch`: Soubor obsahuje jednotliv[ anima}a'n) pozice jednu za druhou. P@itom ka(d* f*ze je ulo(ena ve form*tu dat pro videopam%: p@. Form*t bloku 3 byte x 24 boda}+: Byte 0: 0.-t` a( 3. bod nult[ho @*dku Byte 1: 4. a( 7. bod nult[ho @*dku Byte 2: 8. a( 11. bod nult[ho @*dku Bya}te 3: 0.-t` a( 3. bod prvn)ho @*dku ... Byte 70: 4. a( 7. bod 23. @*dku Byte 71: 8. a( 11. bod 23. @*dku Ka(d* a}anima'n) pozice m* tedy v tomto p@)pad% celkem 72 byte. Po vyn*soben) skute'n`m po'tem f*z) dostaneme d[lku souboru. I kda}y( je program naps*n v TBasicu nebo snad pr*v% proto$, doba v`po'tu je ne]nosn*. Mo(n* vyrob)m dal&) verzi programu, kter* ba}ude m)t pro tyto v`po'ty strojov[ podprogramy. Algoritmus metamorfzy by se dal tak[ je&t% vylep&it, ale nev)m, zda by to m%la}o n%jak` v`znam.v`po'ty strojov[ podprogramy. Algoritmus metamorfzy by se dal tak[ je&t% vylep&it, ale nev)m, zda by to m%l`NO_SPSIVYTBAVTABTABZCAUUPBEXPMEXMIPPEXAATAXEEXDf} @f}ADwEE I! A f}( }PX -gil< 6-f6-@R6-$8, f06-@R66-f<6-v -f&g-ff}$@&g 1%"P     -f9%AA -gi* 6-f6-8, f$6f}-@R*6- -f&g-f$@&g 1%"P      -f&g%9%@&%$@@f}%6-% * ,9%AA/ AO6-A -f&g-f$@&gf} 1%"\$   .M A'%+%$$@,$hA%+%$$@,$h%gEfM,%8/"Af}%9%AA/ ABQ]6-O:&,%O:&,1  6-6-6-!"f$'''1 Ap A`f }xO 6-F:%+%$$@,$h,&""6-F:%+%$$@,$h%g,&.8,f.,A%%+',$%+',$2f } 8, f2,A%%+',$+&,%+',$+&,Q!AdAU!@wf' ('F:Ad,"AUAf } (}AdAU6-B6-g -g((6-?:Br<<<%@&<%$$,M  M@0f } F:Ad,AUA"-&gf6g,((6-?:Br<<<%@&<%$$,6M@ A M@0B F:Af }d,"AUA C5)!@G* @X+6-&@H5 A ED AAdAU@(}Ulozit pozicef} 0- ? (A)D)F#"@e AP# AM AN AH AOAdAUT1 AP(f}}Pocet pozic (0-x): 16-P:,U3  g '''' AE) AH3 AAVG+%g,$$!BI`&9(Neni pametf} pro tolik pozic!=)G A ^$r 6-f A!O  AH6-B&-g@68,-f : f} -f&gD-f$@&gN 168,-8,%gX11%@R168%@,-8%@,%gb   c''+8gf},!f,%+8@,!f,"gAd''+8h,!f,%+8@,!f,"gAe''+8i,!f,%+8@,!f,"gAf( -gi$68,f}-8,&8%@,( g AlQvAdAUw(}Chybi nektera z barev!x##(Nelze provest metamorphof}su!y) (}'' A0aAfAX A`7;@,9@,;+fa(!}ϭҠf}U(Vyrobil Radek Sterba.A@d1(F( ..akt.poziceU( ..bodm (,,, ..aktualni barva7(f} ..smazani boduU( ..smazani obrazovkym( ..import videodat*( ..restart'( ..metamorfoza*(T A f}(9($Sirka objektu v bytech (1byte=4body)K (1 az 12): T6-P:, g)!@A B A (9"Vysf}ka objektu v bodech (1 az 40): B6-P:,!! @)!@@A T( (Smazat obrazovku? (A)2AdAUf}6)B"@eT+@%@YY6.OhhhohhohhhhϩoϑomoϩeЅi(ͩe΅ooo`f}9C:,Br@y S=USR(28672,VY,SI,VID,TAB)II6.?ppppppppBpM` pB`f}A,6-BQR6-B,9C:,@d7 @9-@83%@%@7 I26.(69#(/:)f}+/.#/69I9C:,B@@!6-$@%h6-'h!6-i6-B6-B0> AEf} AH 6-R:f, 3"@6-%g-!@Q%$@36-f 3"@6-&g f36-@Q%$@f} %"@6-%g!&g%6-f %"@6-&g f%6-&g ) 1,6-%g#!i)6-f Mh f},  T:f,"f, F:Ad,AUA@ A0#A@d A`#)"@H6f }-f"@I6-i"@P6-h"@Q6-g"A&f,"@wA:"@f!}!( }Restart? (A)%)+(}7"@e:%\"A%*(}Smazat obrazovku? (A).)4(}@"@eR+@%@f"}\ A P"@s AR% (}AdAU% A0W+@%@2!8A`3A@f#}EA @WA@)i,$@f#/$@)/fG,@Qf/@Q1/$@%@Rf$}G/$@%@RfTf,Af/A5/$@%AK/$@%AfQ(}T$Ff-f&f%}g,A)/AY- C9%AAF$6-+%g,$$""(}Ulozit soubor (Byte)! AP ! Naf&} zarizeni > AQg@f Bgg AE(}O.k.!,AdAU)(}) f'}A`,$Kg A`((Error F:A,:AdAU>)H AEK$P6(}Import videodat? (A)!)'(}3f(}@e6$Z= AR)(}Import (max.1600Bytes)= Ze zarizeni >d ASg@fnCgAxf)} APP1gF:A,"A6'(}EOF!1 APY AQpK A`+f(}"(Sorry!K($Program byl z f*}duvodu chyby prerusen!z""(Bude spusten od zacatku...AdAU)%D1:METAM4V3.TBA($Program byl z dlLIFESIMULACE IVHO ORGANISMURadek t%rba, RASTERMnoho lid) se u( pokou&elo vymyslet princip, kter`m by se dal simulovatn,} (iv` organismus. Nemluv)m o syst[mech um%l[ inteligence, ale o snaze napodobit chov*n) biologick[ho organismu na ]rovni bun%n-}k.Existuje n%kolik zn*m`ch zp+sob+, jak se k tomuto probl[mu postavit a i j* bych r*d n%')m sv`m p@isp%l. P@edem upozoruji n.}na to, (e m+j program p@edv*d) pon%kud jin[ obrazce, ne( obdobn[ programy py&n)c) se n*zvem LIFE. Je to zp+sobeno trochu odlin/}&nou metodou v`po't+.Program LIFE.COM, kter` jsem za ]'elem pokusni'en) se simulac) "(ivota" vyrobil, by se dal za@adit mezn0}i demonstra'n) programy. Po jeho spu&t%n) m+(ete to, co se bude na obrazovce odehr*vat, ovlivnit pouze stla'en)m kl*vesy STARn1}T nebo SELECT resp. OPTION$.Ka(d` bod na obrazovce reprezentuje jakousi buku, kter* se na venek projevuje svoj) (ivotn) en2}nergi). )m je tato energie vy&&), t)m je vy&&) i jas bodu.Cel` algoritmus spo')v* v tom, (e se prob)raj) postupn% v&echny bn3}ody na obrazovce a sleduje se jejich okol). Pokud je v okol) p@)li( mnoho dal&)ch bun%k, doch*z) jakoby k "zadu&en)" a energin4}e "utla'ovan[" buky se sni(uje. Dojde-li k situaci, (e kolem buky je p@)li( m*lo jin`ch, jej) energie se rovn%( sn)(). Pouzn5}e za p@edpokladu optim*ln)ho po'tu okoln)ch bun%k je jej) energie zv`&ena.Neust*l`m opakov*n)m v`&e popsan[ho algoritmu dos*n6}hneme zaj)mav[ho efektu. V n*hodn% vytvo@en[m obrazci se postupn% za'nou tvo@it jak[si vazby a za n%jakou chvilku to za'ne vyn7}padat jako (iv` organismus. M%n) to tvar, p@ebubl*v* z jednoho m)sta na druh[, d%l) se a op%t spojuje. Ob'as se v n%jak[m m)sn8}t% vytvo@) mal` spolek 4 bun%k, kter[ se vz*jemn% "dr() p@i (ivot%" - od takov[hoto spolku u( neo'ek*vejte nic zaj)mav[ho - pn9}okud ho "nespolkne" jin* '*st organismu, z+stane tak u( napo@*d.Pokud chvilku vydr()te, m+(ete spat@it velice zaj)mav[ promn:}%ny. Kdykoli b%hem t[to produkce m+(ete pohyb pozastavit dr(en)m kl*vesy SELECT resp.OPTION$, nebo nechat stla'en)m START vyn;}tvo@it nov[ n*hodn[ rozm)st%n) a sledovat jin` organismus zase od za'*tku.LECT resp.OPTION$, nebo nechat stla'en)m START vylKPQLPL PLP/JJJ ԝ쩼0P1@o ~Qҍx+pqrstuvwxr=}yߢPp P"ԩ̩p͢u Q̩u͢p QHhL{PpppBPpAP̄͢pu )r>} )`΄φ҄өЩѠqq̠(q̠*q̠Pqqq()ʊL[Q=)芑в ~Qr?}iPPӍP` `PѠqq̠(q̠*q̠Pqqq()ʊL[Q=)芑в ~Qp% V*(en) kolegov[, ve FLOPu '.31 jsem uvedl program TV-BINGO. Tento program byl vypracov*n v ATARI-BASICu a dob@e zA}pracoval; byl ale dost pomal`, tak jsem jej vyzkou&el v Turbo-BASICu a tam pracoval k m[ velk[ spokojenosti. Je pravda, (e dazB}ta ')sel jednotliv`ch sloupe'k+ jsem vkl*dal v ATARI-BASICu. A tak jsem program zaslal do FLOPu ke zve@ejn%n), p@esn% podle pzC}ravidla "Pr*ce kvapn* - m*lo platn*." Bohu(el v p@)pad% vkl*d*n) ')sel BINGA v Turbo-BASICu program nepracuje spr*vn%. Z zD}d+vod+ mn% nezn*m`ch smy'ka FOR-NEXT v Turbo-BASICu vym`&lela nesmysln* ')sla sou@adnic, tak(e po spu&t%n) programu kursor opzE}ou&t%l obrazovku. A proto(e program byl o&et@en proti chybov`m hl*&en)m, nad*val po')a', (e nejsou vlo(ena ')sla. OpravtezF} si proto extender u souboru TVBINGO.TBA na TVBINGO.BAS a program bude fungovat tak, (e v ATARI-BASICu vlo()te ')sla a po zapzG}s*n) dat s vlo(en`mi ')sly p@)kazem LIST"D:TVBINGO.DAT",od @.,do @. na disketu zavedete Turbo-BASIC a v n%m program spust)te.zH} Pot[ k n%mu na'tete p@)kazem ENTER"D:TVBINGO.DAT" DATA-@*dky s ')sly a sou@adnicemi a program odstartujete. Pokud spust)te pzI}rogram V ATARI-BASICu, bude p@i v%t&)m po'tu sloupc+ velice pomal`. P@esto mi tato z*le(itost nedala sp*t a proto(e jsemzJ} nemohl p@ij)t na to, pro' smy'ka FOR-NEXT nepracuje jak by m%la, rozhodl jsem se p@ed%lat cel` program do form*tu Turbo-BASIzK}C s t)m, (e jsem i p@esto ponechal dost BASICovsk`ch p@)kaz+. Program m* komfortn%j&) nab)dku, l[pe je zde popsan* pr*ce s przL}ogramem a m* n%co jako MINI-DOS. Na disket% program najdete pod n*zvem TVBINGO2.TBA. D*le zde najdete soubor TVBINGO.DAT,zM} co( jsou DATA-@*dky ')sel a sou@adnic dev)ti sloupc+ hry BINGO, na nich( si m+(ete vyzkou&et funk'nost programu. Pokud bzN}udete vkl*dat do programu svoje vlastn) ')sla, p+vodn) DATA-@*dky se p@ep)&) va&imi nov`mi daty. V mini-DOSu provedete z*pis zO}dat a pak u( jen 'ek*te na 'tvrtek a na Jana Ros*ka.Vladim)r Toman Na P%&in% 2784O5 O5 D%')n 9-----------------------zP}---------------- pozn*mka redakce: Program TVBINGO z minul[ho ')sla jsme zkou&eli v oby'ejn[m BASICu, kde n*m fungoval. zQ}Tehdy a vlastn% ani te$ jsme nena&li d+vod, pro' by v Turbobasicu nem%l fungovat. Nyn) tedy uve@ejnujeme autorovu opravenouzR} verzi. Program je ale podle na&eho n*zoru st*le pomal` a mo(n* by nebylo od v%ci, aby autor nebo kdokoliv jin` zkusil ud%zS}lat rychl` program. Mo(n* by bylo u(ite'n[ pou()t k vyhled*v*n) ')seln[ho pole 'i @et%zce, aby odpadla pot@eba sou@adnic v DAzT}TA @*dc)ch.rogram. Mo(n* by bylo u(ite'n[ pou()t k vyhled*v*n) ')seln[ho pole 'i @et%zce, aby odpadla pot@eba sou@adnic v DAx NURARHXAKSSSSSCIRRRRRTABSLSLSLSLSLSLSLSLSLCISHLEDENUMESTARP~V}OMOHRCISLTIKEENTEVYHRBINGTINAVODIS@@g@ @~W}  @@u@@%@3@F@~X}@@@@ @ !"#$A'%&'()~Y}*+,-./01A23\D45';6=73H8~Z}9N:Q;<K=I" AP"####~[}ϠͭԠ####é##~\}##堲ϵϵ##V@.@@K::6-@~]}R;@,;@,VPTOo + Ap!#A%"7-@](!B I N G O B I N G O ~^} B I N G OoAR@m,($@-@@i($| || || ~_} |m v,($U($b;@,v-@@~`}c,($| || || |0 Y($c#@m,($~a}@-@@i($| || || |m h,($~b}:-@B"N @T-Z(0h6-%@' - ( #AR'P"Q,T1O~c}3Z +AAD,(>V@AH+ZAA`6M6-%@6-@)6-@~d}56-@A6-@ M6-@;/E6-%@ "@,6-/G=KE6-%@"6-%@.~e}"@<6-&@H6-KG@1 (}'"*"1 AEG (}G(DATA,,~f},,,,,,J3 (CONT-0AB@3&O-AB@'AY@4-~g}(}TC (}C(%@DATA,,,,,Y3 (CONT-0AB@3&^~h}5AB@'AY@456-%@c6-%@eFhI6-%@6-%@-6-%@;6-%~i}@I6-%@mF6-%@r"A% Aw A| (}(ADATA3 (CONT-~j}0AB@3&1AB@'AY@41 APQTO8AAD(~k}.-@@"8 A}AR=F:A,)F:A,OAaA~l}sA} A##@#AR@C-@@"( +-@3"9"~m}C A@  ATH 6.=:, @26-@:7@,,%A(>6-AvH AP76-@:7@,,%~n}A(76-@:7@,,%A('67@,.>:,'67@,.>:, - (U%2@P@@/M~o}@Q2UP $ QMA@H(}--@@C(ڠM ~p}APQTOAR@(}-A?A Q-@@^(TOM-SOFTr-~q}@~A M@ r M@*-@6@4M@@A D NM@`-@~r}@r( uvadi programr-@#A -M@1 N-@6@ZA dM@~s}h r+@ xA'-@@=(@TV-BINGOQ-A&]AgMk ~t}x)@ ( ŠϠ")@"A& +@A1-@~u}H(@ NAVOD - nZ-@@q(@ CISLA - c-@@+l(@ TIKET - t,-@@~v}C(@ DISK - dU-@@l(@ BINGO - b06( ( ()( ͭԠ㩠6)@5~w}>:,4NP:>:,4B6-P?>:,4CPD>:,4TPI>:,4DPNAS APQX~x}TbOg7 +AA`+6-@76-@l""(}Vkladej cisla tiketu # v "A AP~y}= (}=(%@TIK=:X=:Y= :EXEC BINGO3 (CONT-0AB@3&5AB~z}@'AY@456-%@46-%@'!@'*"@*A4 AP)!@'6-%@~{})6-@A A A QTO1 +AA`1-@@:( Nacist DATA-rad~|}ky:( Ulozit DATA-radky9( Obsah disku9( Start programua)@>:,42= D:TVBI~}}NGO.DAT@AJ(W)@a A K>:,41 A 6(Po nacteni ΠH D:TVBIN~~}GO.DATK(>:,43H)@( A  >:,44 AP APQ T*O/o +A~}@Ho(K Program pracuje s deviti sloupci hry TV-BINGO. Po oskrabani cisel na4mm(dsvem tiketu vkladame tato cis~}la do programu prikazem CISLA - C. Tim se vytvori nove DATA-radky.6\\(T Toto vkla- dani se pak ukoncuje tak, ze mis~}to dalsich tri cisel napiseme nulu.9QQ(I Prikazem TIKET - T vkladame take do programu cisla, jez jsou uvedena>PP(~}Hpod jednotlivymi sloupci hry BINGO. Take toto vkladani ukoncime nulou.Cgg(_ Prikazem DISK. - D se dostaneme do DI~}SK-menu a prikazem 'B' spusti- me vlastni program.HT(T(I Tento program lze pouzit pro kon- trolu tazenych cisel pou~}ze na poci-MLL(Dtaci s vlastnim televizorem nebo ke kontrole drive tazenych cisel.R8( Š+)@~}.Q8 APTOT-!@* @*!@* @;6-%@G"@%Q @TAT-!@~}* @*!@* @;6-%@G"@%Q @TAT-!@* @*!@* @!;6-%~}@G"@%Q @TAT-!@* @$*!@* @;6-%@G"@%Q @TAT-!~}@* @$*!@* @;6-%@G"@%Q @TAT-!@* @$*!@* @!;6-~}%@G"@%Q @TAT-!@&* @6*!@* @;6-%@G"@%Q @TAT-~}!@&* @6*!@* @;6-%@G"@%Q @TAT-!@&* @6*!@* @!;6~}-%@G"@%Q @TAQTO 6. C6.0` -( &-%@5(~} C-%@R( ϡ`-%@.(  -%@.(-A~}#A ?2@@IM?M o2A A-AP~}6-F:B7p,A :2@@DM@H j2|A A~})@M@ %QT&(&()@ A D:TVBINGO2.~}TBA@M@ %QT&(&()@ A D:TVBINGO2.|1 DATA 6,3,2,25,5,2,33,7,22 DATA 46,9,2,75,11,23 DATA 10,3,3,23,5,3,39,7,34 DATA 51,9,3,74,11,35 DATA 3,3,4,16,5,4,38,7,4}6 DATA 60,9,4,61,11,47 DATA 9,3,5,29,5,5,35,7,58 DATA 59,9,5,68,11,59 DATA 15,3,6,21,5,6,31,7,610 DATA 50,9,6,67,11,611} DATA 1,15,2,26,17,2,38,19,212 DATA 53,21,2,69,23,213 DATA 5,15,3,29,17,3,40,19,314 DATA 57,21,3,72,23,315 DATA 8,15,4,23},17,4,31,19,416 DATA 60,21,4,65,23,417 DATA 6,15,5,19,17,5,41,19,518 DATA 54,21,5,64,23,519 DATA 3,15,6,30,17,6,45,19,62}0 DATA 47,21,6,71,23,621 DATA 10,27,2,24,29,2,33,31,222 DATA 51,33,2,68,35,223 DATA 3,27,3,16,29,3,41,31,324 DATA 56,33,3},71,35,325 DATA 5,27,4,22,29,4,40,31,426 DATA 60,33,4,70,35,427 DATA 15,27,5,27,29,5,37,31,528 DATA 50,33,5,72,35,529 DA}TA 13,27,6,21,29,6,45,31,630 DATA 46,33,6,63,35,631 DATA 7,3,9,22,5,9,43,7,932 DATA 49,9,9,70,11,933 DATA 9,3,10,16,5,10,}35,7,1034 DATA 56,9,10,75,11,1035 DATA 11,3,11,29,5,11,44,7,1136 DATA 51,9,11,63,11,1137 DATA 3,3,12,21,5,12,34,7,1238 D}ATA 55,9,12,72,11,1239 DATA 10,3,13,18,5,13,45,7,1340 DATA 47,9,13,61,11,1341 DATA 15,15,9,21,17,9,32,19,942 DATA 53,21,9},68,23,943 DATA 7,15,10,30,17,10,31,19,1044 DATA 52,21,10,74,23,1045 DATA 14,15,11,24,17,11,44,19,1146 DATA 60,21,11,62,2}3,1147 DATA 12,15,12,19,17,12,41,19,1248 DATA 51,21,12,71,23,1249 DATA 6,15,13,22,17,13,45,19,1350 DATA 57,21,13,69,23,13}51 DATA 10,27,9,25,29,9,35,31,952 DATA 57,33,9,61,35,953 DATA 15,27,10,23,29,10,42,31,1054 DATA 50,33,10,65,35,1055 DATA} 9,27,11,30,29,11,39,31,1156 DATA 54,33,11,71,35,1157 DATA 6,27,12,24,29,12,37,31,1258 DATA 58,33,12,67,35,1259 DATA 13,2}7,13,27,29,13,40,31,1360 DATA 56,33,13,72,35,1361 DATA 14,3,16,16,5,16,40,7,1662 DATA 46,9,16,65,11,1663 DATA 8,3,17,19,5},17,35,7,1764 DATA 58,9,17,62,11,1765 DATA 10,3,18,24,5,18,34,7,1866 DATA 56,9,18,68,11,1867 DATA 13,3,19,22,5,19,38,7,19}68 DATA 51,9,19,74,11,1969 DATA 6,3,20,18,5,20,32,7,2070 DATA 53,9,20,63,11,2071 DATA 8,15,16,19,17,16,36,19,1672 DATA 4}9,21,16,70,23,1673 DATA 7,15,17,29,17,17,42,19,1774 DATA 59,21,17,64,23,1775 DATA 10,15,18,16,17,18,31,19,1876 DATA 53,21},18,68,23,1877 DATA 3,15,19,30,17,19,40,19,1978 DATA 47,21,19,62,23,1979 DATA 9,15,20,21,17,20,32,19,2080 DATA 52,21,20,7}1,23,2081 DATA 1,27,16,18,29,16,45,31,1682 DATA 54,33,16,61,35,1683 DATA 4,27,17,25,29,17,40,31,1784 DATA 49,33,17,72,35,}1785 DATA 9,27,18,30,29,18,31,31,1886 DATA 53,33,18,75,35,1887 DATA 6,27,19,26,29,19,35,31,1988 DATA 57,33,19,65,35,1989} DATA 2,27,20,17,29,20,44,31,2090 DATA 51,33,20,74,35,2091 TIK=5421042:X=3:Y=2:EXEC BINGO92 TIK=11444471:X=15:Y=2:EXEC BIN}GO93 TIK=8301054:X=27:Y=2:EXEC BINGO94 TIK=6179874:X=3:Y=9:EXEC BINGO95 TIK=12570803:X=15:Y=9:EXEC BINGO96 TIK=8937617:X=}27:Y=9:EXEC BINGO97 TIK=11815409:X=3:Y=16:EXEC BINGO98 TIK=6972635:X=15:Y=16:EXEC BINGO99 TIK=1087980:X=27:Y=16:EXEC BINGO}100 DATA 225NGO97 TIK=11815409:X=3:Y=16:EXEC BINGO98 TIK=6972635:X=15:Y=16:EXEC BINGO99 TIK=1087980:X=27:Y=16:EXEC BINGO V*(en) p@edplatitel[ Proto(e jeden nejmenovan` 'len na&) redakce Z. Burian$ zp+sobil, (e ve FLOPu '.30 nebyly na sta}n% B m[diov[ sektory a tud)( samoz@ejm% ne&ly nahr*t p@)slu&n[ soubory, uv*d)me je nyn). Nedoporu'ujeme pokou&et se je nakop)}rovat do FLOPu 30, nebo je v singlov[ hustot% a tak by se V*m to stejn% nepoda@ilo. Jedn* se o dv% hry Kamila Bedn*@e ne}zdoln[ho to program*tora v TurboBasicu$ "Lovec Joe a pt*ci" a "Help Saturn" a dva drobn[ progr*mky ze sout%(e programov*n), k}ter[ n*m zaslali Martin a Pavel Aligerov[ z Jihlavy - program "Klavesy" zkou&) V*& post@eh, "Z*palky" jsou jednoduch* hra, kd}e se Vy st@)d*te s po')ta'em v odeb)r*n) z*palek z hromady.m "Klavesy" zkou&) V*& post@eh, "Z*palky" jsou jednoduch* hra, kd<uv^WXPSMLMLEVSSSSTSTMYOIFFKLGRJJSSSSHS1S2S3S4TAVVVVAUTAKOWQ׎}OH }} !"#$@%@&@'@(@)*+,-}./0123456789:;< }A@ ԛ A08 A`9V6-@6-@'6-@36-@?6-@HV12},14,5,1,48,1,2,2,3: #AP;B2y@<FF9<@,9<@,9<@,9<@,9<@,F}w-@@.68<,-E68<,-\68<,-s68<,-w P<-}@%-@@)"468<,-8 < Z<-@%-@@)"468<,-8 < n<-@}%-@@)"468<,-8 < <-@%-@@)"468<,-8 <  #A<}-@%-@)"468<,-8 < IB7h)-@E2I} U-@"6-8<,36-8<@,D6-8<@,U6-8<@,WAC@'AG@}3!@EAC@WAG@-@@XF:B2y,"@!6-?:,5-@}Q2U X$GA`8<,%Aa8<,6Ab8<,GAc8<,:-A`A}c&F:,!:&@$@ ""F:@ , %@AP'A@'@  }F:@ , @Ap@ " , J #AP AT==10,10,6,8,2,6,1,1,192,160,160,128,1}4,6,6,14,3,0,0,0,0,2^''155,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0h''176,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0r''197,0,0,0,0,0,0,0,0,0},0,0,0,0,0,0|))176,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,055131,0,131,0,131,0,131,0,131,0,131,0,131,0,131,055176,0,176,0,1}76,0,176,0,176,0,176,0,176,0,176,055197,0,197,0,197,0,197,0,197,0,197,0,197,0,197,055176,0,176,0,176,0,176,0,206,0,20}6,0,206,0,206,055206,0,206,0,206,0,206,0,206,0,206,0,206,0,206,055155,0,155,0,155,0,155,0,155,0,155,0,155,0,155,05}5137,0,137,0,137,0,137,0,167,0,167,0,167,0,167,0))0,0,0,0,0,0,0,0,96,0,85,0,81,0,85,0))0,0,108,0,144,0,0,0,0,0,0,0,0},0,0,0**0,0,0,0,96,0,108,0,0,0,0,0,85,0,96,0((0,0,108,0,72,0,0,0,0,0,0,0,0,0,0,0**0,0,0,0,96,0,108,0,0,0,0,0,85,0},81,0))0,0,0,0,0,0,0,0,64,0,64,0,64,0,72,0((0,0,85,0,108,0,0,0,0,0,0,0,0,0,0,0))0,0,0,0,0,0,0,0,60,0,60,0,60,0,64},0))0,0,0,0,72,0,81,0,0,0,0,0,72,0,64,0&''0,0,0,0,85,0,53,0,0,0,0,0,0,0,0,00))0,0,0,0,0,0,0,0,81,0,72,0,81,0,64,0:}))0,0,0,0,96,0,0,0,85,0,0,0,81,0,96,0D**0,0,0,0,96,0,0,0,85,0,0,0,81,0,108,0N))0,0,0,0,96,0,0,0,85,0,0,0,81,0,81,0X}--47,0,40,0,31,0,47,0,23,0,31,0,40,0,31,0b--60,0,47,0,40,0,60,0,29,0,40,0,47,0,40,0l--81,0,64,0,53,0,81,0,40,0,53,0,64},0,53,0v--42,0,42,0,42,0,42,0,50,0,50,0,64,0,64,0//108,0,85,0,72,0,108,0,53,0,72,0,85,0,72,0,,50,0,50,0,10,0,50,0,}0,0,50,0,10,0,50,0''80,0,0,0,0,0,0,0,80,0,0,0,0,0,0,0++80,0,0,0,0,0,0,0,80,0,80,80,0,80,80,0 1,1,0,0 2,2,0,}0 3,1,0,0 4,3,0,0 1,1,0,0 2,4,0,0 3,1,0,0 4,5,0,0 5,6,0,0 6,7,0,0  7,8,0,0 8},9,0,0  5,6,0,0*6,10,0,047,11,0,0> 9,0,0,0H10,12,1,2R7,13,2,2\ 5,0,3,2f11,0,4,3p10,}12,1,2z7,14,2,2 5,0,3,211,0,4,310,1,1,1 6,2,0,1 7,1,2,1 8,3,4,110,1,1,1 6,4,0},1 7,1,2,1 8,5,4,1 5,6,3,1 6,7,5,1 7,8,2,1 8,9,5,1 5,6,3,16,10,5,1$7,11,2,1. } 9,0,4,1810,12,1,1B7,13,2,1L 5,0,3,1V11,0,4,1`10,12,1,1j7,14,2,1t 5,0,3,1~11,0,4,1=} #A@6-%6-As16-A&=6-A7" A) 6-%@6-%) Ap}5B+2( DATA (1240-1310)!!!5X-A6A9#7%@K&A2}O X6-?:,/ #A@!-A@AQ%"+/ ;-AVAY"!% 7A;"}8-AdAg"!% )"5Ar8$BB8,72,138,72,152,72,24,162,4,198,208,202,138,48,114,10,168,74==}189,28,6,240,18,189,16,6,240,13,165,208,208,88,189,32,6@@125,28,6,153,0,210,246,204,181,204,221,8,6,208,22,189,16,6jj}240,17,222,16,6,189,16,6,24,125,12,6,153,1,210,169,0,149,204,165,203,240,191,189,0,6,240,186,189,4,6EE157,16,6,169,0,157,}0,6,189,20,6,125,12,6,153,1,210,189,24,6,153 GG0,210,157,32,6,189,8,6,149,204,214,204,76,48,6,189,32,6,153,0,210bb76,7}8,6,169,0,133,203,133,77,165,208,208,5,173,36,6,133,208,104,168,104,170,104,40,76,98,228RR104,160,37,162,6,169,7,32,92,22}8,96,104,160,98,162,228,169,7,32,92,228,96,-1 E@@d*B7t@dEҷɠՠɛ g +@}'0@9A @C@U@@dgB7t@d #A0  /-@Ai}+-@/  " ,   K,@@`'/A@@9,@@YK/A@@} $-@@p$(@1 4-@@q4(@11111111111111222 6-@@r6(@}1111111111111122222 7-@@s7(@21111111111111222222 6-@@t6(@1111111111111122}222 4-@@u4(@11111111111111222 $-@@v$(@1 4AR@4( } , ""( (c)1993 Kamil Bednar ""(  AR@  @V A}9ś VV20,20,20,19,20,18,20,17,20,16,20,15,21,14,21,13,21,12,21,11,22,10,22,9,22,8,22,7 cc23,6,24,5,25,5,26,5,27},4,28,4,29,4,30,4,31,5,32,5,33,6,34,7,35,8,36,9,37,10,37,11,37,12,37,13 __36,14,36,15,36,16,35,17,35,18,35,19,34,20,34,21,}34,22,34,23,34,24,33,25,33,26,33,27,33,28 kk33,29,33,30,32,31,32,32,32,33,31,34,31,35,31,36,31,37,30,38,30,39,30,40,29,41,}29,42,29,43,29,43,29,44 MM28,45,28,46,28,47,28,48,28,49,28,50,28,51,27,52,27,53,27,54,26,55,26,56 ee26,57,26,58,25,59,2}4,59,23,60,22,60,21,59,20,58,20,57,20,56,20,55,20,54,19,53,19,52,19,51,19,50 ee19,49,19,48,19,47,19,46,19,45,19,44,20,43,2}0,42,20,41,20,40,21,39,22,38,23,37,24,36,25,35,26,34 YY27,33,28,32,29,31,30,30,31,29,32,28,33,27,34,26,35,25,36,24,37,23,3}8,22,39,21,40,21 __41,21,42,21,43,21,44,20,45,20,46,20,47,20,48,20,49,20,50,20,51,19,52,19,53,19,54,19,55,19 //56,20,57},21,58,22,59,23,60,24,61,25,62,26 ee43,22,42,23,41,24,40,25,39,26,38,27,37,28,37,29,37,30,37,31,37,32,37,33,37,34,38,35,38},36,38,37 ee39,38,40,39,41,40,42,41,43,42,44,43,45,44,46,44,47,44,48,44,49,45,50,45,51,45,52,46,53,46,54,46 5555,45,56,}44,57,43,58,42,59,41,60,40,61,39,62,38 GG62,37,62,36,63,35,63,34,63,33,62,32,62,31,62,30,62,29,62,28,62,27 ee63,27,64,2}7,65,28,66,29,67,30,68,30,69,30,70,29,71,28,72,27,73,26,74,25,75,24,76,23,77,22,78,21 ee79,20,79,19,78,18,77,17,76,16,75,1}6,74,17,73,18,72,19,71,20,70,21,69,22,69,23,69,24,68,25,68,26 YY68,27,68,28,68,29,68,30,68,31,68,32,69,33,69,34,69,35,70,3}6,71,37,72,38,73,39,74,40 ;;75,40,76,40,77,39,78,38,79,37,80,36,81,35,82,34,83,33 àԛ 7750,1,49,0,48,0,47,}1,47,2,47,3,47,4,48,5,49,5,50,4 <<55,2,54,1,53,0,52,1,52,2,53,3,54,4,55,5,54,6,53,6,52,5 7760,1,59,0,58,0,57,1,57,2,57,}3,57,4,58,5,59,5,60,4 KK65,0,65,1,65,2,65,3,65,4,65,5,65,6,66,0,67,0,68,1,68,2,68,3,67,4,66,4 UU70,0,70,1,70,2,70,3,70,}4,70,5,70,6,71,0,72,0,73,1,73,2,72,3,71,3,73,4,73,5,73,6 PP75,0,75,1,75,2,75,3,75,4,75,5,75,6,76,0,77,0,78,0,76,3,77,3,76,}6,77,6,78,6 FF83,2,83,1,82,0,81,1,80,2,81,3,82,4,83,4,83,5,82,6,81,6,80,5,79,4 PP85,0,85,1,85,2,85,3,85,4,85,5,85,6,86,}0,87,0,88,0,86,3,87,3,86,6,87,6,88,6 __90,0,90,1,90,2,90,3,90,4,90,5,90,6,94,0,94,1,94,2,94,3,94,4,94,5,94,6,91,1,92,2,93,}3,93,4 ==98,1,98,2,98,3,98,4,98,5,98,6,96,0,97,0,98,0,99,0,100,0  ee87,55,87,54,87,53,88,52,89,51,90,50,91,51,92,}52,93,53,93,54,93,55,88,53,89,53,90,53,91,53,92,53 ɛ YY88,57,88,58,88,59,88,60,88,61,88,62,88,63,89,57,90,57,91,5}8,91,59,91,60,90,61,89,61 GG95,58,95,59,95,60,95,61,95,62,95,63,93,57,94,57,95,57,96,57,97,57 ``97,63,97,62,97,61,98,60},99,59,100,58,101,59,102,60,103,61,103,62,103,63,98,61,99,61,100,61 ((101,61,102,61,103,57,104,56,105,55 gg109,59,109,5}8,108,57,107,57,106,57,105,58,105,59,105,60,105,61,105,62,106,63,107,63,108,63,109,62 YY109,61,112,58,112,59,112,60,112,61},112,62,111,57,112,57,113,57,111,63,112,63,113,63P +@B7t@d)@;@@dMB7t@d}PAA$!6-3A EA@WAR@i@u6-@6}-6-6-@ 6-@ AC-@+-@P@9-%[(@}11111111111111111111_ m6-%@ q { A@ A@ ( ( 85(   }8$]-@P@16-P:H:,$A`,;@A,E Q6-@P]6-A*-*(@} 333333333,-@,(@ 333333333333,-@,(@ 3333333333333+-@+(@} 33333333333,-@,(@ 3333333333333)-@)(@ 33333333333+-@+(}@ 33333333333*-@*(@ 333333333%"@P6-@% A@%"@6-A}% A@=6-P:H:@ ,$@5,3 @ )!@5= A@7-AE-7(@ 22}22 22,-%@,(@ 111222122233--%@-(@ 1133331 3--%@-(@} 11111 &-%@&(@ 22 %-%@%(@ 32 $-%@$(@ } +-&@+(@ '@*"'6-&@@ 6-@'@}*"@'6-%@@56- A@B) -)(@ /-%@/(}@ /-%@/(@ /-%@/(@ (}-%@((@ {-%@%(@ 3-&@O(@ ]-%@}q(@ { A@"@ AA"@ AA1"@ AAQ"@} A@P"@ A@p"@ A@ A@B<-@@Q&(@ 222"@< }A@d'-@@R'(@2232&-@@S&(@222+-@@T+(@133111 }13*-@@U*(@2222223*-@@V*(@2222133)-@@W)(@2222 }33'-@@X'(@2222'-@@Y'(@3333&-@@`&(@333&- }@@a&(@333&-@@b&(@333&-@@c&(@333?-@@d }'(@222236-@?6-@fF:Ad,"@3$6-@06-@I<6-@J6-&@\A }dAUf AA%6-@% BwF:Ad,"@5-@d@Q6@A-@}W(@11111111[ mAdAUw A@p  AB A@  A@6@-@@Q*(}@11111136"@@ A@*-@@R*(@1121113*-@@S*(@1222113}*-@@T*(@3222313*-@@U*(@1333113*-@@V*(@1222133}*-@@W*(@2222222)-@@X)(@222222(-@@Y((@22222(}-@@`((@22222(-@@a((@33333(-@@b((@33133(-@}@c((@33133@-@@d((@2212246-@@6-@fF:Ad,"@3$6-}@06-@I<6-@J6-&@\AdAUf AA0%6-@% B  AB} A@vF:Ad,"@5-@d@Q6@A-@V(@1111111Z lAdAUv }A@  A@6A-A@@Q+(@1111122 7"@A AA+-A@@R+(@11}112322+-A@@S+(@11111222+-A@@T+(@31111331+-A@@U+(@}13222222+-A@@V+(@13312222+-A@@W+(@11332222+-A@@X+(@}11112222+-A@@Y+(@11113333+-A@@`+(@11111333+-A@@a+(}@11111333+-A@@b+(@11111333+-A@@c+(@11111333C-A@@d}+(@1111222276-@C6-@fF:Ad,"@3$6-A806-@I<6-@J6-&@\A}dAUf AAP %6-@% B   AB A@ wF:Ad,"@5-@d}@Q6@A-A@W(@11111111[ mAdAUw A@P   A@6e-@I3}2@@@7 Y2@eÛC6-%?P6-&@9"%@)"}%@C AAK -(@ 2'-%@7(@ A AAK A@i-%@6?P } " AAE -%@%(@ 16-; A@E A@i/6-%@6-#@/6-!}@6-%@6-&-@+-@G2@@@c2@@@"}g 2@2@ 6- A@ A@6"e-#}@I32@@@7 Y2@eÛ#56-&@+"%@)$}"%@5 AA3$K -(@ 2'-%@7(@ A AA3K A@%-%@6?P&%} " AA6'E -%@%(@ 16-; A@E A@(/6-%@6-#@/6&}-@)6-%@6-&*-@+-@G2@@@c2@@@'}g 2@2@ 6-+ A@ A@66e(}-@I32@@@7 Y2@eÛ7C6-&?P6-&@)}9"%@)"%@C AAS8K -(@2 '-%@7(@ A AASK AA 9-%@*}6?P: " AAV;E -%@%(@ 16-; A@E AA </6-%@6-+}#@/6-@=6-%@6-&>-@+-@G2@@@c2@,}@@g 2@2@ 6-? A@-} A@6hT( ( 6-%@(6-%A>"@)!AJ6-@T Bj44(̠.}l-@+-@@ G2@@[-@w2@@/}@2@@%@   ni%2G2@0}i2@p"6-%@6-%@"$,-%@@B,(@33 3 3--%@1}@C-(@33333333/-%@@D/(@ 32332232231-%@@E1(@ 22222222}222223-%@@F3(@222222222222223-%@@G3(@222222222222225-%@@3}H5(@22222222222222227-%@@I7(@2222222222222222224-@P1(@2222224}222222222222224$q6-@% AC%6-@9/ AC;6-@UE ACQ6-@[ ACg6-Aq A5}C A@'M +@B7t@d)@;@@dMB7t@d'SA@T/0@6}@f@A@SA @'-@0@p'1-@`-(@11111111111111111 7}'96-@P B%6-@v/ B9 B'-@0@`'( -!(@ 1111111111% ($',8}-@Q@a,(@ 111111111 ',-@Q@b,(@ 11111111!',-@Q@c,(@ 111119}11"',-@Q@d,(@ 111111#',-@Q@e,(@ 111111$',-@Q@f,(@ :} 11111%',-@Q@g,(@ 1111&',-@Q@h,(@ 111'',-@Q@i,(@;} 11(',-@Q@p,(@ 1)',-@v@a,(@ 111111111*'+-@v@b<}+(@11111111+'*-@v@c*(@1111111,')-@v@d)(@111111-')-@v@e=})(@111111.'(-@v@f((@11111/''-@v@g'(@11110'&-@v@h&(>}@1111'%-@v@i%(@112'$-@v@p$(@17'-@$@)8'1-@`?}-(@33333333333333331 9'-@0@U:'"-@E"(@33333;'&-@"(@33333@}& ='2-@E@$2(@ 3333>'2-@E@%2(@ 3333333?'2-@E@&A}2(@ 333333333@'2-@E@'2(@ 33333333333A'2-@E@(2(@ 3333333333B}333B'2-@E@)2(@333333333333333G''-@v@$'(@3333H'*-@v@%*(@C}3333333I',-@v@&,(@ 333333333J'.-@v@'.(@ 33333333333K'0-@v@(0(D}@ 3333333333333L'2-@v@)2(@333333333333333N'96-@U Be%6-@p/ Be9 BE}pQ'%-@5%(@11222222R'&-@6&(@ 122222222S''-@7'(@ 2223332222T'&-F}@8&(@ 122232222U'(-@9%(@11222222($V'*-@c@7*(@2231113W')-@cG}@8)(@211313X'*-@c@9*(@1131113Y'*-@c@@*(@1131113Z'*-@cH}@A*(@1131113['+-@c@B+(@13111113\',-@c@C,(@ 311111113]',-@I}c@D,(@ 311111113^'+-@c@E+(@13113113_'*-@c@F*(@1133133`'J}"@ Ba'"@ B b' Bt'.-@b@U.(@ 11111111111u'.-@b@VK}.(@ 11111111111v'.-@b@W.(@ 111111111 w'.-@b@X.(@ 1 1x'.-L}@b@Y.(@ 11 11y'.-@b@`.(@ 11111111111z'1-@b@a.(@ 11111M}1111111${'.-@b@U.(@ 11111111111|'.-@b@V.(@ 11111111111}'.-@b@W.(N}@ 11 11~'.-@b@X.(@ 2222222 '.-@b@Y.(@ 11 11'.-@bO}@`.(@ 11111111111'1-@b@a.(@ 111111111111$'.-@b@U.(@ 111111P}11111'.-@b@V.(@ 11111111111'.-@b@W.(@ 11 11'.-@b@X.(@Q} 3333333 '.-@b@Y.(@ 11 11'.-@b@`.(@ 11111111111'1-@bR}@a.(@ 111111111111$'.-@b@U.(@ 11111111111'.-@b@V.(@ 1111 111S}1'.-@b@W.(@ 11 333 11'.-@b@X.(@ 3333333 '.-@b@Y.(@T} 11 333 11'.-@b@`.(@ 1111 1111'1-@b@a.(@ 111111111111$'.-@b@U}U.(@ 111 1111'.-@b@V.(@ 11 3333 111'.-@b@W.(@ 1 333333 11'V}.-@b@X.(@ 33333333 1'.-@b@Y.(@ 1 333333 11'.-@b@`.(@ 1W}1 3333 111'1-@b@a.(@ 111 11111$*Šқ*N B7(%TVA KARIERA SE HROUTI!NEZASTRELILX} JSIN(ANI 100 PTAKU,JOE!*Q-AP % B/ B9 B(M-A%Q *o B! Y}B(! B+ B!?-AC M BW B(k-Ao */ B B!+-Z}A/ +y B! B! B(+ B!5 B? BS-A0W a Bu-[}APy +9-@! B+ B!/ 9 B+9 B B! B5-A 9 \}+e B! B+-A / 9 BC BM B(a-Ae +e B B]}! B(5-A9 C BM B!a-A e  +% B!-A%  +$($(^} SKORE STISKNI START+W-@! B+ B5 B(? BI B!M W B+ @V_} A0. Ү.N B+(CONGRATULATION! JSI VITEZN( TVE SKORE STISKNI START.] B B(`}! B+ B!5 B? B(I BS B!] B.[-@! B+ B(5 Ba}9 C BW-@P[ .C-@! B+ B!5 B(? BC .$ B b}@V$ A0 D:LOVEC.TBS .C-@! B+ B!5 B(? BC .$ B $89i44GJKFFXAZPGKAPPKMTU@A%PA&P@d}AP @ @ ?0?0e}@?PAY@@T A!A "@#$%@Pf} A+@%@-@ -A @,,%@p  ! g}@!-@-@y ,,%A   6-@ 'AdAU'A1h}@ 1 ,@A1/A o,'/@@9,@yK/@pi}@],@pAo/@yA 6-@0)-@q@0)(@ 111 )-@q@1)j}(@ 1111 )-@q@2)(@ 1111 )-@q@3)(@ 111 )-@q@4)(k}@ 1111 *-@q@5*(@ 1111 -@8@@) ,@q%,@vl}) 6-@6'6-@66-@P'6-d;6-A6-A;@@K:e?)m}@>:,41'6-AP36-?P?6-@Pf APg2>:,436-A&6-@26-@@h2n}>:,446-A&6-@P26-@5i2>:,456-A&6-@26-@0j2>:,466-A&6-o}@P26-@%k2>:,476-Ae&6-@26-@ l2>:,486-A@&6-@P26-@mDp}AdAU >:,49,6-A086-@D6-@n(6-R:,(2@@o6-%@p5 q}"6-%@6-%)@5,@qq"@ Ar!@ APxH"@%,r}@1/@i76->6-6H ASH"@%,@1/@i86-6>6-H ASI"s}@%,@1/@i86-6?6-6I ASG"@%,@1/@i76-=6-t}G AS"T:,"" A"% ,@%/@i 6-%6-% @6-%u}!Ay6-& @6-%!Ay6-&% @,@%/@ig @,@7v}@1/@C@C/@C@U/@7@g/@7@% @ @% A ;w} @5 @5% A!16-@; AeI%2@16-=6-@I6-x} A"T:,"" A""F:Ad,AU" A A"@ Ay}6-P:H:,$A,@$%"@6-@% AP%"@6-@b% AP%%6-Pz}:H:,$@,%@"@6-@6-@b%%6-P:H:,$A`%@,$6-@L{}"@ A`V"@ A`P`"@ Aaj"@ AaPk 6-%6-%l%!|}@c6-@% Am% @6-@% An%!Au6-@% Ao% @$6-@}}% At -(@ v%-&@%(@ w%-&@%(@ ~%-~}&@%(@ %-&@%(@ %-&@%(@ %-&@%(}@ %-&@%(@ $ -(@ %-&@%(@ }(%-&@%(@ 2%-&@%(@ <%-&@%(@ F%-&@}%(@ P%-&@%(@ Z%-&@%(@ d"@6-@}$n"@6-@c$x"@6-@$$"@6-Au$(6-6-% Ap}($B -@6@B2@Q-@;2@AP@$}@M+@%@Q Y-@;2@AP@$@U+@%@2%@Y  }+@%@,-@@,(@ Ge Or-A% %4W6-%@6-%@+} @M2@@@@W A! 9"@@ A >; @12@}; A!0C6-H$R$1 @,@Ay1/@@@',@iAy'/@@@} @6-%!Ay6-& @6-%!Ay6-&% @,@%/@i}1 ,@Ay1/@@@',@iAy'/@@@ A@D -@%}6@D2@$@@@) )2@'6-%@@',@v}"@ A $%!@5 @9% A@P$%!@ @% A@p$}%%2AP@@2-@5@y2(@1 1 1 1 1 1 2-@5@2(@ 111 }1 11 11112-@5@2(@ 11111111 11 2-@5@2(@11 1111 1 112-@5@}2(@ 111 1 1"2-@5@2(@ 111 111 1,2-@5@2(@ 1111 }11 1111162-@5@2(@1 1 1 11 1 @2-@5@2(@1 1 1 1 1 E-}A J2-@5@y2(@ T2-@5@2(@ ^2-@5}@2(@ h2-@5@2(@ r2-@5@2(@ } |2-@5@2(@ 2-@5@2(@ 2-@5}@2(@ 2-@5@2(@ G%21}6-=6-G A2>:,426-A5&6-?26-@E>>:,406-&6-26-}?0>6-?0t>:,4P"-@ D2@@@@@H j2@}t APP>:,4R A$)@>:,4P$ APPp@6-?0$r@P}6-?`$z@6-@$@6-6?0$@P6-6?`$@}6-6@$@6-6@$@P6-6@$@6-6@$@}6-@$@P6-@$@6-@$X'6-%@"A0' Aqb-@}(@ l)-@&@)(@ v$ -AP6@B2}f2@A@'@2@AP@'@2@A@'@ s%2}@G2@i2@s AZ;@ ,}+,AR@F0@Z-@@Tc"-@=2@@0@}@A c2@ ( 3F:B2y,"@,-@P0 3% AqP}bbC,o,n,g,r,a,t,u,l,a,t,i,o,n,:,p,l,a,n,e,t, ,s,a,t,u,r,n, ,f,r,e,e, ,o,n,e,s,e,l,f, ,: P,R,E,S,S, ,S,T,A,R,T}@L -AP6@>2@@'@B L A r6-%@|4 @12@ }@@4$4 @124$6-$(#+@%@-#/-@}@/(@ RAK PRESENT2#.-@@.(@ Hp SuN<#+-@@+(@@#*}-@@ *(@ kML D#*-@@*(@BEDNARF#&-@@&(@éK#'-}@@'(@1990P#6-@6(@press start to gameU#6-@6(@sele}ct-information Z#F:B2y,"@$_# F:B2y,"@Aed# APi#' +'0@}j#%( ( (%(Rychlost klavesy -k#(Stabilizace letu- l#(Pause-m#88(0Pristavani pri rychlosti a po stisk}u klavesy n# (Ovladani polohy-o#(Laser-Šp#'( ( (('(Ԡq#F:B2y,"@}$r# As#% ,@%/@i#%  6-%@%6-&@#%%2@AP@}@# " A#% !6-&@%6-%@# " A#% @,@%/@i# }A#% ,@%/@i#6-%@6-%@#%%2@A@@$!Ay} AE$% @,@%/@i$ A$-A T$-@^$%%6-P:H:},$@U,%@h$%%6-P:H:,$Ae,%@r$ -(@1|$ -%@ (@1$-}@0  $ A$H -AP6@D2@A@'@H $-}A $$/-@0@u/(@ 1 $/-@0@v/(@ 1 $2-@0@w}2(@ 1111111 $3-@0@x3(@ 1 1 $6-@0@y6(@ 111 } 1111 111 $7-@0@7(@ 11111 1 1 11111$5-@0@5(@ 111 1111 111$3}-@0@3(@ 1 1 $3-@0@3(@ 1111111 $3-@0@3(@} 1 $3-@0@3(@ 111 $3-@0@3(@ 11111 }$ AU%%2@A@@G2@i22@}%% ,@%/@i!%/ !6-&@%6-%@/ A &%/  6-}%@%6-&@/ A +% AP0%% @,@%/@i5% AN%6-&@6-&@}O% @0 ApS%% @,@%/@iX%% ,@%/@i]% APb%A}P A l%% @,@%/@iq%T6-@,-AP6@P2@A@'}@T v%=-A =2@A @@{%'6-%@!@' A|% A}}% A%i-@%;(@ G!@0Q@],@i/@i%C-@%}%@C(@ %C-@%%@C(@ }%A-@%%@A(@ 555 %A-@%%@A(@ 55 55555 } 55 %A-@%%@A(@ 555 5555555 555 %A-@%%@A(@ 55555 5 }5 55555 %A-@%%@A(@ 55555555 55555555 %A-@%%@A(@ 55 }555 55 %A-@%%@ A(@ 55 5 55 %A-@%%@A(@ }55 5 55 %A-@%%@A(@ 5 555 5 %A-@%%@A(@ } 5 5 5 %A-@%%@A(@ 5 5 5 %A-@%%@A(@} 55 55 %A-@%%@A(@ 55 55 %A-@%%@A(@} 555 555 %A-@%%@A(@ 555 555 %A-@%%@A}(@ 55 5555555 55 %A-@%%@A(@ 55 5 55 %A-@%%@ }A(@ 55 555 55 %A-@%%@!A(@ 55 55555 55 %A-@%}%@"A(@ 5555 5555 %A-@%%@#A(@ 555555 555555 %A-@%}%@$A(@ %B-@%%@%B(@ %B}-@%%@&B(@ %$% ,@q%'6-&@"@8' }A%-@&=-@92@@ @@=  &=-@92@}= &' ,@q' AH&I%2@A @@16-=6-@P}I6-@PR&'6-&@ @' AP\& Af& Az&-@@E&% ,@%}%/@`&) )2@&%%2@AP@@&% ,@%/@i}&.6-%@6-%@+!@.$&%%2@A@@&/ @,@%/@i}/ A D:HELPSAT.TBS+!@.$&%%2@A@@&/ @,@%/@i%&~XPOYPOZNAPOLERYCHLOSPOSPRA@@@@pA@`} @  +@@ 9@<@, '6-@`6-'6--@@};,@$%@@ ;/@$%@A( 2-@@<+,@ @ $+/@p@ }$F PX!@ %(*** KONEC HRY ***=(SPRAVNE KLAVESQ(STISKNI KLAVESUU)X%U6-d:@,%@}Z6-d:@,%@[8<,A_6-d:@&,%@edG.Y@%$@@%@ $>:},968<,-G6-%@iMn F:Ad,"AU@x)6--@@-@}@c8<,"68<,-IY@%$@@%@ $ U6-@c6-&@  6}-&@'"@6-%@' @-@@!@ AP6-d:@,%@}6-d:@,%@8<,A6-d:@&,%@e9.Y@%$@@%@ $>:,}968<,- 6-%@ @ D:KLAVES.TB,%@e9.Y@%$@@%@ $>:,D01POCEMAMISSKOLIODEBEPOCITAVIKOILKOL@ @@@!@AAU}d; < @  +@ @' @'0@ POCET }ZAPALEK(max.35):(-!@5#(RIKAM max.35 !!- @02 MIN.POCET :< MAX.POCET :F. ! (}TO JE} ALE BLBOST.$). @P6-@6-AZ-@d ,n/%@x6-%@ }`6-TEC)(!}HRAJES.(NAPIS 0 PRO VZDANI SE.)C(JESTE  ZAPALEK Ap