\ 0jump 0000 1C5D BRANCH main 0002 1C5D BRANCH main \ depth 0004 6E81 ALU $6E81 0006 80FF LIT $FF 0008 730F ALU $730F \ true 000A 8000 LIT $0 000C 760C ALU $760C \ 1+ 000E 8001 LIT $1 0010 720F ALU $720F \ rot 0012 6147 ALU $6147 0014 6180 ALU $6180 0016 6B8D ALU $6B8D 0018 718C ALU $718C \ -rot 001A 6180 ALU $6180 001C 6147 ALU $6147 001E 6180 ALU $6180 0020 6B8D ALU $6B8D 0022 700C ALU $700C \ 0= 0024 8000 LIT $0 0026 770F ALU $770F \ tuck 0028 6180 ALU $6180 002A 718D ALU $718D \ 2drop 002C 6103 ALU $6103 002E 710F ALU $710F \ ?dup 0030 6081 ALU $6081 0032 201B 0BRANCH (then) 0034 6081 ALU $6081 \ (then) 0036 700C ALU $700C \ split 0038 6181 ALU $6181 003A 6303 ALU $6303 003C 4014 CALL tuck 003E 750F ALU $750F \ merge 0040 6147 ALU $6147 0042 6181 ALU $6181 0044 6503 ALU $6503 0046 6B8D ALU $6B8D 0048 6303 ALU $6303 004A 750F ALU $750F \ c@ 004C 6081 ALU $6081 004E 6C00 ALU $6C00 0050 6180 ALU $6180 0052 8001 LIT $1 0054 6303 ALU $6303 0056 202F 0BRANCH (else) 0058 8008 LIT $8 005A 6903 ALU $6903 005C 0031 BRANCH (then) \ (else) 005E 80FF LIT $FF 0060 6303 ALU $6303 \ (then) 0062 700C ALU $700C \ c! 0064 6180 ALU $6180 0066 80FF LIT $FF 0068 6303 ALU $6303 006A 6081 ALU $6081 006C 8008 LIT $8 006E 6D03 ALU $6D03 0070 6403 ALU $6403 0072 6180 ALU $6180 0074 4014 CALL tuck 0076 6081 ALU $6081 0078 6C00 ALU $6C00 007A 6180 ALU $6180 007C 8001 LIT $1 007E 6303 ALU $6303 0080 8000 LIT $0 0082 6703 ALU $6703 0084 80FF LIT $FF 0086 6503 ALU $6503 0088 4020 CALL merge 008A 6180 ALU $6180 008C 6023 ALU $6023 008E 710F ALU $710F \ c!be 0090 8001 LIT $1 0092 6503 ALU $6503 0094 0032 BRANCH c! \ looptest 0096 6B8D ALU $6B8D 0098 6B8D ALU $6B8D 009A 4007 CALL 1+ 009C 6B81 ALU $6B81 009E 6181 ALU $6181 00A0 6703 ALU $6703 00A2 6081 ALU $6081 00A4 2057 0BRANCH (else) 00A6 6003 ALU $6003 00A8 6B8D ALU $6B8D 00AA 6103 ALU $6103 00AC 0059 BRANCH (then) \ (else) 00AE 6180 ALU $6180 00B0 6147 ALU $6147 \ (then) 00B2 6180 ALU $6180 00B4 6147 ALU $6147 00B6 700C ALU $700C \ 2dup 00B8 6181 ALU $6181 00BA 718D ALU $718D \ +! 00BC 4014 CALL tuck 00BE 6C00 ALU $6C00 00C0 6203 ALU $6203 00C2 6180 ALU $6180 00C4 6023 ALU $6023 00C6 710F ALU $710F \ <> 00C8 6703 ALU $6703 00CA 760C ALU $760C \ 0<> 00CC 4012 CALL 0= 00CE 760C ALU $760C \ 0< 00D0 8000 LIT $0 00D2 780F ALU $780F \ 0>= 00D4 4068 CALL 0< 00D6 760C ALU $760C \ 0> 00D8 8000 LIT $0 \ > 00DA 6180 ALU $6180 00DC 780F ALU $780F \ >= 00DE 6803 ALU $6803 00E0 760C ALU $760C \ <= 00E2 406D CALL > 00E4 760C ALU $760C \ u> 00E6 6180 ALU $6180 00E8 7F0F ALU $7F0F \ negate 00EA 6600 ALU $6600 00EC 0007 BRANCH 1+ \ - 00EE 4075 CALL negate 00F0 720F ALU $720F \ abs 00F2 6081 ALU $6081 00F4 4068 CALL 0< 00F6 207D 0BRANCH (then) 00F8 4075 CALL negate \ (then) 00FA 700C ALU $700C \ min 00FC 405C CALL 2dup 00FE 6803 ALU $6803 \ ?: 0100 2083 0BRANCH (else) 0102 6103 ALU $6103 0104 0084 BRANCH (then) \ (else) 0106 6003 ALU $6003 \ (then) 0108 700C ALU $700C \ max 010A 405C CALL 2dup 010C 406D CALL > 010E 0080 BRANCH ?: \ cells 0110 8001 LIT $1 0112 7D0F ALU $7D0F \ cell+ 0114 8002 LIT $2 0116 720F ALU $720F \ 2- 0118 6A00 ALU $6A00 011A 7A0C ALU $7A0C \ 2/ 011C 8001 LIT $1 011E 790F ALU $790F \ c+! 0120 4014 CALL tuck 0122 4026 CALL c@ 0124 6203 ALU $6203 0126 6180 ALU $6180 0128 0032 BRANCH c! \ count 012A 6081 ALU $6081 012C 4007 CALL 1+ 012E 6180 ALU $6180 0130 0026 BRANCH c@ \ /string 0132 6081 ALU $6081 0134 6147 ALU $6147 0136 4077 CALL - 0138 6180 ALU $6180 013A 6B8D ALU $6B8D 013C 6203 ALU $6203 013E 718C ALU $718C \ aligned 0140 4007 CALL 1+ 0142 8001 LIT $1 0144 6600 ALU $6600 0146 730F ALU $730F \ sliteral 0148 6B8D ALU $6B8D 014A 4095 CALL count 014C 405C CALL 2dup 014E 6203 ALU $6203 0150 40A0 CALL aligned \ execute 0152 6147 ALU $6147 0154 700C ALU $700C \ 15down 0156 6003 ALU $6003 \ 14down 0158 6003 ALU $6003 \ 13down 015A 6003 ALU $6003 \ 12down 015C 6003 ALU $6003 \ 11down 015E 6003 ALU $6003 \ 10down 0160 6003 ALU $6003 \ 9down 0162 6003 ALU $6003 \ 8down 0164 6003 ALU $6003 \ 7down 0166 6003 ALU $6003 \ 6down 0168 6003 ALU $6003 \ 5down 016A 6003 ALU $6003 \ 4down 016C 6003 ALU $6003 \ 3down 016E 6003 ALU $6003 \ 2down 0170 6003 ALU $6003 \ 1down 0172 6003 ALU $6003 \ 0down 0174 710C ALU $710C \ 15up 0176 6001 ALU $6001 \ 14up 0178 6001 ALU $6001 \ 13up 017A 6001 ALU $6001 \ 12up 017C 6001 ALU $6001 \ 11up 017E 6001 ALU $6001 \ 10up 0180 6001 ALU $6001 \ 9up 0182 6001 ALU $6001 \ 8up 0184 6001 ALU $6001 \ 7up 0186 6001 ALU $6001 \ 6up 0188 6001 ALU $6001 \ 5up 018A 6001 ALU $6001 \ 4up 018C 6001 ALU $6001 \ 3up 018E 6001 ALU $6001 \ 2up 0190 6001 ALU $6001 \ 1up 0192 6001 ALU $6001 \ 0up 0194 700C ALU $700C \ pickbody 0196 6100 ALU $6100 0198 700C ALU $700C 019A 40B9 CALL 1down 019C 00C9 BRANCH 1up 019E 40B8 CALL 2down 01A0 00C8 BRANCH 2up 01A2 40B7 CALL 3down 01A4 00C7 BRANCH 3up 01A6 40B6 CALL 4down 01A8 00C6 BRANCH 4up 01AA 40B5 CALL 5down 01AC 00C5 BRANCH 5up 01AE 40B4 CALL 6down 01B0 00C4 BRANCH 6up 01B2 40B3 CALL 7down 01B4 00C3 BRANCH 7up 01B6 40B2 CALL 8down 01B8 00C2 BRANCH 8up 01BA 40B1 CALL 9down 01BC 00C1 BRANCH 9up 01BE 40B0 CALL 10down 01C0 00C0 BRANCH 10up 01C2 40AF CALL 11down 01C4 00BF BRANCH 11up 01C6 40AE CALL 12down 01C8 00BE BRANCH 12up 01CA 40AD CALL 13down 01CC 00BD BRANCH 13up 01CE 40AC CALL 14down 01D0 00BC BRANCH 14up 01D2 40AB CALL 15down 01D4 00BB BRANCH 15up \ pick 01D6 6081 ALU $6081 01D8 4088 CALL cells 01DA 4088 CALL cells 01DC 8196 LIT $196 01DE 6203 ALU $6203 01E0 00A9 BRANCH execute \ swapdown 01E2 6180 ALU $6180 01E4 700F ALU $700F \ swapdowns 01E6 40F1 CALL swapdown 01E8 40F1 CALL swapdown 01EA 40F1 CALL swapdown 01EC 40F1 CALL swapdown 01EE 40F1 CALL swapdown 01F0 40F1 CALL swapdown 01F2 40F1 CALL swapdown 01F4 40F1 CALL swapdown 01F6 40F1 CALL swapdown 01F8 40F1 CALL swapdown 01FA 40F1 CALL swapdown 01FC 40F1 CALL swapdown 01FE 40F1 CALL swapdown 0200 40F1 CALL swapdown 0202 40F1 CALL swapdown 0204 40F1 CALL swapdown \ swapdown0 0206 700C ALU $700C \ roll 0208 4088 CALL cells 020A 8194 LIT $194 020C 6181 ALU $6181 020E 4077 CALL - 0210 6147 ALU $6147 0212 8206 LIT $206 0214 6180 ALU $6180 0216 4077 CALL - 0218 00A9 BRANCH execute \ d= 021A 6147 ALU $6147 021C 4009 CALL rot 021E 6503 ALU $6503 0220 6180 ALU $6180 0222 6B8D ALU $6B8D 0224 6503 ALU $6503 0226 6403 ALU $6403 0228 0012 BRANCH 0= \ 2@ 022A 6081 ALU $6081 022C 6C00 ALU $6C00 022E 6180 ALU $6180 0230 408A CALL cell+ 0232 7C0C ALU $7C0C \ 2! 0234 4009 CALL rot 0236 6181 ALU $6181 0238 6023 ALU $6023 023A 6103 ALU $6103 023C 408A CALL cell+ 023E 6023 ALU $6023 0240 710F ALU $710F \ 2over 0242 6147 ALU $6147 0244 6147 ALU $6147 0246 405C CALL 2dup 0248 6B8D ALU $6B8D 024A 6B8D ALU $6B8D \ 2swap 024C 4009 CALL rot 024E 6147 ALU $6147 0250 4009 CALL rot 0252 6B8D ALU $6B8D 0254 700C ALU $700C \ 2nip 0256 4009 CALL rot 0258 6103 ALU $6103 025A 4009 CALL rot 025C 710F ALU $710F \ 2rot 025E 6180 ALU $6180 0260 6147 ALU $6147 0262 6147 ALU $6147 0264 4126 CALL 2swap 0266 6B8D ALU $6B8D 0268 6B8D ALU $6B8D 026A 6180 ALU $6180 026C 0126 BRANCH 2swap \ 2pick 026E 4088 CALL cells 0270 4007 CALL 1+ 0272 6081 ALU $6081 0274 4007 CALL 1+ 0276 40EB CALL pick 0278 6180 ALU $6180 027A 00EB BRANCH pick \ d+ 027C 4009 CALL rot 027E 6203 ALU $6203 0280 6147 ALU $6147 0282 6181 ALU $6181 0284 6203 ALU $6203 0286 6081 ALU $6081 0288 4009 CALL rot 028A 6F03 ALU $6F03 028C 214A 0BRANCH (else) 028E 6B8D ALU $6B8D 0290 4007 CALL 1+ 0292 014B BRANCH (then) \ (else) 0294 6B8D ALU $6B8D \ (then) 0296 700C ALU $700C \ +h 0298 6181 ALU $6181 029A 6203 ALU $6203 029C 4073 CALL u> 029E 8001 LIT $1 02A0 730F ALU $730F \ +1c 02A2 405C CALL 2dup 02A4 414C CALL +h 02A6 6203 ALU $6203 02A8 720F ALU $720F \ s>d 02AA 6081 ALU $6081 02AC 0068 BRANCH 0< \ d1+ 02AE 8001 LIT $1 02B0 8000 LIT $0 02B2 013E BRANCH d+ \ dnegate 02B4 6600 ALU $6600 02B6 6180 ALU $6180 02B8 6600 ALU $6600 02BA 6180 ALU $6180 02BC 0157 BRANCH d1+ \ DABS 02BE 6081 ALU $6081 02C0 4068 CALL 0< 02C2 2163 0BRANCH (then) 02C4 415A CALL dnegate \ (then) 02C6 700C ALU $700C \ d- 02C8 415A CALL dnegate 02CA 013E BRANCH d+ \ dz 02CC 8000 LIT $0 02CE 6081 ALU $6081 02D0 4009 CALL rot 02D2 011A BRANCH 2! \ dxor 02D4 4009 CALL rot 02D6 6503 ALU $6503 02D8 400D CALL -rot 02DA 6503 ALU $6503 02DC 718C ALU $718C \ dand 02DE 4009 CALL rot 02E0 6303 ALU $6303 02E2 400D CALL -rot 02E4 6303 ALU $6303 02E6 718C ALU $718C \ dor 02E8 4009 CALL rot 02EA 6403 ALU $6403 02EC 400D CALL -rot 02EE 6403 ALU $6403 02F0 718C ALU $718C \ dinvert 02F2 6600 ALU $6600 02F4 6180 ALU $6180 02F6 6600 ALU $6600 02F8 718C ALU $718C \ d< 02FA 4009 CALL rot 02FC 405C CALL 2dup 02FE 6703 ALU $6703 0300 2184 0BRANCH (else) 0302 4016 CALL 2drop 0304 6F03 ALU $6F03 0306 0186 BRANCH (then) \ (else) 0308 412B CALL 2nip 030A 406D CALL > \ (then) 030C 700C ALU $700C \ d> 030E 4126 CALL 2swap 0310 017D BRANCH d< \ d0<= 0312 8000 LIT $0 0314 8000 LIT $0 \ d<= 0316 4187 CALL d> 0318 760C ALU $760C \ d>= 031A 417D CALL d< 031C 760C ALU $760C \ d0= 031E 6403 ALU $6403 0320 0012 BRANCH 0= \ d0< 0322 8000 LIT $0 0324 8000 LIT $0 0326 017D BRANCH d< \ d0<> 0328 418F CALL d0= 032A 760C ALU $760C \ d<> 032C 410D CALL d= 032E 760C ALU $760C \ d2* 0330 405C CALL 2dup 0332 013E BRANCH d+ \ d2/ 0334 6081 ALU $6081 0336 800F LIT $F 0338 6D03 ALU $6D03 033A 6147 ALU $6147 033C 408E CALL 2/ 033E 6180 ALU $6180 0340 408E CALL 2/ 0342 6B8D ALU $6B8D 0344 6403 ALU $6403 0346 718C ALU $718C \ dmax 0348 4121 CALL 2over 034A 4121 CALL 2over 034C 417D CALL d< 034E 21A9 0BRANCH (then) 0350 4126 CALL 2swap \ (then) 0352 0016 BRANCH 2drop \ d1- 0354 8000 LIT $0 0356 6600 ALU $6600 0358 8000 LIT $0 035A 6600 ALU $6600 035C 013E BRANCH d+ \ d+! 035E 6081 ALU $6081 0360 6147 ALU $6147 0362 4115 CALL 2@ 0364 413E CALL d+ 0366 6B8D ALU $6B8D 0368 011A BRANCH 2! \ move 036A 8000 LIT $0 036C 6180 ALU $6180 036E 6147 ALU $6147 0370 6147 ALU $6147 \ (do) 0372 6181 ALU $6181 0374 6C00 ALU $6C00 0376 6181 ALU $6181 0378 6023 ALU $6023 037A 6103 ALU $6103 037C 408A CALL cell+ 037E 6180 ALU $6180 0380 408A CALL cell+ 0382 6180 ALU $6180 0384 404B CALL looptest 0386 21B9 0BRANCH (do) 0388 0016 BRANCH 2drop \ cmove 038A 8000 LIT $0 038C 6180 ALU $6180 038E 6147 ALU $6147 0390 6147 ALU $6147 \ (do) 0392 6181 ALU $6181 0394 4026 CALL c@ 0396 6181 ALU $6181 0398 4032 CALL c! 039A 4007 CALL 1+ 039C 6180 ALU $6180 039E 4007 CALL 1+ 03A0 6180 ALU $6180 03A2 404B CALL looptest 03A4 21C9 0BRANCH (do) 03A6 0016 BRANCH 2drop \ bounds 03A8 6181 ALU $6181 03AA 6203 ALU $6203 03AC 718C ALU $718C \ fill 03AE 6147 ALU $6147 03B0 41D4 CALL bounds \ (begin) 03B2 6581 ALU $6581 03B4 21E0 0BRANCH (repeat) 03B6 6B81 ALU $6B81 03B8 6181 ALU $6181 03BA 4032 CALL c! 03BC 4007 CALL 1+ 03BE 01D9 BRANCH (begin) \ (repeat) 03C0 6B8D ALU $6B8D 03C2 6103 ALU $6103 03C4 0016 BRANCH 2drop \ um* 03C6 E100 LIT $6100 03C8 6023 ALU $6023 03CA 6103 ALU $6103 03CC E102 LIT $6102 03CE 6023 ALU $6023 03D0 6103 ALU $6103 03D2 E104 LIT $6104 03D4 0115 BRANCH 2@ \ * 03D6 41E3 CALL um* 03D8 710F ALU $710F \ abssgn 03DA 405C CALL 2dup 03DC 6503 ALU $6503 03DE 4068 CALL 0< 03E0 6147 ALU $6147 03E2 4079 CALL abs 03E4 6180 ALU $6180 03E6 4079 CALL abs 03E8 6180 ALU $6180 03EA 6B8D ALU $6B8D 03EC 700C ALU $700C \ m* 03EE 41ED CALL abssgn 03F0 6147 ALU $6147 03F2 41E3 CALL um* 03F4 6B8D ALU $6B8D 03F6 21FD 0BRANCH (then) 03F8 415A CALL dnegate \ (then) 03FA 700C ALU $700C \ divstep 03FC 4088 CALL cells 03FE 6181 ALU $6181 0400 4068 CALL 0< 0402 2203 0BRANCH (then) 0404 4007 CALL 1+ \ (then) 0406 6180 ALU $6180 0408 4088 CALL cells 040A 6180 ALU $6180 040C 4009 CALL rot 040E 405C CALL 2dup 0410 406F CALL >= 0412 2211 0BRANCH (else) 0414 4014 CALL tuck 0416 4077 CALL - 0418 6180 ALU $6180 041A 4009 CALL rot 041C 4007 CALL 1+ 041E 4009 CALL rot 0420 0212 BRANCH (then) \ (else) 0422 400D CALL -rot \ (then) 0424 700C ALU $700C \ um/mod 0426 400D CALL -rot 0428 41FE CALL divstep 042A 41FE CALL divstep 042C 41FE CALL divstep 042E 41FE CALL divstep 0430 41FE CALL divstep 0432 41FE CALL divstep 0434 41FE CALL divstep 0436 41FE CALL divstep 0438 41FE CALL divstep 043A 41FE CALL divstep 043C 41FE CALL divstep 043E 41FE CALL divstep 0440 41FE CALL divstep 0442 41FE CALL divstep 0444 41FE CALL divstep 0446 41FE CALL divstep 0448 4009 CALL rot 044A 6103 ALU $6103 044C 718C ALU $718C \ /mod 044E 6147 ALU $6147 0450 4155 CALL s>d 0452 6B8D ALU $6B8D \ SM/REM 0454 6181 ALU $6181 0456 6147 ALU $6147 0458 6147 ALU $6147 045A 415F CALL DABS 045C 6B81 ALU $6B81 045E 4079 CALL abs 0460 4213 CALL um/mod 0462 6B8D ALU $6B8D 0464 6B81 ALU $6B81 0466 6503 ALU $6503 0468 4068 CALL 0< 046A 2237 0BRANCH (then) 046C 4075 CALL negate \ (then) 046E 6B8D ALU $6B8D 0470 4068 CALL 0< 0472 223D 0BRANCH (then) 0474 6147 ALU $6147 0476 4075 CALL negate 0478 6B8D ALU $6B8D \ (then) 047A 700C ALU $700C \ / 047C 4227 CALL /mod 047E 700F ALU $700F \ mod 0480 4227 CALL /mod 0482 710F ALU $710F \ */mod 0484 6147 ALU $6147 0486 41F7 CALL m* 0488 6B8D ALU $6B8D 048A 022A BRANCH SM/REM \ */ 048C 4242 CALL */mod 048E 700F ALU $700F \ t2* 0490 6181 ALU $6181 0492 6147 ALU $6147 0494 6147 ALU $6147 0496 4198 CALL d2* 0498 6B8D ALU $6B8D 049A 4088 CALL cells 049C 6B8D ALU $6B8D 049E 4068 CALL 0< 04A0 8001 LIT $1 04A2 6303 ALU $6303 04A4 720F ALU $720F \ divisor 04A6 0000 BRANCH 0jump \ m*/mod 04A8 84A6 LIT $4A6 04AA 6023 ALU $6023 04AC 6103 ALU $6103 04AE 4014 CALL tuck 04B0 41E3 CALL um* 04B2 4126 CALL 2swap 04B4 41E3 CALL um* 04B6 6180 ALU $6180 04B8 6147 ALU $6147 04BA 8000 LIT $0 04BC 413E CALL d+ 04BE 6B8D ALU $6B8D 04C0 400D CALL -rot 04C2 8020 LIT $20 04C4 6147 ALU $6147 04C6 8000 LIT $0 04C8 6147 ALU $6147 \ (do) 04CA 4248 CALL t2* 04CC 6081 ALU $6081 04CE 84A6 LIT $4A6 04D0 6C00 ALU $6C00 04D2 406F CALL >= 04D4 2271 0BRANCH (then) 04D6 84A6 LIT $4A6 04D8 6C00 ALU $6C00 04DA 4077 CALL - 04DC 4009 CALL rot 04DE 4007 CALL 1+ 04E0 400D CALL -rot \ (then) 04E2 404B CALL looptest 04E4 2265 0BRANCH (do) 04E6 700C ALU $700C \ m*/ 04E8 4254 CALL m*/mod 04EA 710F ALU $710F \ base 04EC 0000 BRANCH 0jump \ hld 04EE 0000 BRANCH 0jump \ pad 04F0 FFFF LIT $7FFF 04F2 FFFF LIT $7FFF 04F4 FFFF LIT $7FFF 04F6 FFFF LIT $7FFF 04F8 FFFF LIT $7FFF 04FA FFFF LIT $7FFF 04FC FFFF LIT $7FFF 04FE FFFF LIT $7FFF 0500 FFFF LIT $7FFF 0502 FFFF LIT $7FFF 0504 FFFF LIT $7FFF 0506 FFFF LIT $7FFF 0508 FFFF LIT $7FFF 050A FFFF LIT $7FFF 050C FFFF LIT $7FFF 050E FFFF LIT $7FFF 0510 FFFF LIT $7FFF 0512 FFFF LIT $7FFF 0514 FFFF LIT $7FFF 0516 FFFF LIT $7FFF 0518 FFFF LIT $7FFF 051A FFFF LIT $7FFF 051C FFFF LIT $7FFF 051E FFFF LIT $7FFF 0520 FFFF LIT $7FFF 0522 FFFF LIT $7FFF 0524 FFFF LIT $7FFF 0526 FFFF LIT $7FFF 0528 FFFF LIT $7FFF 052A FFFF LIT $7FFF 052C FFFF LIT $7FFF 052E FFFF LIT $7FFF 0530 FFFF LIT $7FFF 0532 FFFF LIT $7FFF 0534 FFFF LIT $7FFF 0536 FFFF LIT $7FFF 0538 FFFF LIT $7FFF 053A FFFF LIT $7FFF 053C FFFF LIT $7FFF 053E FFFF LIT $7FFF 0540 FFFF LIT $7FFF 0542 FFFF LIT $7FFF \ pad| 0544 8544 LIT $544 0546 84EE LIT $4EE 0548 6023 ALU $6023 054A 710F ALU $710F \ DIGIT 054C 8009 LIT $9 054E 6181 ALU $6181 0550 6803 ALU $6803 0552 8007 LIT $7 0554 6303 ALU $6303 0556 6203 ALU $6203 0558 8030 LIT $30 055A 720F ALU $720F \ HOLD 055C 84EE LIT $4EE 055E 6C00 ALU $6C00 0560 6A00 ALU $6A00 0562 6081 ALU $6081 0564 84EE LIT $4EE 0566 6023 ALU $6023 0568 6103 ALU $6103 056A 0032 BRANCH c! \ # 056C 8000 LIT $0 056E 84EC LIT $4EC 0570 6C00 ALU $6C00 0572 4213 CALL um/mod 0574 6147 ALU $6147 0576 84EC LIT $4EC 0578 6C00 ALU $6C00 057A 4213 CALL um/mod 057C 6180 ALU $6180 057E 42A6 CALL DIGIT 0580 42AE CALL HOLD 0582 6B8D ALU $6B8D 0584 700C ALU $700C \ #S 0586 42B6 CALL # 0588 405C CALL 2dup 058A 6403 ALU $6403 058C 4012 CALL 0= 058E 22C3 0BRANCH #S 0590 700C ALU $700C \ #> 0592 4016 CALL 2drop 0594 84EE LIT $4EE 0596 6C00 ALU $6C00 0598 8544 LIT $544 059A 6181 ALU $6181 059C 0077 BRANCH - \ SIGN 059E 4068 CALL 0< 05A0 22D3 0BRANCH (then) 05A2 802D LIT $2D 05A4 42AE CALL HOLD \ (then) 05A6 700C ALU $700C \ emit-uart 05A8 710F ALU $710F \ 'emit 05AA 05A8 BRANCH $B50 \ emit 05AC 85AA LIT $5AA 05AE 6C00 ALU $6C00 05B0 00A9 BRANCH execute \ cr 05B2 800D LIT $D 05B4 42D6 CALL emit 05B6 800A LIT $A 05B8 02D6 BRANCH emit \ space 05BA 8020 LIT $20 05BC 02D6 BRANCH emit \ spaces 05BE 6081 ALU $6081 05C0 406C CALL 0> 05C2 22E5 0BRANCH (repeat) 05C4 42DD CALL space 05C6 6A00 ALU $6A00 05C8 02DF BRANCH spaces \ (repeat) 05CA 710F ALU $710F \ hex1 05CC 800F LIT $F 05CE 6303 ALU $6303 05D0 6081 ALU $6081 05D2 800A LIT $A 05D4 6803 ALU $6803 05D6 22EE 0BRANCH (else) 05D8 8030 LIT $30 05DA 02EF BRANCH (then) \ (else) 05DC 8037 LIT $37 \ (then) 05DE 6203 ALU $6203 05E0 02D6 BRANCH emit \ hex2 05E2 6081 ALU $6081 05E4 8004 LIT $4 05E6 6903 ALU $6903 05E8 42E6 CALL hex1 05EA 02E6 BRANCH hex1 \ hex4 05EC 6081 ALU $6081 05EE 8008 LIT $8 05F0 6903 ALU $6903 05F2 42F1 CALL hex2 05F4 02F1 BRANCH hex2 \ hex8 05F6 42F6 CALL hex4 05F8 02F6 BRANCH hex4 \ type 05FA 8000 LIT $0 05FC 6180 ALU $6180 05FE 6147 ALU $6147 0600 6147 ALU $6147 \ (do) 0602 6081 ALU $6081 0604 4026 CALL c@ 0606 42D6 CALL emit 0608 4007 CALL 1+ 060A 404B CALL looptest 060C 2301 0BRANCH (do) 060E 710F ALU $710F \ dump 0610 6147 ALU $6147 0612 8000 LIT $0 0614 6147 ALU $6147 \ (do) 0616 6081 ALU $6081 0618 800F LIT $F 061A 6303 ALU $6303 061C 4012 CALL 0= 061E 2317 0BRANCH (then) 0620 6081 ALU $6081 0622 42D9 CALL cr 0624 42F6 CALL hex4 0626 803A LIT $3A 0628 42D6 CALL emit 062A 42DD CALL space 062C 42DD CALL space \ (then) 062E 6081 ALU $6081 0630 4026 CALL c@ 0632 42F1 CALL hex2 0634 42DD CALL space 0636 4007 CALL 1+ 0638 404B CALL looptest 063A 230B 0BRANCH (do) 063C 42D9 CALL cr 063E 710F ALU $710F \ dump16 0640 6147 ALU $6147 0642 8000 LIT $0 0644 6147 ALU $6147 \ (do) 0646 6081 ALU $6081 0648 42F6 CALL hex4 064A 803A LIT $3A 064C 42D6 CALL emit 064E 42DD CALL space 0650 6081 ALU $6081 0652 6C00 ALU $6C00 0654 42F6 CALL hex4 0656 42D9 CALL cr 0658 408A CALL cell+ 065A 404B CALL looptest 065C 2323 0BRANCH (do) 065E 710F ALU $710F \ decimal 0660 800A LIT $A 0662 84EC LIT $4EC 0664 6023 ALU $6023 0666 710F ALU $710F \ hex 0668 8010 LIT $10 066A 84EC LIT $4EC 066C 6023 ALU $6023 066E 710F ALU $710F \ S.R 0670 6181 ALU $6181 0672 4077 CALL - 0674 42DF CALL spaces 0676 02FD BRANCH type \ D.R 0678 6147 ALU $6147 067A 6081 ALU $6081 067C 6147 ALU $6147 067E 415F CALL DABS 0680 42A2 CALL pad| 0682 42C3 CALL #S 0684 6B8D ALU $6B8D 0686 42CF CALL SIGN 0688 42C9 CALL #> 068A 6B8D ALU $6B8D 068C 0338 BRANCH S.R \ U.R 068E 8000 LIT $0 0690 6180 ALU $6180 0692 033C BRANCH D.R \ .R 0694 6147 ALU $6147 0696 4155 CALL s>d 0698 6B8D ALU $6B8D 069A 033C BRANCH D.R \ D. 069C 8000 LIT $0 069E 433C CALL D.R 06A0 02DD BRANCH space \ U. 06A2 8000 LIT $0 06A4 034E BRANCH D. \ . 06A6 84EC LIT $4EC 06A8 6C00 ALU $6C00 06AA 800A LIT $A 06AC 6503 ALU $6503 06AE 235A 0BRANCH (then) 06B0 4351 CALL U. 06B2 700C ALU $700C \ (then) 06B4 4155 CALL s>d 06B6 034E BRANCH D. \ ? 06B8 6C00 ALU $6C00 06BA 0353 BRANCH . \ DIGIT? 06BC 6147 ALU $6147 06BE 8030 LIT $30 06C0 4077 CALL - 06C2 8009 LIT $9 06C4 6181 ALU $6181 06C6 6803 ALU $6803 06C8 236B 0BRANCH (then) 06CA 8007 LIT $7 06CC 4077 CALL - 06CE 6081 ALU $6081 06D0 800A LIT $A 06D2 6803 ALU $6803 06D4 6403 ALU $6403 \ (then) 06D6 6081 ALU $6081 06D8 6B8D ALU $6B8D 06DA 7F0F ALU $7F0F \ >number 06DC 6081 ALU $6081 06DE 4012 CALL 0= 06E0 2372 0BRANCH (then) 06E2 700C ALU $700C \ (then) 06E4 6181 ALU $6181 06E6 4026 CALL c@ 06E8 84EC LIT $4EC 06EA 6C00 ALU $6C00 06EC 435E CALL DIGIT? 06EE 2386 0BRANCH (else) 06F0 6147 ALU $6147 06F2 4126 CALL 2swap 06F4 6103 ALU $6103 06F6 84EC LIT $4EC 06F8 6C00 ALU $6C00 06FA 41E3 CALL um* 06FC 6B8D ALU $6B8D 06FE 4155 CALL s>d 0700 413E CALL d+ 0702 4126 CALL 2swap 0704 8001 LIT $1 0706 4099 CALL /string 0708 436E CALL >number 070A 0388 BRANCH (then) \ (else) 070C 6103 ALU $6103 070E 700C ALU $700C \ (then) 0710 036E BRANCH >number 0712 700C ALU $700C \ .s 0714 803C LIT $3C 0716 42D6 CALL emit 0718 4002 CALL depth 071A 6081 ALU $6081 071C 42F1 CALL hex2 071E 803E LIT $3E 0720 42D6 CALL emit 0722 8008 LIT $8 0724 407E CALL min 0726 4018 CALL ?dup 0728 239E 0BRANCH (then) 072A 6147 ALU $6147 072C 8000 LIT $0 072E 6147 ALU $6147 \ (do) 0730 6B81 ALU $6B81 0732 40EB CALL pick 0734 42F6 CALL hex4 0736 42DD CALL space 0738 404B CALL looptest 073A 2398 0BRANCH (do) \ (then) 073C 700C ALU $700C \ (assert) 073E 40A4 CALL sliteral 0740 2A1B 0BRANCH $1436 0742 2A2A 0BRANCH (then) 0744 202A 0BRANCH $54 0746 5341 CALL $2682 0748 4553 CALL $AA6 074A 5452 CALL $28A4 074C 4F49 CALL $1E92 074E 204E 0BRANCH $9C 0750 4146 CALL $28C 0752 4C49 CALL $1892 0754 4445 CALL timeq 0756 2A20 0BRANCH $1440 0758 2A2A 0BRANCH (then) 075A 202A 0BRANCH $54 075C 42FD CALL type \ (snap) 075E 42FD CALL type 0760 42DD CALL space 0762 40A4 CALL sliteral 0764 4C05 CALL $180A 0766 4E49 CALL $1C92 0768 2045 0BRANCH $8A 076A 42FD CALL type 076C 4353 CALL . 076E 803A LIT $3A 0770 42D6 CALL emit 0772 42DD CALL space 0774 438A CALL .s 0776 02D9 BRANCH cr \ endian 0778 6081 ALU $6081 077A 8008 LIT $8 077C 6D03 ALU $6D03 077E 6180 ALU $6180 0780 8008 LIT $8 0782 6903 ALU $6903 0784 740F ALU $740F \ 2endian 0786 43BC CALL endian 0788 6180 ALU $6180 078A 03BC BRANCH endian \ swab 078C 03BC BRANCH endian \ typepad 078E 6181 ALU $6181 0790 4077 CALL - 0792 6147 ALU $6147 0794 42FD CALL type 0796 6B8D ALU $6B8D 0798 02DF BRANCH spaces \ even? 079A 8001 LIT $1 079C 6303 ALU $6303 079E 0012 BRANCH 0= \ rise? 07A0 405C CALL 2dup 07A2 6C00 ALU $6C00 07A4 4073 CALL u> 07A6 6147 ALU $6147 07A8 6023 ALU $6023 07AA 6103 ALU $6103 07AC 6B8D ALU $6B8D 07AE 700C ALU $700C \ fall? 07B0 405C CALL 2dup 07B2 6C00 ALU $6C00 07B4 6F03 ALU $6F03 07B6 6147 ALU $6147 07B8 6023 ALU $6023 07BA 6103 ALU $6103 07BC 6B8D ALU $6B8D 07BE 700C ALU $700C \ version 07C0 40A4 CALL sliteral 07C2 3608 0BRANCH $2C10 07C4 3934 0BRANCH $3268 07C6 363A 0BRANCH $2C74 07C8 3935 0BRANCH $326A 07CA FF4D LIT $7F4D 07CC 700C ALU $700C \ builddate 07CE 9519 LIT $1519 07D0 6600 ALU $6600 07D2 CCFB LIT $4CFB 07D4 831F LIT $31F 07D6 760C ALU $760C \ pause144 07D8 8000 LIT $0 07DA 802D LIT $2D \ (begin) 07DC 6A00 ALU $6A00 07DE 6781 ALU $6781 07E0 23EE 0BRANCH (begin) 07E2 0016 BRANCH 2drop \ serout 07E4 8300 LIT $300 07E6 6403 ALU $6403 07E8 4088 CALL cells \ (begin) 07EA 6081 ALU $6081 07EC D000 LIT $5000 07EE 6023 ALU $6023 07F0 6103 ALU $6103 07F2 408E CALL 2/ 07F4 43EC CALL pause144 07F6 43EC CALL pause144 07F8 6081 ALU $6081 07FA 4012 CALL 0= 07FC 23F5 0BRANCH (begin) 07FE 6103 ALU $6103 0800 43EC CALL pause144 0802 43EC CALL pause144 0804 43EC CALL pause144 0806 03EC BRANCH pause144 \ frac 0808 6147 ALU $6147 080A 405C CALL 2dup 080C 8001 LIT $1 080E 6B81 ALU $6B81 0810 4274 CALL m*/ 0812 4126 CALL 2swap 0814 4121 CALL 2over 0816 6B8D ALU $6B8D 0818 8001 LIT $1 081A 4274 CALL m*/ 081C 4164 CALL d- 081E 710F ALU $710F \ .2 0820 4155 CALL s>d 0822 42A2 CALL pad| 0824 42B6 CALL # 0826 42B6 CALL # 0828 42C9 CALL #> 082A 02FD BRANCH type \ build. 082C 4330 CALL decimal 082E 43E7 CALL builddate 0830 6103 ALU $6103 0832 F07F LIT $707F 0834 6600 ALU $6600 0836 4155 CALL s>d 0838 413E CALL d+ 083A 8001 LIT $1 083C 803C LIT $3C 083E 4254 CALL m*/mod 0840 6147 ALU $6147 0842 8001 LIT $1 0844 803C LIT $3C 0846 4254 CALL m*/mod 0848 6147 ALU $6147 084A 8001 LIT $1 084C 8018 LIT $18 084E 4254 CALL m*/mod 0850 6147 ALU $6147 0852 4016 CALL 2drop 0854 6B8D ALU $6B8D 0856 4410 CALL .2 0858 803A LIT $3A 085A 42D6 CALL emit 085C 6B8D ALU $6B8D 085E 4410 CALL .2 0860 803A LIT $3A 0862 42D6 CALL emit 0864 6B8D ALU $6B8D 0866 0410 BRANCH .2 \ net-my-mac 0868 9234 LIT $1234 086A D677 LIT $5677 086C F777 LIT $7777 086E 700C ALU $700C \ prevth 0870 0000 BRANCH 0jump \ timeh 0872 0000 BRANCH 0jump 0874 0000 BRANCH 0jump \ time@ 0876 E000 LIT $6000 0878 4115 CALL 2@ 087A E000 LIT $6000 087C 4115 CALL 2@ 087E 4121 CALL 2over 0880 4196 CALL d<> 0882 2444 0BRANCH (repeat) 0884 4016 CALL 2drop 0886 043B BRANCH time@ \ (repeat) 0888 700C ALU $700C \ timeq 088A 443B CALL time@ 088C 8872 LIT $872 088E 0115 BRANCH 2@ \ setalarm 0890 6147 ALU $6147 0892 443B CALL time@ 0894 413E CALL d+ 0896 6B8D ALU $6B8D 0898 011A BRANCH 2! \ isalarm 089A 4115 CALL 2@ 089C 443B CALL time@ 089E 4164 CALL d- 08A0 0189 BRANCH d0<= \ sleeper 08A2 0000 BRANCH 0jump 08A4 0000 BRANCH 0jump \ sleepus 08A6 88A2 LIT $8A2 08A8 4448 CALL setalarm \ (begin) 08AA 88A2 LIT $8A2 08AC 444D CALL isalarm 08AE 2455 0BRANCH (begin) 08B0 700C ALU $700C \ sleep.1 08B2 F95F LIT $795F 08B4 6600 ALU $6600 08B6 8001 LIT $1 08B8 0453 BRANCH sleepus \ sleep1 08BA C240 LIT $4240 08BC 800F LIT $F 08BE 0453 BRANCH sleepus \ took 08C0 443B CALL time@ 08C2 4126 CALL 2swap 08C4 4164 CALL d- 08C6 40A4 CALL sliteral 08C8 7405 ALU $7405 08CA 6F6F ALU $6F6F 08CC 206B 0BRANCH $D6 08CE 42FD CALL type 08D0 434E CALL D. 08D2 02D9 BRANCH cr \ ne2sel 08D4 8000 LIT $0 08D6 D100 LIT $5100 08D8 6023 ALU $6023 08DA 710F ALU $710F \ ne2unsel 08DC 4005 CALL true 08DE D100 LIT $5100 08E0 6023 ALU $6023 08E2 710F ALU $710F \ ne2a 08E4 D103 LIT $5103 08E6 6023 ALU $6023 08E8 710F ALU $710F \ ne2rc@ 08EA 4005 CALL true 08EC D102 LIT $5102 08EE 6023 ALU $6023 08F0 6103 ALU $6103 08F2 4005 CALL true 08F4 D101 LIT $5101 08F6 6023 ALU $6023 08F8 6103 ALU $6103 08FA 446A CALL ne2sel 08FC 4472 CALL ne2a 08FE 8000 LIT $0 0900 D106 LIT $5106 0902 6023 ALU $6023 0904 6103 ALU $6103 0906 D105 LIT $5105 0908 6C00 ALU $6C00 090A 80FF LIT $FF 090C 6303 ALU $6303 090E 4005 CALL true 0910 D106 LIT $5106 0912 6023 ALU $6023 0914 710F ALU $710F \ ne2rc! 0916 4005 CALL true 0918 D102 LIT $5102 091A 6023 ALU $6023 091C 6103 ALU $6103 091E 446A CALL ne2sel 0920 4472 CALL ne2a 0922 D105 LIT $5105 0924 6023 ALU $6023 0926 6103 ALU $6103 0928 8000 LIT $0 092A D104 LIT $5104 092C 6023 ALU $6023 092E 6103 ALU $6103 0930 8000 LIT $0 0932 D107 LIT $5107 0934 6023 ALU $6023 0936 6103 ALU $6103 0938 4005 CALL true 093A D107 LIT $5107 093C 6023 ALU $6023 093E 6103 ALU $6103 0940 8001 LIT $1 0942 D104 LIT $5104 0944 6023 ALU $6023 0946 710F ALU $710F \ ne2r! 0948 6181 ALU $6181 094A 8008 LIT $8 094C 6903 ALU $6903 094E 6181 ALU $6181 0950 4007 CALL 1+ 0952 448B CALL ne2rc! 0954 048B BRANCH ne2rc! \ ne2r. 0956 8010 LIT $10 0958 6147 ALU $6147 095A 8000 LIT $0 095C 6147 ALU $6147 \ (do) 095E 83E8 LIT $3E8 0960 6147 ALU $6147 0962 8000 LIT $0 0964 6147 ALU $6147 \ (do) 0966 43EC CALL pause144 0968 404B CALL looptest 096A 24B3 0BRANCH (do) 096C 6B81 ALU $6B81 096E 42F1 CALL hex2 0970 42DD CALL space 0972 6B81 ALU $6B81 0974 4475 CALL ne2rc@ 0976 42F6 CALL hex4 0978 42D9 CALL cr 097A 404B CALL looptest 097C 24AF 0BRANCH (do) 097E 700C ALU $700C \ ne2-page0 0980 8022 LIT $22 0982 8000 LIT $0 0984 048B BRANCH ne2rc! \ ne2-page1 0986 8062 LIT $62 0988 8000 LIT $0 098A 048B BRANCH ne2rc! \ ne2-clrisr 098C 80FF LIT $FF 098E 8007 LIT $7 0990 048B BRANCH ne2rc! \ ne2r.2 0992 40A4 CALL sliteral 0994 5006 CALL $200C 0996 6761 ALU $6761 0998 2065 0BRANCH $CA 099A FF30 LIT $7F30 099C 42FD CALL type 099E 42D9 CALL cr 09A0 44C0 CALL ne2-page0 09A2 44AB CALL ne2r. 09A4 40A4 CALL sliteral 09A6 5006 CALL $200C 09A8 6761 ALU $6761 09AA 2065 0BRANCH $CA 09AC FF31 LIT $7F31 09AE 42FD CALL type 09B0 42D9 CALL cr 09B2 44C3 CALL ne2-page1 09B4 44AB CALL ne2r. 09B6 04C0 BRANCH ne2-page0 \ eep-on 09B8 8014 LIT $14 09BA 4475 CALL ne2rc@ 09BC 6403 ALU $6403 09BE 8014 LIT $14 09C0 048B BRANCH ne2rc! \ eep-off 09C2 6600 ALU $6600 09C4 8014 LIT $14 09C6 4475 CALL ne2rc@ 09C8 6303 ALU $6303 09CA 8014 LIT $14 09CC 048B BRANCH ne2rc! \ miix 09CE 4014 CALL tuck 09D0 8010 LIT $10 09D2 6180 ALU $6180 09D4 4077 CALL - 09D6 6D03 ALU $6D03 09D8 6180 ALU $6180 09DA 6147 ALU $6147 09DC 8000 LIT $0 09DE 6147 ALU $6147 \ (do) 09E0 8008 LIT $8 09E2 6181 ALU $6181 09E4 4068 CALL 0< 09E6 24F6 0BRANCH (else) 09E8 44DC CALL eep-on 09EA 04F7 BRANCH (then) \ (else) 09EC 44E1 CALL eep-off \ (then) 09EE 8001 LIT $1 09F0 44DC CALL eep-on 09F2 4088 CALL cells 09F4 8014 LIT $14 09F6 4475 CALL ne2rc@ 09F8 8004 LIT $4 09FA 6303 ALU $6303 09FC 2500 0BRANCH (then) 09FE 4007 CALL 1+ \ (then) 0A00 8001 LIT $1 0A02 44E1 CALL eep-off 0A04 404B CALL looptest 0A06 24F0 0BRANCH (do) 0A08 700C ALU $700C \ phy@ 0A0A 8000 LIT $0 0A0C 6600 ALU $6600 0A0E 8010 LIT $10 0A10 44E7 CALL miix 0A12 6103 ALU $6103 0A14 8000 LIT $0 0A16 6600 ALU $6600 0A18 8010 LIT $10 0A1A 44E7 CALL miix 0A1C 6103 ALU $6103 0A1E 80D0 LIT $D0 0A20 8009 LIT $9 0A22 44E7 CALL miix 0A24 6103 ALU $6103 0A26 8005 LIT $5 0A28 44E7 CALL miix 0A2A 6103 ALU $6103 0A2C 8000 LIT $0 0A2E 8001 LIT $1 0A30 44E7 CALL miix 0A32 6103 ALU $6103 0A34 8000 LIT $0 0A36 8010 LIT $10 0A38 04E7 BRANCH miix \ phy! 0A3A 8000 LIT $0 0A3C 6600 ALU $6600 0A3E 8010 LIT $10 0A40 44E7 CALL miix 0A42 6103 ALU $6103 0A44 8000 LIT $0 0A46 6600 ALU $6600 0A48 8010 LIT $10 0A4A 44E7 CALL miix 0A4C 6103 ALU $6103 0A4E 80B0 LIT $B0 0A50 8009 LIT $9 0A52 44E7 CALL miix 0A54 6103 ALU $6103 0A56 8005 LIT $5 0A58 44E7 CALL miix 0A5A 6103 ALU $6103 0A5C 8002 LIT $2 0A5E 8002 LIT $2 0A60 44E7 CALL miix 0A62 6103 ALU $6103 0A64 8010 LIT $10 0A66 44E7 CALL miix 0A68 710F ALU $710F \ phy. 0A6A 8020 LIT $20 0A6C 6147 ALU $6147 0A6E 8000 LIT $0 0A70 6147 ALU $6147 \ (do) 0A72 6B81 ALU $6B81 0A74 42F1 CALL hex2 0A76 42DD CALL space 0A78 6B81 ALU $6B81 0A7A 4505 CALL phy@ 0A7C 42F6 CALL hex4 0A7E 42D9 CALL cr 0A80 404B CALL looptest 0A82 2539 0BRANCH (do) 0A84 02D9 BRANCH cr \ phy-cold 0A86 8800 LIT $800 0A88 8000 LIT $0 0A8A 451D CALL phy! 0A8C 40A4 CALL sliteral 0A8E 5017 CALL $202E 0A90 5948 CALL $3290 0A92 7020 ALU $7020 0A94 776F ALU $776F 0A96 7265 ALU $7265 0A98 6420 ALU $6420 0A9A 776F ALU $776F 0A9C 206E 0BRANCH $DC 0A9E 6F66 ALU $6F66 0AA0 2072 0BRANCH $E4 0AA2 2E32 0BRANCH $1C64 0AA4 7335 ALU $7335 0AA6 42FD CALL type 0AA8 42D9 CALL cr 0AAA A5A0 LIT $25A0 0AAC 8026 LIT $26 0AAE 4453 CALL sleepus 0AB0 8000 LIT $0 0AB2 8000 LIT $0 0AB4 451D CALL phy! 0AB6 700C ALU $700C 0AB8 445D CALL sleep1 0ABA 445D CALL sleep1 0ABC 445D CALL sleep1 0ABE 445D CALL sleep1 0AC0 445D CALL sleep1 0AC2 445D CALL sleep1 0AC4 4535 CALL phy. 0AC6 445D CALL sleep1 0AC8 42D9 CALL cr 0ACA 0535 BRANCH phy. \ mac-cold 0ACC 8000 LIT $0 0ACE D001 LIT $5001 0AD0 6023 ALU $6023 0AD2 6103 ALU $6103 0AD4 445D CALL sleep1 0AD6 4005 CALL true 0AD8 D001 LIT $5001 0ADA 6023 ALU $6023 0ADC 6103 ALU $6103 0ADE 445D CALL sleep1 0AE0 4005 CALL true 0AE2 D106 LIT $5106 0AE4 6023 ALU $6023 0AE6 6103 ALU $6103 0AE8 4005 CALL true 0AEA D107 LIT $5107 0AEC 6023 ALU $6023 0AEE 6103 ALU $6103 0AF0 4005 CALL true 0AF2 D100 LIT $5100 0AF4 6023 ALU $6023 0AF6 6103 ALU $6103 0AF8 8000 LIT $0 0AFA D101 LIT $5101 0AFC 6023 ALU $6023 0AFE 6103 ALU $6103 0B00 4005 CALL true 0B02 D102 LIT $5102 0B04 6023 ALU $6023 0B06 6103 ALU $6103 0B08 8000 LIT $0 0B0A D103 LIT $5103 0B0C 6023 ALU $6023 0B0E 6103 ALU $6103 0B10 8001 LIT $1 0B12 D104 LIT $5104 0B14 6023 ALU $6023 0B16 6103 ALU $6103 0B18 4543 CALL phy-cold 0B1A 40A4 CALL sliteral 0B1C 5408 CALL $2810 0B1E 2052 0BRANCH $A4 0B20 2020 0BRANCH merge 0B22 5047 CALL $208E 0B24 FF49 LIT $7F49 0B26 42FD CALL type 0B28 42D9 CALL cr \ (begin) 0B2A 8015 LIT $15 0B2C 4475 CALL ne2rc@ 0B2E 42F1 CALL hex2 0B30 8003 LIT $3 0B32 42DF CALL spaces 0B34 8017 LIT $17 0B36 4475 CALL ne2rc@ 0B38 42F1 CALL hex2 0B3A 8003 LIT $3 0B3C 42DF CALL spaces 0B3E 4459 CALL sleep.1 0B40 42D9 CALL cr 0B42 8015 LIT $15 0B44 4475 CALL ne2rc@ 0B46 8002 LIT $2 0B48 6303 ALU $6303 0B4A 4012 CALL 0= 0B4C 8017 LIT $17 0B4E 4475 CALL ne2rc@ 0B50 8001 LIT $1 0B52 6303 ALU $6303 0B54 4066 CALL 0<> 0B56 6303 ALU $6303 0B58 2595 0BRANCH (begin) 0B5A 4005 CALL true 0B5C 2609 0BRANCH (else) 0B5E 8021 LIT $21 0B60 8000 LIT $0 0B62 448B CALL ne2rc! 0B64 8000 LIT $0 0B66 800E LIT $E 0B68 448B CALL ne2rc! 0B6A 8000 LIT $0 0B6C 800A LIT $A 0B6E 448B CALL ne2rc! 0B70 8000 LIT $0 0B72 800B LIT $B 0B74 448B CALL ne2rc! 0B76 8020 LIT $20 0B78 800C LIT $C 0B7A 448B CALL ne2rc! 0B7C 8002 LIT $2 0B7E 800D LIT $D 0B80 448B CALL ne2rc! 0B82 8046 LIT $46 0B84 8001 LIT $1 0B86 448B CALL ne2rc! 0B88 8046 LIT $46 0B8A 8003 LIT $3 0B8C 448B CALL ne2rc! 0B8E 8080 LIT $80 0B90 8002 LIT $2 0B92 448B CALL ne2rc! 0B94 80FF LIT $FF 0B96 8007 LIT $7 0B98 448B CALL ne2rc! 0B9A 8001 LIT $1 0B9C 800F LIT $F 0B9E 448B CALL ne2rc! 0BA0 8061 LIT $61 0BA2 8000 LIT $0 0BA4 448B CALL ne2rc! 0BA6 8012 LIT $12 0BA8 8001 LIT $1 0BAA 448B CALL ne2rc! 0BAC 8034 LIT $34 0BAE 8002 LIT $2 0BB0 448B CALL ne2rc! 0BB2 8056 LIT $56 0BB4 8003 LIT $3 0BB6 448B CALL ne2rc! 0BB8 8077 LIT $77 0BBA 8004 LIT $4 0BBC 448B CALL ne2rc! 0BBE 8077 LIT $77 0BC0 8005 LIT $5 0BC2 448B CALL ne2rc! 0BC4 8077 LIT $77 0BC6 8006 LIT $6 0BC8 448B CALL ne2rc! 0BCA 8010 LIT $10 0BCC 8008 LIT $8 0BCE 6180 ALU $6180 0BD0 6147 ALU $6147 0BD2 6147 ALU $6147 \ (do) 0BD4 8000 LIT $0 0BD6 6B81 ALU $6B81 0BD8 448B CALL ne2rc! 0BDA 404B CALL looptest 0BDC 25EA 0BRANCH (do) 0BDE 8047 LIT $47 0BE0 8007 LIT $7 0BE2 448B CALL ne2rc! 0BE4 8022 LIT $22 0BE6 8000 LIT $0 0BE8 448B CALL ne2rc! 0BEA 8010 LIT $10 0BEC 8017 LIT $17 0BEE 448B CALL ne2rc! 0BF0 40A4 CALL sliteral 0BF2 4706 CALL mac-pkt-src 0BF4 4950 CALL $12A0 0BF6 3D20 0BRANCH $3A40 0BF8 FF20 LIT $7F20 0BFA 42FD CALL type 0BFC 8017 LIT $17 0BFE 4475 CALL ne2rc@ 0C00 42F1 CALL hex2 0C02 42D9 CALL cr 0C04 8000 LIT $0 0C06 800D LIT $D 0C08 448B CALL ne2rc! 0C0A 8004 LIT $4 0C0C 800C LIT $C 0C0E 448B CALL ne2rc! 0C10 066D BRANCH (then) \ (else) 0C12 8021 LIT $21 0C14 8000 LIT $0 0C16 448B CALL ne2rc! 0C18 4459 CALL sleep.1 0C1A 8000 LIT $0 0C1C 800E LIT $E 0C1E 448B CALL ne2rc! 0C20 8000 LIT $0 0C22 800A LIT $A 0C24 448B CALL ne2rc! 0C26 8000 LIT $0 0C28 800B LIT $B 0C2A 448B CALL ne2rc! 0C2C 8020 LIT $20 0C2E 800C LIT $C 0C30 448B CALL ne2rc! 0C32 8002 LIT $2 0C34 800D LIT $D 0C36 448B CALL ne2rc! 0C38 8040 LIT $40 0C3A 8004 LIT $4 0C3C 448B CALL ne2rc! 0C3E 8046 LIT $46 0C40 8001 LIT $1 0C42 448B CALL ne2rc! 0C44 8046 LIT $46 0C46 8003 LIT $3 0C48 448B CALL ne2rc! 0C4A 8080 LIT $80 0C4C 8002 LIT $2 0C4E 448B CALL ne2rc! 0C50 80FF LIT $FF 0C52 8007 LIT $7 0C54 448B CALL ne2rc! 0C56 8001 LIT $1 0C58 800F LIT $F 0C5A 448B CALL ne2rc! 0C5C 8061 LIT $61 0C5E 8000 LIT $0 0C60 448B CALL ne2rc! 0C62 4459 CALL sleep.1 0C64 8012 LIT $12 0C66 8001 LIT $1 0C68 448B CALL ne2rc! 0C6A 8034 LIT $34 0C6C 8002 LIT $2 0C6E 448B CALL ne2rc! 0C70 8056 LIT $56 0C72 8003 LIT $3 0C74 448B CALL ne2rc! 0C76 8077 LIT $77 0C78 8004 LIT $4 0C7A 448B CALL ne2rc! 0C7C 8077 LIT $77 0C7E 8005 LIT $5 0C80 448B CALL ne2rc! 0C82 8077 LIT $77 0C84 8006 LIT $6 0C86 448B CALL ne2rc! 0C88 8010 LIT $10 0C8A 8008 LIT $8 0C8C 6180 ALU $6180 0C8E 6147 ALU $6147 0C90 6147 ALU $6147 \ (do) 0C92 80FF LIT $FF 0C94 6B81 ALU $6B81 0C96 448B CALL ne2rc! 0C98 404B CALL looptest 0C9A 2649 0BRANCH (do) 0C9C 8047 LIT $47 0C9E 8007 LIT $7 0CA0 448B CALL ne2rc! 0CA2 8020 LIT $20 0CA4 8000 LIT $0 0CA6 448B CALL ne2rc! 0CA8 8010 LIT $10 0CAA 8017 LIT $17 0CAC 448B CALL ne2rc! 0CAE 40A4 CALL sliteral 0CB0 4706 CALL mac-pkt-src 0CB2 4950 CALL $12A0 0CB4 3D20 0BRANCH $3A40 0CB6 FF20 LIT $7F20 0CB8 42FD CALL type 0CBA 8017 LIT $17 0CBC 4475 CALL ne2rc@ 0CBE 42F1 CALL hex2 0CC0 42D9 CALL cr 0CC2 801C LIT $1C 0CC4 800C LIT $C 0CC6 448B CALL ne2rc! 0CC8 8000 LIT $0 0CCA 800D LIT $D 0CCC 448B CALL ne2rc! 0CCE 80FF LIT $FF 0CD0 8007 LIT $7 0CD2 448B CALL ne2rc! 0CD4 8022 LIT $22 0CD6 8000 LIT $0 0CD8 448B CALL ne2rc! \ (then) 0CDA 700C ALU $700C \ NicCompleteDma 0CDC 8022 LIT $22 0CDE 8000 LIT $0 0CE0 048B BRANCH ne2rc! \ maca 0CE2 6081 ALU $6081 0CE4 8008 LIT $8 0CE6 6903 ALU $6903 0CE8 8009 LIT $9 0CEA 448B CALL ne2rc! 0CEC 8008 LIT $8 0CEE 048B BRANCH ne2rc! \ mac1b 0CF0 8001 LIT $1 0CF2 800A LIT $A 0CF4 448B CALL ne2rc! 0CF6 8000 LIT $0 0CF8 800B LIT $B 0CFA 048B BRANCH ne2rc! \ mac2b 0CFC 8002 LIT $2 0CFE 800A LIT $A 0D00 448B CALL ne2rc! 0D02 8000 LIT $0 0D04 800B LIT $B 0D06 048B BRANCH ne2rc! \ macc@ 0D08 4671 CALL maca 0D0A 4678 CALL mac1b 0D0C 800A LIT $A 0D0E 8000 LIT $0 0D10 448B CALL ne2rc! 0D12 8010 LIT $10 0D14 4475 CALL ne2rc@ 0D16 066E BRANCH NicCompleteDma \ macc! 0D18 4671 CALL maca 0D1A 4678 CALL mac1b 0D1C 8012 LIT $12 0D1E 8000 LIT $0 0D20 448B CALL ne2rc! 0D22 8010 LIT $10 0D24 048B BRANCH ne2rc! \ mac@ 0D26 4671 CALL maca 0D28 467E CALL mac2b 0D2A 800A LIT $A 0D2C 8000 LIT $0 0D2E 448B CALL ne2rc! 0D30 8010 LIT $10 0D32 4475 CALL ne2rc@ 0D34 8008 LIT $8 0D36 6D03 ALU $6D03 0D38 8010 LIT $10 0D3A 4475 CALL ne2rc@ 0D3C 6403 ALU $6403 0D3E 066E BRANCH NicCompleteDma \ mac! 0D40 4671 CALL maca 0D42 467E CALL mac2b 0D44 8012 LIT $12 0D46 8000 LIT $0 0D48 448B CALL ne2rc! 0D4A 6081 ALU $6081 0D4C 8008 LIT $8 0D4E 6903 ALU $6903 0D50 8010 LIT $10 0D52 448B CALL ne2rc! 0D54 8010 LIT $10 0D56 048B BRANCH ne2rc! \ mac-dump 0D58 41D4 CALL bounds \ (begin) 0D5A 405C CALL 2dup 0D5C 4073 CALL u> 0D5E 26C1 0BRANCH (repeat) 0D60 6081 ALU $6081 0D62 800F LIT $F 0D64 6303 ALU $6303 0D66 4012 CALL 0= 0D68 26BB 0BRANCH (then) 0D6A 42D9 CALL cr 0D6C 6081 ALU $6081 0D6E 42F6 CALL hex4 0D70 803A LIT $3A 0D72 42D6 CALL emit 0D74 42DD CALL space \ (then) 0D76 6081 ALU $6081 0D78 4693 CALL mac@ 0D7A 42F6 CALL hex4 0D7C 42DD CALL space 0D7E 408A CALL cell+ 0D80 06AD BRANCH (begin) \ (repeat) 0D82 4016 CALL 2drop 0D84 02D9 BRANCH cr \ currpkt 0D86 0000 BRANCH 0jump \ mac-inoffset 0D88 8D86 LIT $D86 0D8A 6C00 ALU $6C00 0D8C 6203 ALU $6203 0D8E 6081 ALU $6081 0D90 4068 CALL 0< 0D92 26CF 0BRANCH (then) 0D94 FFFF LIT $7FFF 0D96 6600 ALU $6600 0D98 4077 CALL - 0D9A C600 LIT $4600 0D9C 6203 ALU $6203 \ (then) 0D9E 700C ALU $700C \ mac@n 0DA0 6180 ALU $6180 0DA2 6147 ALU $6147 0DA4 8000 LIT $0 0DA6 6147 ALU $6147 \ (do) 0DA8 6081 ALU $6081 0DAA 4693 CALL mac@ 0DAC 6180 ALU $6180 0DAE 408A CALL cell+ 0DB0 404B CALL looptest 0DB2 26D4 0BRANCH (do) 0DB4 710F ALU $710F \ writer 0DB6 0000 BRANCH 0jump \ mac-pkt-begin 0DB8 C000 LIT $4000 0DBA 8DB6 LIT $DB6 0DBC 6023 ALU $6023 0DBE 710F ALU $710F \ bump 0DC0 8DB6 LIT $DB6 0DC2 005E BRANCH +! \ mac-pkt-c, 0DC4 8DB6 LIT $DB6 0DC6 6C00 ALU $6C00 0DC8 468C CALL macc! 0DCA 8001 LIT $1 0DCC 06E0 BRANCH bump \ mac-pkt-, 0DCE 8DB6 LIT $DB6 0DD0 6C00 ALU $6C00 0DD2 46A0 CALL mac! 0DD4 8002 LIT $2 0DD6 06E0 BRANCH bump \ mac-pkt-d, 0DD8 46E7 CALL mac-pkt-, 0DDA 06E7 BRANCH mac-pkt-, \ mac-pkt-2, 0DDC 6180 ALU $6180 0DDE 46E7 CALL mac-pkt-, 0DE0 06E7 BRANCH mac-pkt-, \ mac-pkt-3, 0DE2 4009 CALL rot 0DE4 46E7 CALL mac-pkt-, 0DE6 06EE BRANCH mac-pkt-2, \ mac-pkt-,0 0DE8 6147 ALU $6147 0DEA 8000 LIT $0 0DEC 6147 ALU $6147 \ (do) 0DEE 8000 LIT $0 0DF0 46E7 CALL mac-pkt-, 0DF2 404B CALL looptest 0DF4 26F7 0BRANCH (do) 0DF6 700C ALU $700C \ mac-pkt-s, 0DF8 6147 ALU $6147 0DFA 8000 LIT $0 0DFC 6147 ALU $6147 \ (do) 0DFE 6081 ALU $6081 0E00 4026 CALL c@ 0E02 46E2 CALL mac-pkt-c, 0E04 4007 CALL 1+ 0E06 404B CALL looptest 0E08 26FF 0BRANCH (do) 0E0A 710F ALU $710F \ mac-pkt-src 0E0C 6180 ALU $6180 0E0E 6147 ALU $6147 0E10 8000 LIT $0 0E12 6147 ALU $6147 \ (do) 0E14 6081 ALU $6081 0E16 46C4 CALL mac-inoffset 0E18 4693 CALL mac@ 0E1A 46E7 CALL mac-pkt-, 0E1C 408A CALL cell+ 0E1E 404B CALL looptest 0E20 270A 0BRANCH (do) 0E22 710F ALU $710F \ mac-pkt-complete 0E24 8DB6 LIT $DB6 0E26 6C00 ALU $6C00 0E28 C000 LIT $4000 0E2A 4077 CALL - 0E2C 6081 ALU $6081 0E2E 8005 LIT $5 0E30 04A4 BRANCH ne2r! \ mac-checksum 0E32 8000 LIT $0 0E34 6180 ALU $6180 0E36 6147 ALU $6147 0E38 8000 LIT $0 0E3A 6147 ALU $6147 \ (do) 0E3C 6181 ALU $6181 0E3E 4693 CALL mac@ 0E40 4151 CALL +1c 0E42 6180 ALU $6180 0E44 408A CALL cell+ 0E46 6180 ALU $6180 0E48 404B CALL looptest 0E4A 271E 0BRANCH (do) 0E4C 6003 ALU $6003 0E4E 760C ALU $760C \ mac-snap 0E50 40A4 CALL sliteral 0E52 436E CALL >number 0E54 2052 0BRANCH $A4 0E56 2020 0BRANCH merge 0E58 2020 0BRANCH merge 0E5A 5350 CALL flashsectorerase 0E5C 4154 CALL $2A8 0E5E 5452 CALL $28A4 0E60 5020 CALL dl 0E62 5453 CALL $28A6 0E64 504F CALL $209E 0E66 2020 0BRANCH merge 0E68 4E42 CALL $1C84 0E6A 5952 CALL $32A4 0E6C 2020 0BRANCH merge 0E6E 5420 CALL $2840 0E70 5253 CALL $24A6 0E72 2020 0BRANCH merge 0E74 2020 0BRANCH merge 0E76 434E CALL D. 0E78 2052 0BRANCH $A4 0E7A 2020 0BRANCH merge 0E7C 4320 CALL dump16 0E7E 5250 CALL $24A0 0E80 2020 0BRANCH merge 0E82 2020 0BRANCH merge 0E84 5349 CALL $2692 0E86 2052 0BRANCH $A4 0E88 2020 0BRANCH merge 0E8A 4320 CALL dump16 0E8C 4452 CALL $8A4 0E8E 3041 0BRANCH $2082 0E90 2020 0BRANCH merge 0E92 5243 CALL $2486 0E94 4144 CALL $288 0E96 2031 0BRANCH (then) 0E98 2D20 0BRANCH $1A40 0E9A 2020 0BRANCH merge 0E9C 2020 0BRANCH merge 0E9E 2020 0BRANCH merge 0EA0 202D 0BRANCH $5A 0EA2 2020 0BRANCH merge 0EA4 2020 0BRANCH merge 0EA6 5220 CALL $2440 0EA8 5253 CALL $24A6 0EAA 2020 0BRANCH merge 0EAC 2020 0BRANCH merge 0EAE 4E43 CALL $1C86 0EB0 5254 CALL $24A8 0EB2 2030 0BRANCH $60 0EB4 4320 CALL dump16 0EB6 544E CALL $289C 0EB8 3152 0BRANCH $22A4 0EBA 2020 0BRANCH merge 0EBC 4E43 CALL $1C86 0EBE 5254 CALL $24A8 0EC0 FF32 LIT $7F32 0EC2 42FD CALL type 0EC4 42D9 CALL cr 0EC6 8010 LIT $10 0EC8 6147 ALU $6147 0ECA 8000 LIT $0 0ECC 6147 ALU $6147 \ (do) 0ECE 6B81 ALU $6B81 0ED0 4475 CALL ne2rc@ 0ED2 42F1 CALL hex2 0ED4 8005 LIT $5 0ED6 42DF CALL spaces 0ED8 404B CALL looptest 0EDA 2767 0BRANCH (do) 0EDC 700C ALU $700C \ mac-fullness 0EDE D109 LIT $5109 0EE0 6C00 ALU $6C00 0EE2 2787 0BRANCH (else) 0EE4 8003 LIT $3 0EE6 4475 CALL ne2rc@ 0EE8 4007 CALL 1+ 0EEA 8006 LIT $6 0EEC 4475 CALL ne2rc@ 0EEE 4064 CALL <> 0EF0 6081 ALU $6081 0EF2 2785 0BRANCH (else) 0EF4 8003 LIT $3 0EF6 4475 CALL ne2rc@ 0EF8 4007 CALL 1+ 0EFA 8008 LIT $8 0EFC 6D03 ALU $6D03 0EFE 8004 LIT $4 0F00 6203 ALU $6203 0F02 8D86 LIT $D86 0F04 6023 ALU $6023 0F06 6103 ALU $6103 0F08 0786 BRANCH (then) \ (else) 0F0A 44C6 CALL ne2-clrisr \ (then) 0F0C 0788 BRANCH (then) \ (else) 0F0E 8000 LIT $0 \ (then) 0F10 700C ALU $700C \ mac-consume 0F12 8003 LIT $3 0F14 4475 CALL ne2rc@ 0F16 4007 CALL 1+ 0F18 8008 LIT $8 0F1A 6D03 ALU $6D03 0F1C 4007 CALL 1+ 0F1E 4684 CALL macc@ 0F20 6A00 ALU $6A00 0F22 8003 LIT $3 0F24 048B BRANCH ne2rc! \ ne2cold 0F26 0000 BRANCH 0jump \ mac-send 0F28 8F26 LIT $F26 0F2A 6C00 ALU $6C00 0F2C 4012 CALL 0= 0F2E 27A2 0BRANCH (then) 0F30 8021 LIT $21 0F32 8000 LIT $0 0F34 448B CALL ne2rc! 0F36 8022 LIT $22 0F38 8000 LIT $0 0F3A 448B CALL ne2rc! 0F3C 4005 CALL true 0F3E 8F26 LIT $F26 0F40 6023 ALU $6023 0F42 6103 ALU $6103 \ (then) 0F44 8040 LIT $40 0F46 8004 LIT $4 0F48 448B CALL ne2rc! 0F4A 8026 LIT $26 0F4C 8000 LIT $0 0F4E 048B BRANCH ne2rc! \ packetout-off 0F50 C000 LIT $4000 0F52 720F ALU $720F \ nicwork 0F54 40A4 CALL sliteral 0F56 5404 CALL $2808 0F58 3D52 0BRANCH $3AA4 0F5A FF20 LIT $7F20 0F5C 42FD CALL type 0F5E 8015 LIT $15 0F60 4475 CALL ne2rc@ 0F62 42F1 CALL hex2 0F64 42DD CALL space 0F66 40A4 CALL sliteral 0F68 650A ALU $650A 0F6A 6874 ALU $6874 0F6C 7265 ALU $7265 0F6E 695F ALU $695F 0F70 7172 ALU $7172 0F72 FF3D LIT $7F3D 0F74 42FD CALL type 0F76 D109 LIT $5109 0F78 6C00 ALU $6C00 0F7A 42E6 CALL hex1 0F7C 42DD CALL space 0F7E 40A4 CALL sliteral 0F80 4904 CALL arp-issue-whohas 0F82 5253 CALL $24A6 0F84 FF3D LIT $7F3D 0F86 42FD CALL type 0F88 8007 LIT $7 0F8A 4475 CALL ne2rc@ 0F8C 42F1 CALL hex2 0F8E 42DD CALL space 0F90 42D9 CALL cr 0F92 8000 LIT $0 0F94 27DA 0BRANCH (then) 0F96 8000 LIT $0 0F98 8008 LIT $8 0F9A 44A4 CALL ne2r! 0F9C 42D9 CALL cr 0F9E 8010 LIT $10 0FA0 6147 ALU $6147 0FA2 8000 LIT $0 0FA4 6147 ALU $6147 \ (do) 0FA6 8010 LIT $10 0FA8 4475 CALL ne2rc@ 0FAA 42F1 CALL hex2 0FAC 42DD CALL space 0FAE 404B CALL looptest 0FB0 27D3 0BRANCH (do) 0FB2 42D9 CALL cr \ (then) 0FB4 40A4 CALL sliteral 0FB6 436E CALL >number 0FB8 2052 0BRANCH $A4 0FBA 2020 0BRANCH merge 0FBC 2020 0BRANCH merge 0FBE 5350 CALL flashsectorerase 0FC0 4154 CALL $2A8 0FC2 5452 CALL $28A4 0FC4 5020 CALL dl 0FC6 5453 CALL $28A6 0FC8 504F CALL $209E 0FCA 2020 0BRANCH merge 0FCC 4E42 CALL $1C84 0FCE 5952 CALL $32A4 0FD0 2020 0BRANCH merge 0FD2 5420 CALL $2840 0FD4 5253 CALL $24A6 0FD6 2020 0BRANCH merge 0FD8 2020 0BRANCH merge 0FDA 434E CALL D. 0FDC 2052 0BRANCH $A4 0FDE 2020 0BRANCH merge 0FE0 4320 CALL dump16 0FE2 5250 CALL $24A0 0FE4 2020 0BRANCH merge 0FE6 2020 0BRANCH merge 0FE8 5349 CALL $2692 0FEA 2052 0BRANCH $A4 0FEC 2020 0BRANCH merge 0FEE 4320 CALL dump16 0FF0 4452 CALL $8A4 0FF2 3041 0BRANCH $2082 0FF4 2020 0BRANCH merge 0FF6 5243 CALL $2486 0FF8 4144 CALL $288 0FFA 2031 0BRANCH (then) 0FFC 2D20 0BRANCH $1A40 0FFE 2020 0BRANCH merge 1000 2020 0BRANCH merge 1002 2020 0BRANCH merge 1004 202D 0BRANCH $5A 1006 2020 0BRANCH merge 1008 2020 0BRANCH merge 100A 5220 CALL $2440 100C 5253 CALL $24A6 100E 2020 0BRANCH merge 1010 2020 0BRANCH merge 1012 4E43 CALL $1C86 1014 5254 CALL $24A8 1016 2030 0BRANCH $60 1018 4320 CALL dump16 101A 544E CALL $289C 101C 3152 0BRANCH $22A4 101E 2020 0BRANCH merge 1020 4E43 CALL $1C86 1022 5254 CALL $24A8 1024 FF32 LIT $7F32 1026 42FD CALL type 1028 42D9 CALL cr \ (begin) 102A 8010 LIT $10 102C 6147 ALU $6147 102E 8000 LIT $0 1030 6147 ALU $6147 \ (do) 1032 6B81 ALU $6B81 1034 4475 CALL ne2rc@ 1036 42F1 CALL hex2 1038 8005 LIT $5 103A 42DF CALL spaces 103C 404B CALL looptest 103E 2819 0BRANCH (do) 1040 D109 LIT $5109 1042 6C00 ALU $6C00 1044 42E6 CALL hex1 1046 42D9 CALL cr 1048 445D CALL sleep1 104A 8006 LIT $6 104C 4475 CALL ne2rc@ 104E 8047 LIT $47 1050 4064 CALL <> 1052 2815 0BRANCH (begin) 1054 700C ALU $700C \ packet@ 1056 46C4 CALL mac-inoffset 1058 0693 BRANCH mac@ \ packetd@ 105A 46C4 CALL mac-inoffset 105C 6081 ALU $6081 105E 408A CALL cell+ 1060 4693 CALL mac@ 1062 6180 ALU $6180 1064 0693 BRANCH mac@ \ ip-id-counter 1066 FFFF LIT $7FFF \ ip-addr 1068 FFFF LIT $7FFF 106A FFFF LIT $7FFF \ ip-router 106C FFFF LIT $7FFF 106E FFFF LIT $7FFF \ ip-subnetmask 1070 FFFF LIT $7FFF 1072 FFFF LIT $7FFF \ ip-dns 1074 FFFF LIT $7FFF 1076 FFFF LIT $7FFF \ icmp-alarm-ptr 1078 FFFF LIT $7FFF \ ethaddr-broadcast 107A 8000 LIT $0 107C 6600 ALU $6600 107E 6081 ALU $6081 1080 708D ALU $708D \ net-my-ip 1082 9068 LIT $1068 1084 0115 BRANCH 2@ \ ethaddr-pretty-w 1086 6081 ALU $6081 1088 43BC CALL endian 108A 42F1 CALL hex2 108C 803A LIT $3A 108E 42D6 CALL emit 1090 02F1 BRANCH hex2 \ ethaddr-pretty 1092 6180 ALU $6180 1094 4009 CALL rot 1096 4843 CALL ethaddr-pretty-w 1098 803A LIT $3A 109A 42D6 CALL emit 109C 4843 CALL ethaddr-pretty-w 109E 803A LIT $3A 10A0 42D6 CALL emit 10A2 0843 BRANCH ethaddr-pretty-w \ ip-pretty-byte 10A4 80FF LIT $FF 10A6 6303 ALU $6303 10A8 02F1 BRANCH hex2 \ ip-pretty-2 10AA 6081 ALU $6081 10AC 43C6 CALL swab 10AE 4852 CALL ip-pretty-byte 10B0 802E LIT $2E 10B2 42D6 CALL emit 10B4 0852 BRANCH ip-pretty-byte \ ip-pretty 10B6 6180 ALU $6180 10B8 4855 CALL ip-pretty-2 10BA 802E LIT $2E 10BC 42D6 CALL emit 10BE 0855 BRANCH ip-pretty-2 \ arp-cache 10C0 FFFF LIT $7FFF 10C2 FFFF LIT $7FFF 10C4 FFFF LIT $7FFF 10C6 FFFF LIT $7FFF 10C8 FFFF LIT $7FFF 10CA FFFF LIT $7FFF 10CC FFFF LIT $7FFF 10CE FFFF LIT $7FFF 10D0 FFFF LIT $7FFF 10D2 FFFF LIT $7FFF 10D4 FFFF LIT $7FFF 10D6 FFFF LIT $7FFF 10D8 FFFF LIT $7FFF 10DA FFFF LIT $7FFF 10DC FFFF LIT $7FFF 10DE FFFF LIT $7FFF 10E0 FFFF LIT $7FFF 10E2 FFFF LIT $7FFF 10E4 FFFF LIT $7FFF 10E6 FFFF LIT $7FFF 10E8 FFFF LIT $7FFF 10EA FFFF LIT $7FFF 10EC FFFF LIT $7FFF 10EE FFFF LIT $7FFF 10F0 FFFF LIT $7FFF 10F2 FFFF LIT $7FFF 10F4 FFFF LIT $7FFF 10F6 FFFF LIT $7FFF 10F8 FFFF LIT $7FFF 10FA FFFF LIT $7FFF 10FC FFFF LIT $7FFF 10FE FFFF LIT $7FFF \ arp-foreach 1100 90F0 LIT $10F0 1102 6180 ALU $6180 1104 6147 ALU $6147 1106 6147 ALU $6147 \ (begin) 1108 6B8D ALU $6B8D 110A 6B8D ALU $6B8D 110C 6181 ALU $6181 110E 6181 ALU $6181 1110 6147 ALU $6147 1112 6147 ALU $6147 1114 6180 ALU $6180 1116 6180 ALU $6180 1118 40A9 CALL execute 111A 6B8D ALU $6B8D 111C 6081 ALU $6081 111E 800C LIT $C 1120 4077 CALL - 1122 6147 ALU $6147 1124 90C0 LIT $10C0 1126 6703 ALU $6703 1128 2884 0BRANCH (begin) 112A 6B8D ALU $6B8D 112C 6B8D ALU $6B8D 112E 6180 ALU $6180 1130 0016 BRANCH 2drop \ arp-. 1132 6081 ALU $6081 1134 6C00 ALU $6C00 1136 42F6 CALL hex4 1138 42DD CALL space 113A 6081 ALU $6081 113C 408A CALL cell+ 113E 6081 ALU $6081 1140 6C00 ALU $6C00 1142 6180 ALU $6180 1144 8002 LIT $2 1146 6203 ALU $6203 1148 6081 ALU $6081 114A 6C00 ALU $6C00 114C 6180 ALU $6180 114E 8002 LIT $2 1150 6203 ALU $6203 1152 6C00 ALU $6C00 1154 4849 CALL ethaddr-pretty 1156 42DD CALL space 1158 8008 LIT $8 115A 6203 ALU $6203 115C 4115 CALL 2@ 115E 485B CALL ip-pretty 1160 02D9 BRANCH cr \ arp-dump 1162 9132 LIT $1132 1164 0880 BRANCH arp-foreach \ arp-del 1166 80FF LIT $FF 1168 6180 ALU $6180 116A 6023 ALU $6023 116C 710F ALU $710F \ arp-reset 116E 9166 LIT $1166 1170 0880 BRANCH arp-foreach \ used? 1172 6C00 ALU $6C00 1174 80FF LIT $FF 1176 0064 BRANCH <> \ arp-age-1 1178 6081 ALU $6081 117A 48B9 CALL used? 117C 8001 LIT $1 117E 6303 ALU $6303 1180 6180 ALU $6180 1182 005E BRANCH +! \ arp-age 1184 9178 LIT $1178 1186 0880 BRANCH arp-foreach \ arp-cmp 1188 6181 ALU $6181 118A 6C00 ALU $6C00 118C 6181 ALU $6181 118E 6C00 ALU $6C00 1190 406D CALL > 1192 0080 BRANCH ?: \ arp-oldest 1194 90C0 LIT $10C0 1196 9188 LIT $1188 1198 0880 BRANCH arp-foreach \ arp-is-response 119A 800C LIT $C 119C 482B CALL packet@ 119E 8806 LIT $806 11A0 6703 ALU $6703 11A2 8014 LIT $14 11A4 482B CALL packet@ 11A6 8002 LIT $2 11A8 6703 ALU $6703 11AA 730F ALU $730F \ !-- 11AC 4014 CALL tuck 11AE 6023 ALU $6023 11B0 6103 ALU $6103 11B2 008C BRANCH 2- \ arp-cache-write 11B4 48C2 CALL arp-age 11B6 8000 LIT $0 11B8 6181 ALU $6181 11BA 6023 ALU $6023 11BC 6103 ALU $6103 11BE 6147 ALU $6147 11C0 8003 LIT $3 11C2 8016 LIT $16 11C4 46C4 CALL mac-inoffset 11C6 46D0 CALL mac@n 11C8 6B81 ALU $6B81 11CA 8006 LIT $6 11CC 6203 ALU $6203 11CE 48D6 CALL !-- 11D0 48D6 CALL !-- 11D2 48D6 CALL !-- 11D4 6103 ALU $6103 11D6 8002 LIT $2 11D8 801C LIT $1C 11DA 46C4 CALL mac-inoffset 11DC 46D0 CALL mac@n 11DE 6B8D ALU $6B8D 11E0 8008 LIT $8 11E2 6203 ALU $6203 11E4 011A BRANCH 2! \ arp-cmpip 11E6 6081 ALU $6081 11E8 48B9 CALL used? 11EA 28FF 0BRANCH (else) 11EC 6081 ALU $6081 11EE 8008 LIT $8 11F0 6203 ALU $6203 11F2 4115 CALL 2@ 11F4 8002 LIT $2 11F6 4137 CALL 2pick 11F8 4196 CALL d<> 11FA 4080 CALL ?: 11FC 0900 BRANCH (then) \ (else) 11FE 6103 ALU $6103 \ (then) 1200 700C ALU $700C \ arp-cache-find 1202 8000 LIT $0 1204 91E6 LIT $11E6 1206 0880 BRANCH arp-foreach \ arp-issue-whohas 1208 46DC CALL mac-pkt-begin 120A 483D CALL ethaddr-broadcast 120C 46F1 CALL mac-pkt-3, 120E 4434 CALL net-my-mac 1210 46F1 CALL mac-pkt-3, 1212 8806 LIT $806 1214 8001 LIT $1 1216 8800 LIT $800 1218 46F1 CALL mac-pkt-3, 121A 8604 LIT $604 121C 8001 LIT $1 121E 46EE CALL mac-pkt-2, 1220 4434 CALL net-my-mac 1222 46F1 CALL mac-pkt-3, 1224 4841 CALL net-my-ip 1226 46EE CALL mac-pkt-2, 1228 483D CALL ethaddr-broadcast 122A 46F1 CALL mac-pkt-3, 122C 46EE CALL mac-pkt-2, 122E 4712 CALL mac-pkt-complete 1230 6103 ALU $6103 1232 0794 BRANCH mac-send \ arp-lookup 1234 405C CALL 2dup 1236 906C LIT $106C 1238 4115 CALL 2@ 123A 416A CALL dxor 123C 9070 LIT $1070 123E 4115 CALL 2@ 1240 416F CALL dand 1242 4194 CALL d0<> 1244 2926 0BRANCH (then) 1246 4016 CALL 2drop 1248 906C LIT $106C 124A 4115 CALL 2@ \ (then) 124C 4901 CALL arp-cache-find 124E 6081 ALU $6081 1250 4012 CALL 0= 1252 292D 0BRANCH (else) 1254 400D CALL -rot 1256 4904 CALL arp-issue-whohas 1258 0930 BRANCH (then) \ (else) 125A 6003 ALU $6003 125C 6003 ALU $6003 125E 408A CALL cell+ \ (then) 1260 700C ALU $700C \ arp-responder 1262 8003 LIT $3 1264 8000 LIT $0 1266 46C4 CALL mac-inoffset 1268 46D0 CALL mac@n 126A 6303 ALU $6303 126C 6303 ALU $6303 126E 6600 ALU $6600 1270 4012 CALL 0= 1272 4434 CALL net-my-mac 1274 8002 LIT $2 1276 8000 LIT $0 1278 408A CALL cell+ 127A 46C4 CALL mac-inoffset 127C 46D0 CALL mac@n 127E 410D CALL d= 1280 6180 ALU $6180 1282 8000 LIT $0 1284 482B CALL packet@ 1286 6703 ALU $6703 1288 6303 ALU $6303 128A 6403 ALU $6403 128C 800C LIT $C 128E 482B CALL packet@ 1290 8806 LIT $806 1292 6703 ALU $6703 1294 6303 ALU $6303 1296 8002 LIT $2 1298 8026 LIT $26 129A 46C4 CALL mac-inoffset 129C 46D0 CALL mac@n 129E 4841 CALL net-my-ip 12A0 410D CALL d= 12A2 6303 ALU $6303 12A4 296D 0BRANCH (then) 12A6 46DC CALL mac-pkt-begin 12A8 8003 LIT $3 12AA 8016 LIT $16 12AC 4706 CALL mac-pkt-src 12AE 4434 CALL net-my-mac 12B0 46F1 CALL mac-pkt-3, 12B2 8806 LIT $806 12B4 8001 LIT $1 12B6 8800 LIT $800 12B8 46F1 CALL mac-pkt-3, 12BA 8604 LIT $604 12BC 8002 LIT $2 12BE 46EE CALL mac-pkt-2, 12C0 4434 CALL net-my-mac 12C2 46F1 CALL mac-pkt-3, 12C4 4841 CALL net-my-ip 12C6 46EE CALL mac-pkt-2, 12C8 8003 LIT $3 12CA 8016 LIT $16 12CC 4706 CALL mac-pkt-src 12CE 8002 LIT $2 12D0 801C LIT $1C 12D2 4706 CALL mac-pkt-src 12D4 4712 CALL mac-pkt-complete 12D6 6103 ALU $6103 12D8 4794 CALL mac-send \ (then) 12DA 700C ALU $700C \ arp-announce 12DC 46DC CALL mac-pkt-begin 12DE 483D CALL ethaddr-broadcast 12E0 46F1 CALL mac-pkt-3, 12E2 4434 CALL net-my-mac 12E4 46F1 CALL mac-pkt-3, 12E6 8806 LIT $806 12E8 8001 LIT $1 12EA 8800 LIT $800 12EC 46F1 CALL mac-pkt-3, 12EE 8604 LIT $604 12F0 8002 LIT $2 12F2 46EE CALL mac-pkt-2, 12F4 4434 CALL net-my-mac 12F6 46F1 CALL mac-pkt-3, 12F8 4841 CALL net-my-ip 12FA 46EE CALL mac-pkt-2, 12FC 483D CALL ethaddr-broadcast 12FE 46F1 CALL mac-pkt-3, 1300 4841 CALL net-my-ip 1302 46EE CALL mac-pkt-2, 1304 4712 CALL mac-pkt-complete 1306 6103 ALU $6103 1308 0794 BRANCH mac-send \ arp-handler 130A 4931 CALL arp-responder 130C 48CD CALL arp-is-response 130E 2995 0BRANCH (then) 1310 8002 LIT $2 1312 801C LIT $1C 1314 46C4 CALL mac-inoffset 1316 46D0 CALL mac@n 1318 4901 CALL arp-cache-find 131A 6003 ALU $6003 131C 6003 ALU $6003 131E 6081 ALU $6081 1320 4012 CALL 0= 1322 2994 0BRANCH (then) 1324 6103 ALU $6103 1326 48CA CALL arp-oldest \ (then) 1328 48DA CALL arp-cache-write \ (then) 132A 700C ALU $700C \ ip-datalength 132C 8010 LIT $10 132E 482B CALL packet@ 1330 8014 LIT $14 1332 4077 CALL - 1334 008E BRANCH 2/ \ ip-isproto 1336 8016 LIT $16 1338 482B CALL packet@ 133A 80FF LIT $FF 133C 6303 ALU $6303 133E 770F ALU $770F \ ip-identification 1340 9066 LIT $1066 1342 8001 LIT $1 1344 6181 ALU $6181 1346 405E CALL +! 1348 7C0C ALU $7C0C \ @ethaddr 134A 4018 CALL ?dup 134C 29AD 0BRANCH (else) 134E 6081 ALU $6081 1350 6C00 ALU $6C00 1352 6180 ALU $6180 1354 408A CALL cell+ 1356 4115 CALL 2@ 1358 09AE BRANCH (then) \ (else) 135A 483D CALL ethaddr-broadcast \ (then) 135C 700C ALU $700C \ ip-header 135E 6147 ALU $6147 1360 46DC CALL mac-pkt-begin 1362 49A5 CALL @ethaddr 1364 46F1 CALL mac-pkt-3, 1366 4434 CALL net-my-mac 1368 46F1 CALL mac-pkt-3, 136A 8800 LIT $800 136C 46E7 CALL mac-pkt-, 136E C500 LIT $4500 1370 8000 LIT $0 1372 49A0 CALL ip-identification 1374 46F1 CALL mac-pkt-3, 1376 C000 LIT $4000 1378 C000 LIT $4000 137A 6B8D ALU $6B8D 137C 6403 ALU $6403 137E 8000 LIT $0 1380 46F1 CALL mac-pkt-3, 1382 46EE CALL mac-pkt-2, 1384 06EE BRANCH mac-pkt-2, \ ip-wrapup 1386 800E LIT $E 1388 4077 CALL - 138A 8010 LIT $10 138C 47A8 CALL packetout-off 138E 46A0 CALL mac! 1390 800E LIT $E 1392 47A8 CALL packetout-off 1394 800A LIT $A 1396 4719 CALL mac-checksum 1398 8018 LIT $18 139A 47A8 CALL packetout-off 139C 06A0 BRANCH mac! \ ip-packet-srcip 139E 8002 LIT $2 13A0 801A LIT $1A 13A2 46C4 CALL mac-inoffset 13A4 06D0 BRANCH mac@n \ icmp-handler 13A6 8001 LIT $1 13A8 499B CALL ip-isproto 13AA 8022 LIT $22 13AC 482B CALL packet@ 13AE 8800 LIT $800 13B0 6703 ALU $6703 13B2 6303 ALU $6303 13B4 2A04 0BRANCH (then) 13B6 49CF CALL ip-packet-srcip 13B8 405C CALL 2dup 13BA 491A CALL arp-lookup 13BC 4018 CALL ?dup 13BE 2A03 0BRANCH (else) 13C0 4841 CALL net-my-ip 13C2 4009 CALL rot 13C4 8001 LIT $1 13C6 49AF CALL ip-header 13C8 8000 LIT $0 13CA 46E7 CALL mac-pkt-, 13CC 40A4 CALL sliteral 13CE 3D10 0BRANCH $3A20 13D0 3D3D 0BRANCH $3A7A 13D2 3D3D 0BRANCH $3A7A 13D4 203E 0BRANCH $7C 13D6 4349 CALL $692 13D8 504D CALL $209A 13DA 7320 ALU $7320 13DC 7165 ALU $7165 13DE FF20 LIT $7F20 13E0 42FD CALL type 13E2 8028 LIT $28 13E4 46C4 CALL mac-inoffset 13E6 4693 CALL mac@ 13E8 4351 CALL U. 13EA 42D9 CALL cr 13EC 8026 LIT $26 13EE 46C4 CALL mac-inoffset 13F0 4996 CALL ip-datalength 13F2 408C CALL 2- 13F4 4014 CALL tuck 13F6 4719 CALL mac-checksum 13F8 46E7 CALL mac-pkt-, 13FA 8026 LIT $26 13FC 4706 CALL mac-pkt-src 13FE 4712 CALL mac-pkt-complete 1400 49C3 CALL ip-wrapup 1402 4794 CALL mac-send 1404 0A04 BRANCH (then) \ (else) 1406 4016 CALL 2drop \ (then) 1408 700C ALU $700C \ ping 140A 405C CALL 2dup 140C 491A CALL arp-lookup 140E 4018 CALL ?dup 1410 2A29 0BRANCH (else) 1412 4841 CALL net-my-ip 1414 4009 CALL rot 1416 8001 LIT $1 1418 49AF CALL ip-header 141A 8800 LIT $800 141C 46E7 CALL mac-pkt-, 141E D50B LIT $550B 1420 443B CALL time@ 1422 6103 ALU $6103 1424 405C CALL 2dup 1426 4151 CALL +1c 1428 8800 LIT $800 142A 4151 CALL +1c 142C 801C LIT $1C \ (begin) 142E 6180 ALU $6180 1430 8000 LIT $0 1432 4151 CALL +1c 1434 6180 ALU $6180 1436 6A00 ALU $6A00 1438 6081 ALU $6081 143A 4012 CALL 0= 143C 2A17 0BRANCH (begin) 143E 6103 ALU $6103 1440 6600 ALU $6600 1442 46E7 CALL mac-pkt-, 1444 46EE CALL mac-pkt-2, 1446 801C LIT $1C 1448 46F4 CALL mac-pkt-,0 144A 4712 CALL mac-pkt-complete 144C 49C3 CALL ip-wrapup 144E 4794 CALL mac-send 1450 0A2A BRANCH (then) \ (else) 1452 4016 CALL 2drop \ (then) 1454 700C ALU $700C \ udp-header 1456 8011 LIT $11 1458 49AF CALL ip-header 145A 46E7 CALL mac-pkt-, 145C 46E7 CALL mac-pkt-, 145E 8002 LIT $2 1460 06F4 BRANCH mac-pkt-,0 \ packetbase 1462 0000 BRANCH 0jump \ packet 1464 9462 LIT $1462 1466 6C00 ALU $6C00 1468 720F ALU $720F \ udp-checksum 146A 9462 LIT $1462 146C 6023 ALU $6023 146E 6103 ALU $6103 1470 8026 LIT $26 1472 4A32 CALL packet 1474 6C00 ALU $6C00 1476 8001 LIT $1 1478 6303 ALU $6303 147A 2A4C 0BRANCH (then) 147C 8022 LIT $22 147E 8026 LIT $26 1480 4A32 CALL packet 1482 6C00 ALU $6C00 1484 6203 ALU $6203 1486 4A32 CALL packet 1488 6081 ALU $6081 148A 6C00 ALU $6C00 148C 80FF LIT $FF 148E 6600 ALU $6600 1490 6303 ALU $6303 1492 6180 ALU $6180 1494 6023 ALU $6023 1496 6103 ALU $6103 \ (then) 1498 8022 LIT $22 149A 4A32 CALL packet 149C 8026 LIT $26 149E 4A32 CALL packet 14A0 6C00 ALU $6C00 14A2 4007 CALL 1+ 14A4 408E CALL 2/ 14A6 4719 CALL mac-checksum 14A8 6600 ALU $6600 14AA 8004 LIT $4 14AC 801A LIT $1A 14AE 4A32 CALL packet 14B0 46D0 CALL mac@n 14B2 4151 CALL +1c 14B4 4151 CALL +1c 14B6 4151 CALL +1c 14B8 4151 CALL +1c 14BA 8011 LIT $11 14BC 4151 CALL +1c 14BE 8026 LIT $26 14C0 4A32 CALL packet 14C2 6C00 ALU $6C00 14C4 4151 CALL +1c 14C6 760C ALU $760C \ udp-checksum? 14C8 0005 BRANCH true \ udp-wrapup 14CA 4712 CALL mac-pkt-complete 14CC 6081 ALU $6081 14CE 49C3 CALL ip-wrapup 14D0 8022 LIT $22 14D2 4077 CALL - 14D4 8026 LIT $26 14D6 47A8 CALL packetout-off 14D8 06A0 BRANCH mac! \ dhcp-xid 14DA 906C LIT $106C 14DC 0115 BRANCH 2@ \ dhcp-xid! 14DE 906C LIT $106C 14E0 011A BRANCH 2! \ dhcp-option 14E2 46E2 CALL mac-pkt-c, 14E4 6081 ALU $6081 14E6 46E2 CALL mac-pkt-c, 14E8 6147 ALU $6147 14EA 8000 LIT $0 14EC 6147 ALU $6147 \ (do) 14EE 46E2 CALL mac-pkt-c, 14F0 404B CALL looptest 14F2 2A77 0BRANCH (do) 14F4 700C ALU $700C \ dhcp-common 14F6 8043 LIT $43 14F8 8044 LIT $44 14FA 8000 LIT $0 14FC 6600 ALU $6600 14FE 6081 ALU $6081 1500 8000 LIT $0 1502 6081 ALU $6081 1504 8000 LIT $0 1506 4A2B CALL udp-header 1508 8101 LIT $101 150A 8600 LIT $600 150C 46EE CALL mac-pkt-2, 150E 4A6D CALL dhcp-xid 1510 46EE CALL mac-pkt-2, 1512 800A LIT $A 1514 46F4 CALL mac-pkt-,0 1516 4434 CALL net-my-mac 1518 46F1 CALL mac-pkt-3, 151A 8065 LIT $65 151C 46F4 CALL mac-pkt-,0 151E E382 LIT $6382 1520 D363 LIT $5363 1522 46EE CALL mac-pkt-2, 1524 8001 LIT $1 1526 8035 LIT $35 1528 4A71 CALL dhcp-option 152A 8001 LIT $1 152C 8003 LIT $3 152E 8006 LIT $6 1530 8003 LIT $3 1532 8037 LIT $37 1534 0A71 BRANCH dhcp-option \ dhcp-wrapup 1536 80FF LIT $FF 1538 46E2 CALL mac-pkt-c, 153A 8001 LIT $1 153C 2AA1 0BRANCH (then) 153E 80FF LIT $FF 1540 46E2 CALL mac-pkt-c, \ (then) 1542 4A65 CALL udp-wrapup 1544 0794 BRANCH mac-send \ macc@++ 1546 6081 ALU $6081 1548 4007 CALL 1+ 154A 6180 ALU $6180 154C 0684 BRANCH macc@ \ dhcp-field 154E 8116 LIT $116 1550 8004 LIT $4 1552 6203 ALU $6203 1554 46C4 CALL mac-inoffset \ (begin) 1556 4AA3 CALL macc@++ 1558 6081 ALU $6081 155A 80FF LIT $FF 155C 4064 CALL <> 155E 2AB9 0BRANCH (repeat) 1560 8002 LIT $2 1562 40EB CALL pick 1564 6703 ALU $6703 1566 2AB6 0BRANCH (then) 1568 6003 ALU $6003 156A 700C ALU $700C \ (then) 156C 4AA3 CALL macc@++ 156E 6203 ALU $6203 1570 0AAB BRANCH (begin) \ (repeat) 1572 4016 CALL 2drop 1574 8000 LIT $0 1576 700C ALU $700C \ dhcp-yiaddr 1578 8002 LIT $2 157A 803A LIT $3A 157C 46C4 CALL mac-inoffset 157E 06D0 BRANCH mac@n \ dhcp-field4 1580 4AA7 CALL dhcp-field 1582 8001 LIT $1 1584 6203 ALU $6203 1586 4AA3 CALL macc@++ 1588 6180 ALU $6180 158A 4AA3 CALL macc@++ 158C 6180 ALU $6180 158E 4AA3 CALL macc@++ 1590 6180 ALU $6180 1592 4684 CALL macc@ 1594 6180 ALU $6180 1596 8008 LIT $8 1598 6D03 ALU $6D03 159A 6403 ALU $6403 159C 400D CALL -rot 159E 6180 ALU $6180 15A0 8008 LIT $8 15A2 6D03 ALU $6D03 15A4 6403 ALU $6403 15A6 718C ALU $718C \ .pad 15A8 800E LIT $E 15AA 43C7 CALL typepad 15AC 485B CALL ip-pretty 15AE 02D9 BRANCH cr \ dhcp-status 15B0 9068 LIT $1068 15B2 4115 CALL 2@ 15B4 40A4 CALL sliteral 15B6 4902 CALL $1204 15B8 FF50 LIT $7F50 15BA 4AD4 CALL .pad 15BC 906C LIT $106C 15BE 4115 CALL 2@ 15C0 40A4 CALL sliteral 15C2 7206 ALU $7206 15C4 756F ALU $756F 15C6 6574 ALU $6574 15C8 FF72 LIT $7F72 15CA 4AD4 CALL .pad 15CC 9070 LIT $1070 15CE 4115 CALL 2@ 15D0 40A4 CALL sliteral 15D2 730A ALU $730A 15D4 6275 ALU $6275 15D6 656E ALU $656E 15D8 6D74 ALU $6D74 15DA 7361 ALU $7361 15DC FF6B LIT $7F6B 15DE 0AD4 BRANCH .pad \ lease-setalarm 15E0 8000 LIT $0 15E2 6147 ALU $6147 \ (begin) 15E4 405C CALL 2dup 15E6 803F LIT $3F 15E8 8000 LIT $0 15EA 4187 CALL d> 15EC 2AFC 0BRANCH (repeat) 15EE 419A CALL d2/ 15F0 6B8D ALU $6B8D 15F2 4007 CALL 1+ 15F4 6147 ALU $6147 15F6 0AF2 BRANCH (begin) \ (repeat) 15F8 6B8D ALU $6B8D 15FA 42F6 CALL hex4 15FC 42DD CALL space 15FE 42FB CALL hex8 1600 02D9 BRANCH cr \ dhcp-wait-offer 1602 8011 LIT $11 1604 499B CALL ip-isproto 1606 8022 LIT $22 1608 482B CALL packet@ 160A 8043 LIT $43 160C 6703 ALU $6703 160E 6303 ALU $6303 1610 8024 LIT $24 1612 482B CALL packet@ 1614 8044 LIT $44 1616 6703 ALU $6703 1618 6303 ALU $6303 161A 8002 LIT $2 161C 802E LIT $2E 161E 46C4 CALL mac-inoffset 1620 46D0 CALL mac@n 1622 4A6D CALL dhcp-xid 1624 410D CALL d= 1626 6303 ALU $6303 1628 2B62 0BRANCH (then) 162A 8083 LIT $83 162C 40A4 CALL sliteral 162E 6407 ALU $6407 1630 6368 ALU $6368 1632 2E70 0BRANCH $1CE0 1634 7366 ALU $7366 1636 43AF CALL (snap) 1638 8035 LIT $35 163A 4AA7 CALL dhcp-field 163C 4018 CALL ?dup 163E 8085 LIT $85 1640 962F LIT $162F 1642 8007 LIT $7 1644 43AF CALL (snap) 1646 2B5E 0BRANCH (then) 1648 8001 LIT $1 164A 6203 ALU $6203 164C 4684 CALL macc@ 164E 8088 LIT $88 1650 962F LIT $162F 1652 8007 LIT $7 1654 43AF CALL (snap) 1656 6081 ALU $6081 1658 8002 LIT $2 165A 6703 ALU $6703 165C 2B39 0BRANCH (then) 165E 8003 LIT $3 1660 4A7B CALL dhcp-common 1662 B204 LIT $3204 1664 4ABC CALL dhcp-yiaddr 1666 46F1 CALL mac-pkt-3, 1668 B604 LIT $3604 166A 8036 LIT $36 166C 4AC0 CALL dhcp-field4 166E 46F1 CALL mac-pkt-3, 1670 4A9B CALL dhcp-wrapup \ (then) 1672 8005 LIT $5 1674 6703 ALU $6703 1676 2B5E 0BRANCH (then) 1678 4ABC CALL dhcp-yiaddr 167A 9068 LIT $1068 167C 411A CALL 2! 167E 8001 LIT $1 1680 4AC0 CALL dhcp-field4 1682 9070 LIT $1070 1684 411A CALL 2! 1686 8003 LIT $3 1688 4AC0 CALL dhcp-field4 168A 405C CALL 2dup 168C 906C LIT $106C 168E 411A CALL 2! 1690 491A CALL arp-lookup 1692 6103 ALU $6103 1694 8006 LIT $6 1696 4AC0 CALL dhcp-field4 1698 405C CALL 2dup 169A 9074 LIT $1074 169C 411A CALL 2! 169E 491A CALL arp-lookup 16A0 6103 ALU $6103 16A2 40A4 CALL sliteral 16A4 650B ALU $650B 16A6 7078 ALU $7078 16A8 7269 ALU $7269 16AA 7365 ALU $7365 16AC 6920 ALU $6920 16AE 206E 0BRANCH $DC 16B0 42FD CALL type 16B2 8033 LIT $33 16B4 4AC0 CALL dhcp-field4 16B6 6180 ALU $6180 16B8 434E CALL D. 16BA 42D9 CALL cr \ (then) 16BC 80AA LIT $AA 16BE 962F LIT $162F 16C0 8007 LIT $7 16C2 43AF CALL (snap) \ (then) 16C4 700C ALU $700C \ dhcp-discover 16C6 8001 LIT $1 16C8 4A7B CALL dhcp-common 16CA 0A9B BRANCH dhcp-wrapup \ in 16CC 8001 LIT $1 16CE 6180 ALU $6180 16D0 6023 ALU $6023 16D2 710F ALU $710F \ out 16D4 8000 LIT $0 16D6 6180 ALU $6180 16D8 6023 ALU $6023 16DA 710F ALU $710F \ flash-reset 16DC C10C LIT $410C 16DE 4B6A CALL out 16E0 C10C LIT $410C 16E2 0B66 BRANCH in \ flash-cold 16E4 C100 LIT $4100 16E6 4B66 CALL in 16E8 C102 LIT $4102 16EA 4B6A CALL out 16EC C104 LIT $4104 16EE 4B66 CALL in 16F0 C106 LIT $4106 16F2 4B66 CALL in 16F4 C108 LIT $4108 16F6 4B66 CALL in 16F8 C10A LIT $410A 16FA 4B66 CALL in 16FC 0B6E BRANCH flash-reset \ flash-w 16FE C10E LIT $410E 1700 6023 ALU $6023 1702 6103 ALU $6103 1704 C112 LIT $4112 1706 6023 ALU $6023 1708 6103 ALU $6103 170A C100 LIT $4100 170C 4B6A CALL out 170E C106 LIT $4106 1710 4B6A CALL out 1712 C106 LIT $4106 1714 4B66 CALL in 1716 C100 LIT $4100 1718 0B66 BRANCH in \ flash-r 171A C10E LIT $410E 171C 6023 ALU $6023 171E 6103 ALU $6103 1720 C104 LIT $4104 1722 4B6A CALL out 1724 C112 LIT $4112 1726 6C00 ALU $6C00 1728 C104 LIT $4104 172A 0B66 BRANCH in \ flash-unlock 172C 80AA LIT $AA 172E 8555 LIT $555 1730 4B7F CALL flash-w 1732 8055 LIT $55 1734 82AA LIT $2AA 1736 0B7F BRANCH flash-w \ flash! 1738 4B96 CALL flash-unlock 173A 80A0 LIT $A0 173C 8555 LIT $555 173E 4B7F CALL flash-w 1740 C10E LIT $410E 1742 408A CALL cell+ 1744 6023 ALU $6023 1746 6103 ALU $6103 1748 405C CALL 2dup 174A 4B7F CALL flash-w \ (begin) 174C 405C CALL 2dup 174E 4B8D CALL flash-r 1750 6503 ALU $6503 1752 8080 LIT $80 1754 6303 ALU $6303 1756 4012 CALL 0= 1758 2BA6 0BRANCH (begin) 175A 4016 CALL 2drop 175C 0B6E BRANCH flash-reset \ flash@ 175E C10E LIT $410E 1760 408A CALL cell+ 1762 6023 ALU $6023 1764 6103 ALU $6103 1766 0B8D BRANCH flash-r \ flash-chiperase 1768 4B96 CALL flash-unlock 176A 8080 LIT $80 176C 8555 LIT $555 176E 4B7F CALL flash-w 1770 80AA LIT $AA 1772 8555 LIT $555 1774 4B7F CALL flash-w 1776 8055 LIT $55 1778 82AA LIT $2AA 177A 4B7F CALL flash-w 177C 8010 LIT $10 177E 8555 LIT $555 1780 0B7F BRANCH flash-w \ flash-sectorerase 1782 4B96 CALL flash-unlock 1784 8080 LIT $80 1786 8555 LIT $555 1788 4B7F CALL flash-w 178A 80AA LIT $AA 178C 8555 LIT $555 178E 4B7F CALL flash-w 1790 8055 LIT $55 1792 82AA LIT $2AA 1794 4B7F CALL flash-w 1796 C10E LIT $410E 1798 408A CALL cell+ 179A 6023 ALU $6023 179C 6103 ALU $6103 179E 8030 LIT $30 17A0 6180 ALU $6180 17A2 0B7F BRANCH flash-w \ flash-erased 17A4 4BAF CALL flash@ 17A6 8080 LIT $80 17A8 6303 ALU $6303 17AA 0066 BRANCH 0<> \ flash-dump 17AC 6147 ALU $6147 17AE 8000 LIT $0 17B0 6147 ALU $6147 \ (do) 17B2 405C CALL 2dup 17B4 4BAF CALL flash@ 17B6 42F6 CALL hex4 17B8 42DD CALL space 17BA 4157 CALL d1+ 17BC 404B CALL looptest 17BE 2BD9 0BRANCH (do) 17C0 42D9 CALL cr 17C2 0016 BRANCH 2drop \ flashc@ 17C4 6181 ALU $6181 17C6 800F LIT $F 17C8 6D03 ALU $6D03 17CA C112 LIT $4112 17CC 6023 ALU $6023 17CE 6103 ALU $6103 17D0 419A CALL d2/ 17D2 0BAF BRANCH flash@ \ flash-bytes 17D4 40A4 CALL sliteral 17D6 4207 CALL $40E 17D8 5459 CALL $28B2 17DA 5345 CALL $268A 17DC 203A 0BRANCH $74 17DE 42FD CALL type 17E0 C108 LIT $4108 17E2 4B6A CALL out 17E4 8000 LIT $0 17E6 8000 LIT $0 17E8 8400 LIT $400 17EA 6147 ALU $6147 17EC 8000 LIT $0 17EE 6147 ALU $6147 \ (do) 17F0 6B81 ALU $6B81 17F2 800F LIT $F 17F4 6303 ALU $6303 17F6 4012 CALL 0= 17F8 2C02 0BRANCH (then) 17FA 42D9 CALL cr 17FC 405C CALL 2dup 17FE 42FB CALL hex8 1800 42DD CALL space 1802 42DD CALL space \ (then) 1804 405C CALL 2dup 1806 4BE2 CALL flashc@ 1808 42F1 CALL hex2 180A 42DD CALL space 180C 4157 CALL d1+ 180E 404B CALL looptest 1810 2BF8 0BRANCH (do) 1812 42D9 CALL cr 1814 4016 CALL 2drop 1816 C108 LIT $4108 1818 0B66 BRANCH in \ vga-line@ 181A C306 LIT $4306 181C 6C00 ALU $6C00 181E C306 LIT $4306 1820 6C00 ALU $6C00 1822 6181 ALU $6181 1824 6503 ALU $6503 1826 2C16 0BRANCH (repeat) 1828 6103 ALU $6103 182A 0C0D BRANCH vga-line@ \ (repeat) 182C 700C ALU $700C \ waitblank 182E 4C0D CALL vga-line@ 1830 8200 LIT $200 1832 6703 ALU $6703 1834 2C17 0BRANCH waitblank 1836 700C ALU $700C \ sprite! 1838 4088 CALL cells 183A 4088 CALL cells 183C C402 LIT $4402 183E 6203 ALU $6203 1840 4014 CALL tuck 1842 6023 ALU $6023 1844 6103 ALU $6103 1846 408C CALL 2- 1848 6023 ALU $6023 184A 710F ALU $710F \ hide 184C 8008 LIT $8 184E 6147 ALU $6147 1850 8000 LIT $0 1852 6147 ALU $6147 \ (do) 1854 8320 LIT $320 1856 6081 ALU $6081 1858 6B81 ALU $6B81 185A 4C1C CALL sprite! 185C 404B CALL looptest 185E 2C2A 0BRANCH (do) 1860 700C ALU $700C \ cursory 1862 0000 BRANCH 0jump \ cursorx 1864 0000 BRANCH 0jump \ vga-at-xy 1866 9862 LIT $1862 1868 6023 ALU $6023 186A 6103 ALU $6103 186C 9864 LIT $1864 186E 6023 ALU $6023 1870 710F ALU $710F \ home 1872 8000 LIT $0 1874 C300 LIT $4300 1876 6023 ALU $6023 1878 6103 ALU $6103 187A 8000 LIT $0 187C 8000 LIT $0 187E 0C33 BRANCH vga-at-xy \ vga-line 1880 9862 LIT $1862 1882 6C00 ALU $6C00 1884 C300 LIT $4300 1886 6C00 ALU $6C00 1888 6203 ALU $6203 188A 801F LIT $1F 188C 6303 ALU $6303 188E 8006 LIT $6 1890 6D03 ALU $6D03 1892 FFFF LIT $7FFF 1894 6600 ALU $6600 1896 740F ALU $740F \ vga-erase 1898 41D4 CALL bounds \ (begin) 189A 6581 ALU $6581 189C 2C55 0BRANCH (repeat) 189E 8000 LIT $0 18A0 6181 ALU $6181 18A2 6023 ALU $6023 18A4 6103 ALU $6103 18A6 4007 CALL 1+ 18A8 0C4D BRANCH (begin) \ (repeat) 18AA 0016 BRANCH 2drop \ vga-page 18AC 4C39 CALL home 18AE 4C40 CALL vga-line 18B0 8800 LIT $800 18B2 4C4C CALL vga-erase 18B4 0C26 BRANCH hide \ down1 18B6 9862 LIT $1862 18B8 6C00 ALU $6C00 18BA 801F LIT $1F 18BC 4064 CALL <> 18BE 2C64 0BRANCH (else) 18C0 8001 LIT $1 18C2 9862 LIT $1862 18C4 405E CALL +! 18C6 0C6E BRANCH (then) \ (else) 18C8 8000 LIT $0 18CA 2C6D 0BRANCH (else) 18CC 8001 LIT $1 18CE C300 LIT $4300 18D0 405E CALL +! 18D2 4C40 CALL vga-line 18D4 8040 LIT $40 18D6 4C4C CALL vga-erase 18D8 0C6E BRANCH (then) \ (else) 18DA 4C39 CALL home \ (then) 18DC 700C ALU $700C \ vga-emit 18DE 6081 ALU $6081 18E0 800D LIT $D 18E2 6703 ALU $6703 18E4 2C79 0BRANCH (else) 18E6 6103 ALU $6103 18E8 8000 LIT $0 18EA 9864 LIT $1864 18EC 6023 ALU $6023 18EE 6103 ALU $6103 18F0 0C96 BRANCH (then) \ (else) 18F2 6081 ALU $6081 18F4 800A LIT $A 18F6 6703 ALU $6703 18F8 2C80 0BRANCH (else) 18FA 6103 ALU $6103 18FC 4C5B CALL down1 18FE 0C96 BRANCH (then) \ (else) 1900 801F LIT $1F 1902 6600 ALU $6600 1904 6203 ALU $6203 1906 4C40 CALL vga-line 1908 9864 LIT $1864 190A 6C00 ALU $6C00 190C 6203 ALU $6203 190E 6023 ALU $6023 1910 6103 ALU $6103 1912 8001 LIT $1 1914 9864 LIT $1864 1916 405E CALL +! 1918 9864 LIT $1864 191A 6C00 ALU $6C00 191C 8032 LIT $32 191E 6703 ALU $6703 1920 2C96 0BRANCH (then) 1922 8000 LIT $0 1924 9864 LIT $1864 1926 6023 ALU $6023 1928 6103 ALU $6103 192A 4C5B CALL down1 \ (then) 192C 700C ALU $700C \ flash>ram 192E 6147 ALU $6147 1930 419A CALL d2/ 1932 6B8D ALU $6B8D 1934 8400 LIT $400 1936 6147 ALU $6147 1938 8000 LIT $0 193A 6147 ALU $6147 \ (do) 193C 6147 ALU $6147 193E 405C CALL 2dup 1940 4BAF CALL flash@ 1942 6B8D ALU $6B8D 1944 6181 ALU $6181 1946 43C6 CALL swab 1948 6181 ALU $6181 194A 6023 ALU $6023 194C 6103 ALU $6103 194E 4007 CALL 1+ 1950 4014 CALL tuck 1952 6023 ALU $6023 1954 6103 ALU $6103 1956 4007 CALL 1+ 1958 6147 ALU $6147 195A 4157 CALL d1+ 195C 6B8D ALU $6B8D 195E 404B CALL looptest 1960 2C9E 0BRANCH (do) 1962 6103 ALU $6103 1964 0016 BRANCH 2drop \ vga-cold 1966 87FF LIT $7FF 1968 6600 ALU $6600 196A 8FFF LIT $FFF 196C 6600 ALU $6600 196E 6180 ALU $6180 1970 6147 ALU $6147 1972 6147 ALU $6147 \ (do) 1974 8000 LIT $0 1976 6B81 ALU $6B81 1978 6023 ALU $6023 197A 6103 ALU $6103 197C 404B CALL looptest 197E 2CBA 0BRANCH (do) 1980 4C56 CALL vga-page 1982 8000 LIT $0 1984 8018 LIT $18 1986 FFFF LIT $7FFF 1988 6600 ALU $6600 198A 4C97 CALL flash>ram 198C 8800 LIT $800 198E 8018 LIT $18 1990 8FFF LIT $FFF 1992 6600 ALU $6600 1994 0C97 BRANCH flash>ram \ glyph 1996 FFFF LIT $7FFF 1998 FFFF LIT $7FFF 199A FFFF LIT $7FFF 199C FFFF LIT $7FFF \ wide1 199E 43C6 CALL swab 19A0 8008 LIT $8 19A2 6147 ALU $6147 19A4 8000 LIT $0 19A6 6147 ALU $6147 \ (do) 19A8 6081 ALU $6081 19AA 4068 CALL 0< 19AC 2CD9 0BRANCH (else) 19AE 807F LIT $7F 19B0 0CDA BRANCH (then) \ (else) 19B2 8020 LIT $20 \ (then) 19B4 4C6F CALL vga-emit 19B6 4088 CALL cells 19B8 404B CALL looptest 19BA 2CD4 0BRANCH (do) 19BC 710F ALU $710F \ vga-bigemit 19BE 6081 ALU $6081 19C0 800D LIT $D 19C2 6703 ALU $6703 19C4 2CE9 0BRANCH (else) 19C6 6103 ALU $6103 19C8 8000 LIT $0 19CA 9864 LIT $1864 19CC 6023 ALU $6023 19CE 6103 ALU $6103 19D0 0D29 BRANCH (then) \ (else) 19D2 6081 ALU $6081 19D4 800A LIT $A 19D6 6703 ALU $6703 19D8 2CF6 0BRANCH (else) 19DA 6103 ALU $6103 19DC 8008 LIT $8 19DE 6147 ALU $6147 19E0 8000 LIT $0 19E2 6147 ALU $6147 \ (do) 19E4 4C5B CALL down1 19E6 404B CALL looptest 19E8 2CF2 0BRANCH (do) 19EA 0D29 BRANCH (then) \ (else) 19EC 8020 LIT $20 19EE 4077 CALL - 19F0 8008 LIT $8 19F2 41EB CALL * 19F4 4155 CALL s>d 19F6 8800 LIT $800 19F8 8018 LIT $18 19FA 413E CALL d+ 19FC 419A CALL d2/ 19FE 8004 LIT $4 1A00 6147 ALU $6147 1A02 8000 LIT $0 1A04 6147 ALU $6147 \ (do) 1A06 405C CALL 2dup 1A08 4BAF CALL flash@ 1A0A 43C6 CALL swab 1A0C 6B81 ALU $6B81 1A0E 4088 CALL cells 1A10 9996 LIT $1996 1A12 6203 ALU $6203 1A14 6023 ALU $6023 1A16 6103 ALU $6103 1A18 4157 CALL d1+ 1A1A 404B CALL looptest 1A1C 2D03 0BRANCH (do) 1A1E 4016 CALL 2drop 1A20 8007 LIT $7 1A22 6147 ALU $6147 1A24 8000 LIT $0 1A26 6147 ALU $6147 \ (do) 1A28 6B81 ALU $6B81 1A2A 9996 LIT $1996 1A2C 6203 ALU $6203 1A2E 4026 CALL c@ 1A30 4CCF CALL wide1 1A32 8007 LIT $7 1A34 6600 ALU $6600 1A36 9864 LIT $1864 1A38 405E CALL +! 1A3A 4C5B CALL down1 1A3C 404B CALL looptest 1A3E 2D14 0BRANCH (do) 1A40 8007 LIT $7 1A42 9996 LIT $1996 1A44 6203 ALU $6203 1A46 4026 CALL c@ 1A48 4CCF CALL wide1 1A4A 8006 LIT $6 1A4C 6600 ALU $6600 1A4E 9862 LIT $1862 1A50 405E CALL +! \ (then) 1A52 700C ALU $700C \ statusline 1A54 8000 LIT $0 1A56 801F LIT $1F 1A58 405C CALL 2dup 1A5A 4C33 CALL vga-at-xy 1A5C 8032 LIT $32 1A5E 42DF CALL spaces 1A60 4C33 CALL vga-at-xy 1A62 02FD BRANCH type \ seed 1A64 0000 BRANCH 0jump \ random 1A66 9A64 LIT $1A64 1A68 6C00 ALU $6C00 1A6A DD8B LIT $5D8B 1A6C 41EB CALL * 1A6E 9E90 LIT $1E90 1A70 6600 ALU $6600 1A72 6503 ALU $6503 1A74 6081 ALU $6081 1A76 9A64 LIT $1A64 1A78 6023 ALU $6023 1A7A 710F ALU $710F \ sintab 1A7C 0000 BRANCH 0jump 1A7E 0324 BRANCH $648 1A80 0647 BRANCH $C8E 1A82 096A BRANCH $12D4 1A84 0C8B BRANCH $1916 1A86 0FAB BRANCH rotate 1A88 12C7 BRANCH $258E 1A8A 15E1 BRANCH $2BC2 1A8C 18F8 BRANCH $31F0 1A8E 1C0B BRANCH $3816 1A90 1F19 BRANCH $3E32 1A92 2223 0BRANCH $446 1A94 2527 0BRANCH $A4E 1A96 2826 0BRANCH $104C 1A98 2B1E 0BRANCH $163C 1A9A 2E10 0BRANCH $1C20 1A9C 30FB 0BRANCH $21F6 1A9E 33DE 0BRANCH $27BC 1AA0 36B9 0BRANCH (do) 1AA2 398C 0BRANCH $3318 1AA4 3C56 0BRANCH $38AC 1AA6 3F16 0BRANCH $3E2C 1AA8 41CD CALL $39A 1AAA 447A CALL $8F4 1AAC 471C CALL $E38 1AAE 49B3 CALL $1366 1AB0 4C3F CALL $187E 1AB2 4EBF CALL $1D7E 1AB4 5133 CALL $2266 1AB6 539A CALL $2734 1AB8 55F4 CALL (then) 1ABA 5842 CALL $3084 1ABC 5A81 CALL $3502 1ABE 5CB3 CALL $3966 1AC0 5ED6 CALL $3DAC 1AC2 60EB ALU $60EB 1AC4 62F1 ALU $62F1 1AC6 64E7 ALU $64E7 1AC8 66CE ALU $66CE 1ACA 68A5 ALU $68A5 1ACC 6A6C ALU $6A6C 1ACE 6C23 ALU $6C23 1AD0 6DC9 ALU $6DC9 1AD2 6F5E ALU $6F5E 1AD4 70E1 ALU $70E1 1AD6 7254 ALU $7254 1AD8 73B5 ALU $73B5 1ADA 7503 ALU $7503 1ADC 7640 ALU $7640 1ADE 776B ALU $776B 1AE0 7883 ALU $7883 1AE2 7989 ALU $7989 1AE4 7A7C ALU $7A7C 1AE6 7B5C ALU $7B5C 1AE8 7C29 ALU $7C29 1AEA 7CE2 ALU $7CE2 1AEC 7D89 ALU $7D89 1AEE 7E1C ALU $7E1C 1AF0 7E9C ALU $7E9C 1AF2 7F08 ALU $7F08 1AF4 7F61 ALU $7F61 1AF6 7FA6 ALU $7FA6 1AF8 7FD7 ALU $7FD7 1AFA 7FF5 ALU $7FF5 1AFC 7FFF ALU $7FFF \ sin 1AFE 6081 ALU $6081 1B00 8080 LIT $80 1B02 6303 ALU $6303 1B04 6147 ALU $6147 1B06 807F LIT $7F 1B08 6303 ALU $6303 1B0A 6081 ALU $6081 1B0C 803F LIT $3F 1B0E 406D CALL > 1B10 2D8C 0BRANCH (then) 1B12 6600 ALU $6600 1B14 8081 LIT $81 1B16 6203 ALU $6203 \ (then) 1B18 4088 CALL cells 1B1A 9A7C LIT $1A7C 1B1C 6203 ALU $6203 1B1E 6C00 ALU $6C00 1B20 6B8D ALU $6B8D 1B22 2D93 0BRANCH (then) 1B24 4075 CALL negate \ (then) 1B26 700C ALU $700C \ cos 1B28 8040 LIT $40 1B2A 6203 ALU $6203 1B2C 0D7F BRANCH sin \ sin* 1B2E 4D7F CALL sin 1B30 6180 ALU $6180 1B32 4088 CALL cells 1B34 41F7 CALL m* 1B36 700F ALU $700F \ cos* 1B38 4D94 CALL cos 1B3A 6180 ALU $6180 1B3C 4088 CALL cells 1B3E 41F7 CALL m* 1B40 700F ALU $700F \ vision 1B42 0000 BRANCH 0jump 1B44 0000 BRANCH 0jump \ frame 1B46 0000 BRANCH 0jump \ stars 1B48 FFFF LIT $7FFF 1B4A FFFF LIT $7FFF 1B4C FFFF LIT $7FFF 1B4E FFFF LIT $7FFF 1B50 FFFF LIT $7FFF 1B52 FFFF LIT $7FFF 1B54 FFFF LIT $7FFF 1B56 FFFF LIT $7FFF 1B58 FFFF LIT $7FFF 1B5A FFFF LIT $7FFF 1B5C FFFF LIT $7FFF 1B5E FFFF LIT $7FFF 1B60 FFFF LIT $7FFF 1B62 FFFF LIT $7FFF 1B64 FFFF LIT $7FFF 1B66 FFFF LIT $7FFF 1B68 FFFF LIT $7FFF 1B6A FFFF LIT $7FFF 1B6C FFFF LIT $7FFF 1B6E FFFF LIT $7FFF 1B70 FFFF LIT $7FFF 1B72 FFFF LIT $7FFF 1B74 FFFF LIT $7FFF 1B76 FFFF LIT $7FFF 1B78 FFFF LIT $7FFF 1B7A FFFF LIT $7FFF 1B7C FFFF LIT $7FFF 1B7E FFFF LIT $7FFF 1B80 FFFF LIT $7FFF 1B82 FFFF LIT $7FFF 1B84 FFFF LIT $7FFF 1B86 FFFF LIT $7FFF 1B88 FFFF LIT $7FFF 1B8A FFFF LIT $7FFF 1B8C FFFF LIT $7FFF 1B8E FFFF LIT $7FFF 1B90 FFFF LIT $7FFF 1B92 FFFF LIT $7FFF 1B94 FFFF LIT $7FFF 1B96 FFFF LIT $7FFF 1B98 FFFF LIT $7FFF 1B9A FFFF LIT $7FFF 1B9C FFFF LIT $7FFF 1B9E FFFF LIT $7FFF 1BA0 FFFF LIT $7FFF 1BA2 FFFF LIT $7FFF 1BA4 FFFF LIT $7FFF 1BA6 FFFF LIT $7FFF 1BA8 FFFF LIT $7FFF 1BAA FFFF LIT $7FFF 1BAC FFFF LIT $7FFF 1BAE FFFF LIT $7FFF 1BB0 FFFF LIT $7FFF 1BB2 FFFF LIT $7FFF 1BB4 FFFF LIT $7FFF 1BB6 FFFF LIT $7FFF 1BB8 FFFF LIT $7FFF 1BBA FFFF LIT $7FFF 1BBC FFFF LIT $7FFF 1BBE FFFF LIT $7FFF 1BC0 FFFF LIT $7FFF 1BC2 FFFF LIT $7FFF 1BC4 FFFF LIT $7FFF 1BC6 FFFF LIT $7FFF 1BC8 FFFF LIT $7FFF 1BCA FFFF LIT $7FFF 1BCC FFFF LIT $7FFF 1BCE FFFF LIT $7FFF 1BD0 FFFF LIT $7FFF 1BD2 FFFF LIT $7FFF 1BD4 FFFF LIT $7FFF 1BD6 FFFF LIT $7FFF 1BD8 FFFF LIT $7FFF 1BDA FFFF LIT $7FFF 1BDC FFFF LIT $7FFF 1BDE FFFF LIT $7FFF 1BE0 FFFF LIT $7FFF 1BE2 FFFF LIT $7FFF 1BE4 FFFF LIT $7FFF 1BE6 FFFF LIT $7FFF 1BE8 FFFF LIT $7FFF 1BEA FFFF LIT $7FFF 1BEC FFFF LIT $7FFF 1BEE FFFF LIT $7FFF 1BF0 FFFF LIT $7FFF 1BF2 FFFF LIT $7FFF 1BF4 FFFF LIT $7FFF 1BF6 FFFF LIT $7FFF 1BF8 FFFF LIT $7FFF 1BFA FFFF LIT $7FFF 1BFC FFFF LIT $7FFF 1BFE FFFF LIT $7FFF 1C00 FFFF LIT $7FFF 1C02 FFFF LIT $7FFF 1C04 FFFF LIT $7FFF 1C06 FFFF LIT $7FFF 1C08 FFFF LIT $7FFF 1C0A FFFF LIT $7FFF 1C0C FFFF LIT $7FFF 1C0E FFFF LIT $7FFF 1C10 FFFF LIT $7FFF 1C12 FFFF LIT $7FFF 1C14 FFFF LIT $7FFF 1C16 FFFF LIT $7FFF 1C18 FFFF LIT $7FFF 1C1A FFFF LIT $7FFF 1C1C FFFF LIT $7FFF 1C1E FFFF LIT $7FFF 1C20 FFFF LIT $7FFF 1C22 FFFF LIT $7FFF 1C24 FFFF LIT $7FFF 1C26 FFFF LIT $7FFF 1C28 FFFF LIT $7FFF 1C2A FFFF LIT $7FFF 1C2C FFFF LIT $7FFF 1C2E FFFF LIT $7FFF 1C30 FFFF LIT $7FFF 1C32 FFFF LIT $7FFF 1C34 FFFF LIT $7FFF 1C36 FFFF LIT $7FFF 1C38 FFFF LIT $7FFF 1C3A FFFF LIT $7FFF 1C3C FFFF LIT $7FFF 1C3E FFFF LIT $7FFF 1C40 FFFF LIT $7FFF 1C42 FFFF LIT $7FFF 1C44 FFFF LIT $7FFF 1C46 FFFF LIT $7FFF 1C48 FFFF LIT $7FFF 1C4A FFFF LIT $7FFF 1C4C FFFF LIT $7FFF 1C4E FFFF LIT $7FFF 1C50 FFFF LIT $7FFF 1C52 FFFF LIT $7FFF 1C54 FFFF LIT $7FFF 1C56 FFFF LIT $7FFF 1C58 FFFF LIT $7FFF 1C5A FFFF LIT $7FFF 1C5C FFFF LIT $7FFF 1C5E FFFF LIT $7FFF 1C60 FFFF LIT $7FFF 1C62 FFFF LIT $7FFF 1C64 FFFF LIT $7FFF 1C66 FFFF LIT $7FFF 1C68 FFFF LIT $7FFF 1C6A FFFF LIT $7FFF 1C6C FFFF LIT $7FFF 1C6E FFFF LIT $7FFF 1C70 FFFF LIT $7FFF 1C72 FFFF LIT $7FFF 1C74 FFFF LIT $7FFF 1C76 FFFF LIT $7FFF 1C78 FFFF LIT $7FFF 1C7A FFFF LIT $7FFF 1C7C FFFF LIT $7FFF 1C7E FFFF LIT $7FFF 1C80 FFFF LIT $7FFF 1C82 FFFF LIT $7FFF 1C84 FFFF LIT $7FFF 1C86 FFFF LIT $7FFF 1C88 FFFF LIT $7FFF 1C8A FFFF LIT $7FFF 1C8C FFFF LIT $7FFF 1C8E FFFF LIT $7FFF 1C90 FFFF LIT $7FFF 1C92 FFFF LIT $7FFF 1C94 FFFF LIT $7FFF 1C96 FFFF LIT $7FFF 1C98 FFFF LIT $7FFF 1C9A FFFF LIT $7FFF 1C9C FFFF LIT $7FFF 1C9E FFFF LIT $7FFF 1CA0 FFFF LIT $7FFF 1CA2 FFFF LIT $7FFF 1CA4 FFFF LIT $7FFF 1CA6 FFFF LIT $7FFF 1CA8 FFFF LIT $7FFF 1CAA FFFF LIT $7FFF 1CAC FFFF LIT $7FFF 1CAE FFFF LIT $7FFF 1CB0 FFFF LIT $7FFF 1CB2 FFFF LIT $7FFF 1CB4 FFFF LIT $7FFF 1CB6 FFFF LIT $7FFF 1CB8 FFFF LIT $7FFF 1CBA FFFF LIT $7FFF 1CBC FFFF LIT $7FFF 1CBE FFFF LIT $7FFF 1CC0 FFFF LIT $7FFF 1CC2 FFFF LIT $7FFF 1CC4 FFFF LIT $7FFF 1CC6 FFFF LIT $7FFF 1CC8 FFFF LIT $7FFF 1CCA FFFF LIT $7FFF 1CCC FFFF LIT $7FFF 1CCE FFFF LIT $7FFF 1CD0 FFFF LIT $7FFF 1CD2 FFFF LIT $7FFF 1CD4 FFFF LIT $7FFF 1CD6 FFFF LIT $7FFF 1CD8 FFFF LIT $7FFF 1CDA FFFF LIT $7FFF 1CDC FFFF LIT $7FFF 1CDE FFFF LIT $7FFF 1CE0 FFFF LIT $7FFF 1CE2 FFFF LIT $7FFF 1CE4 FFFF LIT $7FFF 1CE6 FFFF LIT $7FFF 1CE8 FFFF LIT $7FFF 1CEA FFFF LIT $7FFF 1CEC FFFF LIT $7FFF 1CEE FFFF LIT $7FFF 1CF0 FFFF LIT $7FFF 1CF2 FFFF LIT $7FFF 1CF4 FFFF LIT $7FFF 1CF6 FFFF LIT $7FFF 1CF8 FFFF LIT $7FFF 1CFA FFFF LIT $7FFF 1CFC FFFF LIT $7FFF 1CFE FFFF LIT $7FFF 1D00 FFFF LIT $7FFF 1D02 FFFF LIT $7FFF 1D04 FFFF LIT $7FFF 1D06 FFFF LIT $7FFF 1D08 FFFF LIT $7FFF 1D0A FFFF LIT $7FFF 1D0C FFFF LIT $7FFF 1D0E FFFF LIT $7FFF 1D10 FFFF LIT $7FFF 1D12 FFFF LIT $7FFF 1D14 FFFF LIT $7FFF 1D16 FFFF LIT $7FFF 1D18 FFFF LIT $7FFF 1D1A FFFF LIT $7FFF 1D1C FFFF LIT $7FFF 1D1E FFFF LIT $7FFF 1D20 FFFF LIT $7FFF 1D22 FFFF LIT $7FFF 1D24 FFFF LIT $7FFF 1D26 FFFF LIT $7FFF 1D28 FFFF LIT $7FFF 1D2A FFFF LIT $7FFF 1D2C FFFF LIT $7FFF 1D2E FFFF LIT $7FFF 1D30 FFFF LIT $7FFF 1D32 FFFF LIT $7FFF 1D34 FFFF LIT $7FFF 1D36 FFFF LIT $7FFF 1D38 FFFF LIT $7FFF 1D3A FFFF LIT $7FFF 1D3C FFFF LIT $7FFF 1D3E FFFF LIT $7FFF 1D40 FFFF LIT $7FFF 1D42 FFFF LIT $7FFF 1D44 FFFF LIT $7FFF 1D46 FFFF LIT $7FFF 1D48 FFFF LIT $7FFF 1D4A FFFF LIT $7FFF 1D4C FFFF LIT $7FFF 1D4E FFFF LIT $7FFF 1D50 FFFF LIT $7FFF 1D52 FFFF LIT $7FFF 1D54 FFFF LIT $7FFF 1D56 FFFF LIT $7FFF 1D58 FFFF LIT $7FFF 1D5A FFFF LIT $7FFF 1D5C FFFF LIT $7FFF 1D5E FFFF LIT $7FFF 1D60 FFFF LIT $7FFF 1D62 FFFF LIT $7FFF 1D64 FFFF LIT $7FFF 1D66 FFFF LIT $7FFF 1D68 FFFF LIT $7FFF 1D6A FFFF LIT $7FFF 1D6C FFFF LIT $7FFF 1D6E FFFF LIT $7FFF 1D70 FFFF LIT $7FFF 1D72 FFFF LIT $7FFF 1D74 FFFF LIT $7FFF 1D76 FFFF LIT $7FFF 1D78 FFFF LIT $7FFF 1D7A FFFF LIT $7FFF 1D7C FFFF LIT $7FFF 1D7E FFFF LIT $7FFF 1D80 FFFF LIT $7FFF 1D82 FFFF LIT $7FFF 1D84 FFFF LIT $7FFF 1D86 FFFF LIT $7FFF 1D88 FFFF LIT $7FFF 1D8A FFFF LIT $7FFF 1D8C FFFF LIT $7FFF 1D8E FFFF LIT $7FFF 1D90 FFFF LIT $7FFF 1D92 FFFF LIT $7FFF 1D94 FFFF LIT $7FFF 1D96 FFFF LIT $7FFF 1D98 FFFF LIT $7FFF 1D9A FFFF LIT $7FFF 1D9C FFFF LIT $7FFF 1D9E FFFF LIT $7FFF 1DA0 FFFF LIT $7FFF 1DA2 FFFF LIT $7FFF 1DA4 FFFF LIT $7FFF 1DA6 FFFF LIT $7FFF 1DA8 FFFF LIT $7FFF 1DAA FFFF LIT $7FFF 1DAC FFFF LIT $7FFF 1DAE FFFF LIT $7FFF 1DB0 FFFF LIT $7FFF 1DB2 FFFF LIT $7FFF 1DB4 FFFF LIT $7FFF 1DB6 FFFF LIT $7FFF 1DB8 FFFF LIT $7FFF 1DBA FFFF LIT $7FFF 1DBC FFFF LIT $7FFF 1DBE FFFF LIT $7FFF 1DC0 FFFF LIT $7FFF 1DC2 FFFF LIT $7FFF 1DC4 FFFF LIT $7FFF 1DC6 FFFF LIT $7FFF 1DC8 FFFF LIT $7FFF 1DCA FFFF LIT $7FFF 1DCC FFFF LIT $7FFF 1DCE FFFF LIT $7FFF 1DD0 FFFF LIT $7FFF 1DD2 FFFF LIT $7FFF 1DD4 FFFF LIT $7FFF 1DD6 FFFF LIT $7FFF 1DD8 FFFF LIT $7FFF 1DDA FFFF LIT $7FFF 1DDC FFFF LIT $7FFF 1DDE FFFF LIT $7FFF 1DE0 FFFF LIT $7FFF 1DE2 FFFF LIT $7FFF 1DE4 FFFF LIT $7FFF 1DE6 FFFF LIT $7FFF 1DE8 FFFF LIT $7FFF 1DEA FFFF LIT $7FFF 1DEC FFFF LIT $7FFF 1DEE FFFF LIT $7FFF 1DF0 FFFF LIT $7FFF 1DF2 FFFF LIT $7FFF 1DF4 FFFF LIT $7FFF 1DF6 FFFF LIT $7FFF 1DF8 FFFF LIT $7FFF 1DFA FFFF LIT $7FFF 1DFC FFFF LIT $7FFF 1DFE FFFF LIT $7FFF 1E00 FFFF LIT $7FFF 1E02 FFFF LIT $7FFF 1E04 FFFF LIT $7FFF 1E06 FFFF LIT $7FFF 1E08 FFFF LIT $7FFF 1E0A FFFF LIT $7FFF 1E0C FFFF LIT $7FFF 1E0E FFFF LIT $7FFF 1E10 FFFF LIT $7FFF 1E12 FFFF LIT $7FFF 1E14 FFFF LIT $7FFF 1E16 FFFF LIT $7FFF 1E18 FFFF LIT $7FFF 1E1A FFFF LIT $7FFF 1E1C FFFF LIT $7FFF 1E1E FFFF LIT $7FFF 1E20 FFFF LIT $7FFF 1E22 FFFF LIT $7FFF 1E24 FFFF LIT $7FFF 1E26 FFFF LIT $7FFF 1E28 FFFF LIT $7FFF 1E2A FFFF LIT $7FFF 1E2C FFFF LIT $7FFF 1E2E FFFF LIT $7FFF 1E30 FFFF LIT $7FFF 1E32 FFFF LIT $7FFF 1E34 FFFF LIT $7FFF 1E36 FFFF LIT $7FFF 1E38 FFFF LIT $7FFF 1E3A FFFF LIT $7FFF 1E3C FFFF LIT $7FFF 1E3E FFFF LIT $7FFF 1E40 FFFF LIT $7FFF 1E42 FFFF LIT $7FFF 1E44 FFFF LIT $7FFF 1E46 FFFF LIT $7FFF 1E48 FFFF LIT $7FFF 1E4A FFFF LIT $7FFF 1E4C FFFF LIT $7FFF 1E4E FFFF LIT $7FFF 1E50 FFFF LIT $7FFF 1E52 FFFF LIT $7FFF 1E54 FFFF LIT $7FFF 1E56 FFFF LIT $7FFF 1E58 FFFF LIT $7FFF 1E5A FFFF LIT $7FFF 1E5C FFFF LIT $7FFF 1E5E FFFF LIT $7FFF 1E60 FFFF LIT $7FFF 1E62 FFFF LIT $7FFF 1E64 FFFF LIT $7FFF 1E66 FFFF LIT $7FFF 1E68 FFFF LIT $7FFF 1E6A FFFF LIT $7FFF 1E6C FFFF LIT $7FFF 1E6E FFFF LIT $7FFF 1E70 FFFF LIT $7FFF 1E72 FFFF LIT $7FFF 1E74 FFFF LIT $7FFF 1E76 FFFF LIT $7FFF 1E78 FFFF LIT $7FFF 1E7A FFFF LIT $7FFF 1E7C FFFF LIT $7FFF 1E7E FFFF LIT $7FFF 1E80 FFFF LIT $7FFF 1E82 FFFF LIT $7FFF 1E84 FFFF LIT $7FFF 1E86 FFFF LIT $7FFF 1E88 FFFF LIT $7FFF 1E8A FFFF LIT $7FFF 1E8C FFFF LIT $7FFF 1E8E FFFF LIT $7FFF 1E90 FFFF LIT $7FFF 1E92 FFFF LIT $7FFF 1E94 FFFF LIT $7FFF 1E96 FFFF LIT $7FFF 1E98 FFFF LIT $7FFF 1E9A FFFF LIT $7FFF 1E9C FFFF LIT $7FFF 1E9E FFFF LIT $7FFF 1EA0 FFFF LIT $7FFF 1EA2 FFFF LIT $7FFF 1EA4 FFFF LIT $7FFF 1EA6 FFFF LIT $7FFF 1EA8 FFFF LIT $7FFF 1EAA FFFF LIT $7FFF 1EAC FFFF LIT $7FFF 1EAE FFFF LIT $7FFF 1EB0 FFFF LIT $7FFF 1EB2 FFFF LIT $7FFF 1EB4 FFFF LIT $7FFF 1EB6 FFFF LIT $7FFF 1EB8 FFFF LIT $7FFF 1EBA FFFF LIT $7FFF 1EBC FFFF LIT $7FFF 1EBE FFFF LIT $7FFF 1EC0 FFFF LIT $7FFF 1EC2 FFFF LIT $7FFF 1EC4 FFFF LIT $7FFF 1EC6 FFFF LIT $7FFF 1EC8 FFFF LIT $7FFF 1ECA FFFF LIT $7FFF 1ECC FFFF LIT $7FFF 1ECE FFFF LIT $7FFF 1ED0 FFFF LIT $7FFF 1ED2 FFFF LIT $7FFF 1ED4 FFFF LIT $7FFF 1ED6 FFFF LIT $7FFF 1ED8 FFFF LIT $7FFF 1EDA FFFF LIT $7FFF 1EDC FFFF LIT $7FFF 1EDE FFFF LIT $7FFF 1EE0 FFFF LIT $7FFF 1EE2 FFFF LIT $7FFF 1EE4 FFFF LIT $7FFF 1EE6 FFFF LIT $7FFF 1EE8 FFFF LIT $7FFF 1EEA FFFF LIT $7FFF 1EEC FFFF LIT $7FFF 1EEE FFFF LIT $7FFF 1EF0 FFFF LIT $7FFF 1EF2 FFFF LIT $7FFF 1EF4 FFFF LIT $7FFF 1EF6 FFFF LIT $7FFF 1EF8 FFFF LIT $7FFF 1EFA FFFF LIT $7FFF 1EFC FFFF LIT $7FFF 1EFE FFFF LIT $7FFF 1F00 FFFF LIT $7FFF 1F02 FFFF LIT $7FFF 1F04 FFFF LIT $7FFF 1F06 FFFF LIT $7FFF 1F08 FFFF LIT $7FFF 1F0A FFFF LIT $7FFF 1F0C FFFF LIT $7FFF 1F0E FFFF LIT $7FFF 1F10 FFFF LIT $7FFF 1F12 FFFF LIT $7FFF 1F14 FFFF LIT $7FFF 1F16 FFFF LIT $7FFF 1F18 FFFF LIT $7FFF 1F1A FFFF LIT $7FFF 1F1C FFFF LIT $7FFF 1F1E FFFF LIT $7FFF 1F20 FFFF LIT $7FFF 1F22 FFFF LIT $7FFF 1F24 FFFF LIT $7FFF 1F26 FFFF LIT $7FFF 1F28 FFFF LIT $7FFF 1F2A FFFF LIT $7FFF 1F2C FFFF LIT $7FFF 1F2E FFFF LIT $7FFF 1F30 FFFF LIT $7FFF 1F32 FFFF LIT $7FFF 1F34 FFFF LIT $7FFF 1F36 FFFF LIT $7FFF 1F38 FFFF LIT $7FFF 1F3A FFFF LIT $7FFF 1F3C FFFF LIT $7FFF 1F3E FFFF LIT $7FFF 1F40 FFFF LIT $7FFF 1F42 FFFF LIT $7FFF 1F44 FFFF LIT $7FFF 1F46 FFFF LIT $7FFF \ star 1F48 4088 CALL cells 1F4A 4088 CALL cells 1F4C 9B48 LIT $1B48 1F4E 720F ALU $720F \ 15.* 1F50 41F7 CALL m* 1F52 4198 CALL d2* 1F54 700F ALU $700F \ rotate 1F56 4FA4 CALL star 1F58 6081 ALU $6081 1F5A 4115 CALL 2@ 1F5C 6181 ALU $6181 1F5E 8324 LIT $324 1F60 4FA8 CALL 15.* 1F62 6181 ALU $6181 1F64 FFF5 LIT $7FF5 1F66 4FA8 CALL 15.* 1F68 6203 ALU $6203 1F6A 6147 ALU $6147 1F6C 6180 ALU $6180 1F6E FFF5 LIT $7FF5 1F70 4FA8 CALL 15.* 1F72 6180 ALU $6180 1F74 8324 LIT $324 1F76 4FA8 CALL 15.* 1F78 4077 CALL - 1F7A 6B8D ALU $6B8D 1F7C 4009 CALL rot 1F7E 011A BRANCH 2! \ rotateall 1F80 8100 LIT $100 1F82 6147 ALU $6147 1F84 8000 LIT $0 1F86 6147 ALU $6147 \ (do) 1F88 6B81 ALU $6B81 1F8A 4FAB CALL rotate 1F8C 404B CALL looptest 1F8E 2FC4 0BRANCH (do) 1F90 700C ALU $700C \ scatterR 1F92 8080 LIT $80 1F94 6147 ALU $6147 1F96 8000 LIT $0 1F98 6147 ALU $6147 \ (do) 1F9A 4D33 CALL random 1F9C 8000 LIT $0 1F9E 6B81 ALU $6B81 1FA0 4FA4 CALL star 1FA2 411A CALL 2! 1FA4 4FC0 CALL rotateall 1FA6 4FC0 CALL rotateall 1FA8 4FC0 CALL rotateall 1FAA 4FC0 CALL rotateall 1FAC 404B CALL looptest 1FAE 2FCD 0BRANCH (do) 1FB0 700C ALU $700C \ scatterSpiral 1FB2 8080 LIT $80 1FB4 6147 ALU $6147 1FB6 8000 LIT $0 1FB8 6147 ALU $6147 \ (do) 1FBA 6B81 ALU $6B81 1FBC 8003 LIT $3 1FBE 6303 ALU $6303 1FC0 4007 CALL 1+ 1FC2 9F40 LIT $1F40 1FC4 41EB CALL * 1FC6 8000 LIT $0 1FC8 6B81 ALU $6B81 1FCA 4FA4 CALL star 1FCC 411A CALL 2! 1FCE 4FC0 CALL rotateall 1FD0 4FC0 CALL rotateall 1FD2 4FC0 CALL rotateall 1FD4 4FC0 CALL rotateall 1FD6 404B CALL looptest 1FD8 2FDD 0BRANCH (do) 1FDA 700C ALU $700C \ scatter 1FDC 8080 LIT $80 1FDE 6147 ALU $6147 1FE0 8000 LIT $0 1FE2 6147 ALU $6147 \ (do) 1FE4 8000 LIT $0 1FE6 6B81 ALU $6B81 1FE8 4D7F CALL sin 1FEA 6B81 ALU $6B81 1FEC 4FA4 CALL star 1FEE 411A CALL 2! 1FF0 6B81 ALU $6B81 1FF2 4D33 CALL random 1FF4 80FF LIT $FF 1FF6 6303 ALU $6303 1FF8 6147 ALU $6147 1FFA 8000 LIT $0 1FFC 6147 ALU $6147 \ (do) 1FFE 6081 ALU $6081 2000 4FAB CALL rotate 2002 404B CALL looptest 2004 2FFF 0BRANCH (do) 2006 6103 ALU $6103 2008 404B CALL looptest 200A 2FF2 0BRANCH (do) 200C 700C ALU $700C \ /128 200E 6081 ALU $6081 2010 4068 CALL 0< 2012 81FF LIT $1FF 2014 6600 ALU $6600 2016 6303 ALU $6303 2018 6180 ALU $6180 201A 8007 LIT $7 201C 6903 ALU $6903 201E 740F ALU $740F \ tx 2020 5007 CALL /128 2022 8190 LIT $190 2024 720F ALU $720F \ ty 2026 5007 CALL /128 2028 8100 LIT $100 202A 720F ALU $720F \ plot 202C 6147 ALU $6147 202E 6081 ALU $6081 2030 4FA4 CALL star 2032 6C00 ALU $6C00 2034 5010 CALL tx 2036 6180 ALU $6180 2038 8002 LIT $2 203A 6D03 ALU $6D03 203C 6B8D ALU $6B8D 203E 0C1C BRANCH sprite! \ dl 2040 FFFF LIT $7FFF 2042 FFFF LIT $7FFF 2044 FFFF LIT $7FFF 2046 FFFF LIT $7FFF 2048 FFFF LIT $7FFF 204A FFFF LIT $7FFF 204C FFFF LIT $7FFF 204E FFFF LIT $7FFF 2050 FFFF LIT $7FFF 2052 FFFF LIT $7FFF 2054 FFFF LIT $7FFF 2056 FFFF LIT $7FFF 2058 FFFF LIT $7FFF 205A FFFF LIT $7FFF 205C FFFF LIT $7FFF 205E FFFF LIT $7FFF 2060 FFFF LIT $7FFF 2062 FFFF LIT $7FFF 2064 FFFF LIT $7FFF 2066 FFFF LIT $7FFF 2068 FFFF LIT $7FFF 206A FFFF LIT $7FFF 206C FFFF LIT $7FFF 206E FFFF LIT $7FFF 2070 FFFF LIT $7FFF 2072 FFFF LIT $7FFF 2074 FFFF LIT $7FFF 2076 FFFF LIT $7FFF 2078 FFFF LIT $7FFF 207A FFFF LIT $7FFF 207C FFFF LIT $7FFF 207E FFFF LIT $7FFF 2080 FFFF LIT $7FFF 2082 FFFF LIT $7FFF 2084 FFFF LIT $7FFF 2086 FFFF LIT $7FFF 2088 FFFF LIT $7FFF 208A FFFF LIT $7FFF 208C FFFF LIT $7FFF 208E FFFF LIT $7FFF 2090 FFFF LIT $7FFF 2092 FFFF LIT $7FFF 2094 FFFF LIT $7FFF 2096 FFFF LIT $7FFF 2098 FFFF LIT $7FFF 209A FFFF LIT $7FFF 209C FFFF LIT $7FFF 209E FFFF LIT $7FFF 20A0 FFFF LIT $7FFF 20A2 FFFF LIT $7FFF 20A4 FFFF LIT $7FFF 20A6 FFFF LIT $7FFF 20A8 FFFF LIT $7FFF 20AA FFFF LIT $7FFF 20AC FFFF LIT $7FFF 20AE FFFF LIT $7FFF 20B0 FFFF LIT $7FFF 20B2 FFFF LIT $7FFF 20B4 FFFF LIT $7FFF 20B6 FFFF LIT $7FFF 20B8 FFFF LIT $7FFF 20BA FFFF LIT $7FFF 20BC FFFF LIT $7FFF 20BE FFFF LIT $7FFF 20C0 FFFF LIT $7FFF 20C2 FFFF LIT $7FFF 20C4 FFFF LIT $7FFF 20C6 FFFF LIT $7FFF 20C8 FFFF LIT $7FFF 20CA FFFF LIT $7FFF 20CC FFFF LIT $7FFF 20CE FFFF LIT $7FFF 20D0 FFFF LIT $7FFF 20D2 FFFF LIT $7FFF 20D4 FFFF LIT $7FFF 20D6 FFFF LIT $7FFF 20D8 FFFF LIT $7FFF 20DA FFFF LIT $7FFF 20DC FFFF LIT $7FFF 20DE FFFF LIT $7FFF 20E0 FFFF LIT $7FFF 20E2 FFFF LIT $7FFF 20E4 FFFF LIT $7FFF 20E6 FFFF LIT $7FFF 20E8 FFFF LIT $7FFF 20EA FFFF LIT $7FFF 20EC FFFF LIT $7FFF 20EE FFFF LIT $7FFF 20F0 FFFF LIT $7FFF 20F2 FFFF LIT $7FFF 20F4 FFFF LIT $7FFF 20F6 FFFF LIT $7FFF 20F8 FFFF LIT $7FFF 20FA FFFF LIT $7FFF 20FC FFFF LIT $7FFF 20FE FFFF LIT $7FFF 2100 FFFF LIT $7FFF 2102 FFFF LIT $7FFF 2104 FFFF LIT $7FFF 2106 FFFF LIT $7FFF 2108 FFFF LIT $7FFF 210A FFFF LIT $7FFF 210C FFFF LIT $7FFF 210E FFFF LIT $7FFF 2110 FFFF LIT $7FFF 2112 FFFF LIT $7FFF 2114 FFFF LIT $7FFF 2116 FFFF LIT $7FFF 2118 FFFF LIT $7FFF 211A FFFF LIT $7FFF 211C FFFF LIT $7FFF 211E FFFF LIT $7FFF 2120 FFFF LIT $7FFF 2122 FFFF LIT $7FFF 2124 FFFF LIT $7FFF 2126 FFFF LIT $7FFF 2128 FFFF LIT $7FFF 212A FFFF LIT $7FFF 212C FFFF LIT $7FFF 212E FFFF LIT $7FFF 2130 FFFF LIT $7FFF 2132 FFFF LIT $7FFF 2134 FFFF LIT $7FFF 2136 FFFF LIT $7FFF 2138 FFFF LIT $7FFF 213A FFFF LIT $7FFF 213C FFFF LIT $7FFF 213E FFFF LIT $7FFF 2140 FFFF LIT $7FFF 2142 FFFF LIT $7FFF 2144 FFFF LIT $7FFF 2146 FFFF LIT $7FFF 2148 FFFF LIT $7FFF 214A FFFF LIT $7FFF 214C FFFF LIT $7FFF 214E FFFF LIT $7FFF 2150 FFFF LIT $7FFF 2152 FFFF LIT $7FFF 2154 FFFF LIT $7FFF 2156 FFFF LIT $7FFF 2158 FFFF LIT $7FFF 215A FFFF LIT $7FFF 215C FFFF LIT $7FFF 215E FFFF LIT $7FFF 2160 FFFF LIT $7FFF 2162 FFFF LIT $7FFF 2164 FFFF LIT $7FFF 2166 FFFF LIT $7FFF 2168 FFFF LIT $7FFF 216A FFFF LIT $7FFF 216C FFFF LIT $7FFF 216E FFFF LIT $7FFF 2170 FFFF LIT $7FFF 2172 FFFF LIT $7FFF 2174 FFFF LIT $7FFF 2176 FFFF LIT $7FFF 2178 FFFF LIT $7FFF 217A FFFF LIT $7FFF 217C FFFF LIT $7FFF 217E FFFF LIT $7FFF 2180 FFFF LIT $7FFF 2182 FFFF LIT $7FFF 2184 FFFF LIT $7FFF 2186 FFFF LIT $7FFF 2188 FFFF LIT $7FFF 218A FFFF LIT $7FFF 218C FFFF LIT $7FFF 218E FFFF LIT $7FFF 2190 FFFF LIT $7FFF 2192 FFFF LIT $7FFF 2194 FFFF LIT $7FFF 2196 FFFF LIT $7FFF 2198 FFFF LIT $7FFF 219A FFFF LIT $7FFF 219C FFFF LIT $7FFF 219E FFFF LIT $7FFF 21A0 FFFF LIT $7FFF 21A2 FFFF LIT $7FFF 21A4 FFFF LIT $7FFF 21A6 FFFF LIT $7FFF 21A8 FFFF LIT $7FFF 21AA FFFF LIT $7FFF 21AC FFFF LIT $7FFF 21AE FFFF LIT $7FFF 21B0 FFFF LIT $7FFF 21B2 FFFF LIT $7FFF 21B4 FFFF LIT $7FFF 21B6 FFFF LIT $7FFF 21B8 FFFF LIT $7FFF 21BA FFFF LIT $7FFF 21BC FFFF LIT $7FFF 21BE FFFF LIT $7FFF 21C0 FFFF LIT $7FFF 21C2 FFFF LIT $7FFF 21C4 FFFF LIT $7FFF 21C6 FFFF LIT $7FFF 21C8 FFFF LIT $7FFF 21CA FFFF LIT $7FFF 21CC FFFF LIT $7FFF 21CE FFFF LIT $7FFF 21D0 FFFF LIT $7FFF 21D2 FFFF LIT $7FFF 21D4 FFFF LIT $7FFF 21D6 FFFF LIT $7FFF 21D8 FFFF LIT $7FFF 21DA FFFF LIT $7FFF 21DC FFFF LIT $7FFF 21DE FFFF LIT $7FFF 21E0 FFFF LIT $7FFF 21E2 FFFF LIT $7FFF 21E4 FFFF LIT $7FFF 21E6 FFFF LIT $7FFF 21E8 FFFF LIT $7FFF 21EA FFFF LIT $7FFF 21EC FFFF LIT $7FFF 21EE FFFF LIT $7FFF 21F0 FFFF LIT $7FFF 21F2 FFFF LIT $7FFF 21F4 FFFF LIT $7FFF 21F6 FFFF LIT $7FFF 21F8 FFFF LIT $7FFF 21FA FFFF LIT $7FFF 21FC FFFF LIT $7FFF 21FE FFFF LIT $7FFF 2200 FFFF LIT $7FFF 2202 FFFF LIT $7FFF 2204 FFFF LIT $7FFF 2206 FFFF LIT $7FFF 2208 FFFF LIT $7FFF 220A FFFF LIT $7FFF 220C FFFF LIT $7FFF 220E FFFF LIT $7FFF 2210 FFFF LIT $7FFF 2212 FFFF LIT $7FFF 2214 FFFF LIT $7FFF 2216 FFFF LIT $7FFF 2218 FFFF LIT $7FFF 221A FFFF LIT $7FFF 221C FFFF LIT $7FFF 221E FFFF LIT $7FFF 2220 FFFF LIT $7FFF 2222 FFFF LIT $7FFF 2224 FFFF LIT $7FFF 2226 FFFF LIT $7FFF 2228 FFFF LIT $7FFF 222A FFFF LIT $7FFF 222C FFFF LIT $7FFF 222E FFFF LIT $7FFF 2230 FFFF LIT $7FFF 2232 FFFF LIT $7FFF 2234 FFFF LIT $7FFF 2236 FFFF LIT $7FFF 2238 FFFF LIT $7FFF 223A FFFF LIT $7FFF 223C FFFF LIT $7FFF 223E FFFF LIT $7FFF 2240 FFFF LIT $7FFF 2242 FFFF LIT $7FFF 2244 FFFF LIT $7FFF 2246 FFFF LIT $7FFF 2248 FFFF LIT $7FFF 224A FFFF LIT $7FFF 224C FFFF LIT $7FFF 224E FFFF LIT $7FFF 2250 FFFF LIT $7FFF 2252 FFFF LIT $7FFF 2254 FFFF LIT $7FFF 2256 FFFF LIT $7FFF 2258 FFFF LIT $7FFF 225A FFFF LIT $7FFF 225C FFFF LIT $7FFF 225E FFFF LIT $7FFF 2260 FFFF LIT $7FFF 2262 FFFF LIT $7FFF 2264 FFFF LIT $7FFF 2266 FFFF LIT $7FFF 2268 FFFF LIT $7FFF 226A FFFF LIT $7FFF 226C FFFF LIT $7FFF 226E FFFF LIT $7FFF 2270 FFFF LIT $7FFF 2272 FFFF LIT $7FFF 2274 FFFF LIT $7FFF 2276 FFFF LIT $7FFF 2278 FFFF LIT $7FFF 227A FFFF LIT $7FFF 227C FFFF LIT $7FFF 227E FFFF LIT $7FFF 2280 FFFF LIT $7FFF 2282 FFFF LIT $7FFF 2284 FFFF LIT $7FFF 2286 FFFF LIT $7FFF 2288 FFFF LIT $7FFF 228A FFFF LIT $7FFF 228C FFFF LIT $7FFF 228E FFFF LIT $7FFF 2290 FFFF LIT $7FFF 2292 FFFF LIT $7FFF 2294 FFFF LIT $7FFF 2296 FFFF LIT $7FFF 2298 FFFF LIT $7FFF 229A FFFF LIT $7FFF 229C FFFF LIT $7FFF 229E FFFF LIT $7FFF 22A0 FFFF LIT $7FFF 22A2 FFFF LIT $7FFF 22A4 FFFF LIT $7FFF 22A6 FFFF LIT $7FFF 22A8 FFFF LIT $7FFF 22AA FFFF LIT $7FFF 22AC FFFF LIT $7FFF 22AE FFFF LIT $7FFF 22B0 FFFF LIT $7FFF 22B2 FFFF LIT $7FFF 22B4 FFFF LIT $7FFF 22B6 FFFF LIT $7FFF 22B8 FFFF LIT $7FFF 22BA FFFF LIT $7FFF 22BC FFFF LIT $7FFF 22BE FFFF LIT $7FFF 22C0 FFFF LIT $7FFF 22C2 FFFF LIT $7FFF 22C4 FFFF LIT $7FFF 22C6 FFFF LIT $7FFF 22C8 FFFF LIT $7FFF 22CA FFFF LIT $7FFF 22CC FFFF LIT $7FFF 22CE FFFF LIT $7FFF 22D0 FFFF LIT $7FFF 22D2 FFFF LIT $7FFF 22D4 FFFF LIT $7FFF 22D6 FFFF LIT $7FFF 22D8 FFFF LIT $7FFF 22DA FFFF LIT $7FFF 22DC FFFF LIT $7FFF 22DE FFFF LIT $7FFF 22E0 FFFF LIT $7FFF 22E2 FFFF LIT $7FFF 22E4 FFFF LIT $7FFF 22E6 FFFF LIT $7FFF 22E8 FFFF LIT $7FFF 22EA FFFF LIT $7FFF 22EC FFFF LIT $7FFF 22EE FFFF LIT $7FFF 22F0 FFFF LIT $7FFF 22F2 FFFF LIT $7FFF 22F4 FFFF LIT $7FFF 22F6 FFFF LIT $7FFF 22F8 FFFF LIT $7FFF 22FA FFFF LIT $7FFF 22FC FFFF LIT $7FFF 22FE FFFF LIT $7FFF 2300 FFFF LIT $7FFF 2302 FFFF LIT $7FFF 2304 FFFF LIT $7FFF 2306 FFFF LIT $7FFF 2308 FFFF LIT $7FFF 230A FFFF LIT $7FFF 230C FFFF LIT $7FFF 230E FFFF LIT $7FFF 2310 FFFF LIT $7FFF 2312 FFFF LIT $7FFF 2314 FFFF LIT $7FFF 2316 FFFF LIT $7FFF 2318 FFFF LIT $7FFF 231A FFFF LIT $7FFF 231C FFFF LIT $7FFF 231E FFFF LIT $7FFF 2320 FFFF LIT $7FFF 2322 FFFF LIT $7FFF 2324 FFFF LIT $7FFF 2326 FFFF LIT $7FFF 2328 FFFF LIT $7FFF 232A FFFF LIT $7FFF 232C FFFF LIT $7FFF 232E FFFF LIT $7FFF 2330 FFFF LIT $7FFF 2332 FFFF LIT $7FFF 2334 FFFF LIT $7FFF 2336 FFFF LIT $7FFF 2338 FFFF LIT $7FFF 233A FFFF LIT $7FFF 233C FFFF LIT $7FFF 233E FFFF LIT $7FFF 2340 FFFF LIT $7FFF 2342 FFFF LIT $7FFF 2344 FFFF LIT $7FFF 2346 FFFF LIT $7FFF 2348 FFFF LIT $7FFF 234A FFFF LIT $7FFF 234C FFFF LIT $7FFF 234E FFFF LIT $7FFF 2350 FFFF LIT $7FFF 2352 FFFF LIT $7FFF 2354 FFFF LIT $7FFF 2356 FFFF LIT $7FFF 2358 FFFF LIT $7FFF 235A FFFF LIT $7FFF 235C FFFF LIT $7FFF 235E FFFF LIT $7FFF 2360 FFFF LIT $7FFF 2362 FFFF LIT $7FFF 2364 FFFF LIT $7FFF 2366 FFFF LIT $7FFF 2368 FFFF LIT $7FFF 236A FFFF LIT $7FFF 236C FFFF LIT $7FFF 236E FFFF LIT $7FFF 2370 FFFF LIT $7FFF 2372 FFFF LIT $7FFF 2374 FFFF LIT $7FFF 2376 FFFF LIT $7FFF 2378 FFFF LIT $7FFF 237A FFFF LIT $7FFF 237C FFFF LIT $7FFF 237E FFFF LIT $7FFF 2380 FFFF LIT $7FFF 2382 FFFF LIT $7FFF 2384 FFFF LIT $7FFF 2386 FFFF LIT $7FFF 2388 FFFF LIT $7FFF 238A FFFF LIT $7FFF 238C FFFF LIT $7FFF 238E FFFF LIT $7FFF 2390 FFFF LIT $7FFF 2392 FFFF LIT $7FFF 2394 FFFF LIT $7FFF 2396 FFFF LIT $7FFF 2398 FFFF LIT $7FFF 239A FFFF LIT $7FFF 239C FFFF LIT $7FFF 239E FFFF LIT $7FFF 23A0 FFFF LIT $7FFF 23A2 FFFF LIT $7FFF 23A4 FFFF LIT $7FFF 23A6 FFFF LIT $7FFF 23A8 FFFF LIT $7FFF 23AA FFFF LIT $7FFF 23AC FFFF LIT $7FFF 23AE FFFF LIT $7FFF 23B0 FFFF LIT $7FFF 23B2 FFFF LIT $7FFF 23B4 FFFF LIT $7FFF 23B6 FFFF LIT $7FFF 23B8 FFFF LIT $7FFF 23BA FFFF LIT $7FFF 23BC FFFF LIT $7FFF 23BE FFFF LIT $7FFF 23C0 FFFF LIT $7FFF 23C2 FFFF LIT $7FFF 23C4 FFFF LIT $7FFF 23C6 FFFF LIT $7FFF 23C8 FFFF LIT $7FFF 23CA FFFF LIT $7FFF 23CC FFFF LIT $7FFF 23CE FFFF LIT $7FFF 23D0 FFFF LIT $7FFF 23D2 FFFF LIT $7FFF 23D4 FFFF LIT $7FFF 23D6 FFFF LIT $7FFF 23D8 FFFF LIT $7FFF 23DA FFFF LIT $7FFF 23DC FFFF LIT $7FFF 23DE FFFF LIT $7FFF 23E0 FFFF LIT $7FFF 23E2 FFFF LIT $7FFF 23E4 FFFF LIT $7FFF 23E6 FFFF LIT $7FFF 23E8 FFFF LIT $7FFF 23EA FFFF LIT $7FFF 23EC FFFF LIT $7FFF 23EE FFFF LIT $7FFF 23F0 FFFF LIT $7FFF 23F2 FFFF LIT $7FFF 23F4 FFFF LIT $7FFF 23F6 FFFF LIT $7FFF 23F8 FFFF LIT $7FFF 23FA FFFF LIT $7FFF 23FC FFFF LIT $7FFF 23FE FFFF LIT $7FFF 2400 FFFF LIT $7FFF 2402 FFFF LIT $7FFF 2404 FFFF LIT $7FFF 2406 FFFF LIT $7FFF 2408 FFFF LIT $7FFF 240A FFFF LIT $7FFF 240C FFFF LIT $7FFF 240E FFFF LIT $7FFF 2410 FFFF LIT $7FFF 2412 FFFF LIT $7FFF 2414 FFFF LIT $7FFF 2416 FFFF LIT $7FFF 2418 FFFF LIT $7FFF 241A FFFF LIT $7FFF 241C FFFF LIT $7FFF 241E FFFF LIT $7FFF 2420 FFFF LIT $7FFF 2422 FFFF LIT $7FFF 2424 FFFF LIT $7FFF 2426 FFFF LIT $7FFF 2428 FFFF LIT $7FFF 242A FFFF LIT $7FFF 242C FFFF LIT $7FFF 242E FFFF LIT $7FFF 2430 FFFF LIT $7FFF 2432 FFFF LIT $7FFF 2434 FFFF LIT $7FFF 2436 FFFF LIT $7FFF 2438 FFFF LIT $7FFF 243A FFFF LIT $7FFF 243C FFFF LIT $7FFF 243E FFFF LIT $7FFF 2440 FFFF LIT $7FFF \ erasedl 2442 A040 LIT $2040 2444 8400 LIT $400 2446 41D4 CALL bounds \ (begin) 2448 8000 LIT $0 244A 6600 ALU $6600 244C 6181 ALU $6181 244E 6023 ALU $6023 2450 6103 ALU $6103 2452 408A CALL cell+ 2454 6781 ALU $6781 2456 3224 0BRANCH (begin) 2458 0016 BRANCH 2drop \ makedl 245A 5221 CALL erasedl 245C 8080 LIT $80 245E 6147 ALU $6147 2460 8000 LIT $0 2462 6147 ALU $6147 \ (do) 2464 6B81 ALU $6B81 2466 8002 LIT $2 2468 6D03 ALU $6D03 246A 4088 CALL cells 246C A040 LIT $2040 246E 6203 ALU $6203 2470 6B81 ALU $6B81 2472 6180 ALU $6180 2474 6023 ALU $6023 2476 6103 ALU $6103 2478 404B CALL looptest 247A 3232 0BRANCH (do) 247C 700C ALU $700C \ lastsp 247E 0000 BRANCH 0jump \ stars-chasebeam 2480 4C26 CALL hide 2482 8000 LIT $0 2484 A47E LIT $247E 2486 6023 ALU $6023 2488 6103 ALU $6103 248A 8200 LIT $200 248C 6147 ALU $6147 248E 8000 LIT $0 2490 6147 ALU $6147 \ (do) 2492 4C0D CALL vga-line@ 2494 6B81 ALU $6B81 2496 6703 ALU $6703 2498 3249 0BRANCH (do) 249A 6B81 ALU $6B81 249C 4088 CALL cells 249E A040 LIT $2040 24A0 6203 ALU $6203 24A2 6C00 ALU $6C00 24A4 6081 ALU $6081 24A6 4068 CALL 0< 24A8 3257 0BRANCH (else) 24AA 6103 ALU $6103 24AC 1261 BRANCH (then) \ (else) 24AE A47E LIT $247E 24B0 6C00 ALU $6C00 24B2 4007 CALL 1+ 24B4 8007 LIT $7 24B6 6303 ALU $6303 24B8 6081 ALU $6081 24BA A47E LIT $247E 24BC 6023 ALU $6023 24BE 6103 ALU $6103 24C0 5016 CALL plot \ (then) 24C2 6B81 ALU $6B81 24C4 8080 LIT $80 24C6 6803 ALU $6803 24C8 3267 0BRANCH (then) 24CA 6B81 ALU $6B81 24CC 4FAB CALL rotate \ (then) 24CE 404B CALL looptest 24D0 3249 0BRANCH (do) 24D2 700C ALU $700C \ loadcolors 24D4 8008 LIT $8 24D6 6147 ALU $6147 24D8 8000 LIT $0 24DA 6147 ALU $6147 \ (do) 24DC 6081 ALU $6081 24DE 6C00 ALU $6C00 24E0 6B81 ALU $6B81 24E2 4088 CALL cells 24E4 C420 LIT $4420 24E6 6203 ALU $6203 24E8 6023 ALU $6023 24EA 6103 ALU $6103 24EC 408A CALL cell+ 24EE 404B CALL looptest 24F0 326E 0BRANCH (do) 24F2 710F ALU $710F \ cpastels 24F4 0423 BRANCH $846 24F6 0243 BRANCH $486 24F8 0234 BRANCH $468 24FA 0444 BRANCH (repeat) 24FC 0324 BRANCH $648 24FE 0432 BRANCH $864 2500 0342 BRANCH $684 2502 0244 BRANCH $488 \ pastels 2504 A4F4 LIT $24F4 2506 126A BRANCH loadcolors \ crainbow 2508 0400 BRANCH $800 250A 0440 BRANCH $880 250C 0040 BRANCH $80 250E 0044 BRANCH $88 2510 0004 BRANCH $8 2512 0404 BRANCH frac 2514 0444 BRANCH (repeat) 2516 0444 BRANCH (repeat) \ rainbow 2518 A508 LIT $2508 251A 126A BRANCH loadcolors \ prev_sw3_n 251C 0000 BRANCH 0jump \ next? 251E C502 LIT $4502 2520 6C00 ALU $6C00 2522 A51C LIT $251C 2524 03D8 BRANCH fall? \ loadsprites 2526 408E CALL 2/ 2528 C000 LIT $4000 252A 6147 ALU $6147 252C 8000 LIT $0 252E 6147 ALU $6147 \ (do) 2530 405C CALL 2dup 2532 6B81 ALU $6B81 2534 4155 CALL s>d 2536 413E CALL d+ 2538 4BAF CALL flash@ 253A 6B81 ALU $6B81 253C C302 LIT $4302 253E 6023 ALU $6023 2540 6103 ALU $6103 2542 C304 LIT $4304 2544 6023 ALU $6023 2546 6103 ALU $6103 2548 404B CALL looptest 254A 3298 0BRANCH (do) 254C 0016 BRANCH 2drop \ stars-main 254E 4C56 CALL vga-page 2550 C000 LIT $4000 2552 6147 ALU $6147 2554 8000 LIT $0 2556 6147 ALU $6147 \ (do) 2558 C000 LIT $4000 255A 8020 LIT $20 255C 408E CALL 2/ 255E 6B81 ALU $6B81 2560 4155 CALL s>d 2562 413E CALL d+ 2564 4BAF CALL flash@ 2566 6B81 ALU $6B81 2568 C302 LIT $4302 256A 6023 ALU $6023 256C 6103 ALU $6103 256E C304 LIT $4304 2570 6023 ALU $6023 2572 6103 ALU $6103 2574 404B CALL looptest 2576 32AC 0BRANCH (do) 2578 C308 LIT $4308 257A 4B66 CALL in 257C 528C CALL rainbow 257E 443B CALL time@ 2580 6503 ALU $6503 2582 9A64 LIT $1A64 2584 6023 ALU $6023 2586 6103 ALU $6103 2588 9A64 LIT $1A64 258A 4B6A CALL out 258C 4FEE CALL scatter 258E B03F LIT $303F 2590 6600 ALU $6600 2592 806A LIT $6A 2594 9B42 LIT $1B42 2596 4448 CALL setalarm 2598 8000 LIT $0 259A 9B46 LIT $1B46 259C 6023 ALU $6023 259E 6103 ALU $6103 \ (begin) 25A0 522D CALL makedl 25A2 5240 CALL stars-chasebeam 25A4 9B46 LIT $1B46 25A6 6C00 ALU $6C00 25A8 4007 CALL 1+ 25AA 9B46 LIT $1B46 25AC 6023 ALU $6023 25AE 6103 ALU $6103 25B0 528F CALL next? 25B2 32D0 0BRANCH (begin) 25B4 9B46 LIT $1B46 25B6 6C00 ALU $6C00 25B8 4353 CALL . 25BA 40A4 CALL sliteral 25BC 2007 0BRANCH 1+ 25BE 7266 ALU $7266 25C0 6D61 ALU $6D61 25C2 7365 ALU $7365 25C4 42FD CALL type 25C6 02D9 BRANCH cr \ buttons 25C8 D10A LIT $510A 25CA 4B66 CALL in 25CC D103 LIT $5103 25CE 6C00 ALU $6C00 25D0 8007 LIT $7 25D2 6503 ALU $6503 25D4 D10A LIT $510A 25D6 0B6A BRANCH out \ response0 25D8 8022 LIT $22 25DA 482B CALL packet@ 25DC 83B3 LIT $3B3 25DE 8002 LIT $2 25E0 801A LIT $1A 25E2 46C4 CALL mac-inoffset 25E4 46D0 CALL mac@n 25E6 4841 CALL net-my-ip 25E8 4121 CALL 2over 25EA 491A CALL arp-lookup 25EC 4A2B CALL udp-header 25EE 8000 LIT $0 25F0 46E7 CALL mac-pkt-, 25F2 802A LIT $2A 25F4 482B CALL packet@ 25F6 06E7 BRANCH mac-pkt-, \ response1 25F8 4A65 CALL udp-wrapup 25FA 0794 BRANCH mac-send \ respond 25FC 52EC CALL response0 25FE 12FC BRANCH response1 \ ramread 2600 52EC CALL response0 2602 802E LIT $2E 2604 482B CALL packet@ 2606 8080 LIT $80 2608 41D4 CALL bounds \ (begin) 260A 6081 ALU $6081 260C 6C00 ALU $6C00 260E 46E7 CALL mac-pkt-, 2610 408A CALL cell+ 2612 6781 ALU $6781 2614 3305 0BRANCH (begin) 2616 4016 CALL 2drop 2618 12FC BRANCH response1 \ ramwrite 261A 802E LIT $2E 261C 482B CALL packet@ 261E 8040 LIT $40 2620 6147 ALU $6147 2622 8000 LIT $0 2624 6147 ALU $6147 \ (do) 2626 8030 LIT $30 2628 6B81 ALU $6B81 262A 4088 CALL cells 262C 6203 ALU $6203 262E 482B CALL packet@ 2630 6181 ALU $6181 2632 6023 ALU $6023 2634 6103 ALU $6103 2636 408A CALL cell+ 2638 404B CALL looptest 263A 3313 0BRANCH (do) 263C 6103 ALU $6103 263E 12FE BRANCH respond \ reboot 2640 52FE CALL respond 2642 1FC0 BRANCH bootloader \ flashread 2644 52EC CALL response0 2646 802E LIT $2E 2648 482D CALL packetd@ 264A 419A CALL d2/ 264C 4B6E CALL flash-reset 264E 8040 LIT $40 2650 6147 ALU $6147 2652 8000 LIT $0 2654 6147 ALU $6147 \ (do) 2656 405C CALL 2dup 2658 4BAF CALL flash@ 265A 46E7 CALL mac-pkt-, 265C 4157 CALL d1+ 265E 404B CALL looptest 2660 332B 0BRANCH (do) 2662 4016 CALL 2drop 2664 12FC BRANCH response1 \ flasherase 2666 52FE CALL respond 2668 0BB4 BRANCH flash-chiperase \ flashdone 266A 52EC CALL response0 266C 802E LIT $2E 266E 482D CALL packetd@ 2670 419A CALL d2/ 2672 4BD2 CALL flash-erased 2674 46E7 CALL mac-pkt-, 2676 12FC BRANCH response1 \ flashwrite 2678 802E LIT $2E 267A 482D CALL packetd@ 267C 419A CALL d2/ 267E 8040 LIT $40 2680 6147 ALU $6147 2682 8000 LIT $0 2684 6147 ALU $6147 \ (do) 2686 405C CALL 2dup 2688 8032 LIT $32 268A 6B81 ALU $6B81 268C 4088 CALL cells 268E 6203 ALU $6203 2690 482B CALL packet@ 2692 400D CALL -rot 2694 4B9C CALL flash! 2696 4157 CALL d1+ 2698 404B CALL looptest 269A 3343 0BRANCH (do) 269C 4016 CALL 2drop 269E 12FE BRANCH respond \ flashsectorerase 26A0 802E LIT $2E 26A2 482D CALL packetd@ 26A4 419A CALL d2/ 26A6 4BC1 CALL flash-sectorerase 26A8 12FE BRANCH respond \ opcodes 26AA 2600 0BRANCH $C00 26AC 261A 0BRANCH $C34 26AE 2640 0BRANCH $C80 26B0 2644 0BRANCH $C88 26B2 2666 0BRANCH $CCC 26B4 266A 0BRANCH $CD4 26B6 2678 0BRANCH mac1b 26B8 26A0 0BRANCH mac! \ loader-handler 26BA 8011 LIT $11 26BC 499B CALL ip-isproto 26BE 3375 0BRANCH (then) 26C0 8024 LIT $24 26C2 482B CALL packet@ 26C4 83B3 LIT $3B3 26C6 6703 ALU $6703 26C8 8002 LIT $2 26CA 801A LIT $1A 26CC 46C4 CALL mac-inoffset 26CE 46D0 CALL mac@n 26D0 491A CALL arp-lookup 26D2 4066 CALL 0<> 26D4 6303 ALU $6303 26D6 3375 0BRANCH (then) 26D8 4A64 CALL udp-checksum? 26DA 3375 0BRANCH (then) 26DC 802C LIT $2C 26DE 482B CALL packet@ 26E0 4088 CALL cells 26E2 A6AA LIT $26AA 26E4 6203 ALU $6203 26E6 6C00 ALU $6C00 26E8 40A9 CALL execute \ (then) 26EA 700C ALU $700C \ ip-dns@ 26EC 9074 LIT $1074 26EE 0115 BRANCH 2@ \ dns-skiplabel 26F0 6081 ALU $6081 26F2 4007 CALL 1+ 26F4 6180 ALU $6180 26F6 46C4 CALL mac-inoffset 26F8 4684 CALL macc@ 26FA 6081 ALU $6081 26FC 4012 CALL 0= 26FE 3382 0BRANCH (then) 2700 6103 ALU $6103 2702 700C ALU $700C \ (then) 2704 6081 ALU $6081 2706 80C0 LIT $C0 2708 406F CALL >= 270A 3389 0BRANCH (then) 270C 6103 ALU $6103 270E 4007 CALL 1+ 2710 700C ALU $700C \ (then) 2712 6203 ALU $6203 2714 1378 BRANCH dns-skiplabel 2716 700C ALU $700C \ dns-query 2718 6147 ALU $6147 271A 8035 LIT $35 271C FCCB LIT $7CCB 271E 5376 CALL ip-dns@ 2720 4841 CALL net-my-ip 2722 5376 CALL ip-dns@ 2724 491A CALL arp-lookup 2726 4A2B CALL udp-header 2728 6B8D ALU $6B8D 272A 8100 LIT $100 272C 8001 LIT $1 272E 46F1 CALL mac-pkt-3, 2730 8003 LIT $3 2732 46F4 CALL mac-pkt-,0 2734 40A9 CALL execute 2736 8001 LIT $1 2738 6081 ALU $6081 273A 46EE CALL mac-pkt-2, 273C 4A65 CALL udp-wrapup 273E 5376 CALL ip-dns@ 2740 491A CALL arp-lookup 2742 33A3 0BRANCH (then) 2744 4794 CALL mac-send \ (then) 2746 700C ALU $700C \ dns-handler 2748 8035 LIT $35 274A FCCB LIT $7CCB 274C 410D CALL d= 274E 802C LIT $2C 2750 482B CALL packet@ 2752 4068 CALL 0< 2754 6303 ALU $6303 2756 8030 LIT $30 2758 482B CALL packet@ 275A 4066 CALL 0<> 275C 6303 ALU $6303 275E 33BF 0BRANCH (else) 2760 8036 LIT $36 2762 5378 CALL dns-skiplabel 2764 8004 LIT $4 2766 6203 ALU $6203 2768 5378 CALL dns-skiplabel 276A 800A LIT $A 276C 6203 ALU $6203 276E 46C4 CALL mac-inoffset 2770 8002 LIT $2 2772 6180 ALU $6180 2774 46D0 CALL mac@n 2776 802A LIT $2A 2778 482B CALL packet@ 277A 8001 LIT $1 277C 13C0 BRANCH (then) \ (else) 277E 8000 LIT $0 \ (then) 2780 700C ALU $700C \ dns-appendname 2782 6081 ALU $6081 2784 46E2 CALL mac-pkt-c, 2786 06FC BRANCH mac-pkt-s, \ dns-append.com 2788 53C1 CALL dns-appendname 278A 40A4 CALL sliteral 278C 6303 ALU $6303 278E 6D6F ALU $6D6F 2790 53C1 CALL dns-appendname 2792 8000 LIT $0 2794 06E2 BRANCH mac-pkt-c, \ preip-handler 2796 476F CALL mac-fullness 2798 33D5 0BRANCH (repeat) 279A 800C LIT $C 279C 482B CALL packet@ 279E 8800 LIT $800 27A0 6703 ALU $6703 27A2 33D3 0BRANCH (then) 27A4 4B01 CALL dhcp-wait-offer \ (then) 27A6 4789 CALL mac-consume 27A8 13CB BRANCH preip-handler \ (repeat) 27AA 700C ALU $700C \ haveip-handler 27AC 476F CALL mac-fullness 27AE 33ED 0BRANCH (repeat) 27B0 4985 CALL arp-handler 27B2 800C LIT $C 27B4 482B CALL packet@ 27B6 8800 LIT $800 27B8 6703 ALU $6703 27BA 33E7 0BRANCH (then) 27BC 8002 LIT $2 27BE 801E LIT $1E 27C0 46C4 CALL mac-inoffset 27C2 46D0 CALL mac@n 27C4 4841 CALL net-my-ip 27C6 410D CALL d= 27C8 33E6 0BRANCH (then) 27CA 49D3 CALL icmp-handler \ (then) 27CC 535D CALL loader-handler \ (then) 27CE 4002 CALL depth 27D0 33EB 0BRANCH (then) 27D2 438A CALL .s 27D4 42D9 CALL cr \ (then) 27D6 4789 CALL mac-consume 27D8 13D6 BRANCH haveip-handler \ (repeat) 27DA 700C ALU $700C \ whereis 27DC 6147 ALU $6147 27DE 8180 LIT $180 27E0 6B81 ALU $6B81 27E2 4D97 CALL sin* 27E4 8180 LIT $180 27E6 6203 ALU $6203 27E8 6B81 ALU $6B81 27EA 8004 LIT $4 27EC 6903 ALU $6903 27EE 8020 LIT $20 27F0 6B8D ALU $6B8D 27F2 4088 CALL cells 27F4 4D97 CALL sin* 27F6 720F ALU $720F \ invx 27F8 0000 BRANCH 0jump 27FA 0000 BRANCH 0jump 27FC 0000 BRANCH 0jump 27FE 0000 BRANCH 0jump 2800 0000 BRANCH 0jump 2802 0000 BRANCH 0jump 2804 0000 BRANCH 0jump 2806 0000 BRANCH 0jump 2808 0000 BRANCH 0jump 280A 0000 BRANCH 0jump 280C 0000 BRANCH 0jump 280E 0000 BRANCH 0jump 2810 0000 BRANCH 0jump 2812 0000 BRANCH 0jump 2814 0000 BRANCH 0jump 2816 0000 BRANCH 0jump 2818 0000 BRANCH 0jump 281A 0000 BRANCH 0jump 281C 0000 BRANCH 0jump 281E 0000 BRANCH 0jump 2820 0000 BRANCH 0jump 2822 0000 BRANCH 0jump 2824 0000 BRANCH 0jump 2826 0000 BRANCH 0jump 2828 0000 BRANCH 0jump 282A 0000 BRANCH 0jump 282C 0000 BRANCH 0jump 282E 0000 BRANCH 0jump 2830 0000 BRANCH 0jump 2832 0000 BRANCH 0jump 2834 0000 BRANCH 0jump 2836 0000 BRANCH 0jump 2838 0000 BRANCH 0jump 283A 0000 BRANCH 0jump 283C 0000 BRANCH 0jump 283E 0000 BRANCH 0jump 2840 0000 BRANCH 0jump 2842 0000 BRANCH 0jump 2844 0000 BRANCH 0jump 2846 0000 BRANCH 0jump 2848 0000 BRANCH 0jump 284A 0000 BRANCH 0jump 284C 0000 BRANCH 0jump 284E 0000 BRANCH 0jump 2850 0000 BRANCH 0jump 2852 0000 BRANCH 0jump 2854 0000 BRANCH 0jump 2856 0000 BRANCH 0jump 2858 0000 BRANCH 0jump 285A 0000 BRANCH 0jump 285C 0000 BRANCH 0jump 285E 0000 BRANCH 0jump 2860 0000 BRANCH 0jump 2862 0000 BRANCH 0jump 2864 0000 BRANCH 0jump 2866 0000 BRANCH 0jump \ invy 2868 0000 BRANCH 0jump 286A 0000 BRANCH 0jump 286C 0000 BRANCH 0jump 286E 0000 BRANCH 0jump 2870 0000 BRANCH 0jump 2872 0000 BRANCH 0jump 2874 0000 BRANCH 0jump 2876 0000 BRANCH 0jump 2878 0000 BRANCH 0jump 287A 0000 BRANCH 0jump 287C 0000 BRANCH 0jump 287E 0000 BRANCH 0jump 2880 0000 BRANCH 0jump 2882 0000 BRANCH 0jump 2884 0000 BRANCH 0jump 2886 0000 BRANCH 0jump 2888 0000 BRANCH 0jump 288A 0000 BRANCH 0jump 288C 0000 BRANCH 0jump 288E 0000 BRANCH 0jump 2890 0000 BRANCH 0jump 2892 0000 BRANCH 0jump 2894 0000 BRANCH 0jump 2896 0000 BRANCH 0jump 2898 0000 BRANCH 0jump 289A 0000 BRANCH 0jump 289C 0000 BRANCH 0jump 289E 0000 BRANCH 0jump 28A0 0000 BRANCH 0jump 28A2 0000 BRANCH 0jump 28A4 0000 BRANCH 0jump 28A6 0000 BRANCH 0jump 28A8 0000 BRANCH 0jump 28AA 0000 BRANCH 0jump 28AC 0000 BRANCH 0jump 28AE 0000 BRANCH 0jump 28B0 0000 BRANCH 0jump 28B2 0000 BRANCH 0jump 28B4 0000 BRANCH 0jump 28B6 0000 BRANCH 0jump 28B8 0000 BRANCH 0jump 28BA 0000 BRANCH 0jump 28BC 0000 BRANCH 0jump 28BE 0000 BRANCH 0jump 28C0 0000 BRANCH 0jump 28C2 0000 BRANCH 0jump 28C4 0000 BRANCH 0jump 28C6 0000 BRANCH 0jump 28C8 0000 BRANCH 0jump 28CA 0000 BRANCH 0jump 28CC 0000 BRANCH 0jump 28CE 0000 BRANCH 0jump 28D0 0000 BRANCH 0jump 28D2 0000 BRANCH 0jump 28D4 0000 BRANCH 0jump 28D6 0000 BRANCH 0jump \ alive 28D8 0000 BRANCH 0jump 28DA 0000 BRANCH 0jump 28DC 0000 BRANCH 0jump 28DE 0000 BRANCH 0jump 28E0 0000 BRANCH 0jump 28E2 0000 BRANCH 0jump 28E4 0000 BRANCH 0jump 28E6 0000 BRANCH 0jump 28E8 0000 BRANCH 0jump 28EA 0000 BRANCH 0jump 28EC 0000 BRANCH 0jump 28EE 0000 BRANCH 0jump 28F0 0000 BRANCH 0jump 28F2 0000 BRANCH 0jump 28F4 0000 BRANCH 0jump 28F6 0000 BRANCH 0jump 28F8 0000 BRANCH 0jump 28FA 0000 BRANCH 0jump 28FC 0000 BRANCH 0jump 28FE 0000 BRANCH 0jump 2900 0000 BRANCH 0jump 2902 0000 BRANCH 0jump 2904 0000 BRANCH 0jump 2906 0000 BRANCH 0jump 2908 0000 BRANCH 0jump 290A 0000 BRANCH 0jump 290C 0000 BRANCH 0jump 290E 0000 BRANCH 0jump 2910 0000 BRANCH 0jump 2912 0000 BRANCH 0jump 2914 0000 BRANCH 0jump 2916 0000 BRANCH 0jump 2918 0000 BRANCH 0jump 291A 0000 BRANCH 0jump 291C 0000 BRANCH 0jump 291E 0000 BRANCH 0jump 2920 0000 BRANCH 0jump 2922 0000 BRANCH 0jump 2924 0000 BRANCH 0jump 2926 0000 BRANCH 0jump 2928 0000 BRANCH 0jump 292A 0000 BRANCH 0jump 292C 0000 BRANCH 0jump 292E 0000 BRANCH 0jump 2930 0000 BRANCH 0jump 2932 0000 BRANCH 0jump 2934 0000 BRANCH 0jump 2936 0000 BRANCH 0jump 2938 0000 BRANCH 0jump 293A 0000 BRANCH 0jump 293C 0000 BRANCH 0jump 293E 0000 BRANCH 0jump 2940 0000 BRANCH 0jump 2942 0000 BRANCH 0jump 2944 0000 BRANCH 0jump 2946 0000 BRANCH 0jump \ invnext 2948 0000 BRANCH 0jump 294A 0000 BRANCH 0jump 294C 0000 BRANCH 0jump 294E 0000 BRANCH 0jump 2950 0000 BRANCH 0jump 2952 0000 BRANCH 0jump 2954 0000 BRANCH 0jump 2956 0000 BRANCH 0jump 2958 0000 BRANCH 0jump 295A 0000 BRANCH 0jump 295C 0000 BRANCH 0jump 295E 0000 BRANCH 0jump 2960 0000 BRANCH 0jump 2962 0000 BRANCH 0jump 2964 0000 BRANCH 0jump 2966 0000 BRANCH 0jump 2968 0000 BRANCH 0jump 296A 0000 BRANCH 0jump 296C 0000 BRANCH 0jump 296E 0000 BRANCH 0jump 2970 0000 BRANCH 0jump 2972 0000 BRANCH 0jump 2974 0000 BRANCH 0jump 2976 0000 BRANCH 0jump 2978 0000 BRANCH 0jump 297A 0000 BRANCH 0jump 297C 0000 BRANCH 0jump 297E 0000 BRANCH 0jump 2980 0000 BRANCH 0jump 2982 0000 BRANCH 0jump 2984 0000 BRANCH 0jump 2986 0000 BRANCH 0jump 2988 0000 BRANCH 0jump 298A 0000 BRANCH 0jump 298C 0000 BRANCH 0jump 298E 0000 BRANCH 0jump 2990 0000 BRANCH 0jump 2992 0000 BRANCH 0jump 2994 0000 BRANCH 0jump 2996 0000 BRANCH 0jump 2998 0000 BRANCH 0jump 299A 0000 BRANCH 0jump 299C 0000 BRANCH 0jump 299E 0000 BRANCH 0jump 29A0 0000 BRANCH 0jump 29A2 0000 BRANCH 0jump 29A4 0000 BRANCH 0jump 29A6 0000 BRANCH 0jump 29A8 0000 BRANCH 0jump 29AA 0000 BRANCH 0jump 29AC 0000 BRANCH 0jump 29AE 0000 BRANCH 0jump 29B0 0000 BRANCH 0jump 29B2 0000 BRANCH 0jump 29B4 0000 BRANCH 0jump 29B6 0000 BRANCH 0jump \ anim 29B8 0000 BRANCH 0jump 29BA 0000 BRANCH 0jump 29BC 0000 BRANCH 0jump 29BE 0000 BRANCH 0jump 29C0 0000 BRANCH 0jump 29C2 0000 BRANCH 0jump 29C4 0000 BRANCH 0jump 29C6 0000 BRANCH 0jump 29C8 0000 BRANCH 0jump 29CA 0000 BRANCH 0jump 29CC 0000 BRANCH 0jump 29CE 0000 BRANCH 0jump 29D0 0000 BRANCH 0jump 29D2 0000 BRANCH 0jump 29D4 0000 BRANCH 0jump 29D6 0000 BRANCH 0jump 29D8 0000 BRANCH 0jump 29DA 0000 BRANCH 0jump 29DC 0000 BRANCH 0jump 29DE 0000 BRANCH 0jump 29E0 0000 BRANCH 0jump 29E2 0000 BRANCH 0jump 29E4 0000 BRANCH 0jump 29E6 0000 BRANCH 0jump 29E8 0000 BRANCH 0jump 29EA 0000 BRANCH 0jump 29EC 0000 BRANCH 0jump 29EE 0000 BRANCH 0jump 29F0 0000 BRANCH 0jump 29F2 0000 BRANCH 0jump 29F4 0000 BRANCH 0jump 29F6 0000 BRANCH 0jump 29F8 0000 BRANCH 0jump 29FA 0000 BRANCH 0jump 29FC 0000 BRANCH 0jump 29FE 0000 BRANCH 0jump 2A00 0000 BRANCH 0jump 2A02 0000 BRANCH 0jump 2A04 0000 BRANCH 0jump 2A06 0000 BRANCH 0jump 2A08 0000 BRANCH 0jump 2A0A 0000 BRANCH 0jump 2A0C 0000 BRANCH 0jump 2A0E 0000 BRANCH 0jump 2A10 0000 BRANCH 0jump 2A12 0000 BRANCH 0jump 2A14 0000 BRANCH 0jump 2A16 0000 BRANCH 0jump 2A18 0000 BRANCH 0jump 2A1A 0000 BRANCH 0jump 2A1C 0000 BRANCH 0jump 2A1E 0000 BRANCH 0jump 2A20 0000 BRANCH 0jump 2A22 0000 BRANCH 0jump 2A24 0000 BRANCH 0jump 2A26 0000 BRANCH 0jump \ invload 2A28 6081 ALU $6081 2A2A 4088 CALL cells 2A2C A7F8 LIT $27F8 2A2E 6203 ALU $6203 2A30 6C00 ALU $6C00 2A32 6180 ALU $6180 2A34 6081 ALU $6081 2A36 4088 CALL cells 2A38 A868 LIT $2868 2A3A 6203 ALU $6203 2A3C 6C00 ALU $6C00 2A3E 6180 ALU $6180 2A40 6081 ALU $6081 2A42 4088 CALL cells 2A44 A9B8 LIT $29B8 2A46 6203 ALU $6203 2A48 6C00 ALU $6C00 2A4A 6180 ALU $6180 2A4C 8007 LIT $7 2A4E 6303 ALU $6303 2A50 4014 CALL tuck 2A52 4088 CALL cells 2A54 C430 LIT $4430 2A56 6203 ALU $6203 2A58 6023 ALU $6023 2A5A 6103 ALU $6103 2A5C 0C1C BRANCH sprite! \ inv-makedl 2A5E 5221 CALL erasedl 2A60 8038 LIT $38 2A62 6147 ALU $6147 2A64 8000 LIT $0 2A66 6147 ALU $6147 \ (do) 2A68 6B81 ALU $6B81 2A6A 4088 CALL cells 2A6C A8D8 LIT $28D8 2A6E 6203 ALU $6203 2A70 6C00 ALU $6C00 2A72 355B 0BRANCH (then) 2A74 6B81 ALU $6B81 2A76 4088 CALL cells 2A78 A868 LIT $2868 2A7A 6203 ALU $6203 2A7C 6C00 ALU $6C00 2A7E 6081 ALU $6081 2A80 4068 CALL 0< 2A82 3546 0BRANCH (else) 2A84 6103 ALU $6103 2A86 6B81 ALU $6B81 2A88 5514 CALL invload 2A8A 155B BRANCH (then) \ (else) 2A8C 6081 ALU $6081 2A8E 8200 LIT $200 2A90 6803 ALU $6803 2A92 355A 0BRANCH (else) 2A94 4088 CALL cells 2A96 A040 LIT $2040 2A98 6203 ALU $6203 2A9A 6081 ALU $6081 2A9C 6C00 ALU $6C00 2A9E 6B81 ALU $6B81 2AA0 4088 CALL cells 2AA2 A948 LIT $2948 2AA4 6203 ALU $6203 2AA6 6023 ALU $6023 2AA8 6103 ALU $6103 2AAA 6B81 ALU $6B81 2AAC 6180 ALU $6180 2AAE 6023 ALU $6023 2AB0 6103 ALU $6103 2AB2 155B BRANCH (then) \ (else) 2AB4 6103 ALU $6103 \ (then) 2AB6 404B CALL looptest 2AB8 3534 0BRANCH (do) 2ABA 700C ALU $700C \ inv-chase 2ABC 8200 LIT $200 2ABE 6147 ALU $6147 2AC0 8000 LIT $0 2AC2 6147 ALU $6147 \ (do) 2AC4 4C0D CALL vga-line@ 2AC6 6B81 ALU $6B81 2AC8 6703 ALU $6703 2ACA 3562 0BRANCH (do) 2ACC 6B81 ALU $6B81 2ACE 4088 CALL cells 2AD0 A040 LIT $2040 2AD2 6203 ALU $6203 2AD4 6C00 ALU $6C00 \ (begin) 2AD6 6081 ALU $6081 2AD8 8000 LIT $0 2ADA 406F CALL >= 2ADC 3576 0BRANCH (repeat) 2ADE 6081 ALU $6081 2AE0 5514 CALL invload 2AE2 4088 CALL cells 2AE4 A948 LIT $2948 2AE6 6203 ALU $6203 2AE8 6C00 ALU $6C00 2AEA 156B BRANCH (begin) \ (repeat) 2AEC 404B CALL looptest 2AEE 3562 0BRANCH (do) 2AF0 700C ALU $700C \ born 2AF2 6081 ALU $6081 2AF4 4088 CALL cells 2AF6 A8D8 LIT $28D8 2AF8 6203 ALU $6203 2AFA 4B66 CALL in 2AFC 4014 CALL tuck 2AFE 4088 CALL cells 2B00 A868 LIT $2868 2B02 6203 ALU $6203 2B04 6023 ALU $6023 2B06 6103 ALU $6103 2B08 4088 CALL cells 2B0A A7F8 LIT $27F8 2B0C 6203 ALU $6203 2B0E 6023 ALU $6023 2B10 710F ALU $710F \ kill 2B12 8200 LIT $200 2B14 6181 ALU $6181 2B16 4088 CALL cells 2B18 A868 LIT $2868 2B1A 6203 ALU $6203 2B1C 6023 ALU $6023 2B1E 6103 ALU $6103 2B20 4088 CALL cells 2B22 A8D8 LIT $28D8 2B24 6203 ALU $6203 2B26 0B6A BRANCH out \ isalien 2B28 8006 LIT $6 2B2A 6303 ALU $6303 2B2C 8006 LIT $6 2B2E 0064 BRANCH <> \ moveto 2B30 6081 ALU $6081 2B32 8006 LIT $6 2B34 6303 ALU $6303 2B36 8006 LIT $6 2B38 4064 CALL <> 2B3A 6181 ALU $6181 2B3C 4088 CALL cells 2B3E A8D8 LIT $28D8 2B40 6203 ALU $6203 2B42 6C00 ALU $6C00 2B44 6303 ALU $6303 2B46 35C1 0BRANCH (else) 2B48 6147 ALU $6147 2B4A 9B46 LIT $1B46 2B4C 6C00 ALU $6C00 2B4E 6B81 ALU $6B81 2B50 8007 LIT $7 2B52 6303 ALU $6303 2B54 8008 LIT $8 2B56 41EB CALL * 2B58 6203 ALU $6203 2B5A 53EE CALL whereis 2B5C 6B81 ALU $6B81 2B5E 8003 LIT $3 2B60 6903 ALU $6903 2B62 8028 LIT $28 2B64 41EB CALL * 2B66 6203 ALU $6203 2B68 6B81 ALU $6B81 2B6A 4088 CALL cells 2B6C A868 LIT $2868 2B6E 6203 ALU $6203 2B70 6023 ALU $6023 2B72 6103 ALU $6103 2B74 6B8D ALU $6B8D 2B76 4088 CALL cells 2B78 A7F8 LIT $27F8 2B7A 6203 ALU $6203 2B7C 6023 ALU $6023 2B7E 6103 ALU $6103 2B80 15C2 BRANCH (then) \ (else) 2B82 6103 ALU $6103 \ (then) 2B84 700C ALU $700C \ bomb 2B86 8003 LIT $3 2B88 6D03 ALU $6D03 2B8A 8006 LIT $6 2B8C 720F ALU $720F \ shot 2B8E 8003 LIT $3 2B90 6D03 ALU $6D03 2B92 8007 LIT $7 2B94 720F ALU $720F \ lowest 2B96 0000 BRANCH 0jump 2B98 0000 BRANCH 0jump 2B9A 0000 BRANCH 0jump 2B9C 0000 BRANCH 0jump 2B9E 0000 BRANCH 0jump 2BA0 0000 BRANCH 0jump 2BA2 0000 BRANCH 0jump 2BA4 0000 BRANCH 0jump \ findlowest 2BA6 8008 LIT $8 2BA8 6147 ALU $6147 2BAA 8000 LIT $0 2BAC 6147 ALU $6147 \ (do) 2BAE 8000 LIT $0 2BB0 6600 ALU $6600 2BB2 6B81 ALU $6B81 2BB4 4088 CALL cells 2BB6 AB96 LIT $2B96 2BB8 6203 ALU $6203 2BBA 6023 ALU $6023 2BBC 6103 ALU $6103 2BBE 404B CALL looptest 2BC0 35D7 0BRANCH (do) 2BC2 8030 LIT $30 2BC4 6147 ALU $6147 2BC6 8000 LIT $0 2BC8 6147 ALU $6147 \ (do) 2BCA 6B81 ALU $6B81 2BCC 4088 CALL cells 2BCE A8D8 LIT $28D8 2BD0 6203 ALU $6203 2BD2 6C00 ALU $6C00 2BD4 35F4 0BRANCH (then) 2BD6 6B81 ALU $6B81 2BD8 6081 ALU $6081 2BDA 8007 LIT $7 2BDC 6303 ALU $6303 2BDE 4088 CALL cells 2BE0 AB96 LIT $2B96 2BE2 6203 ALU $6203 2BE4 6023 ALU $6023 2BE6 6103 ALU $6103 \ (then) 2BE8 404B CALL looptest 2BEA 35E5 0BRANCH (do) 2BEC 700C ALU $700C \ bias 2BEE 0000 BRANCH 0jump 2BF0 0001 BRANCH $2 2BF2 0002 BRANCH depth 2BF4 0003 BRANCH $6 2BF6 0004 BRANCH $8 2BF8 0005 BRANCH true 2BFA 0000 BRANCH 0jump 2BFC 0005 BRANCH true \ rand6 2BFE E000 LIT $6000 2C00 6C00 ALU $6C00 2C02 8007 LIT $7 2C04 6303 ALU $6303 2C06 4088 CALL cells 2C08 ABEE LIT $2BEE 2C0A 6203 ALU $6203 2C0C 7C0C ALU $7C0C \ bombalarm 2C0E 0000 BRANCH 0jump 2C10 0000 BRANCH 0jump \ nextbomb 2C12 0000 BRANCH 0jump \ shotalarm 2C14 0000 BRANCH 0jump 2C16 0000 BRANCH 0jump \ nextshot 2C18 0000 BRANCH 0jump \ playerx 2C1A 0000 BRANCH 0jump \ lives 2C1C 0000 BRANCH 0jump \ score 2C1E 0000 BRANCH 0jump 2C20 0000 BRANCH 0jump \ dying 2C22 0000 BRANCH 0jump \ 1+mod6 2C24 6081 ALU $6081 2C26 6C00 ALU $6C00 2C28 6081 ALU $6081 2C2A 8005 LIT $5 2C2C 6703 ALU $6703 2C2E 361B 0BRANCH (else) 2C30 8004 LIT $4 2C32 6600 ALU $6600 2C34 161C BRANCH (then) \ (else) 2C36 8001 LIT $1 \ (then) 2C38 6203 ALU $6203 2C3A 6180 ALU $6180 2C3C 6023 ALU $6023 2C3E 710F ALU $710F \ .status 2C40 85AA LIT $5AA 2C42 6C00 ALU $6C00 2C44 6147 ALU $6147 2C46 98DE LIT $18DE 2C48 85AA LIT $5AA 2C4A 6023 ALU $6023 2C4C 6103 ALU $6103 2C4E 4C39 CALL home 2C50 40A4 CALL sliteral 2C52 4C06 CALL $180C 2C54 5649 CALL $2C92 2C56 5345 CALL $268A 2C58 FF20 LIT $7F20 2C5A 42FD CALL type 2C5C AC1C LIT $2C1C 2C5E 6C00 ALU $6C00 2C60 4353 CALL . 2C62 8026 LIT $26 2C64 8000 LIT $0 2C66 4C33 CALL vga-at-xy 2C68 40A4 CALL sliteral 2C6A 5306 CALL $260C 2C6C 4F43 CALL $1E86 2C6E 4552 CALL $AA4 2C70 FF20 LIT $7F20 2C72 42FD CALL type 2C74 AC1E LIT $2C1E 2C76 4115 CALL 2@ 2C78 42A2 CALL pad| 2C7A 42B6 CALL # 2C7C 42B6 CALL # 2C7E 42B6 CALL # 2C80 42B6 CALL # 2C82 42B6 CALL # 2C84 42B6 CALL # 2C86 42C9 CALL #> 2C88 42FD CALL type 2C8A 42D9 CALL cr 2C8C AC1C LIT $2C1C 2C8E 6C00 ALU $6C00 2C90 4012 CALL 0= 2C92 365E 0BRANCH (then) 2C94 99BE LIT $19BE 2C96 85AA LIT $5AA 2C98 6023 ALU $6023 2C9A 6103 ALU $6103 2C9C 8008 LIT $8 2C9E 8007 LIT $7 2CA0 4C33 CALL vga-at-xy 2CA2 40A4 CALL sliteral 2CA4 4704 CALL $E08 2CA6 4D41 CALL $1A82 2CA8 FF45 LIT $7F45 2CAA 42FD CALL type 2CAC 8008 LIT $8 2CAE 8011 LIT $11 2CB0 4C33 CALL vga-at-xy 2CB2 40A4 CALL sliteral 2CB4 4F04 CALL $1E08 2CB6 4556 CALL $AAC 2CB8 FF52 LIT $7F52 2CBA 42FD CALL type \ (then) 2CBC 6B8D ALU $6B8D 2CBE 85AA LIT $5AA 2CC0 6023 ALU $6023 2CC2 710F ALU $710F \ newlife 2CC4 8000 LIT $0 2CC6 6600 ALU $6600 2CC8 AC1C LIT $2C1C 2CCA 405E CALL +! 2CCC 5620 CALL .status 2CCE 8000 LIT $0 2CD0 AC22 LIT $2C22 2CD2 6023 ALU $6023 2CD4 6103 ALU $6103 2CD6 8064 LIT $64 2CD8 AC1A LIT $2C1A 2CDA 6023 ALU $6023 2CDC 710F ALU $710F \ parabolic 2CDE 6147 ALU $6147 2CE0 6180 ALU $6180 2CE2 6B81 ALU $6B81 2CE4 4088 CALL cells 2CE6 A7F8 LIT $27F8 2CE8 6203 ALU $6203 2CEA 405E CALL +! 2CEC AC22 LIT $2C22 2CEE 6C00 ALU $6C00 2CF0 8003 LIT $3 2CF2 6903 ALU $6903 2CF4 6203 ALU $6203 2CF6 6B8D ALU $6B8D 2CF8 4088 CALL cells 2CFA A868 LIT $2868 2CFC 6203 ALU $6203 2CFE 005E BRANCH +! \ exploding 2D00 8003 LIT $3 2D02 8003 LIT $3 2D04 6600 ALU $6600 2D06 8030 LIT $30 2D08 566F CALL parabolic 2D0A 8002 LIT $2 2D0C 6600 ALU $6600 2D0E 8003 LIT $3 2D10 6600 ALU $6600 2D12 8031 LIT $31 2D14 566F CALL parabolic 2D16 8003 LIT $3 2D18 6600 ALU $6600 2D1A 8002 LIT $2 2D1C 6600 ALU $6600 2D1E 8032 LIT $32 2D20 566F CALL parabolic 2D22 8004 LIT $4 2D24 8002 LIT $2 2D26 6600 ALU $6600 2D28 8033 LIT $33 2D2A 566F CALL parabolic 2D2C 8004 LIT $4 2D2E 6600 ALU $6600 2D30 8001 LIT $1 2D32 6600 ALU $6600 2D34 8034 LIT $34 2D36 566F CALL parabolic 2D38 8005 LIT $5 2D3A 8001 LIT $1 2D3C 6600 ALU $6600 2D3E 8035 LIT $35 2D40 566F CALL parabolic 2D42 8001 LIT $1 2D44 8001 LIT $1 2D46 6600 ALU $6600 2D48 8037 LIT $37 2D4A 166F BRANCH parabolic \ @xy 2D4C 6081 ALU $6081 2D4E 4088 CALL cells 2D50 A7F8 LIT $27F8 2D52 6203 ALU $6203 2D54 6C00 ALU $6C00 2D56 6180 ALU $6180 2D58 4088 CALL cells 2D5A A868 LIT $2868 2D5C 6203 ALU $6203 2D5E 7C0C ALU $7C0C \ dist 2D60 6600 ALU $6600 2D62 6203 ALU $6203 2D64 6081 ALU $6081 2D66 4068 CALL 0< 2D68 750F ALU $750F \ fall 2D6A 8006 LIT $6 2D6C 6147 ALU $6147 2D6E 8000 LIT $0 2D70 6147 ALU $6147 \ (do) 2D72 6B81 ALU $6B81 2D74 55C3 CALL bomb 2D76 8004 LIT $4 2D78 6181 ALU $6181 2D7A 4088 CALL cells 2D7C A868 LIT $2868 2D7E 6203 ALU $6203 2D80 405E CALL +! 2D82 56A6 CALL @xy 2D84 81D6 LIT $1D6 2D86 56B0 CALL dist 2D88 8010 LIT $10 2D8A 6803 ALU $6803 2D8C 6180 ALU $6180 2D8E AC1A LIT $2C1A 2D90 6C00 ALU $6C00 2D92 56B0 CALL dist 2D94 8020 LIT $20 2D96 6803 ALU $6803 2D98 6303 ALU $6303 2D9A AC22 LIT $2C22 2D9C 6C00 ALU $6C00 2D9E 4012 CALL 0= 2DA0 6303 ALU $6303 2DA2 36D6 0BRANCH (then) 2DA4 8001 LIT $1 2DA6 AC22 LIT $2C22 2DA8 6023 ALU $6023 2DAA 6103 ALU $6103 \ (then) 2DAC 404B CALL looptest 2DAE 36B9 0BRANCH (do) 2DB0 700C ALU $700C \ trigger 2DB2 AC14 LIT $2C14 2DB4 444D CALL isalarm 2DB6 36E9 0BRANCH (then) 2DB8 9A80 LIT $1A80 2DBA 8006 LIT $6 2DBC AC14 LIT $2C14 2DBE 4448 CALL setalarm 2DC0 AC1A LIT $2C1A 2DC2 6C00 ALU $6C00 2DC4 81E0 LIT $1E0 2DC6 AC18 LIT $2C18 2DC8 6C00 ALU $6C00 2DCA 55C7 CALL shot 2DCC 5579 CALL born 2DCE AC18 LIT $2C18 2DD0 5612 CALL 1+mod6 \ (then) 2DD2 700C ALU $700C \ collide 2DD4 8030 LIT $30 2DD6 6147 ALU $6147 2DD8 8000 LIT $0 2DDA 6147 ALU $6147 \ (do) 2DDC 6B81 ALU $6B81 2DDE 5594 CALL isalien 2DE0 6B81 ALU $6B81 2DE2 4088 CALL cells 2DE4 A8D8 LIT $28D8 2DE6 6203 ALU $6203 2DE8 6C00 ALU $6C00 2DEA 6303 ALU $6303 2DEC 3710 0BRANCH (then) 2DEE 6181 ALU $6181 2DF0 6B81 ALU $6B81 2DF2 4088 CALL cells 2DF4 A7F8 LIT $27F8 2DF6 6203 ALU $6203 2DF8 6C00 ALU $6C00 2DFA 56B0 CALL dist 2DFC 8010 LIT $10 2DFE 6803 ALU $6803 2E00 6181 ALU $6181 2E02 6B81 ALU $6B81 2E04 4088 CALL cells 2E06 A868 LIT $2868 2E08 6203 ALU $6203 2E0A 6C00 ALU $6C00 2E0C 56B0 CALL dist 2E0E 8010 LIT $10 2E10 6803 ALU $6803 2E12 6303 ALU $6303 2E14 3710 0BRANCH (then) 2E16 4016 CALL 2drop 2E18 6B81 ALU $6B81 2E1A 600C ALU $600C 2E1C 600C ALU $600C 2E1E 700C ALU $700C \ (then) 2E20 404B CALL looptest 2E22 36EE 0BRANCH (do) 2E24 4016 CALL 2drop 2E26 8000 LIT $0 2E28 760C ALU $760C \ rise 2E2A 8006 LIT $6 2E2C 6147 ALU $6147 2E2E 8000 LIT $0 2E30 6147 ALU $6147 \ (do) 2E32 6B81 ALU $6B81 2E34 55C7 CALL shot 2E36 6147 ALU $6147 2E38 6B81 ALU $6B81 2E3A 4088 CALL cells 2E3C A8D8 LIT $28D8 2E3E 6203 ALU $6203 2E40 6C00 ALU $6C00 2E42 3747 0BRANCH (then) 2E44 8004 LIT $4 2E46 6600 ALU $6600 2E48 6B81 ALU $6B81 2E4A 4088 CALL cells 2E4C A868 LIT $2868 2E4E 6203 ALU $6203 2E50 405E CALL +! 2E52 6B81 ALU $6B81 2E54 4088 CALL cells 2E56 A868 LIT $2868 2E58 6203 ALU $6203 2E5A 6C00 ALU $6C00 2E5C 801D LIT $1D 2E5E 6600 ALU $6600 2E60 6803 ALU $6803 2E62 3734 0BRANCH (then) 2E64 6B81 ALU $6B81 2E66 5589 CALL kill \ (then) 2E68 6B81 ALU $6B81 2E6A 56A6 CALL @xy 2E6C 56EA CALL collide 2E6E 6081 ALU $6081 2E70 4068 CALL 0< 2E72 373C 0BRANCH (else) 2E74 6103 ALU $6103 2E76 1747 BRANCH (then) \ (else) 2E78 5589 CALL kill 2E7A 6B81 ALU $6B81 2E7C 5589 CALL kill 2E7E 800A LIT $A 2E80 8000 LIT $0 2E82 AC1E LIT $2C1E 2E84 4115 CALL 2@ 2E86 413E CALL d+ 2E88 AC1E LIT $2C1E 2E8A 411A CALL 2! 2E8C 5620 CALL .status \ (then) 2E8E 6B8D ALU $6B8D 2E90 6103 ALU $6103 2E92 404B CALL looptest 2E94 3719 0BRANCH (do) 2E96 700C ALU $700C \ doplayer 2E98 AC1C LIT $2C1C 2E9A 6C00 ALU $6C00 2E9C 37A5 0BRANCH (then) 2E9E AC22 LIT $2C22 2EA0 6C00 ALU $6C00 2EA2 4012 CALL 0= 2EA4 379B 0BRANCH (else) 2EA6 52E4 CALL buttons 2EA8 6147 ALU $6147 2EAA 8020 LIT $20 2EAC 408E CALL 2/ 2EAE AC1A LIT $2C1A 2EB0 6C00 ALU $6C00 2EB2 6803 ALU $6803 2EB4 6B81 ALU $6B81 2EB6 8001 LIT $1 2EB8 6303 ALU $6303 2EBA 6303 ALU $6303 2EBC 3763 0BRANCH (then) 2EBE 8003 LIT $3 2EC0 6600 ALU $6600 2EC2 AC1A LIT $2C1A 2EC4 405E CALL +! \ (then) 2EC6 AC1A LIT $2C1A 2EC8 6C00 ALU $6C00 2ECA 8320 LIT $320 2ECC 8020 LIT $20 2ECE 408E CALL 2/ 2ED0 4077 CALL - 2ED2 6803 ALU $6803 2ED4 6B81 ALU $6B81 2ED6 8002 LIT $2 2ED8 6303 ALU $6303 2EDA 6303 ALU $6303 2EDC 3772 0BRANCH (then) 2EDE 8004 LIT $4 2EE0 AC1A LIT $2C1A 2EE2 405E CALL +! \ (then) 2EE4 6B8D ALU $6B8D 2EE6 8004 LIT $4 2EE8 6303 ALU $6303 2EEA 3777 0BRANCH (then) 2EEC 56D9 CALL trigger \ (then) 2EEE 8006 LIT $6 2EF0 6147 ALU $6147 2EF2 8000 LIT $0 2EF4 6147 ALU $6147 \ (do) 2EF6 9B46 LIT $1B46 2EF8 6C00 ALU $6C00 2EFA 8003 LIT $3 2EFC 6D03 ALU $6D03 2EFE 6B81 ALU $6B81 2F00 802A LIT $2A 2F02 41EB CALL * 2F04 6203 ALU $6203 2F06 8020 LIT $20 2F08 6180 ALU $6180 2F0A 4D97 CALL sin* 2F0C AC1A LIT $2C1A 2F0E 6C00 ALU $6C00 2F10 6203 ALU $6203 2F12 81E0 LIT $1E0 2F14 6B81 ALU $6B81 2F16 8030 LIT $30 2F18 6203 ALU $6203 2F1A 6081 ALU $6081 2F1C 4088 CALL cells 2F1E A9B8 LIT $29B8 2F20 6203 ALU $6203 2F22 4B66 CALL in 2F24 5579 CALL born 2F26 404B CALL looptest 2F28 377B 0BRANCH (do) 2F2A AC1A LIT $2C1A 2F2C 6C00 ALU $6C00 2F2E 81D6 LIT $1D6 2F30 8037 LIT $37 2F32 5579 CALL born 2F34 17A5 BRANCH (then) \ (else) 2F36 5680 CALL exploding 2F38 8001 LIT $1 2F3A AC22 LIT $2C22 2F3C 405E CALL +! 2F3E AC22 LIT $2C22 2F40 6C00 ALU $6C00 2F42 8064 LIT $64 2F44 406D CALL > 2F46 37A5 0BRANCH (then) 2F48 5662 CALL newlife \ (then) 2F4A 700C ALU $700C \ cscheme 2F4C 0400 BRANCH $800 2F4E 0440 BRANCH $880 2F50 0040 BRANCH $80 2F52 0044 BRANCH $88 2F54 0004 BRANCH $8 2F56 0404 BRANCH frac 2F58 0340 BRANCH $680 2F5A 0444 BRANCH (repeat) \ invaders-cold 2F5C 4C56 CALL vga-page 2F5E C000 LIT $4000 2F60 6147 ALU $6147 2F62 8000 LIT $0 2F64 6147 ALU $6147 \ (do) 2F66 FFFF LIT $7FFF 2F68 6600 ALU $6600 2F6A 8020 LIT $20 2F6C 408E CALL 2/ 2F6E 6B81 ALU $6B81 2F70 4155 CALL s>d 2F72 413E CALL d+ 2F74 4BAF CALL flash@ 2F76 6B81 ALU $6B81 2F78 C302 LIT $4302 2F7A 6023 ALU $6023 2F7C 6103 ALU $6103 2F7E C304 LIT $4304 2F80 6023 ALU $6023 2F82 6103 ALU $6103 2F84 404B CALL looptest 2F86 37B3 0BRANCH (do) 2F88 C308 LIT $4308 2F8A 4B66 CALL in 2F8C 528C CALL rainbow 2F8E 8038 LIT $38 2F90 6147 ALU $6147 2F92 8000 LIT $0 2F94 6147 ALU $6147 \ (do) 2F96 6B81 ALU $6B81 2F98 5589 CALL kill 2F9A 404B CALL looptest 2F9C 37CB 0BRANCH (do) 2F9E 8030 LIT $30 2FA0 6147 ALU $6147 2FA2 8000 LIT $0 2FA4 6147 ALU $6147 \ (do) 2FA6 6B81 ALU $6B81 2FA8 5594 CALL isalien 2FAA 6B81 ALU $6B81 2FAC 4088 CALL cells 2FAE A8D8 LIT $28D8 2FB0 6203 ALU $6203 2FB2 6023 ALU $6023 2FB4 6103 ALU $6103 2FB6 404B CALL looptest 2FB8 37D3 0BRANCH (do) 2FBA DEDF LIT $5EDF 2FBC 6600 ALU $6600 2FBE 8007 LIT $7 2FC0 AC0E LIT $2C0E 2FC2 4448 CALL setalarm 2FC4 8000 LIT $0 2FC6 AC12 LIT $2C12 2FC8 6023 ALU $6023 2FCA 6103 ALU $6103 2FCC F95F LIT $795F 2FCE 6600 ALU $6600 2FD0 8001 LIT $1 2FD2 AC14 LIT $2C14 2FD4 4448 CALL setalarm 2FD6 8000 LIT $0 2FD8 AC18 LIT $2C18 2FDA 6023 ALU $6023 2FDC 6103 ALU $6103 2FDE 8004 LIT $4 2FE0 AC1C LIT $2C1C 2FE2 6023 ALU $6023 2FE4 6103 ALU $6103 2FE6 8000 LIT $0 2FE8 8000 LIT $0 2FEA AC1E LIT $2C1E 2FEC 411A CALL 2! 2FEE 5662 CALL newlife 2FF0 443B CALL time@ 2FF2 6503 ALU $6503 2FF4 9A64 LIT $1A64 2FF6 6023 ALU $6023 2FF8 6103 ALU $6103 2FFA 8000 LIT $0 2FFC 9B46 LIT $1B46 2FFE 6023 ALU $6023 3000 6103 ALU $6103 3002 8030 LIT $30 3004 6147 ALU $6147 3006 8000 LIT $0 3008 6147 ALU $6147 \ (do) 300A 6B81 ALU $6B81 300C 5598 CALL moveto 300E 404B CALL looptest 3010 3805 0BRANCH (do) 3012 700C ALU $700C \ escape 3014 128F BRANCH next? \ restart 3016 C500 LIT $4500 3018 6C00 ALU $6C00 301A 0012 BRANCH 0= \ gameloop 301C 57AE CALL invaders-cold \ (begin) 301E 4002 CALL depth 3020 381A 0BRANCH (then) 3022 8143 LIT $143 3024 40A4 CALL sliteral 3026 690B ALU $690B 3028 766E ALU $766E 302A 6461 ALU $6461 302C 7265 ALU $7265 302E 2E73 0BRANCH $1CE6 3030 7366 ALU $7366 3032 43AF CALL (snap) \ (then) 3034 552F CALL inv-makedl 3036 4002 CALL depth 3038 3821 0BRANCH (then) 303A 8145 LIT $145 303C B027 LIT $3027 303E 800B LIT $B 3040 43AF CALL (snap) \ (then) 3042 555E CALL inv-chase 3044 4002 CALL depth 3046 3828 0BRANCH (then) 3048 8147 LIT $147 304A B027 LIT $3027 304C 800B LIT $B 304E 43AF CALL (snap) \ (then) 3050 9B46 LIT $1B46 3052 6C00 ALU $6C00 3054 4007 CALL 1+ 3056 9B46 LIT $1B46 3058 6023 ALU $6023 305A 6103 ALU $6103 305C 8030 LIT $30 305E 6147 ALU $6147 3060 8000 LIT $0 3062 6147 ALU $6147 \ (do) 3064 6B81 ALU $6B81 3066 5598 CALL moveto 3068 404B CALL looptest 306A 3832 0BRANCH (do) 306C 55D3 CALL findlowest 306E AC0E LIT $2C0E 3070 444D CALL isalarm 3072 3860 0BRANCH (then) 3074 B500 LIT $3500 3076 800C LIT $C 3078 AC0E LIT $2C0E 307A 4448 CALL setalarm 307C 55FF CALL rand6 307E 4088 CALL cells 3080 AB96 LIT $2B96 3082 6203 ALU $6203 3084 6C00 ALU $6C00 3086 6081 ALU $6081 3088 4068 CALL 0< 308A 3848 0BRANCH (else) 308C 6103 ALU $6103 308E 1860 BRANCH (then) \ (else) 3090 6081 ALU $6081 3092 4088 CALL cells 3094 A7F8 LIT $27F8 3096 6203 ALU $6203 3098 6C00 ALU $6C00 309A 6180 ALU $6180 309C 4088 CALL cells 309E A868 LIT $2868 30A0 6203 ALU $6203 30A2 6C00 ALU $6C00 30A4 6081 ALU $6081 30A6 81CC LIT $1CC 30A8 406D CALL > 30AA 385A 0BRANCH (then) 30AC 8001 LIT $1 30AE AC22 LIT $2C22 30B0 6023 ALU $6023 30B2 6103 ALU $6103 \ (then) 30B4 AC12 LIT $2C12 30B6 6C00 ALU $6C00 30B8 55C3 CALL bomb 30BA 5579 CALL born 30BC AC12 LIT $2C12 30BE 5612 CALL 1+mod6 \ (then) 30C0 4002 CALL depth 30C2 3866 0BRANCH (then) 30C4 8156 LIT $156 30C6 B027 LIT $3027 30C8 800B LIT $B 30CA 43AF CALL (snap) \ (then) 30CC 56B5 CALL fall 30CE 4002 CALL depth 30D0 386D 0BRANCH (then) 30D2 8158 LIT $158 30D4 B027 LIT $3027 30D6 800B LIT $B 30D8 43AF CALL (snap) \ (then) 30DA 5715 CALL rise 30DC 4002 CALL depth 30DE 3874 0BRANCH (then) 30E0 815A LIT $15A 30E2 B027 LIT $3027 30E4 800B LIT $B 30E6 43AF CALL (snap) \ (then) 30E8 574C CALL doplayer 30EA 4002 CALL depth 30EC 387B 0BRANCH (then) 30EE 815C LIT $15C 30F0 B027 LIT $3027 30F2 800B LIT $B 30F4 43AF CALL (snap) \ (then) 30F6 580A CALL escape 30F8 387E 0BRANCH (then) 30FA 700C ALU $700C \ (then) 30FC 180F BRANCH (begin) 30FE 700C ALU $700C \ invaders-main 3100 57AE CALL invaders-cold 3102 D440 LIT $5440 3104 8089 LIT $89 3106 9B42 LIT $1B42 3108 4448 CALL setalarm 310A 580E CALL gameloop 310C 8166 LIT $166 310E B027 LIT $3027 3110 800B LIT $B 3112 43AF CALL (snap) 3114 9B46 LIT $1B46 3116 6C00 ALU $6C00 3118 4353 CALL . 311A 40A4 CALL sliteral 311C 2007 0BRANCH 1+ 311E 7266 ALU $7266 3120 6D61 ALU $6D61 3122 7365 ALU $7365 3124 42FD CALL type 3126 02D9 BRANCH cr \ uptime 3128 443B CALL time@ 312A 8001 LIT $1 312C 83E8 LIT $3E8 312E 4274 CALL m*/ 3130 8001 LIT $1 3132 83E8 LIT $3E8 3134 0274 BRANCH m*/ \ #ip1 3136 80FF LIT $FF 3138 6303 ALU $6303 313A 4155 CALL s>d 313C 42C3 CALL #S 313E 0016 BRANCH 2drop \ #. 3140 802E LIT $2E 3142 02AE BRANCH HOLD \ #ip2 3144 6081 ALU $6081 3146 589B CALL #ip1 3148 58A0 CALL #. 314A 8008 LIT $8 314C 6903 ALU $6903 314E 189B BRANCH #ip1 \ #ip 3150 6081 ALU $6081 3152 58A2 CALL #ip2 3154 58A0 CALL #. 3156 6181 ALU $6181 3158 18A2 BRANCH #ip2 \ prev_sw2_n 315A 0000 BRANCH 0jump \ sw2? 315C C500 LIT $4500 315E 6C00 ALU $6C00 3160 B15A LIT $315A 3162 03D8 BRANCH fall? \ scanmap 3164 0000 BRANCH 0jump 3166 F089 LIT $7089 3168 0000 BRANCH 0jump 316A F085 LIT $7085 316C F083 LIT $7083 316E F081 LIT $7081 3170 F082 LIT $7082 3172 F08C LIT $708C 3174 0000 BRANCH 0jump 3176 F08A LIT $708A 3178 F088 LIT $7088 317A F086 LIT $7086 317C F084 LIT $7084 317E F009 LIT $7009 3180 607E ALU $607E 3182 0000 BRANCH 0jump 3184 0000 BRANCH 0jump 3186 D008 LIT $5008 3188 D001 LIT $5001 318A 0000 BRANCH 0jump 318C D004 LIT $5004 318E 7151 ALU $7151 3190 3121 0BRANCH $2242 3192 0000 BRANCH 0jump 3194 0000 BRANCH 0jump 3196 0000 BRANCH 0jump 3198 7A5A ALU $7A5A 319A 7353 ALU $7353 319C 6141 ALU $6141 319E 7757 ALU $7757 31A0 3240 0BRANCH stars-chasebeam 31A2 0000 BRANCH 0jump 31A4 0000 BRANCH 0jump 31A6 6343 ALU $6343 31A8 7858 ALU $7858 31AA 6444 ALU $6444 31AC 6545 ALU $6545 31AE 3424 0BRANCH $2848 31B0 3323 0BRANCH $2646 31B2 0000 BRANCH 0jump 31B4 0000 BRANCH 0jump 31B6 F020 LIT $7020 31B8 7656 ALU $7656 31BA 6646 ALU $6646 31BC 7454 ALU $7454 31BE 7252 ALU $7252 31C0 3525 0BRANCH $2A4A 31C2 0000 BRANCH 0jump 31C4 0000 BRANCH 0jump 31C6 6E4E ALU $6E4E 31C8 6242 ALU $6242 31CA 6848 ALU $6848 31CC 6747 ALU $6747 31CE 7959 ALU $7959 31D0 365E 0BRANCH (then) 31D2 0000 BRANCH 0jump 31D4 0000 BRANCH 0jump 31D6 0000 BRANCH 0jump 31D8 6D4D ALU $6D4D 31DA 6A4A ALU $6A4A 31DC 7555 ALU $7555 31DE 3726 0BRANCH $2E4C 31E0 382A 0BRANCH $3054 31E2 0000 BRANCH 0jump 31E4 0000 BRANCH 0jump 31E6 2C3C 0BRANCH $1878 31E8 6B4B ALU $6B4B 31EA 6949 ALU $6949 31EC 6F4F ALU $6F4F 31EE 3029 0BRANCH $2052 31F0 3928 0BRANCH $3250 31F2 0000 BRANCH 0jump 31F4 0000 BRANCH 0jump 31F6 2E3E 0BRANCH $1C7C 31F8 2F3F 0BRANCH $1E7E 31FA 6C4C ALU $6C4C 31FC 3B3A 0BRANCH $3674 31FE 7050 ALU $7050 3200 2D5F 0BRANCH $1ABE 3202 0000 BRANCH 0jump 3204 0000 BRANCH 0jump 3206 0000 BRANCH 0jump 3208 2722 0BRANCH $E44 320A 0000 BRANCH 0jump 320C 5B7B CALL $36F6 320E 3D2B 0BRANCH $3A56 3210 0000 BRANCH 0jump 3212 0000 BRANCH 0jump 3214 FFFF LIT $7FFF 3216 D002 LIT $5002 3218 F00A LIT $700A 321A 5D7D CALL $3AFA 321C 0000 BRANCH 0jump 321E 5C7C CALL $38F8 3220 0000 BRANCH 0jump 3222 0000 BRANCH 0jump 3224 0000 BRANCH 0jump 3226 0000 BRANCH 0jump 3228 0000 BRANCH 0jump 322A 0000 BRANCH 0jump 322C 0000 BRANCH 0jump 322E 0000 BRANCH 0jump 3230 F080 LIT $7080 3232 0000 BRANCH 0jump 3234 0000 BRANCH 0jump 3236 E393 LIT $6393 3238 0000 BRANCH 0jump 323A E694 LIT $6694 323C E990 LIT $6990 323E 0000 BRANCH 0jump 3240 0000 BRANCH 0jump 3242 0000 BRANCH 0jump 3244 E298 LIT $6298 3246 E080 LIT $6080 3248 E497 LIT $6497 324A F035 LIT $7035 324C E895 LIT $6895 324E EA96 LIT $6A96 3250 F01B LIT $701B 3252 FFFE LIT $7FFE 3254 F08B LIT $708B 3256 F02B LIT $702B 3258 E592 LIT $6592 325A F02D LIT $702D 325C F02A LIT $702A 325E EB91 LIT $6B91 3260 0000 BRANCH 0jump 3262 0000 BRANCH 0jump 3264 0000 BRANCH 0jump 3266 0000 BRANCH 0jump 3268 0000 BRANCH 0jump 326A F087 LIT $7087 \ scanmap@ 326C 4088 CALL cells 326E B164 LIT $3164 3270 6203 ALU $6203 3272 7C0C ALU $7C0C \ kbread 3274 0000 BRANCH 0jump \ kbstate 3276 0000 BRANCH 0jump \ ps2listening 3278 C204 LIT $4204 327A 4B66 CALL in 327C C206 LIT $4206 327E 0B66 BRANCH in \ kbfifo@ 3280 6081 ALU $6081 3282 8004 LIT $4 3284 6903 ALU $6903 3286 4088 CALL cells 3288 C210 LIT $4210 328A 6203 ALU $6203 328C 6C00 ALU $6C00 328E 6180 ALU $6180 3290 800F LIT $F 3292 6303 ALU $6303 3294 6903 ALU $6903 3296 8001 LIT $1 3298 730F ALU $730F \ kbnew 329A 8800 LIT $800 329C B276 LIT $3276 329E 6023 ALU $6023 32A0 710F ALU $710F \ kbfifo-cold 32A2 C208 LIT $4208 32A4 6C00 ALU $6C00 32A6 B274 LIT $3274 32A8 6023 ALU $6023 32AA 6103 ALU $6103 32AC 194D BRANCH kbnew \ kbfifo-fullness 32AE C208 LIT $4208 32B0 6C00 ALU $6C00 32B2 B274 LIT $3274 32B4 6C00 ALU $6C00 32B6 4077 CALL - 32B8 80FF LIT $FF 32BA 730F ALU $730F \ ps2_clk' 32BC 0000 BRANCH 0jump \ waitfall 32BE C200 LIT $4200 32C0 6C00 ALU $6C00 32C2 B2BC LIT $32BC 32C4 43D8 CALL fall? 32C6 395F 0BRANCH waitfall 32C8 700C ALU $700C \ ps2-out1 32CA C202 LIT $4202 32CC 6023 ALU $6023 32CE 6103 ALU $6103 32D0 195F BRANCH waitfall \ oddparity 32D2 6081 ALU $6081 32D4 8004 LIT $4 32D6 6903 ALU $6903 32D8 6503 ALU $6503 32DA 6081 ALU $6081 32DC 8002 LIT $2 32DE 6903 ALU $6903 32E0 6503 ALU $6503 32E2 6081 ALU $6081 32E4 408E CALL 2/ 32E6 750F ALU $750F \ kb-request 32E8 C204 LIT $4204 32EA 4B6A CALL out 32EC C200 LIT $4200 32EE 4B6A CALL out 32F0 803C LIT $3C 32F2 8000 LIT $0 32F4 4453 CALL sleepus 32F6 C206 LIT $4206 32F8 4B6A CALL out 32FA C202 LIT $4202 32FC 4B6A CALL out 32FE C204 LIT $4204 3300 4B66 CALL in \ (begin) 3302 C200 LIT $4200 3304 6C00 ALU $6C00 3306 3981 0BRANCH (begin) 3308 B2BC LIT $32BC 330A 4B66 CALL in 330C 8000 LIT $0 330E 5965 CALL ps2-out1 3310 6081 ALU $6081 3312 8008 LIT $8 3314 6147 ALU $6147 3316 8000 LIT $0 3318 6147 ALU $6147 \ (do) 331A 6081 ALU $6081 331C 5965 CALL ps2-out1 331E 408E CALL 2/ 3320 404B CALL looptest 3322 398D 0BRANCH (do) 3324 6103 ALU $6103 3326 5969 CALL oddparity 3328 5965 CALL ps2-out1 332A 4005 CALL true 332C 5965 CALL ps2-out1 332E 593C CALL ps2listening 3330 1951 BRANCH kbfifo-cold \ kbbit 3332 800B LIT $B 3334 6D03 ALU $6D03 3336 B276 LIT $3276 3338 6C00 ALU $6C00 333A 408E CALL 2/ 333C 6403 ALU $6403 333E B276 LIT $3276 3340 6023 ALU $6023 3342 710F ALU $710F \ rawready? 3344 B276 LIT $3276 3346 6C00 ALU $6C00 3348 8001 LIT $1 334A 730F ALU $730F \ kbraw 334C B276 LIT $3276 334E 6C00 ALU $6C00 3350 8002 LIT $2 3352 6903 ALU $6903 3354 80FF LIT $FF 3356 6303 ALU $6303 3358 194D BRANCH kbnew \ lock 335A 0000 BRANCH 0jump \ rawloop 335C C208 LIT $4208 335E 6C00 ALU $6C00 3360 B35A LIT $335A 3362 6023 ALU $6023 3364 6103 ALU $6103 3366 5957 CALL kbfifo-fullness 3368 4066 CALL 0<> 336A 59A2 CALL rawready? 336C 4012 CALL 0= 336E 6303 ALU $6303 3370 39C9 0BRANCH (repeat) 3372 5957 CALL kbfifo-fullness 3374 6A00 ALU $6A00 3376 5940 CALL kbfifo@ 3378 C208 LIT $4208 337A 6C00 ALU $6C00 337C B35A LIT $335A 337E 6C00 ALU $6C00 3380 6703 ALU $6703 3382 39C7 0BRANCH (else) 3384 5999 CALL kbbit 3386 8001 LIT $1 3388 B274 LIT $3274 338A 405E CALL +! 338C 19C8 BRANCH (then) \ (else) 338E 6103 ALU $6103 \ (then) 3390 19AE BRANCH rawloop \ (repeat) 3392 700C ALU $700C \ oneraw 3394 59AE CALL rawloop 3396 59A2 CALL rawready? 3398 39CA 0BRANCH oneraw 339A 19A6 BRANCH kbraw \ >leds 339C 80ED LIT $ED 339E 5974 CALL kb-request 33A0 59CA CALL oneraw 33A2 6103 ALU $6103 33A4 1974 BRANCH kb-request \ capslock 33A6 0000 BRANCH 0jump \ numlock 33A8 0000 BRANCH 0jump \ isrelease 33AA 0000 BRANCH 0jump \ ise0 33AC 0000 BRANCH 0jump \ mods 33AE 0000 BRANCH 0jump \ lrshift? 33B0 B3AE LIT $33AE 33B2 6C00 ALU $6C00 33B4 8003 LIT $3 33B6 730F ALU $730F \ lrcontrol? 33B8 B3AE LIT $33AE 33BA 6C00 ALU $6C00 33BC 8044 LIT $44 33BE 730F ALU $730F \ lralt? 33C0 B3AE LIT $33AE 33C2 6C00 ALU $6C00 33C4 8088 LIT $88 33C6 730F ALU $730F \ curkey 33C8 0000 BRANCH 0jump \ append 33CA 80FF LIT $FF 33CC 6303 ALU $6303 33CE B3AE LIT $33AE 33D0 6C00 ALU $6C00 33D2 8008 LIT $8 33D4 6D03 ALU $6D03 33D6 6403 ALU $6403 33D8 B3C8 LIT $33C8 33DA 6023 ALU $6023 33DC 710F ALU $710F \ shiftmask 33DE 80FF LIT $FF 33E0 6303 ALU $6303 33E2 B3AC LIT $33AC 33E4 6C00 ALU $6C00 33E6 39F6 0BRANCH (then) 33E8 8004 LIT $4 33EA 6D03 ALU $6D03 \ (then) 33EC 700C ALU $700C \ shift-press 33EE 59EF CALL shiftmask 33F0 B3AE LIT $33AE 33F2 6C00 ALU $6C00 33F4 6403 ALU $6403 33F6 B3AE LIT $33AE 33F8 6023 ALU $6023 33FA 710F ALU $710F \ shift-release 33FC 59EF CALL shiftmask 33FE 6600 ALU $6600 3400 B3AE LIT $33AE 3402 6C00 ALU $6C00 3404 6303 ALU $6303 3406 B3AE LIT $33AE 3408 6023 ALU $6023 340A 710F ALU $710F \ shiftable-press 340C B3AE LIT $33AE 340E 6C00 ALU $6C00 3410 8003 LIT $3 3412 6303 ALU $6303 3414 4012 CALL 0= 3416 B3A6 LIT $33A6 3418 6C00 ALU $6C00 341A 6503 ALU $6503 341C 3A11 0BRANCH (then) 341E 8008 LIT $8 3420 6903 ALU $6903 \ (then) 3422 19E5 BRANCH append \ ignore 3424 710F ALU $710F \ myleds 3426 B3A8 LIT $33A8 3428 6C00 ALU $6C00 342A 8002 LIT $2 342C 6303 ALU $6303 342E B3A6 LIT $33A6 3430 6C00 ALU $6C00 3432 8004 LIT $4 3434 6303 ALU $6303 3436 6403 ALU $6403 3438 19CE BRANCH >leds \ toggle 343A 6081 ALU $6081 343C 6C00 ALU $6C00 343E 6600 ALU $6600 3440 6180 ALU $6180 3442 6023 ALU $6023 3444 710F ALU $710F \ plain-press 3446 6081 ALU $6081 3448 8000 LIT $0 344A 6600 ALU $6600 344C 6703 ALU $6703 344E 3A2D 0BRANCH (else) 3450 6103 ALU $6103 3452 B3A6 LIT $33A6 3454 5A1D CALL toggle 3456 5A13 CALL myleds 3458 1A38 BRANCH (then) \ (else) 345A 6081 ALU $6081 345C 8001 LIT $1 345E 6600 ALU $6600 3460 6703 ALU $6703 3462 3A37 0BRANCH (else) 3464 6103 ALU $6103 3466 B3A8 LIT $33A8 3468 5A1D CALL toggle 346A 5A13 CALL myleds 346C 1A38 BRANCH (then) \ (else) 346E 59E5 CALL append \ (then) 3470 700C ALU $700C \ num-press 3472 B3AC LIT $33AC 3474 6C00 ALU $6C00 3476 4012 CALL 0= 3478 B3A8 LIT $33A8 347A 6C00 ALU $6C00 347C 6303 ALU $6303 347E 3A46 0BRANCH (then) 3480 8008 LIT $8 3482 6903 ALU $6903 3484 800F LIT $F 3486 6303 ALU $6303 3488 802E LIT $2E 348A 6203 ALU $6203 \ (then) 348C 19E5 BRANCH append \ keyhandler 348E 340C 0BRANCH $2818 3490 3424 0BRANCH $2848 3492 33EE 0BRANCH whereis 3494 33FC 0BRANCH invx 3496 3472 0BRANCH $28E4 3498 3424 0BRANCH $2848 349A 3446 0BRANCH $288C 349C 3424 0BRANCH $2848 \ handle-raw 349E 6081 ALU $6081 34A0 80E0 LIT $E0 34A2 6703 ALU $6703 34A4 3A57 0BRANCH (else) 34A6 6103 ALU $6103 34A8 B3AC LIT $33AC 34AA 4B66 CALL in 34AC 1A7A BRANCH (then) \ (else) 34AE 6081 ALU $6081 34B0 80F0 LIT $F0 34B2 6703 ALU $6703 34B4 3A5F 0BRANCH (else) 34B6 6103 ALU $6103 34B8 B3AA LIT $33AA 34BA 4B66 CALL in 34BC 1A7A BRANCH (then) \ (else) 34BE 6081 ALU $6081 34C0 8084 LIT $84 34C2 6803 ALU $6803 34C4 3A79 0BRANCH (else) 34C6 5936 CALL scanmap@ 34C8 6081 ALU $6081 34CA 800C LIT $C 34CC 6903 ALU $6903 34CE 800C LIT $C 34D0 4077 CALL - 34D2 8000 LIT $0 34D4 4085 CALL max 34D6 4088 CALL cells 34D8 B3AA LIT $33AA 34DA 6C00 ALU $6C00 34DC 6203 ALU $6203 34DE 4088 CALL cells 34E0 B48E LIT $348E 34E2 6203 ALU $6203 34E4 6C00 ALU $6C00 34E6 40A9 CALL execute 34E8 B3AA LIT $33AA 34EA 4B6A CALL out 34EC B3AC LIT $33AC 34EE 4B6A CALL out 34F0 1A7A BRANCH (then) \ (else) 34F2 6103 ALU $6103 \ (then) 34F4 700C ALU $700C \ kb-cold 34F6 593C CALL ps2listening 34F8 5951 CALL kbfifo-cold 34FA 8007 LIT $7 34FC 59CE CALL >leds 34FE 4459 CALL sleep.1 3500 8000 LIT $0 3502 59CE CALL >leds 3504 B3A8 LIT $33A8 3506 4B6A CALL out 3508 B3A6 LIT $33A6 350A 4B6A CALL out 350C B3C8 LIT $33C8 350E 0B6A BRANCH out \ kbfifo-proc 3510 59AE CALL rawloop 3512 59A2 CALL rawready? 3514 3A8D 0BRANCH (then) 3516 59A6 CALL kbraw 3518 5A4F CALL handle-raw \ (then) 351A 700C ALU $700C \ key? 351C 5A88 CALL kbfifo-proc 351E B3C8 LIT $33C8 3520 6C00 ALU $6C00 3522 0066 BRANCH 0<> \ key 3524 5A8E CALL key? 3526 3A92 0BRANCH key 3528 B3C8 LIT $33C8 352A 6C00 ALU $6C00 352C B3C8 LIT $33C8 352E 0B6A BRANCH out \ istab? 3530 5A8E CALL key? 3532 6081 ALU $6081 3534 3A9F 0BRANCH (then) 3536 5A92 CALL key 3538 8009 LIT $9 353A 6703 ALU $6703 353C 6303 ALU $6303 \ (then) 353E 700C ALU $700C \ welcome-main 3540 4CB3 CALL vga-cold 3542 4C39 CALL home 3544 40A4 CALL sliteral 3546 4627 CALL $C4E 3548 2031 0BRANCH (then) 354A 6F74 ALU $6F74 354C 7320 ALU $7320 354E 7465 ALU $7465 3550 7520 ALU $7520 3552 2070 0BRANCH $E0 3554 656E ALU $656E 3556 7774 ALU $7774 3558 726F ALU $726F 355A 2C6B 0BRANCH $18D6 355C 5420 CALL $2840 355E 4241 CALL $482 3560 6620 ALU $6620 3562 726F ALU $726F 3564 6E20 ALU $6E20 3566 7865 ALU $7865 3568 2074 0BRANCH $E8 356A 6564 ALU $6564 356C 6F6D ALU $6F6D 356E 4D2A CALL statusline 3570 528C CALL rainbow 3572 8000 LIT $0 3574 8020 LIT $20 3576 5293 CALL loadsprites 3578 85AA LIT $5AA 357A 6C00 ALU $6C00 357C 6147 ALU $6147 357E 8006 LIT $6 3580 801A LIT $1A 3582 4C33 CALL vga-at-xy 3584 40A4 CALL sliteral 3586 5312 CALL $2624 3588 666F ALU $666F 358A 6374 ALU $6374 358C 726F ALU $726F 358E 2065 0BRANCH $CA 3590 6F46 ALU $6F46 3592 7472 ALU $7472 3594 2068 0BRANCH 0< 3596 5043 CALL $2086 3598 FF55 LIT $7F55 359A 42FD CALL type 359C 8020 LIT $20 359E 8006 LIT $6 35A0 4C33 CALL vga-at-xy 35A2 40A4 CALL sliteral 35A4 7608 ALU $7608 35A6 7265 ALU $7265 35A8 6973 ALU $6973 35AA 6E6F ALU $6E6F 35AC FF20 LIT $7F20 35AE 42FD CALL type 35B0 43E0 CALL version 35B2 42FD CALL type 35B4 8020 LIT $20 35B6 8008 LIT $8 35B8 4C33 CALL vga-at-xy 35BA 40A4 CALL sliteral 35BC 6208 ALU $6208 35BE 6975 ALU $6975 35C0 746C ALU $746C 35C2 2020 0BRANCH merge 35C4 FF20 LIT $7F20 35C6 42FD CALL type 35C8 4416 CALL build. 35CA 5A7B CALL kb-cold 35CC 4C39 CALL home \ (begin) 35CE 5A88 CALL kbfifo-proc 35D0 8020 LIT $20 35D2 800A LIT $A 35D4 4C33 CALL vga-at-xy 35D6 4841 CALL net-my-ip 35D8 42A2 CALL pad| 35DA 58A8 CALL #ip 35DC 42C9 CALL #> 35DE 42FD CALL type 35E0 42DD CALL space 35E2 42DD CALL space 35E4 8020 LIT $20 35E6 800C LIT $C 35E8 4C33 CALL vga-at-xy 35EA 40A4 CALL sliteral 35EC 7508 ALU $7508 35EE 7470 ALU $7470 35F0 6D69 ALU $6D69 35F2 2065 0BRANCH $CA 35F4 FF20 LIT $7F20 35F6 42FD CALL type 35F8 5894 CALL uptime 35FA 434E CALL D. 35FC 53D6 CALL haveip-handler 35FE 8008 LIT $8 3600 6147 ALU $6147 3602 8000 LIT $0 3604 6147 ALU $6147 \ (do) 3606 9B46 LIT $1B46 3608 6C00 ALU $6C00 360A 6B81 ALU $6B81 360C 8020 LIT $20 360E 41EB CALL * 3610 6203 ALU $6203 3612 6600 ALU $6600 3614 6147 ALU $6147 3616 8064 LIT $64 3618 6B81 ALU $6B81 361A 4D97 CALL sin* 361C 8258 LIT $258 361E 6203 ALU $6203 3620 8064 LIT $64 3622 6B8D ALU $6B8D 3624 4D9C CALL cos* 3626 814E LIT $14E 3628 6203 ALU $6203 362A 6B81 ALU $6B81 362C 4C1C CALL sprite! 362E 404B CALL looptest 3630 3B03 0BRANCH (do) 3632 4C17 CALL waitblank 3634 8001 LIT $1 3636 9B46 LIT $1B46 3638 405E CALL +! 363A 528F CALL next? 363C 5A98 CALL istab? 363E 6403 ALU $6403 3640 3AE7 0BRANCH (begin) 3642 6B8D ALU $6B8D 3644 85AA LIT $5AA 3646 6023 ALU $6023 3648 710F ALU $710F \ seconds 364A 0000 BRANCH 0jump \ minutes 364C 0000 BRANCH 0jump \ hours 364E 0000 BRANCH 0jump \ days 3650 0000 BRANCH 0jump \ months 3652 0000 BRANCH 0jump \ years 3654 0000 BRANCH 0jump \ weekday 3656 0000 BRANCH 0jump \ show2 3658 6C00 ALU $6C00 365A 4155 CALL s>d 365C 42A2 CALL pad| 365E 42B6 CALL # 3660 42B6 CALL # 3662 42C9 CALL #> 3664 02FD BRANCH type \ setdate 3666 F07F LIT $707F 3668 6600 ALU $6600 366A 4155 CALL s>d 366C 413E CALL d+ 366E 8001 LIT $1 3670 803C LIT $3C 3672 4254 CALL m*/mod 3674 B64A LIT $364A 3676 6023 ALU $6023 3678 6103 ALU $6103 367A 8001 LIT $1 367C 803C LIT $3C 367E 4254 CALL m*/mod 3680 B64C LIT $364C 3682 6023 ALU $6023 3684 6103 ALU $6103 3686 8001 LIT $1 3688 8018 LIT $18 368A 4254 CALL m*/mod 368C B64E LIT $364E 368E 6023 ALU $6023 3690 6103 ALU $6103 3692 803B LIT $3B 3694 8000 LIT $0 3696 4164 CALL d- 3698 405C CALL 2dup 369A 8001 LIT $1 369C 8007 LIT $7 369E 4254 CALL m*/mod 36A0 B656 LIT $3656 36A2 6023 ALU $6023 36A4 6103 ALU $6103 36A6 4016 CALL 2drop 36A8 816D LIT $16D 36AA 4213 CALL um/mod 36AC 6081 ALU $6081 36AE 876C LIT $76C 36B0 6203 ALU $6203 36B2 B654 LIT $3654 36B4 6023 ALU $6023 36B6 6103 ALU $6103 36B8 8004 LIT $4 36BA 423E CALL / 36BC 6A00 ALU $6A00 36BE 4077 CALL - 36C0 6081 ALU $6081 36C2 8005 LIT $5 36C4 41EB CALL * 36C6 8134 LIT $134 36C8 6203 ALU $6203 36CA 8099 LIT $99 36CC 423E CALL / 36CE 8002 LIT $2 36D0 4077 CALL - 36D2 B652 LIT $3652 36D4 6023 ALU $6023 36D6 6103 ALU $6103 36D8 B652 LIT $3652 36DA 6C00 ALU $6C00 36DC 8004 LIT $4 36DE 6203 ALU $6203 36E0 8099 LIT $99 36E2 8005 LIT $5 36E4 4246 CALL */ 36E6 4077 CALL - 36E8 807A LIT $7A 36EA 6203 ALU $6203 36EC B650 LIT $3650 36EE 6023 ALU $6023 36F0 6103 ALU $6103 36F2 4C39 CALL home 36F4 85AA LIT $5AA 36F6 6C00 ALU $6C00 36F8 6147 ALU $6147 36FA 99BE LIT $19BE 36FC 85AA LIT $5AA 36FE 6023 ALU $6023 3700 6103 ALU $6103 3702 40A4 CALL sliteral 3704 5415 CALL $282A 3706 7568 ALU $7568 3708 7246 ALU $7246 370A 5369 CALL $26D2 370C 7461 ALU $7461 370E 7553 ALU $7553 3710 4D6E CALL $1ADC 3712 6E6F ALU $6E6F 3714 7554 ALU $7554 3716 5765 CALL $2ECA 3718 6465 ALU $6465 371A 6103 ALU $6103 371C B656 LIT $3656 371E 6C00 ALU $6C00 3720 8003 LIT $3 3722 41EB CALL * 3724 6203 ALU $6203 3726 8003 LIT $3 3728 42FD CALL type 372A 42D9 CALL cr 372C 40A4 CALL sliteral 372E 4D24 CALL $1A48 3730 7261 ALU $7261 3732 7041 ALU $7041 3734 4D72 CALL $1AE4 3736 7961 ALU $7961 3738 754A ALU $754A 373A 4A6E CALL $14DC 373C 6C75 ALU $6C75 373E 7541 ALU $7541 3740 5367 CALL $26CE 3742 7065 ALU $7065 3744 634F ALU $634F 3746 4E74 CALL $1CE8 3748 766F ALU $766F 374A 6544 ALU $6544 374C 4A63 CALL $14C6 374E 6E61 ALU $6E61 3750 6546 ALU $6546 3752 FF62 LIT $7F62 3754 6103 ALU $6103 3756 B652 LIT $3652 3758 6C00 ALU $6C00 375A 8003 LIT $3 375C 41EB CALL * 375E 6203 ALU $6203 3760 8003 LIT $3 3762 42FD CALL type 3764 42DD CALL space 3766 B650 LIT $3650 3768 6C00 ALU $6C00 376A 8000 LIT $0 376C 434A CALL .R 376E 42D9 CALL cr 3770 B654 LIT $3654 3772 6C00 ALU $6C00 3774 4353 CALL . 3776 42D9 CALL cr 3778 4005 CALL true 377A 3BC5 0BRANCH (then) 377C B64E LIT $364E 377E 5B2C CALL show2 3780 B64C LIT $364C 3782 5B2C CALL show2 3784 B64A LIT $364A 3786 5B2C CALL show2 3788 4C39 CALL home \ (then) 378A 6B8D ALU $6B8D 378C 85AA LIT $5AA 378E 6023 ALU $6023 3790 710F ALU $710F \ setdelay 3792 85AA LIT $5AA 3794 6C00 ALU $6C00 3796 6147 ALU $6147 3798 98DE LIT $18DE 379A 85AA LIT $5AA 379C 6023 ALU $6023 379E 6103 ALU $6103 37A0 8020 LIT $20 37A2 8000 LIT $0 37A4 4C33 CALL vga-at-xy 37A6 40A4 CALL sliteral 37A8 6E04 ALU $6E04 37AA 7074 ALU $7074 37AC FF20 LIT $7F20 37AE 42FD CALL type 37B0 42A2 CALL pad| 37B2 42B6 CALL # 37B4 42B6 CALL # 37B6 42B6 CALL # 37B8 802E LIT $2E 37BA 42AE CALL HOLD 37BC 42C3 CALL #S 37BE 42C9 CALL #> 37C0 42FD CALL type 37C2 40A4 CALL sliteral 37C4 2004 0BRANCH $8 37C6 736D ALU $736D 37C8 FF20 LIT $7F20 37CA 42FD CALL type 37CC 6B8D ALU $6B8D 37CE 85AA LIT $5AA 37D0 6023 ALU $6023 37D2 710F ALU $710F \ ntp-server 37D4 9197 LIT $1197 37D6 9014 LIT $1014 37D8 700C ALU $700C \ ntp-request 37DA 807B LIT $7B 37DC A70F LIT $270F 37DE 5BEA CALL ntp-server 37E0 4841 CALL net-my-ip 37E2 4121 CALL 2over 37E4 491A CALL arp-lookup 37E6 4A2B CALL udp-header 37E8 A304 LIT $2304 37EA 46E7 CALL mac-pkt-, 37EC 84EC LIT $4EC 37EE 46E7 CALL mac-pkt-, 37F0 8006 LIT $6 37F2 46F4 CALL mac-pkt-,0 37F4 8004 LIT $4 37F6 46F4 CALL mac-pkt-,0 37F8 8004 LIT $4 37FA 46F4 CALL mac-pkt-,0 37FC 8004 LIT $4 37FE 46F4 CALL mac-pkt-,0 3800 443B CALL time@ 3802 46EC CALL mac-pkt-d, 3804 8002 LIT $2 3806 46F4 CALL mac-pkt-,0 3808 4A65 CALL udp-wrapup 380A 0794 BRANCH mac-send \ ntp-handler 380C 8011 LIT $11 380E 499B CALL ip-isproto 3810 8022 LIT $22 3812 482B CALL packet@ 3814 807B LIT $7B 3816 6703 ALU $6703 3818 6303 ALU $6303 381A 8024 LIT $24 381C 482B CALL packet@ 381E A70F LIT $270F 3820 6703 ALU $6703 3822 6303 ALU $6303 3824 3C1B 0BRANCH (then) 3826 8052 LIT $52 3828 482D CALL packetd@ 382A 5B33 CALL setdate 382C 443B CALL time@ 382E 8042 LIT $42 3830 482D CALL packetd@ 3832 4164 CALL d- 3834 5BC9 CALL setdelay \ (then) 3836 700C ALU $700C \ ntp-alarm 3838 0000 BRANCH 0jump 383A 0000 BRANCH 0jump \ clock-main 383C 4C56 CALL vga-page 383E C240 LIT $4240 3840 800F LIT $F 3842 B838 LIT $3838 3844 4448 CALL setalarm \ (begin) 3846 476F CALL mac-fullness 3848 3C3B 0BRANCH (repeat) 384A 4985 CALL arp-handler 384C 800C LIT $C 384E 482B CALL packet@ 3850 8800 LIT $800 3852 6703 ALU $6703 3854 3C35 0BRANCH (then) 3856 8002 LIT $2 3858 801E LIT $1E 385A 46C4 CALL mac-inoffset 385C 46D0 CALL mac@n 385E 4841 CALL net-my-ip 3860 410D CALL d= 3862 3C33 0BRANCH (then) 3864 49D3 CALL icmp-handler \ (then) 3866 535D CALL loader-handler 3868 5C06 CALL ntp-handler \ (then) 386A 4002 CALL depth 386C 3C39 0BRANCH (then) 386E 438A CALL .s 3870 42D9 CALL cr \ (then) 3872 4789 CALL mac-consume 3874 1C23 BRANCH (begin) \ (repeat) 3876 B838 LIT $3838 3878 444D CALL isalarm 387A 3C43 0BRANCH (then) 387C 5BED CALL ntp-request 387E C240 LIT $4240 3880 800F LIT $F 3882 B838 LIT $3838 3884 4448 CALL setalarm \ (then) 3886 528F CALL next? 3888 3C23 0BRANCH (begin) 388A 700C ALU $700C \ frob 388C C102 LIT $4102 388E 4B66 CALL in 3890 C100 LIT $4100 3892 4B6A CALL out 3894 8020 LIT $20 3896 6147 ALU $6147 3898 8000 LIT $0 389A 6147 ALU $6147 \ (do) 389C 8001 LIT $1 389E 6B81 ALU $6B81 38A0 8007 LIT $7 38A2 6303 ALU $6303 38A4 6D03 ALU $6D03 38A6 C112 LIT $4112 38A8 6023 ALU $6023 38AA 6103 ALU $6103 38AC F530 LIT $7530 38AE 8000 LIT $0 38B0 4453 CALL sleepus 38B2 404B CALL looptest 38B4 3C4E 0BRANCH (do) 38B6 C100 LIT $4100 38B8 0B66 BRANCH in \ main 38BA 4330 CALL decimal 38BC 87E4 LIT $7E4 38BE 85AA LIT $5AA 38C0 6023 ALU $6023 38C2 6103 ALU $6103 38C4 5C46 CALL frob 38C6 803C LIT $3C 38C8 6147 ALU $6147 38CA 8000 LIT $0 38CC 6147 ALU $6147 \ (do) 38CE 42D9 CALL cr 38D0 404B CALL looptest 38D2 3C67 0BRANCH (do) 38D4 40A4 CALL sliteral 38D6 570F CALL $2E1E 38D8 6C65 ALU $6C65 38DA 6F63 ALU $6F63 38DC 656D ALU $656D 38DE 2021 0BRANCH $42 38E0 7542 ALU $7542 38E2 6C69 ALU $6C69 38E4 2074 0BRANCH $E8 38E6 42FD CALL type 38E8 4416 CALL build. 38EA 42D9 CALL cr 38EC 82CF LIT $2CF 38EE 40A4 CALL sliteral 38F0 6D07 ALU $6D07 38F2 6961 ALU $6961 38F4 2E6E 0BRANCH $1CDC 38F6 7366 ALU $7366 38F8 43AF CALL (snap) 38FA 4B72 CALL flash-cold 38FC 4CB3 CALL vga-cold 38FE 98DE LIT $18DE 3900 85AA LIT $5AA 3902 6023 ALU $6023 3904 6103 ALU $6103 3906 40A4 CALL sliteral 3908 5718 CALL $2E30 390A 6961 ALU $6961 390C 6974 ALU $6974 390E 676E ALU $676E 3910 6620 ALU $6620 3912 726F ALU $726F 3914 4520 CALL $A40 3916 6874 ALU $6874 3918 7265 ALU $7265 391A 656E ALU $656E 391C 2074 0BRANCH $E8 391E 494E CALL $129C 3920 FF43 LIT $7F43 3922 4D2A CALL statusline 3924 4566 CALL mac-cold 3926 47AA CALL nicwork 3928 8452 LIT $452 392A 6600 ALU $6600 392C A135 LIT $2135 392E 6600 ALU $6600 3930 4A6F CALL dhcp-xid! 3932 B93F LIT $393F 3934 6600 ALU $6600 3936 802D LIT $2D 3938 9070 LIT $1070 393A 4448 CALL setalarm 393C 8000 LIT $0 393E 3CB9 0BRANCH (else) 3940 9068 LIT $1068 3942 4166 CALL dz \ (begin) 3944 4841 CALL net-my-ip 3946 418F CALL d0= 3948 3CB8 0BRANCH (repeat) 394A 9070 LIT $1070 394C 444D CALL isalarm 394E 3CB6 0BRANCH (then) 3950 4B63 CALL dhcp-discover 3952 40A4 CALL sliteral 3954 4408 CALL $810 3956 5349 CALL $2692 3958 4F43 CALL $1E86 395A 4556 CALL $AAC 395C FF52 LIT $7F52 395E 42FD CALL type 3960 42D9 CALL cr 3962 B93F LIT $393F 3964 6600 ALU $6600 3966 802D LIT $2D 3968 9070 LIT $1070 396A 4448 CALL setalarm \ (then) 396C 53CB CALL preip-handler 396E 1CA2 BRANCH (begin) \ (repeat) 3970 1CC9 BRANCH (then) \ (else) 3972 BF57 LIT $3F57 3974 6600 ALU $6600 3976 8063 LIT $63 3978 9068 LIT $1068 397A 411A CALL 2! 397C 8000 LIT $0 397E 6600 ALU $6600 3980 80FF LIT $FF 3982 6600 ALU $6600 3984 9070 LIT $1070 3986 411A CALL 2! 3988 BF57 LIT $3F57 398A 6600 ALU $6600 398C 8001 LIT $1 398E 906C LIT $106C 3990 411A CALL 2! \ (then) 3992 4AD8 CALL dhcp-status 3994 48B7 CALL arp-reset \ (begin) 3996 5AA0 CALL welcome-main 3998 4459 CALL sleep.1 399A 5C1E CALL clock-main 399C 4459 CALL sleep.1 399E 52A7 CALL stars-main 39A0 4459 CALL sleep.1 39A2 5880 CALL invaders-main 39A4 4459 CALL sleep.1 39A6 40A4 CALL sliteral 39A8 6C07 ALU $6C07 39AA 6F6F ALU $6F6F 39AC 6970 ALU $6970 39AE 676E ALU $676E 39B0 42FD CALL type 39B2 42D9 CALL cr 39B4 1CCB BRANCH (begin) \ (begin) 39B6 53D6 CALL haveip-handler 39B8 1CDB BRANCH (begin) 39BA 700C ALU $700C 39BC FFFF LIT $7FFF 39BE FFFF LIT $7FFF 39C0 FFFF LIT $7FFF 39C2 FFFF LIT $7FFF 39C4 FFFF LIT $7FFF 39C6 FFFF LIT $7FFF 39C8 FFFF LIT $7FFF 39CA FFFF LIT $7FFF 39CC FFFF LIT $7FFF 39CE FFFF LIT $7FFF 39D0 FFFF LIT $7FFF 39D2 FFFF LIT $7FFF 39D4 FFFF LIT $7FFF 39D6 FFFF LIT $7FFF 39D8 FFFF LIT $7FFF 39DA FFFF LIT $7FFF 39DC FFFF LIT $7FFF 39DE FFFF LIT $7FFF 39E0 FFFF LIT $7FFF 39E2 FFFF LIT $7FFF 39E4 FFFF LIT $7FFF 39E6 FFFF LIT $7FFF 39E8 FFFF LIT $7FFF 39EA FFFF LIT $7FFF 39EC FFFF LIT $7FFF 39EE FFFF LIT $7FFF 39F0 FFFF LIT $7FFF 39F2 FFFF LIT $7FFF 39F4 FFFF LIT $7FFF 39F6 FFFF LIT $7FFF 39F8 FFFF LIT $7FFF 39FA FFFF LIT $7FFF 39FC FFFF LIT $7FFF 39FE FFFF LIT $7FFF 3A00 FFFF LIT $7FFF 3A02 FFFF LIT $7FFF 3A04 FFFF LIT $7FFF 3A06 FFFF LIT $7FFF 3A08 FFFF LIT $7FFF 3A0A FFFF LIT $7FFF 3A0C FFFF LIT $7FFF 3A0E FFFF LIT $7FFF 3A10 FFFF LIT $7FFF 3A12 FFFF LIT $7FFF 3A14 FFFF LIT $7FFF 3A16 FFFF LIT $7FFF 3A18 FFFF LIT $7FFF 3A1A FFFF LIT $7FFF 3A1C FFFF LIT $7FFF 3A1E FFFF LIT $7FFF 3A20 FFFF LIT $7FFF 3A22 FFFF LIT $7FFF 3A24 FFFF LIT $7FFF 3A26 FFFF LIT $7FFF 3A28 FFFF LIT $7FFF 3A2A FFFF LIT $7FFF 3A2C FFFF LIT $7FFF 3A2E FFFF LIT $7FFF 3A30 FFFF LIT $7FFF 3A32 FFFF LIT $7FFF 3A34 FFFF LIT $7FFF 3A36 FFFF LIT $7FFF 3A38 FFFF LIT $7FFF 3A3A FFFF LIT $7FFF 3A3C FFFF LIT $7FFF 3A3E FFFF LIT $7FFF 3A40 FFFF LIT $7FFF 3A42 FFFF LIT $7FFF 3A44 FFFF LIT $7FFF 3A46 FFFF LIT $7FFF 3A48 FFFF LIT $7FFF 3A4A FFFF LIT $7FFF 3A4C FFFF LIT $7FFF 3A4E FFFF LIT $7FFF 3A50 FFFF LIT $7FFF 3A52 FFFF LIT $7FFF 3A54 FFFF LIT $7FFF 3A56 FFFF LIT $7FFF 3A58 FFFF LIT $7FFF 3A5A FFFF LIT $7FFF 3A5C FFFF LIT $7FFF 3A5E FFFF LIT $7FFF 3A60 FFFF LIT $7FFF 3A62 FFFF LIT $7FFF 3A64 FFFF LIT $7FFF 3A66 FFFF LIT $7FFF 3A68 FFFF LIT $7FFF 3A6A FFFF LIT $7FFF 3A6C FFFF LIT $7FFF 3A6E FFFF LIT $7FFF 3A70 FFFF LIT $7FFF 3A72 FFFF LIT $7FFF 3A74 FFFF LIT $7FFF 3A76 FFFF LIT $7FFF 3A78 FFFF LIT $7FFF 3A7A FFFF LIT $7FFF 3A7C FFFF LIT $7FFF 3A7E FFFF LIT $7FFF 3A80 FFFF LIT $7FFF 3A82 FFFF LIT $7FFF 3A84 FFFF LIT $7FFF 3A86 FFFF LIT $7FFF 3A88 FFFF LIT $7FFF 3A8A FFFF LIT $7FFF 3A8C FFFF LIT $7FFF 3A8E FFFF LIT $7FFF 3A90 FFFF LIT $7FFF 3A92 FFFF LIT $7FFF 3A94 FFFF LIT $7FFF 3A96 FFFF LIT $7FFF 3A98 FFFF LIT $7FFF 3A9A FFFF LIT $7FFF 3A9C FFFF LIT $7FFF 3A9E FFFF LIT $7FFF 3AA0 FFFF LIT $7FFF 3AA2 FFFF LIT $7FFF 3AA4 FFFF LIT $7FFF 3AA6 FFFF LIT $7FFF 3AA8 FFFF LIT $7FFF 3AAA FFFF LIT $7FFF 3AAC FFFF LIT $7FFF 3AAE FFFF LIT $7FFF 3AB0 FFFF LIT $7FFF 3AB2 FFFF LIT $7FFF 3AB4 FFFF LIT $7FFF 3AB6 FFFF LIT $7FFF 3AB8 FFFF LIT $7FFF 3ABA FFFF LIT $7FFF 3ABC FFFF LIT $7FFF 3ABE FFFF LIT $7FFF 3AC0 FFFF LIT $7FFF 3AC2 FFFF LIT $7FFF 3AC4 FFFF LIT $7FFF 3AC6 FFFF LIT $7FFF 3AC8 FFFF LIT $7FFF 3ACA FFFF LIT $7FFF 3ACC FFFF LIT $7FFF 3ACE FFFF LIT $7FFF 3AD0 FFFF LIT $7FFF 3AD2 FFFF LIT $7FFF 3AD4 FFFF LIT $7FFF 3AD6 FFFF LIT $7FFF 3AD8 FFFF LIT $7FFF 3ADA FFFF LIT $7FFF 3ADC FFFF LIT $7FFF 3ADE FFFF LIT $7FFF 3AE0 FFFF LIT $7FFF 3AE2 FFFF LIT $7FFF 3AE4 FFFF LIT $7FFF 3AE6 FFFF LIT $7FFF 3AE8 FFFF LIT $7FFF 3AEA FFFF LIT $7FFF 3AEC FFFF LIT $7FFF 3AEE FFFF LIT $7FFF 3AF0 FFFF LIT $7FFF 3AF2 FFFF LIT $7FFF 3AF4 FFFF LIT $7FFF 3AF6 FFFF LIT $7FFF 3AF8 FFFF LIT $7FFF 3AFA FFFF LIT $7FFF 3AFC FFFF LIT $7FFF 3AFE FFFF LIT $7FFF 3B00 FFFF LIT $7FFF 3B02 FFFF LIT $7FFF 3B04 FFFF LIT $7FFF 3B06 FFFF LIT $7FFF 3B08 FFFF LIT $7FFF 3B0A FFFF LIT $7FFF 3B0C FFFF LIT $7FFF 3B0E FFFF LIT $7FFF 3B10 FFFF LIT $7FFF 3B12 FFFF LIT $7FFF 3B14 FFFF LIT $7FFF 3B16 FFFF LIT $7FFF 3B18 FFFF LIT $7FFF 3B1A FFFF LIT $7FFF 3B1C FFFF LIT $7FFF 3B1E FFFF LIT $7FFF 3B20 FFFF LIT $7FFF 3B22 FFFF LIT $7FFF 3B24 FFFF LIT $7FFF 3B26 FFFF LIT $7FFF 3B28 FFFF LIT $7FFF 3B2A FFFF LIT $7FFF 3B2C FFFF LIT $7FFF 3B2E FFFF LIT $7FFF 3B30 FFFF LIT $7FFF 3B32 FFFF LIT $7FFF 3B34 FFFF LIT $7FFF 3B36 FFFF LIT $7FFF 3B38 FFFF LIT $7FFF 3B3A FFFF LIT $7FFF 3B3C FFFF LIT $7FFF 3B3E FFFF LIT $7FFF 3B40 FFFF LIT $7FFF 3B42 FFFF LIT $7FFF 3B44 FFFF LIT $7FFF 3B46 FFFF LIT $7FFF 3B48 FFFF LIT $7FFF 3B4A FFFF LIT $7FFF 3B4C FFFF LIT $7FFF 3B4E FFFF LIT $7FFF 3B50 FFFF LIT $7FFF 3B52 FFFF LIT $7FFF 3B54 FFFF LIT $7FFF 3B56 FFFF LIT $7FFF 3B58 FFFF LIT $7FFF 3B5A FFFF LIT $7FFF 3B5C FFFF LIT $7FFF 3B5E FFFF LIT $7FFF 3B60 FFFF LIT $7FFF 3B62 FFFF LIT $7FFF 3B64 FFFF LIT $7FFF 3B66 FFFF LIT $7FFF 3B68 FFFF LIT $7FFF 3B6A FFFF LIT $7FFF 3B6C FFFF LIT $7FFF 3B6E FFFF LIT $7FFF 3B70 FFFF LIT $7FFF 3B72 FFFF LIT $7FFF 3B74 FFFF LIT $7FFF 3B76 FFFF LIT $7FFF 3B78 FFFF LIT $7FFF 3B7A FFFF LIT $7FFF 3B7C FFFF LIT $7FFF 3B7E FFFF LIT $7FFF 3B80 FFFF LIT $7FFF 3B82 FFFF LIT $7FFF 3B84 FFFF LIT $7FFF 3B86 FFFF LIT $7FFF 3B88 FFFF LIT $7FFF 3B8A FFFF LIT $7FFF 3B8C FFFF LIT $7FFF 3B8E FFFF LIT $7FFF 3B90 FFFF LIT $7FFF 3B92 FFFF LIT $7FFF 3B94 FFFF LIT $7FFF 3B96 FFFF LIT $7FFF 3B98 FFFF LIT $7FFF 3B9A FFFF LIT $7FFF 3B9C FFFF LIT $7FFF 3B9E FFFF LIT $7FFF 3BA0 FFFF LIT $7FFF 3BA2 FFFF LIT $7FFF 3BA4 FFFF LIT $7FFF 3BA6 FFFF LIT $7FFF 3BA8 FFFF LIT $7FFF 3BAA FFFF LIT $7FFF 3BAC FFFF LIT $7FFF 3BAE FFFF LIT $7FFF 3BB0 FFFF LIT $7FFF 3BB2 FFFF LIT $7FFF 3BB4 FFFF LIT $7FFF 3BB6 FFFF LIT $7FFF 3BB8 FFFF LIT $7FFF 3BBA FFFF LIT $7FFF 3BBC FFFF LIT $7FFF 3BBE FFFF LIT $7FFF 3BC0 FFFF LIT $7FFF 3BC2 FFFF LIT $7FFF 3BC4 FFFF LIT $7FFF 3BC6 FFFF LIT $7FFF 3BC8 FFFF LIT $7FFF 3BCA FFFF LIT $7FFF 3BCC FFFF LIT $7FFF 3BCE FFFF LIT $7FFF 3BD0 FFFF LIT $7FFF 3BD2 FFFF LIT $7FFF 3BD4 FFFF LIT $7FFF 3BD6 FFFF LIT $7FFF 3BD8 FFFF LIT $7FFF 3BDA FFFF LIT $7FFF 3BDC FFFF LIT $7FFF 3BDE FFFF LIT $7FFF 3BE0 FFFF LIT $7FFF 3BE2 FFFF LIT $7FFF 3BE4 FFFF LIT $7FFF 3BE6 FFFF LIT $7FFF 3BE8 FFFF LIT $7FFF 3BEA FFFF LIT $7FFF 3BEC FFFF LIT $7FFF 3BEE FFFF LIT $7FFF 3BF0 FFFF LIT $7FFF 3BF2 FFFF LIT $7FFF 3BF4 FFFF LIT $7FFF 3BF6 FFFF LIT $7FFF 3BF8 FFFF LIT $7FFF 3BFA FFFF LIT $7FFF 3BFC FFFF LIT $7FFF 3BFE FFFF LIT $7FFF 3C00 FFFF LIT $7FFF 3C02 FFFF LIT $7FFF 3C04 FFFF LIT $7FFF 3C06 FFFF LIT $7FFF 3C08 FFFF LIT $7FFF 3C0A FFFF LIT $7FFF 3C0C FFFF LIT $7FFF 3C0E FFFF LIT $7FFF 3C10 FFFF LIT $7FFF 3C12 FFFF LIT $7FFF 3C14 FFFF LIT $7FFF 3C16 FFFF LIT $7FFF 3C18 FFFF LIT $7FFF 3C1A FFFF LIT $7FFF 3C1C FFFF LIT $7FFF 3C1E FFFF LIT $7FFF 3C20 FFFF LIT $7FFF 3C22 FFFF LIT $7FFF 3C24 FFFF LIT $7FFF 3C26 FFFF LIT $7FFF 3C28 FFFF LIT $7FFF 3C2A FFFF LIT $7FFF 3C2C FFFF LIT $7FFF 3C2E FFFF LIT $7FFF 3C30 FFFF LIT $7FFF 3C32 FFFF LIT $7FFF 3C34 FFFF LIT $7FFF 3C36 FFFF LIT $7FFF 3C38 FFFF LIT $7FFF 3C3A FFFF LIT $7FFF 3C3C FFFF LIT $7FFF 3C3E FFFF LIT $7FFF 3C40 FFFF LIT $7FFF 3C42 FFFF LIT $7FFF 3C44 FFFF LIT $7FFF 3C46 FFFF LIT $7FFF 3C48 FFFF LIT $7FFF 3C4A FFFF LIT $7FFF 3C4C FFFF LIT $7FFF 3C4E FFFF LIT $7FFF 3C50 FFFF LIT $7FFF 3C52 FFFF LIT $7FFF 3C54 FFFF LIT $7FFF 3C56 FFFF LIT $7FFF 3C58 FFFF LIT $7FFF 3C5A FFFF LIT $7FFF 3C5C FFFF LIT $7FFF 3C5E FFFF LIT $7FFF 3C60 FFFF LIT $7FFF 3C62 FFFF LIT $7FFF 3C64 FFFF LIT $7FFF 3C66 FFFF LIT $7FFF 3C68 FFFF LIT $7FFF 3C6A FFFF LIT $7FFF 3C6C FFFF LIT $7FFF 3C6E FFFF LIT $7FFF 3C70 FFFF LIT $7FFF 3C72 FFFF LIT $7FFF 3C74 FFFF LIT $7FFF 3C76 FFFF LIT $7FFF 3C78 FFFF LIT $7FFF 3C7A FFFF LIT $7FFF 3C7C FFFF LIT $7FFF 3C7E FFFF LIT $7FFF 3C80 FFFF LIT $7FFF 3C82 FFFF LIT $7FFF 3C84 FFFF LIT $7FFF 3C86 FFFF LIT $7FFF 3C88 FFFF LIT $7FFF 3C8A FFFF LIT $7FFF 3C8C FFFF LIT $7FFF 3C8E FFFF LIT $7FFF 3C90 FFFF LIT $7FFF 3C92 FFFF LIT $7FFF 3C94 FFFF LIT $7FFF 3C96 FFFF LIT $7FFF 3C98 FFFF LIT $7FFF 3C9A FFFF LIT $7FFF 3C9C FFFF LIT $7FFF 3C9E FFFF LIT $7FFF 3CA0 FFFF LIT $7FFF 3CA2 FFFF LIT $7FFF 3CA4 FFFF LIT $7FFF 3CA6 FFFF LIT $7FFF 3CA8 FFFF LIT $7FFF 3CAA FFFF LIT $7FFF 3CAC FFFF LIT $7FFF 3CAE FFFF LIT $7FFF 3CB0 FFFF LIT $7FFF 3CB2 FFFF LIT $7FFF 3CB4 FFFF LIT $7FFF 3CB6 FFFF LIT $7FFF 3CB8 FFFF LIT $7FFF 3CBA FFFF LIT $7FFF 3CBC FFFF LIT $7FFF 3CBE FFFF LIT $7FFF 3CC0 FFFF LIT $7FFF 3CC2 FFFF LIT $7FFF 3CC4 FFFF LIT $7FFF 3CC6 FFFF LIT $7FFF 3CC8 FFFF LIT $7FFF 3CCA FFFF LIT $7FFF 3CCC FFFF LIT $7FFF 3CCE FFFF LIT $7FFF 3CD0 FFFF LIT $7FFF 3CD2 FFFF LIT $7FFF 3CD4 FFFF LIT $7FFF 3CD6 FFFF LIT $7FFF 3CD8 FFFF LIT $7FFF 3CDA FFFF LIT $7FFF 3CDC FFFF LIT $7FFF 3CDE FFFF LIT $7FFF 3CE0 FFFF LIT $7FFF 3CE2 FFFF LIT $7FFF 3CE4 FFFF LIT $7FFF 3CE6 FFFF LIT $7FFF 3CE8 FFFF LIT $7FFF 3CEA FFFF LIT $7FFF 3CEC FFFF LIT $7FFF 3CEE FFFF LIT $7FFF 3CF0 FFFF LIT $7FFF 3CF2 FFFF LIT $7FFF 3CF4 FFFF LIT $7FFF 3CF6 FFFF LIT $7FFF 3CF8 FFFF LIT $7FFF 3CFA FFFF LIT $7FFF 3CFC FFFF LIT $7FFF 3CFE FFFF LIT $7FFF 3D00 FFFF LIT $7FFF 3D02 FFFF LIT $7FFF 3D04 FFFF LIT $7FFF 3D06 FFFF LIT $7FFF 3D08 FFFF LIT $7FFF 3D0A FFFF LIT $7FFF 3D0C FFFF LIT $7FFF 3D0E FFFF LIT $7FFF 3D10 FFFF LIT $7FFF 3D12 FFFF LIT $7FFF 3D14 FFFF LIT $7FFF 3D16 FFFF LIT $7FFF 3D18 FFFF LIT $7FFF 3D1A FFFF LIT $7FFF 3D1C FFFF LIT $7FFF 3D1E FFFF LIT $7FFF 3D20 FFFF LIT $7FFF 3D22 FFFF LIT $7FFF 3D24 FFFF LIT $7FFF 3D26 FFFF LIT $7FFF 3D28 FFFF LIT $7FFF 3D2A FFFF LIT $7FFF 3D2C FFFF LIT $7FFF 3D2E FFFF LIT $7FFF 3D30 FFFF LIT $7FFF 3D32 FFFF LIT $7FFF 3D34 FFFF LIT $7FFF 3D36 FFFF LIT $7FFF 3D38 FFFF LIT $7FFF 3D3A FFFF LIT $7FFF 3D3C FFFF LIT $7FFF 3D3E FFFF LIT $7FFF 3D40 FFFF LIT $7FFF 3D42 FFFF LIT $7FFF 3D44 FFFF LIT $7FFF 3D46 FFFF LIT $7FFF 3D48 FFFF LIT $7FFF 3D4A FFFF LIT $7FFF 3D4C FFFF LIT $7FFF 3D4E FFFF LIT $7FFF 3D50 FFFF LIT $7FFF 3D52 FFFF LIT $7FFF 3D54 FFFF LIT $7FFF 3D56 FFFF LIT $7FFF 3D58 FFFF LIT $7FFF 3D5A FFFF LIT $7FFF 3D5C FFFF LIT $7FFF 3D5E FFFF LIT $7FFF 3D60 FFFF LIT $7FFF 3D62 FFFF LIT $7FFF 3D64 FFFF LIT $7FFF 3D66 FFFF LIT $7FFF 3D68 FFFF LIT $7FFF 3D6A FFFF LIT $7FFF 3D6C FFFF LIT $7FFF 3D6E FFFF LIT $7FFF 3D70 FFFF LIT $7FFF 3D72 FFFF LIT $7FFF 3D74 FFFF LIT $7FFF 3D76 FFFF LIT $7FFF 3D78 FFFF LIT $7FFF 3D7A FFFF LIT $7FFF 3D7C FFFF LIT $7FFF 3D7E FFFF LIT $7FFF 3D80 FFFF LIT $7FFF 3D82 FFFF LIT $7FFF 3D84 FFFF LIT $7FFF 3D86 FFFF LIT $7FFF 3D88 FFFF LIT $7FFF 3D8A FFFF LIT $7FFF 3D8C FFFF LIT $7FFF 3D8E FFFF LIT $7FFF 3D90 FFFF LIT $7FFF 3D92 FFFF LIT $7FFF 3D94 FFFF LIT $7FFF 3D96 FFFF LIT $7FFF 3D98 FFFF LIT $7FFF 3D9A FFFF LIT $7FFF 3D9C FFFF LIT $7FFF 3D9E FFFF LIT $7FFF 3DA0 FFFF LIT $7FFF 3DA2 FFFF LIT $7FFF 3DA4 FFFF LIT $7FFF 3DA6 FFFF LIT $7FFF 3DA8 FFFF LIT $7FFF 3DAA FFFF LIT $7FFF 3DAC FFFF LIT $7FFF 3DAE FFFF LIT $7FFF 3DB0 FFFF LIT $7FFF 3DB2 FFFF LIT $7FFF 3DB4 FFFF LIT $7FFF 3DB6 FFFF LIT $7FFF 3DB8 FFFF LIT $7FFF 3DBA FFFF LIT $7FFF 3DBC FFFF LIT $7FFF 3DBE FFFF LIT $7FFF 3DC0 FFFF LIT $7FFF 3DC2 FFFF LIT $7FFF 3DC4 FFFF LIT $7FFF 3DC6 FFFF LIT $7FFF 3DC8 FFFF LIT $7FFF 3DCA FFFF LIT $7FFF 3DCC FFFF LIT $7FFF 3DCE FFFF LIT $7FFF 3DD0 FFFF LIT $7FFF 3DD2 FFFF LIT $7FFF 3DD4 FFFF LIT $7FFF 3DD6 FFFF LIT $7FFF 3DD8 FFFF LIT $7FFF 3DDA FFFF LIT $7FFF 3DDC FFFF LIT $7FFF 3DDE FFFF LIT $7FFF 3DE0 FFFF LIT $7FFF 3DE2 FFFF LIT $7FFF 3DE4 FFFF LIT $7FFF 3DE6 FFFF LIT $7FFF 3DE8 FFFF LIT $7FFF 3DEA FFFF LIT $7FFF 3DEC FFFF LIT $7FFF 3DEE FFFF LIT $7FFF 3DF0 FFFF LIT $7FFF 3DF2 FFFF LIT $7FFF 3DF4 FFFF LIT $7FFF 3DF6 FFFF LIT $7FFF 3DF8 FFFF LIT $7FFF 3DFA FFFF LIT $7FFF 3DFC FFFF LIT $7FFF 3DFE FFFF LIT $7FFF 3E00 FFFF LIT $7FFF 3E02 FFFF LIT $7FFF 3E04 FFFF LIT $7FFF 3E06 FFFF LIT $7FFF 3E08 FFFF LIT $7FFF 3E0A FFFF LIT $7FFF 3E0C FFFF LIT $7FFF 3E0E FFFF LIT $7FFF 3E10 FFFF LIT $7FFF 3E12 FFFF LIT $7FFF 3E14 FFFF LIT $7FFF 3E16 FFFF LIT $7FFF 3E18 FFFF LIT $7FFF 3E1A FFFF LIT $7FFF 3E1C FFFF LIT $7FFF 3E1E FFFF LIT $7FFF 3E20 FFFF LIT $7FFF 3E22 FFFF LIT $7FFF 3E24 FFFF LIT $7FFF 3E26 FFFF LIT $7FFF 3E28 FFFF LIT $7FFF 3E2A FFFF LIT $7FFF 3E2C FFFF LIT $7FFF 3E2E FFFF LIT $7FFF 3E30 FFFF LIT $7FFF 3E32 FFFF LIT $7FFF 3E34 FFFF LIT $7FFF 3E36 FFFF LIT $7FFF 3E38 FFFF LIT $7FFF 3E3A FFFF LIT $7FFF 3E3C FFFF LIT $7FFF 3E3E FFFF LIT $7FFF 3E40 FFFF LIT $7FFF 3E42 FFFF LIT $7FFF 3E44 FFFF LIT $7FFF 3E46 FFFF LIT $7FFF 3E48 FFFF LIT $7FFF 3E4A FFFF LIT $7FFF 3E4C FFFF LIT $7FFF 3E4E FFFF LIT $7FFF 3E50 FFFF LIT $7FFF 3E52 FFFF LIT $7FFF 3E54 FFFF LIT $7FFF 3E56 FFFF LIT $7FFF 3E58 FFFF LIT $7FFF 3E5A FFFF LIT $7FFF 3E5C FFFF LIT $7FFF 3E5E FFFF LIT $7FFF 3E60 FFFF LIT $7FFF 3E62 FFFF LIT $7FFF 3E64 FFFF LIT $7FFF 3E66 FFFF LIT $7FFF 3E68 FFFF LIT $7FFF 3E6A FFFF LIT $7FFF 3E6C FFFF LIT $7FFF 3E6E FFFF LIT $7FFF 3E70 FFFF LIT $7FFF 3E72 FFFF LIT $7FFF 3E74 FFFF LIT $7FFF 3E76 FFFF LIT $7FFF 3E78 FFFF LIT $7FFF 3E7A FFFF LIT $7FFF 3E7C FFFF LIT $7FFF 3E7E FFFF LIT $7FFF 3E80 FFFF LIT $7FFF 3E82 FFFF LIT $7FFF 3E84 FFFF LIT $7FFF 3E86 FFFF LIT $7FFF 3E88 FFFF LIT $7FFF 3E8A FFFF LIT $7FFF 3E8C FFFF LIT $7FFF 3E8E FFFF LIT $7FFF 3E90 FFFF LIT $7FFF 3E92 FFFF LIT $7FFF 3E94 FFFF LIT $7FFF 3E96 FFFF LIT $7FFF 3E98 FFFF LIT $7FFF 3E9A FFFF LIT $7FFF 3E9C FFFF LIT $7FFF 3E9E FFFF LIT $7FFF 3EA0 FFFF LIT $7FFF 3EA2 FFFF LIT $7FFF 3EA4 FFFF LIT $7FFF 3EA6 FFFF LIT $7FFF 3EA8 FFFF LIT $7FFF 3EAA FFFF LIT $7FFF 3EAC FFFF LIT $7FFF 3EAE FFFF LIT $7FFF 3EB0 FFFF LIT $7FFF 3EB2 FFFF LIT $7FFF 3EB4 FFFF LIT $7FFF 3EB6 FFFF LIT $7FFF 3EB8 FFFF LIT $7FFF 3EBA FFFF LIT $7FFF 3EBC FFFF LIT $7FFF 3EBE FFFF LIT $7FFF 3EC0 FFFF LIT $7FFF 3EC2 FFFF LIT $7FFF 3EC4 FFFF LIT $7FFF 3EC6 FFFF LIT $7FFF 3EC8 FFFF LIT $7FFF 3ECA FFFF LIT $7FFF 3ECC FFFF LIT $7FFF 3ECE FFFF LIT $7FFF 3ED0 FFFF LIT $7FFF 3ED2 FFFF LIT $7FFF 3ED4 FFFF LIT $7FFF 3ED6 FFFF LIT $7FFF 3ED8 FFFF LIT $7FFF 3EDA FFFF LIT $7FFF 3EDC FFFF LIT $7FFF 3EDE FFFF LIT $7FFF 3EE0 FFFF LIT $7FFF 3EE2 FFFF LIT $7FFF 3EE4 FFFF LIT $7FFF 3EE6 FFFF LIT $7FFF 3EE8 FFFF LIT $7FFF 3EEA FFFF LIT $7FFF 3EEC FFFF LIT $7FFF 3EEE FFFF LIT $7FFF 3EF0 FFFF LIT $7FFF 3EF2 FFFF LIT $7FFF 3EF4 FFFF LIT $7FFF 3EF6 FFFF LIT $7FFF 3EF8 FFFF LIT $7FFF 3EFA FFFF LIT $7FFF 3EFC FFFF LIT $7FFF 3EFE FFFF LIT $7FFF 3F00 FFFF LIT $7FFF 3F02 FFFF LIT $7FFF 3F04 FFFF LIT $7FFF 3F06 FFFF LIT $7FFF 3F08 FFFF LIT $7FFF 3F0A FFFF LIT $7FFF 3F0C FFFF LIT $7FFF 3F0E FFFF LIT $7FFF 3F10 FFFF LIT $7FFF 3F12 FFFF LIT $7FFF 3F14 FFFF LIT $7FFF 3F16 FFFF LIT $7FFF 3F18 FFFF LIT $7FFF 3F1A FFFF LIT $7FFF 3F1C FFFF LIT $7FFF 3F1E FFFF LIT $7FFF 3F20 FFFF LIT $7FFF 3F22 FFFF LIT $7FFF 3F24 FFFF LIT $7FFF 3F26 FFFF LIT $7FFF 3F28 FFFF LIT $7FFF 3F2A FFFF LIT $7FFF 3F2C FFFF LIT $7FFF 3F2E FFFF LIT $7FFF 3F30 FFFF LIT $7FFF 3F32 FFFF LIT $7FFF 3F34 FFFF LIT $7FFF 3F36 FFFF LIT $7FFF 3F38 FFFF LIT $7FFF 3F3A FFFF LIT $7FFF 3F3C FFFF LIT $7FFF 3F3E FFFF LIT $7FFF 3F40 FFFF LIT $7FFF 3F42 FFFF LIT $7FFF 3F44 FFFF LIT $7FFF 3F46 FFFF LIT $7FFF 3F48 FFFF LIT $7FFF 3F4A FFFF LIT $7FFF 3F4C FFFF LIT $7FFF 3F4E FFFF LIT $7FFF 3F50 FFFF LIT $7FFF 3F52 FFFF LIT $7FFF 3F54 FFFF LIT $7FFF 3F56 FFFF LIT $7FFF 3F58 FFFF LIT $7FFF 3F5A FFFF LIT $7FFF 3F5C FFFF LIT $7FFF 3F5E FFFF LIT $7FFF 3F60 FFFF LIT $7FFF 3F62 FFFF LIT $7FFF 3F64 FFFF LIT $7FFF 3F66 FFFF LIT $7FFF 3F68 FFFF LIT $7FFF 3F6A FFFF LIT $7FFF 3F6C FFFF LIT $7FFF 3F6E FFFF LIT $7FFF 3F70 FFFF LIT $7FFF 3F72 FFFF LIT $7FFF 3F74 FFFF LIT $7FFF 3F76 FFFF LIT $7FFF 3F78 FFFF LIT $7FFF 3F7A FFFF LIT $7FFF 3F7C FFFF LIT $7FFF 3F7E FFFF LIT $7FFF \ bootloader 3F80 800C LIT $C 3F82 C110 LIT $4110 3F84 6023 ALU $6023 3F86 6103 ALU $6103 3F88 8000 LIT $0 \ (begin) 3F8A 6081 ALU $6081 3F8C FFFF LIT $7FFF 3F8E 6600 ALU $6600 3F90 6203 ALU $6203 3F92 C10E LIT $410E 3F94 6023 ALU $6023 3F96 6103 ALU $6103 3F98 8000 LIT $0 3F9A C104 LIT $4104 3F9C 6023 ALU $6023 3F9E 6103 ALU $6103 3FA0 C112 LIT $4112 3FA2 6C00 ALU $6C00 3FA4 8001 LIT $1 3FA6 C104 LIT $4104 3FA8 6023 ALU $6023 3FAA 6103 ALU $6103 3FAC 6181 ALU $6181 3FAE 6081 ALU $6081 3FB0 6203 ALU $6203 3FB2 6023 ALU $6023 3FB4 6103 ALU $6103 3FB6 8001 LIT $1 3FB8 6203 ALU $6203 3FBA 6081 ALU $6081 3FBC 9FC0 LIT $1FC0 3FBE 6703 ALU $6703 3FC0 3FC5 0BRANCH (begin) \ (begin) 3FC2 6E81 ALU $6E81 3FC4 80FF LIT $FF 3FC6 6303 ALU $6303 3FC8 3FE7 0BRANCH (repeat) 3FCA 6103 ALU $6103 3FCC 1FE1 BRANCH (begin) \ (repeat) 3FCE 8000 LIT $0 3FD0 6147 ALU $6147 3FD2 700C ALU $700C 3FD4 FFFF LIT $7FFF 3FD6 FFFF LIT $7FFF 3FD8 FFFF LIT $7FFF 3FDA FFFF LIT $7FFF 3FDC FFFF LIT $7FFF 3FDE FFFF LIT $7FFF 3FE0 FFFF LIT $7FFF 3FE2 FFFF LIT $7FFF 3FE4 FFFF LIT $7FFF 3FE6 FFFF LIT $7FFF 3FE8 FFFF LIT $7FFF 3FEA FFFF LIT $7FFF 3FEC FFFF LIT $7FFF 3FEE FFFF LIT $7FFF 3FF0 FFFF LIT $7FFF 3FF2 FFFF LIT $7FFF 3FF4 FFFF LIT $7FFF 3FF6 FFFF LIT $7FFF 3FF8 FFFF LIT $7FFF 3FFA FFFF LIT $7FFF 3FFC FFFF LIT $7FFF 3FFE FFFF LIT $7FFF