SDEFINICE V1#BAS =+:'************************************+:'* SUPRA DEFINICE ZNAKU V MC V.1.0 *+:'************************************+:'* M H BOMI 16/02/97 *+:'* V . .RAMES *+:'************************************ :'= START =x ::MAX::Q:W:R:M,Q: ::U,,,,{,W,,,,y,:\,,U:,(): :A$(Q)"abcdefghikj/*.- !"(")"#$%&'()O,Q+WIU"r(A$A$(W,R,,,,,,, , , , , ,,,,,,,,,,,,,)S2A$A$"RYTPE@"<A$A$";:p\"(x)"_^7{6z~3KL"(h)"l[xA54t08"3FA$A$"u9Mon2wvrsG|S1NmHF}D"(X)"XyB`"aPA$(, ,W),Z$(),A():  :IQ:Z$(I):PQ(Z$(I))W:ZQW:A$(I,P,Z):Z,P,IYZB$"~33>|ff"()"?3aaf~<8<"()"000xx;{1ccc"(Q,Q,Q)"dAAQ:SW:BW:SS*:PPQn x:IQ:A(I):I+x0,8,4,$C,2,$A,6,$E,1,9,5,$D,3,$B,7,$FC:PP"CRT:M2":,Q:,W:,R::"CRT:M1":,Q$OQ:HQ:R,:Q,:W,BIQW:[WIPP]RI,R,"SUPRA DEFINICE ZNAKU MC",W,W:IQ,Q,?,:Q, ,?, :,:[RPP ,W] ,B$:5,Q,5, :7,,=,:Q,,?,:Q,,?,IQW:[WPP]RI, ,"D: I : A:",W,W:[WPP]I, ,"' ' ''",W,W:[WPP]I, ," ",W,W:I:S"G0E+C"s[Q]J, ,"",W,W:() ()! ()NW:J, ,"Y",W,W: b :NQ:J, ,"N",W,WB[Q], ,"",W,W:B, ,"Y",W,W::, ,"N",W,WUQ:TQ:   D|"F$"" :[PP],,"O ( /)?",W,W:[RPP]x,,"A",W,W: D:F$"A""CRT:M1":Q:: ,F$"N"AW: 6F$"Z" @F$"F"AR: (JF$"M"OQ: ~:NQ b: : &TF$"\"BBQ:HQ: :BW: ^F :  hNQ rF$"E" |F$"P"GW: RF$"T" 0 : *F$"U"S$"*SEFE0FEFF0000:":AQ: *F$"C"S$"*SF000F7FF0000:":AQ: F$"0" D : F$"1" DQ: : F$"V":():F$"S" F$"A" H  #DDQ:,::DW:,9[Q]2, ,"",W,W:2, ,(D),W,W: : :DWO NQr 8:(,)Q,,,,Q:IQ:[R], I,(I),W,W:[R]I,,(I),W,W:IC&ODW:PQ:M$"":IR:M$M$(IP):I:DR()i0D,P:[W]M$: :[Q], P,"",,W:M,W:[W] , P,M$,W,W:M,Q:P:HQ: :DF$:F$"" D NF(F$) XSS,S:b,B,O,M,I,,!,,,6,,#,6,,#,6,,,,Q,Q,),),),,,Q,,,,,,:%HQ:[W]Q,,?,,W:W:#BTTW:T(Z$(U))TQ: HUW TQ :BQxQ,,A$(U,T,Q)" ",W,W:IW(A$(U,T,W)):F((A$(U,T,W),I,W)):A((F)0):FFA0:A , , I:HUW:1[R]F,,(A$(U,T,Q),FW,W)" ",W,W:F,:[W]R,"" F,,"'",W,W:6F,:[W]R,"":F,,"",W,W: )RA \, f, p, z, , , , :\YYW:YQYQ::„f \: p:pXXW:XZWXZW::„z p: :YYW:YZZWYZZW::„ : :XXW:XQXQ::„ : \:XQ:YQ: :P(,()IZ:ZZZ:V((A$,Ex,W)):[PP].,,9,:TQ :  UW: +[W]X ,Y,"",R,R/A(AA):F$:,M:AQ F$"" M $M L. :F$ j 8 R)BP(X*,Y(): LMP: `VM?PR`A .: jF(F$):F! :t X:F$""~F$"0" (F$) F$"K" xF$"L" F$"M" F$"N" F$"S" F$"W" F$"A" F$"Z" F$"T" : F$"O" : XF$"H"IQ:FQ:[(R)R]I ,F,"",R,R:F,I: GQ : B F$"]" F$":" :6F$"/" n:EEW:Ex:E: : 3F$"?" n:EEW:E:E: : (F$"^" n:E: 2F$"" n:E: <F$"F" 'FF$"D" : p: B:XQ:YQ: 4PF$"." n:EE:EEE`: : 4ZF$"," n:EE:E EE`: :  d B n :MxPQ:IQ:(*I,P)I,PI,P: : : BMPQ:IQ:(*I,(P)I,P  MPQ:IQ:(*I,P)P,I  MPQ:IQ:(*I,P)P,I  FQ: 4 :F$""+@,Q,Q,@,@,Q,Q,@|FQ:IQ:(I*,F),Q:FFQR:IIQR: :F$""II:,R:FF:,::„%I:0,:F:0,0:: 4 :Q,@:TN::[@F$" "F$":": :Q,,"''",W,W:Q,,"",W,W:XX((F$)W):M$"":N$""JXQR:LD6TF$:LLW:LH[R]XXX,,"",W,W:LQ(^LH[W]XXX,,"",W,WhF$"" Tr X:F$""|F$( ) F$"0" (F$) XQF$"#" F$"$" (M$"#" M$"$"F$"@" F$"G" LD:S: T: TM$F$: M$"#"N$"$"(N$,R,R)"M(N$):M MMQ:„< :F$"pppppppppppppppp CHYBA! pppppppppppppppp": LD(F$:LLW:LHLQ:S"T5C3"F$""  :HN$N$F$:[W]XXX,,"",W,W:[R]XXX,,F$,W,W:X: CF$"":YYX: @:XYY: :F$"" MQ : :EM: *[P]X ,Y ,"",R,R:-(F$) (F$) :“(F$) '&((F$)R) W , , ,  0 :F F( 8D X:F NF$" " XF :bF@ lF vFH F8   BE,,, :[R] , ,,,R:PR: :F$"1" B( , ,(E)" ",,: B6M,W: , ,(E)" ",,:M,Q: B : B : : : B(,:():(E);: NIQ:PQ:(P,I)P ,I ,"",R,R!P,I:,:" ";:iIQ:PQ:F(P ,I):[F]P ,I ,"",R,R:P,I: B[IXWW:[(I,Y )]I ,Y ,"",R,R:I:PR: pIX:[(I2,Y )]I ,Y ,"",R,R:I:[R],Y ,"",R,R: B[ IYWW:[(X ,I)]X ,I ,"",R,R:I:PR: vIY:[(X ,I@)]X ,I ,"",R,R:I:[R]X ,,"",R,R: BC LV:WRPP: 8:F$"]",:():(E);E*JQ:IQ:AQ:(A*,J()IIRA4A:DL,I:LLW2>J: :F$"]" : ::“F$":": :R j: :PR:EQE &\ :F$"" E  : t: fEEW: : \.pX(E):YEX:Z:ZZZ:UR: 'z[R,W]X, Y,"",W,W!A(AA):F$:AQ F$"" F$"" F$"" ) j :F$ X:F$( ) F$"Z" F$""A R: z: zXRS: z: zEXY:E :GQ: F$( ) # V:F$"" j :UQ: :  p: B: $ :PR: : :XQ:YQ: $[Q],,, ,Q3 [Q],,,!,Q: V: :n 7,[TAB] . N ,@ABCDYz,[] [\] .,@ABLMNu M F,Abtv,Z ,@r,P E U T,@R[dw_$ S 0/1 V+,BLNZvx,A C,A`. 14, [SHIFT] [CTRL] ,@ABCNOPQRSTU\]^_`a,[CR] [] ,@ABCTUV{,1 . 2 . 3 .,@KY,3 1. 4 2.,@S8 "[5-8] 1-4 0 ",@ACD\,"[WASZ] T O ",@ABCDET[," K L ",KXuy," N M ",HQvnB "H ",Bqv,"S D ",@F," ] . : .",I]vsL "? / ",@Nv,"^ ",@Nv,". , ",@O>V 1," [CR] [] ",@ABCMNOP^_`` 3,"[CTRL]+[A-D] 0-3 [] ",@ABCDEGHJK[\],"[CTRL]+[L] ",@ABCDEGHI,"[CTRL]+[K] ",@ABCDEGHIj RX,Y:XR" ":t DR()#~ D[W](XY);: :b [Q](XR),(Y),"",W,W:M,W:[W](XR),(Y),(XY),W,W:M,Q: ,),),):; ():I(E):RI,EI:[W](E);: := I(E):[R,W]I, (EI),"",W,W: WWPP :F$"N :": :,,"'",W,W:LD:XQ:N$():AQN$( )"#DEF":[R],,N$,W,Wb F$:LLW:LH[R]X,,"",W,W:X,,(N$,XW,W)" ",W,W:LQW LH[W]X,,"",W,W:[R]X,,(N$,XW,W)" ",W,W F$"" & LD: X:F(F$):F  F$"" : Y N$(N$,X)F$(N$,X):[W]X,,"",W,W:[R]X,,F$" ",W,W! XXW:XX: :  F 2 : , F 2 :XXW:XWXQ: :  F < ( I2 [W]X,,"",W,W:[R]X,,(N$,XW,W)" ",W,W:#< IWW:(N$,I,W)" "IF N$(N$,I):IQ:AQ x P ,M:F$:F$"" : :“MH M M MIQIW:,Q:,: P :“IWF$" PLAY": :IR: P : P ]Z F$"V "N$: :8,,"' ' ' '",W,W:p,,"",W,Wd :AWN$:N$Xn OQ: b::F$"D !": :@,,"'",W,W:@,,"",W,W: : Kx Q:Q,(:S$;N$:"*R":[]Q, ,Q,>, ,>: :F$"STISKNI [F5]!": :Dz()""( , ) D:Dz()"GOSUB" F$"" :  F$""[]Q,*,Q,>, ,>:F$" RECORD.PLAY": : :Q::::Q, ,Q,>, ,>:F$"UKLADANI HOTOVO!": : : a DDD:XQ:YQ:Z :ZZ:[R],8,, ,Q:L:U:TQ: :  / XQ:YQ:[Q],@,,,Q) F$:A(AA):LLW:L  :LQ L   F$"" AQ  A F$""IWH: L   L:F$ "  R  " F$" " ^ , X:F$""F$"Z/( / )?": :[R]x,,"",W,W:`,,"'",W,W: D:F$""[Q],8,, ,Q:((,H):DDD: :F$"": !6 X,Y:DR()E@ DF$: :" ";:M,W:,,F$" ",W,W:M,Q&J XXW:XZXQ:YYW:YZZYZZWT FP : /^ F(F$):F F(L: h X:F : r F :XQ: | F  F@  ( FH F F8F$:  FW D :  F$""[]Q,*,Q,>, ,>:F$" RECORD.PLAY": : :Q::::Q, ,Q,>, ,>:F$"UKLADANI HOTOVO!": : :  FR DW :  F DRDR:  F DD: b F  :XXX:YYY: p:Z :ZZ:XXX:YYY:  :F$( )F :F$(E): 6 : \ F  :F$"ZNAK":YYX: @:XYY:  :F$""F :F$(M): 6 :L:FQ:  F(XQ:YQ:  F0 A :X ,Y:F$:Z,Y:(@);: < Z,Y:();:X,Y:F$:   X,Y:():0 FQ: FQ: 4 :F$""8D :YQ:YR(YR)XQ~:X~QWJN (X,Y0)RR(X(X)Rh),YR: :F$"" X X,Y<b YQ~:YR(YR)XQ::X~QW: Pl (X,Yx)RR(X ),R(Y(Y)R): :F$"" &v X:YR(YR)XQ~:: ` (X,Y)R(X(X)Rh),R(Y(Y)R): :F$"" & X:XR(XR)XQSW: l  Y0 TN::F$"TISK JE DOKONCEN!": : :: R,Q,Q,R,R,Q,Q,R,R,R:R,Q:R,R:F$:F$"": : TN:W :F$"PRERUSENI/S !": : : > WPP W:F$"TISKARNA ODPOJENA!": : :e WPP W:F$"NEDOSTATEK PAMETI!":[Q],,,&,Q: : :F$"": "`  p t  WPP W:F$"CHYBNE NACITANI!": : :  : :,,F$" ",W,W:w V:W,0:"ZNAK:";(E);"(";(V);")";(`);",#";(E);();";"(,E,,0,); F$"5":D :F$"": ():(E);: :();(E): :F$"5" p H,0:(",0,", ,",0,",,");:M,W:`,0,(E)" ",W,W:M,Q* b4 F$:,M:F$"" ::“M M FQF$"TISKARNA NEPRIPOJENA!": :FW: 4 : 4 8> F$"TISK NA PLOTTER SHARP MZ-1P16!": ::GR:PR ',x,, ,Q:AD:F$"KRESLENI OBRAZCE": :_\ XQ:N$"":YQ:M(A):AAW:I(M):PMI:N$N$(A(I)A(P)):Y2f X(,:[W],N$:F$:F$""X\p F$"STISKNI KLAVESU PRO NAVRAT!": :: D:[Q]',x,, ,Q: Oz XQ(:YQG:X,Y:W,((DYXH)):Y,X:C IQ:(*I,)I,:I:ŽIM PW:IQ:(*I,P)I,P C IQ:(*,I),I:I:ŽIM PW:IQ:(*P,I)P,I C IQ:( ,I),I:I:ŽIM PQ:IQ:(*P,I)P,I C IQ:(*I,)I,:I:ŽIM PQ:IQ:(,I,P)I,P  8:I RP((I$)):[PP]PW,/,(" MIROSLAV HAJDA ZDECHOV 208 75607",P,W)" ",W,W:[Q]P,0,I ,7,Q[I,.:[RPP ] ,B$:I PP,.:[RPP,W] ,"":I($F$"STISKNI KLAVESU": : D: 8n.I R:[Q]IR,.,IW,8:I,.:[RPP ] ,B$:I:?,.,?,8: +8 :P,,"** MOMENT **",W,W:BF$"Z"  : p: BLVW,0:();:ljIQ|R:[R]_I,>I,`I,@I,R:^I,<I,aI,BI:I:PR:EtIQW:[Q]_I,>I,`I,@I:I:PR:E~$,!,Q,,,Q,,,,,,,,,,, ($)::'KONEC PROGRAMU'