hours ! Q!1,0:"HOURS" 7000X::n=1 *0,5;"The Hours of the Day." -"45-:t=113 :g$ 2r=07:b 7 g$+r,b <r:t A"a",0,0,0,112p,240,248,112p,32 ,"b",96`,112p,104h,103g,96`,96`,96`,96` FM"c",80P,88X,76L,68D,68D,68D,68D,98b KN"f",126~,126~,250,10 ,10 ,11 ,8,8 P"g",12 ,12 ,108l,108l,255,1,1,1,"h",112p,80P,72H,88X,176,160,144,192 U"i",0,0,0,0,7,31,121y,97a,"j",0,0,0,480,120x,248,120x,32 ZN"k",128,64@,32 ,31,15,15,15,15 \S"s",96`,113q,106j,100d,96`,124|,127,127 _"o",0,0,0,4,30,31,30,30,"p",0,0,0,0,0,124|,255,255,"q",0,0,0,0,0,2,6,254 }8100:150 h=32 :n=112 o,m$ 8180 314,3;o;" o'clock ";o;".00 ";m$ 150+502*n h=h-4 e=1n=12 n 7,"Sleeping",8,"Get up ",9 ,"Go to work",10 ,"Working ",11 ,"Tea Break ",12 ,"Working ",1,"Lunch ",2,"More Work",3,"Tea break",4,"Work again ",5,"Go Home ",6,"Supper " 1200 19,3;"" z=13:502 19-z,2+z;"z" !1,-20:z:860\ #19,3;"":502 3z=120:.1}L,10 :5:z E19,3;" ":18,4;"":502:cs=2 ' 800  6?c=220:18,C;" ";19,C;" OO" E8Z=12:.2~L,-20:Z:c:860\ ^ 8259 cs=20:600X  8259 016,24;"CAFE":800  & 8259 X*16,24;"TEAS":800   8259 Hc=262-1:18,c;" ";19,c;"OO " 8z=12:.2~L,-20:z:c:860\ cs=2:800   C=CSCS+4 %d17,c;" ";18,c;" ";19,c;" ":c/2=(c/2)19,c;" " *!.5,-10 :c:502 /Q17,cs+5;" ";18,cs+5;" ";19,cs+5;" " 0&P=10 25:.005y# =,P:P 4 860\ 9f:z=110 :17,26;" ";18,26;" ";19,26;"" >p.5,0:17,26;"";18,26;" ";19,26;" ":.5,7 Cc17,26;" ";18,26;" ";19,26;" ":.5,-5:z \6900:  s=0:n=16 Ct=(*12 )+1:h=(15-t)*4:h=h11220 .G=0:N=18100:1240 g=0:8180 G21,0;"What o'clock is it? ":"ENTER the number.";a$ A$=""1240 Hz=1̱a$:a$(z)<480ůa$(z)>579z=502:1240 z:a$=t1290  219,0;" " $g=g+1:g=31293  C19,0;"Wrong.Try again.":1,0:1240  aS=S+1:q=1t:.73333,12 :q:19,0;" Well done ":1295  719,0;" Wrong  ":1,-12 +19,10 ;"It is ";t;" o'clock." 4sc=6:6900:e=1sc=n:n=6 n  6000p 2:8100 <s=0:N=110 F4T=t+(*6)+1:T>12 t=t-12 K6T=15-H/4t=3-h/41350F P718,0;"Make the clock say ";t;" o'clock." Z721,0;"Press H to move the Hour hand" dE0:h=h-(4Ʀ="h")-(4Ʀ="H"):h0h=480 n 8180 x:t=15-(h/4)t=3-(h/4)1420  1380d 0s=s+1:19,5;"WELL DONE" 1,12 )6900:e=1sc=n:n=10 /n:6000p:16,10 ;"Goodbye": pK18,0;"YOUR SCORE ";S;" OUT OF ";sc;" ":6910 Ge=0:20,0;"Press  E  to End this section." K21,0;" Press  ENTER  to go on. ":0  $="e"Ŧ="E"e=1:6930 13 6910 Gl=1621:l,0;" ":l  X 7000X ]t=111 :g$ br=07:b g g$+r,b lr:t q"m",0,192,0,192,32 ,32 ,192,0,"n",0,3,4,7,4,4,3,0 vL"r",1,3,7,15,31,63?,127,255 w"t",0,0,0,62>,127,255,255,255,"u",0,28,546,546,252,232,254,255 x"a",1,513,123{,79O,123{,63?,15,15,"b",15,31,31,31,31,31,15,7 y"c",224,240,248,248,248,248,248,240,"d",240,240,252,222,242,222,220,128 z"f",128,128,128,128,128,128,128,128,"e",1,1,1,1,1,1,1,1 5:7:0: "n=1:h=8:8100 >l=1418:l,9 ;2;" ":l 15,14;"HOURS" K72H,64@:0,-40(:111o,0:0,40(  7900 =c=05:18,c;" _":.1}L,40(:c %7900:18,6;" " l=141-1 Ul,8;"";l+1,8;"";l+2,8;"";l+3,8;" " .1}L,40(:l K.3,7:.6,12 :.3,12 :.6,11 &l=13:l,8;" ":l c=9 19 )0,c;" _":.1}L,40(:c 1,-10  I.3,11 :.6,9 :.3,9 :.9ffff,7 0,19;" " ml=115:l,23;" ";l+1,23;"";l+2,23;"";l+3,23;"" .1}L,40(:l  .3,7:.3,9 :.3,7:.3,5:.3,4:.3,2:1.5@,0 %F15,23;" ";16,23;" ";17,23;" " *?c=2328:18,c;" _":.1}L,40(:c 4#6900:e=11200 5:7:0: ܁.3,4:.3,5:.3,7:.3,7:.3,9 :.3,11 :1.5@,12  =l=113 :l,9 ;6;" ":l b72H,167:0,-103g:111o,0:0,103g:-111o,0 ?r=03:1;127,115s,480+r:r @3,18;1;5,19;2;7,20;"3";9 ,19;4;11 ,18;5;12 ,15;"";11 ,13 ;7;9 ,12 ;8;7,11 ;"9";5,11 ;10 ;3,13 ;11 ;2,15;"12"  7:n=18200 Kh1h1:127,115s:xp,yp:xp,yp,2:-xp,-yp,2  0 &yh=((*h/24)*10 ) 0xh=((*h/24)*10 ) :'127,115s:0,30 ?<127,115s:xh,yh:xh,yh,2:-xh,-yh,2 Ih1=h:xp=xh:yp=yh N.5,20:  -b <h 脊f胠 f6eo 0sgGqM Working A2 |