ZEGAR a 52255:0:0:0::"":5,0:"":5,0:"":5,0:"":5,0:"" 2000 ?@8?A@A```@ 0 0 0@@A0 0 0 A8`?``cA@Axx??!8?<??a8???{8?? ?>???@;?83??q??F??@6??p?O_P%?8'~8?7?p#8s?>s@`8@8?Ͽ?? `p`?<<~s?߀`f<|fvf<`f|f`|x~>`]~`>ff~nf0n~f`f`0?|0D||`>?`fFffffF`fff`~b`Z?>~߻>`~?><<<>?`<?|qBBBBBBAAAAAAAAAAAAAAAAAABBBBBBBAAAAAAAAAAAAAAAAAAFBhhhhBBAAAAAAAAAAAAAAAAAAAFhhhhAAAAAAAAAAAAAAAAAAAAFhhhhFhhhhFFFFFF77FFF7777FFFFF77777FF77777::FF7777::FFFFFF2CCCCCCCCCCCCCCCCCCCCCCCCCCCCC[1 , R.![~#"[o<&)))K6\ >2[: [2 [: [2[> 2[~#"[2[:[= 2:[= :[G: [O: [ 2 [*[#2[: [G: [2 [*[@2[: [G: [2[: [O:[<2[ :[<2[ :[P̀@ :\G:\G:[o:[g>Xg:\w:[G@gxgxo:[Go!xO F![F(// P2 @W|x<||~~~`~ 0<`<dfff`#``888x`8f0F ff|f | `|08 f@ fff|```0 @f <@@dffd0`00``@f ` @x<|b~~?~~~<<< 8<<@~ @0@@@@t~ (?<@< @D@@ q< ?@f@F @`" @` f@@f@ @@?9 8?$"@  0 < ,@>@@@İ`?D  N pfL@@F@`D  & @8f~@<@< @@<< @@~ @ 0  G@< p@a?!l @<x"  EpA?"8` @~~"<`@E??0@?`"`@f @?`@|"|@="@? Z @@80"f @"@  _@ s@`  @0F "f`_@0 Ȁ p@0< "<x7: 08@p` "?p4444444444000000000000000222220040000000770002222220000000000000400000000000222000222000000000004000000000222000000022200000000040000000022000000000002200000000400000000200000000000002000000004000000020000000000000022000000040000000200000000000000020000000400000022000000000000000220003004000000200000000000000000200000040000002000000000000000002000000440000020000000000000000020000000000000220000000000000002200000000000000200000000000000020000100000000002000000000000000200001110000000002000000000000022000011100005000022000000000002200001111000000000022000000000220000011010220000000022220002220000000110122220000000000222220000000001111222200000000000000000000000011112222200000000000000000000005111100000000000000000000000000000000000000000000000000000000000000003 P!@@ZEGAR v) (x)7:0:0:1:1::n=-1271273:127,43+:n,43+:127,43+:-n,-43+:127,43+:127,-n*.33(:127,43+:-127,n*.33(:n n=-1271273:127,120x:n,43+:127,120x:-n,-43+:127,120x:127,-n*.33(:127,120x:-127,n*.33(:n 150:90Z BPROGRAM NAPISANY 10/85 JANUSZ GAJEWICZ WODZISLAW TEL 54592 ZT0:0:0:ڰ"6":"6"::236099\,30:23658j\,8 [80:,"4";"WPISZ SWOJE IMIE ";I$:I$="""91" \ 106j dwP$="CZY BAWIMY SIE JESZCZE RAZ?":XX=(256-7*P$)/2:YY=60<:XS=1:YS=2:9000(# eUP$="NACISNIJ T LUB N":YY=140:XX=(256-7*P$)/2:9000(# f""102f g=""103g h="T"1 i100d:0 j1:1,3;"PROGRAM ZEGAR-MENU" n,A$="SPECTRUM ":S$="PYTA,":D$="ODPOWIADA" x+1;3,0;A$+S$+I$+" "+D$ l5,3;"1.GODZINY";7,3;"2.MINUTY";9 ,3;"3.GODZINY I MINUTY" ,1;11 ,0;I$+" "+S$+A$+D$ s13 ,3;"4.GODZINY";15,3;"5.MINUTY";17,3;"6.GODZINY I MINUTY" `20,140:160,0:0,-480:-160,0:0,480 _20,76L:160,0:0,-480:-160,0:0,480 520,2;"NACISNIJ ODPOWIEDNI KLAWISZ" "P"+0,00011000 "P"+1,01111110~ "P"+2,01111110~ "P"+3,11111111 "P"+4,11111111 "P"+5,01111110~ "P"+6,01111110~ "P"+7,00011000 ""200 =""210 ="1"1000 ="2"2000 ="3"3000 ="4"4000 ="5"5000 ="6"6000p "1"200 50000P .F=21:D=0:Z=0:H=21 G=(*12 )+1 A=G/6*:SX=60<*A SY=60<*A  M=0 $S=M/30* 8"MSX=75K*S:MSY=75K*S =G=12 1095G B$131,91[:1;SX,SY G&131,91[:1;MSX,MSY V;85004!:5;1,8;"KTORA GODZINA ";O$ X:O$""N=1̱O$:O$(N)"0"O$(N)"9"N:1120` [ 1110V `O=O$:OG1140t jD=D+1:1,4;D:N=3H:1;2;N,4;"":N-1,4;" ":.04|# =,-N+10 :N:H=H-1:1200 tZ=Z+1:1,27;Z:N=3F:1;5;N,27;"":N-1,27;" ":.2~L,-N-6:N:F=F-1 xZ>9 8000@ y 1110V G=12 1205 $131,91[:1;SX,SY &131,91[:1;MSX,MSY D+Z10 1300 Z>10 8000@  1020 9500%:.3,0:.3,2:.3,4:.6,5:.9ffff,0:.3,5:.3,4:.3,5:.6,7:.8L,2:.3,2:.3,4:.3,5:.3,9 :.3,7:.3,7:.3,5:.3,5:.3,4:.3,2:.3,4:.8L,0 .3,0:.3,2:.3,4:.6,5:.8L,0:.3,5:.3,4:.3,5:.6,7:.8L,2:.3,2:.3,4:.3,5:.3,9 :.3,7:.3,7:.3,5:.3,5:.3,4:.3,2:.3,4:1,5 ( 100d .F=21:D=0:Z=0:H=21 50000P M=(*557)+1 M5M10 M15M20M25M30M35#M40(M45-M502M5572020  S=M/30*  "MSX=75K*S:MSY=75K*S /&131,91[:1;MSX,MSY >>8600!:5;1,8;"ILE MINUT "+I$+" ";O$ ?:O$""N=1̱O$:O$(N)"0"O$(N)"9"N:2115C @ 2110> HO=O$:OM2140\ RD=D+1:1,4;D:N=3H:1;2;N,4;"":N-1,4;" ":.04|# =,-N+10 :N:H=H-1:2200 \Z=Z+1:1,27;Z:N=3F:1;5;N,27;"":N-1,27;" ":.2~L,-N-6:N:F=F-1 aZ>9 8000@ f 2110> &131,91[:1;MSX,MSY D+Z10 1300 Z>10 8000@  2020 50000P .F=21:D=0:Z=0:H=21 M=(*557)+1 ΅M5M10 M15M20M25M30M35#M40(M45-M502M5573021 S=M/30* G=(*12 )+1 .A=(G+(M/60<))/6*:SX=60<*A SY=60<*A "MSX=75K*S:MSY=75K*S SY=60<*A $131,91[:1;SX,SY &131,91[:1;MSX,MSY &;85004!:5;1,8;"KTORA GODZINA ";O$ ':O$""N=1̱O$:O$(N)"0"O$(N)"9"N:3114* ( 3110& *O=O$ +68600!:5;1,8;"ILE MINUT";P$ ,:P$""N=1̱P$:P$(N)"0"P$(N)"9"N:3118. - 3115+ .P=P$ 0OG3140D 5PM3140D :D=D+1:1,4;D:N=3H:1;2;N,4;"":N-1,4;" ":.04|# =,-N+10 :N:H=H-1:3202 DZ=Z+1:1,27;Z:N=3F:1;5;N,27;"":N-1,27;" ":.2~L,-N-6:N:F=F-1 HZ>9 8000@ I 3110& $131,91[:1;SX,SY &131,91[:1;MSX,MSY D+Z10 1300 Z>10 8000@ 3020 T50000P:0,2;6;" ":0,26;6;" " %0,25;1;"Q=MENU" B7;0;1;1,9 ;" PODAJ GODZINE ";G$ G$="Q"100d :G$""N=1̱G$:G$(N)"0"G$(N)"9"N:4030  4010 G=G$:G>244010 85004!:A=G/6* SX=60<*A SY=60<*A WXX=10 :YY=0:XS=2:YS=2:P$=(G)+":00":G>9 XX=0  9000(# $131,91[:1;SX,SY #G=12 G=244100 /131,91[:1;0,75K ?#1;1,4;"NACISNIJ DOWOLNY KLAWISZ":0 $131,91[:1;SX,SY #G=12 G=244115 /131,91[:1;0,75K $XX=0:P$=" ":9000(# " 4010 50000P F0,2;6;" ":0,26;6;" " %0,25;1;"Q=MENU" B1,9 ;7;0;1;" WPISZ MINUTY ";M$ M$="Q"100d :M$""N=1̱M$:M$(N)"0"M$(N)"9"N:5059  5050 M=M$:M>60<5050 S=M/30* "MSX=75K*S:MSY=75K*S 28600!:131,91[:1;MSX,MSY %A$=""+(M):M<10 A$="0"+(M) JXX=10 :YY=0:XS=2:YS=2:P$=":"+A$:9000(# ?#1;1,4;"NACISNIJ DOWOLNY KLAWISZ":0 H131,91[:1;MSX,MSY:P$=" ":9000(#:5050 p50000P zF0,2;6;" ":0,26;6;" " {%0,25;1;"Q=MENU" B1,8;7;0;1;" WPISZ GODZINE ";G$ G$="Q"100d :G$""N=1̱G$:G$(N)"0"G$(N)"9"N:6050  6020 A1,8;7;0;1;" WPISZ MINUTY ";M$ M$="Q"100d :M$""N=1̱M$:M$(N)"0"M$(N)"9"N:6090  6050 G=G$:M=M$ G>236020 M>59;6050 >A=(G+(M/60<))/6*:SX=60<*A:SY=60<*A 2S=M/30*:MSX=75K*S:MSY=75K*S b85004!:8600!:131,91[:1;SX,SY:131,91[:1;MSX,MSY 1XX=10 :YY=0:XS=2:YS=2 G>10 XX=0  P$=(G)+":" A$="":M<10 A$="0" P$=P$+A$+(M):9000(# 8?#1;1,4;"NACISNIJ DOWOLNY KLAWISZ":0 B$XX=0:P$=" ":9000(# LJ131,91[:1;SX,SY:131,91[:1;MSX,MSY V 6020 @0:0:7:1::P$="OJ "+I$+",NIC NIE UMIESZ!":YY=502:XS=1:YS=2:XX=(256-7*P$)/2:9000(# JeP$="CZY CHCESZ POWTORZYC JESZCZE RAZ?":XX=(256-7*P$)/2:YY=80P:9000(# TUP$="NACISNIJ T LUB N":XX=(256-7*P$)/2:YY=140:9000(# ^""8030^ h=""8040h r&="T"0:0::100d |100d:0 !4b.1}L,G:.1}L,G+12 :.1}L,G+24:.1}L,G+24:.1}L,G+24: !oB=M/5:.1}L,M:.1}L,B+12 :.1}L,B+24:.1}L,B+24:.1}L,B+24: #(I=23306 [:I,XX:I+1,YY:I+2,XS:I+3,YS:I+4,7:I=I+4:W=P$:N=1W:I+N,P$(N):N:I+W+1,255:W=52256 : %n:P$="TWOJA OCENA "+I$:XX=(256-(7*P$))/2:YY=0:XS=1:YS=3:9000(# %!D=10 P$="5" %&D=9 P$="-5" %0D=8P$="+4" %:D=7P$="4" %DD=6P$="-4" %ND=5P$="+3" %XD=4P$="3" %bD=3P$="-3" %lD2P$="2!" %v\XS=10 :XX=(256-7*XS*P$)/2:YY=40(:YS=18:9000(#: 'c"1"52256 ,300,:"2"40000@,6912:"3"50000P,12 :"ZEGAR"10 i[w: fdzhmsIڢg a/N)sso bp-P45OP