KRESLENI V3.6  w*:g ~ܯ2^ !+|(/8N! F͘ >2/ >^ >2>ͥ ! *KRESLENI V3.6* 10.5.1987"CRT:M1": H$(0)J0:H$(J):( - SMER+2 - POUZE KURZOR [MAZANI](< - KURZOR MAZE [CERNA],F - KURZOR SE POUZE POHYBUJE&P - VYMAZANI OBRAZOVKYZ""d K - KRUZNICEn O - OBDELNIK%x"T - TROJUHELNIK (T,T), PRIMKA" P - PISMO - KONEC FUNKCE""' E - PRUBEZNE ZOBRAZOVANI OBJEKTU& - ZOBRAZEN AZ VYSLEDNY OBJEKT N - NASTAVENI ZOBRAZENO - NASTAVENI NEZOBRAZENO B - VYBARVENI PLOCHY C - BARVA CARY R - RYCHLOST H - NAPOVEDA (HELP)""""/"ZAKLADNI NASTAVENI : , , , C="J0:H$(J):3 [@]  ,G, ,?,@Q [] <,@,"POKRACOVAT - ZMACKNI KLAVESU",,: ,"B$"[0=CERNA,1=MODRA,2=CERVENA,3=BILA]",:X:YG:XSX:YSY: X,Y:KK:KR:CC:TT:E:U:P:MM:NNF6N1$"VYSLEDNY OBJEKT":N2$"KURZOR NEMAZE":C@:RR:RRR@/JA():B(): A TK$: K$"" J%^K(K$): K0 ,: :'bh KP , : V:KK:KR:CC:TT:U:PC: :'cr K( TT U:TT@:KXX:KYY:, :E[C]CX,CY,X,Y| U JK K E:, :N1$"PRUBEZNE ZOBRAZOVANI": J K E:, :N1$"VYSLEDNY OBJEKT": ::'W K MM:, :N2$"MAZANI KURZOREM": :R: :'R K( MM:, :N2$"KURZOR NEMAZE": :RRR: :'1 K NN:, : 6 K0 NN:, : : :'O K$ D$"RYCHLOST [19] = ":M:N: $:RRD:RD: :' RI K U:KK:KXX:KYY:KR:PSP: :': K U:CC:CXX:CYY: :' K >D$B$" = ":M:N: $:VD:D$"OBVOD"B$: $; V D [V] X,Y,D:PVQ K( TT U:TT:CXX:CYY: :', ! U , : K D$"CARA"B$:M:N@: $:CD K D,J: : H$(J)"" :H&,:H$(J):[@],`,,,@[0[],,"",,: : (K$) (K$) ?: ? D K J N:'AXD$"VODOROVNE ZVETSENI [19] = ":M:N: $:VD:bD$"SVISLE ZVETSENI [19] = ":M:N: $QlS(X,Y): [S] X,Y:L$(A):LYD: L L-vS(X,Y): [C] X,L,L$,V,D: JJ(K$): JP , : [S] X,L,L$,V,D:[C]X,Y:  J 7[S]X,L,L$,V,D:XXV: X X,S(X,Y):[S]X,L,(H),V,D: v5 [S] X,L,L$,V,D: [C] X,L,K$,V,D:XXV6 X XXV: [(X,Y)] X,L,K$,V,D  v* A , , , , , , ,  X X X X Y Y YG YG U  :' E \ :' 9* [P] XS,YS:P(X,Y): X,Y: KK KX,KY4 CC CX,CY2> TT TT CX,CY: TT H R:'\ KK zPf [] KX,KY,KR,O\(:KR((XKX)((YKY)O\())7p [C] KX,KY,KR,O\(: KYKRP  ;z CC [] CX,CY,XS,YS: [C] CX,CY,X,YQ TT TT [] CX,CY,XS,YS: [C] CX,CY,X,Y:TTM TT@ [] CX,CY,XS,YS,KX,KY: [C] CX,CY,X,Y,KX,KY,CX,CY  & B [C] XS,YS,X,Y:PCF B [P] XS,YS:P(X,Y): X,Y: MM P, :HXSX:YSY: J XXR YYR: YYR XXR: XXR YYR: YYR XXR: $ : ,:D$; . &8D(K$)@: DM DN .BK$:H: :L:' V E U ` KK tKjKR((XKX)((YKY)O\()): [C] KX,KY,KR,O\(.o [PS] KX,KY: KYKRP  #t CC [C] CX,CY,X,Y/ TT TT [C] CX,CY,X,Y) TT@ [C] CX,CY,X,Y,KX,KYK$: K$"" , :" ,:( ):F : NN ,: [] N1$;( );N2$