# (100)124 62000:63000> 45000: 478,3: 479,4e WATCH (85/2 - 85/4) 11.10.92xby A.Behnert2200: R$(31),Z$(9),MI$(2),ST$(2)32000:POKES(46000ZUORDNUNG260000:ZEIT-MC + UHR STELLENZEITANZEIGE0,31,0,39:0:(17):.13;(12,24);"hours"I3;(19,10);"minutes"c6;(28,4);"seconds"w&ERSTDARSTELUNG0730:640DSEKUNDENNE(509): E0 1000XSE(0)b6;(23,2);(15);SE;(15);(17)l SE0 640:2v590 MINUTE&MI(1): MI0 7304MI$(MI)e (MI$)2 MI$"0"(MI$,1): MI$(MI$,2)yMI$(1)(MI$,1)MI$(2)(MI$,1)16,31,19,28:3;Z$((MI$(1)))16,31,30,39:3;Z$((MI$(2)))STUNDEST(2)ST$((ST))2 (ST$)2 ST$"0"(ST$,1): ST$(ST$,2)FST$(1)(ST$,1)Z ST$(2)(ST$,1){0,15,0,9:13;Z$((ST$(1)))  0,15,11,20:13;Z$((ST$(2)))*TASTE GEDRUCKT E241 E246 600 E246 1100  E241 60130:ZEIT STELLEN500LENDE$V:`0,31,0,39:7,0:@jR}ZEICHENPOKES^} 32050m } I0 31} ZP: 14848I,ZP}(} 14253,186:2} 0,7,31,63,63,127,127,127:OBEN LINKS<} 0,224,248,252,252,254,254,254:OBEN RECHTS# F} 127,127,127,63,63,31,7,0:UNTEN LINKSU P} 254,254,254,252,252,248,224,0:UNTEN RECHTSe ȯPIC BY MPM ү:(27);"1":0:1:14242,0 ܯ 0,31,0,39: 4:: 2,29,2,37: 0: 毕862,25:14253,254: 14249,254:14247,238:255 4,13,4,35: 7,2::(7,6);"WATCH"4 (10,6);"(ZEITANZEIGE - EXTRA GROSS)"N E(509): E0 45060V  2_ 1: "(7,7);"Ein paar Sekunden" ,(10,17);"Geduld bitte..." 6 ZUORDNUNG DER PUNKTE ZU DEN REIHEN (BINAER-CODE) A$(128)(129):B$(130)(131). ijR$(1)" "A$" "B$:00001^ γR$(2)" "A$" "B$" ":00010 سR$(3)" "A$A$" "B$B$:00011 R$(4)" "A$" "B$" ":00100 R$(5)" "A$" "A$" "B$" "B$:00101$ R$(6)" "A$A$" "B$B$" ":00110T R$(8)" "A$" "B$" ":01000 R$(9)" "A$" "A$" "B$" "B$:01001 R$(10)" "A$" "A$" "B$" "B$" ":01010 R$(12)" "A$A$" "B$B$" ":01100* (R$(14)" "A$A$A$" "B$B$B$" ":01110^ 2R$(15)" "A$A$A$A$" "B$B$B$B$:01111 - Zeit neu stellen"(8,8);" - Programm beenden"6;(17,3);"Bitte die genaue Uhrzeit eingeben!" 22,14:3;"Stunde:";:"";ST ST0 ST23 ST(ST) 60140>24,14:3;"Minute:";:"";MId( MI0 MI59 MI(MI) 60140226,13:3;"Sekunde:";:"";SE< SE0 SE59 SE(SE) 60140F 0,SE: 1,MI: 2,STPH------------HINWEISE-------------=R-Die Ziffern 0 bis 9 sind in dem Variablenfeld Z$(X) abgelegt\-eine Ziffer besteht aus 8 Punkt- reihen zu je 5 Punktenf-die Punktreihen sind im Variablenfeld R$(X) abgelegt p-X steht f}r den Dezimalcode der Bin{r-Punkt-ReiheVz (Bsp: "* * "=R$(18), da 10010 bin{r = 18 dezimal)-es wurden nur die ben|tigten X belegt  (z.Bsp. R$(24) existiert nicht)-zur Darstellung der Ziffern  wird ein Fenster (10 breit und 16 hoch) ben|tigt1062005: 0,31,0,39: 7,0:G1 I15360 15755U2 P: I,P[3a45 17 , 14 , 0 , 25 , 24 , 13 , 127 , 127 , 77 , 67 , 876 65 , 84 , 67 , 72 , 1 , 243 , 59 , 59 , 225 , 251 , 17 7 36 , 0 , 25 , 34 , 190 , 183 , 17 , 39 , 0 , 25 J8 34 , 153 , 183 , 33 , 1 , 2 , 34 , 222 , 1 , 221 9 54 , 243 , 0 , 33 , 227 , 1 , 34 , 185 , 183 , 201 : 79 , 175 , 42 , 222 , 1 , 189 , 200 , 188 , 200 , 237 ; 91 , 160 , 183 , 121 , 254 , 32 , 48 , 78 , 254 , 13 4< 40 , 84 , 254 , 8 , 40 , 42 , 254 , 9 , 40 , 18 m= 254 , 10 , 40 , 4 , 205 , 3 , 240 , 0 , 201 , 221 > 126 , 243 , 238 , 2 , 221 , 119 , 243 , 201 , 125 , 135 ? 61 , 131 , 95 , 205 , 3 , 240 , 51 , 56 , 47 , 123 #@ 149 , 60 , 95 , 237 , 83 , 160 , 183 , 201 , 123 , 77 ^A 145 , 95 , 48 , 245 , 122 , 148 , 0 , 87 , 30 , 255 B 123 , 129 , 95 , 205 , 3 , 240 , 51 , 48 , 247 , 123 C 145 , 145 , 60 , 95 , 24 , 223 , 123 , 133 , 61 , 95 D 205 , 3 , 240 , 51 , 48 , 29 , 68 , 203 , 32 , 5 EE 62 , 13 , 205 , 3 , 240 , 0 , 62 , 10 , 205 , 3 |F 240 , 0 , 16 , 248 , 68 , 5 , 0 , 62 , 11 , 205 G 3 , 240 , 0 , 16 , 248 , 58 , 161 , 183 , 221 , 119 H 242 , 121 , 17 , 166 , 183 , 203 , 127 , 40 , 6 , 28 /I 28 , 28 , 28 , 203 , 191 , 214 , 32 , 216 , 42 , 166 iJ 183 , 229 , 254 , 64 , 56 , 4 , 28 , 28 , 214 , 32 K 111 , 38 , 0 , 41 , 41 , 41 , 235 , 126 , 35 , 102 L 111 , 25 , 62 , 17 , 205 , 3 , 240 , 0 , 17 , 96 M 183 , 0 , 213 , 1 , 8 , 0 , 237 , 176 , 14 , 16 ON 225 , 229 , 9 , 34 , 166 , 183 , 225 , 221 , 78 , 239 O 221 , 113 , 241 , 221 , 70 , 238 , 221 , 112 , 240 , 229 P 213 , 197 , 6 , 8 , 197 , 14 , 8 , 175 , 221 , 70 Q 240 , 203 , 6 , 203 , 14 , 23 , 13 , 40 , 9 , 16 ;R 246 , 203 , 6 , 221 , 70 , 238 , 24 , 239 , 18 , 16 uS 5 , 221 , 70 , 238 , 203 , 6 , 120 , 35 , 19 , 193 T 16 , 218 , 221 , 119 , 240 , 0 , 0 , 0 , 65 , 14 U 8 , 197 , 221 , 70 , 241 , 213 , 126 , 18 , 13 , 40 "V 9 , 19 , 16 , 249 , 35 , 221 , 70 , 239 , 24 , 242 ^W 16 , 4 , 35 , 221 , 70 , 239 , 221 , 112 , 241 , 229 X 42 , 160 , 183 , 62 , 32 , 205 , 3 , 240 , 0 , 36 Y 34 , 160 , 183 , 225 , 209 , 193 , 16 , 209 , 33 , 160 Z 183 , 52 , 35 , 221 , 126 , 242 , 119 , 193 , 209 , 225 Q[ 16 , 143 , 225 , 34 , 166 , 183 , 62 , 18 , 205 , 189 j\ 183 , 201 , 0 , 0 yAUFRUF MC"(5,10);"Bitte eingeben:",(8,11);"MCWATCH";(141)6(10,11);"R";(141)@(12,11);"RUN";(141) J 18,19,15,25: 7,1: T 100,124 ^E000,11);"MCWATCH";(141)6(10,11);"R";(141)@(12,11);"RUN";(141) J 18,19,15,25: 7