|
DataMuseum.dkPresents historical artifacts from the history of: CP/M |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CP/M Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 3840 (0xf00)
Names: »XPL0INTP.CSB«
└─⟦31a512eaf⟧ Bits:30009429 50004846
└─⟦a415da17f⟧
└─⟦this⟧ »XPL0INTP.CSB«
0x000…020 07 00 5a 0e 19 90 00 02 00 5a 0e f8 0a 00 4e 71 f9 46 00 20 50 4c 2f 30 20 43 4f 4d 50 49 4c 45 ┆ Z Z Nq F PL/0 COMPILE┆ 0x020…040 52 20 20 20 46 52 4f 4d 20 4e 2e 57 49 52 54 48 3a 20 41 4c 47 4f 52 49 54 48 4d 53 20 2b 20 44 ┆R FROM N.WIRTH: ALGORITHMS + D┆ 0x040…060 41 54 41 20 53 54 52 55 43 54 55 52 45 53 20 3d 20 50 52 4f 47 52 41 4d 53 f8 14 00 48 71 f9 40 ┆ATA STRUCTURES = PROGRAMS Hq @┆ 0x060…080 00 20 52 45 57 52 49 54 54 45 4e 20 54 4f 20 43 4f 4d 41 4c 2d 38 30 2c 20 45 58 54 45 4e 44 45 ┆ REWRITTEN TO COMAL-80, EXTENDE┆ 0x080…0a0 44 20 57 49 54 48 20 49 2f 4f 20 41 4e 44 20 53 50 4c 49 54 20 49 4e 54 4f 20 4d 4f 44 55 4c 45 ┆D WITH I/O AND SPLIT INTO MODULE┆ 0x0a0…0c0 53 f8 1e 00 2e 71 f9 26 00 20 42 59 20 41 52 4e 45 20 43 48 52 49 53 54 45 4e 53 45 4e 20 20 20 ┆S .q & BY ARNE CHRISTENSEN ┆ 0x0c0…0e0 38 31 30 37 30 32 20 2d 20 38 31 30 37 31 35 f8 28 00 08 71 f9 00 00 f8 32 00 4d 71 f9 45 00 20 ┆810702 - 810715 ( q 2 Mq E ┆ 0x0e0…100 44 45 4d 4f 4e 53 54 52 41 54 49 4f 4e 20 50 52 4f 47 52 41 4d 20 46 4f 52 20 54 48 45 20 43 4f ┆DEMONSTRATION PROGRAM FOR THE CO┆ 0x100…120 4d 41 4c 2d 38 30 20 49 4d 50 4c 45 4d 45 4e 54 41 54 49 4f 4e 20 44 49 53 54 52 49 42 55 54 45 ┆MAL-80 IMPLEMENTATION DISTRIBUTE┆ 0x120…140 44 20 42 59 f8 3c 00 3c 71 f9 34 00 20 4d 45 54 41 4e 49 43 20 41 70 53 2c 20 4b 4f 4e 47 45 56 ┆D BY < <q 4 METANIC ApS, KONGEV┆ 0x140…160 45 4a 45 4e 20 31 37 37 2c 20 44 4b 2d 32 38 33 30 20 56 49 52 55 4d 2c 20 44 45 4e 4d 41 52 4b ┆EJEN 177, DK-2830 VIRUM, DENMARK┆ 0x160…180 f8 46 00 08 71 f9 00 00 f8 50 00 3c 71 f9 34 00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a ┆ F q P <q 4 *┆ 0x180…1a0 2a 2a 2a 2a 20 20 43 4f 44 45 20 49 4e 54 45 52 50 52 45 54 45 52 20 4d 4f 44 55 4c 45 20 20 2a ┆**** CODE INTERPRETER MODULE *┆ 0x1a0…1c0 2a 2a 2a 2a f8 5a 00 08 71 f9 00 00 f8 64 00 50 71 f9 48 00 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆**** Z q d Pq H ************┆ 0x1c0…1e0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆ 0x1e0…200 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a f8 6e 00 08 ┆**************************** n ┆ 0x200…220 71 f9 00 00 f8 78 00 0e 71 f9 06 00 20 43 4f 4e 53 54 f8 82 00 27 a8 fa 04 37 00 31 ec fa 05 47 ┆q x q CONST ' 7 1 G┆ 0x220…240 c8 00 31 f9 13 00 20 53 49 5a 45 20 4f 46 20 43 4f 44 45 20 41 52 52 41 59 f8 8c 00 08 71 f9 00 ┆ 1 SIZE OF CODE ARRAY q ┆ 0x240…260 00 f8 96 00 13 71 f9 0b 00 20 54 59 50 45 20 46 43 54 20 3d f8 a0 00 2f a8 fa 04 37 01 31 ec fa ┆ q TYPE FCT = / 7 1 ┆ 0x260…280 05 47 00 00 31 f9 1b 00 20 20 4c 49 54 20 30 2c 41 20 3a 20 4c 4f 41 44 20 43 4f 4e 53 54 41 4e ┆ G 1 LIT 0,A : LOAD CONSTAN┆ 0x280…2a0 54 20 41 f8 aa 00 33 a8 fa 04 37 02 31 ec fa 05 47 01 00 31 f9 1f 00 20 20 4f 50 52 20 30 2c 41 ┆T A 3 7 1 G 1 OPR 0,A┆ 0x2a0…2c0 20 3a 20 45 58 45 43 55 54 45 20 4f 50 45 52 41 54 49 4f 4e 20 41 f8 b4 00 45 a8 fa 04 37 03 31 ┆ : EXECUTE OPERATION A E 7 1┆ 0x2c0…2e0 ec fa 05 47 02 00 31 f9 31 00 20 20 4c 4f 44 20 4c 2c 41 20 3a 20 4c 4f 41 44 20 56 41 52 49 41 ┆ G 1 1 LOD L,A : LOAD VARIA┆ 0x2e0…300 42 4c 45 20 4c 45 56 45 4c 20 4c 2c 20 44 49 53 50 4c 41 43 45 4d 45 4e 54 20 41 f8 be 00 46 a8 ┆BLE LEVEL L, DISPLACEMENT A F ┆ 0x300…320 fa 04 37 04 31 ec fa 05 47 03 00 31 f9 32 00 20 20 53 54 4f 20 4c 2c 41 20 3a 20 53 54 4f 52 45 ┆ 7 1 G 1 2 STO L,A : STORE┆ 0x320…340 20 56 41 52 49 41 42 4c 45 20 4c 45 56 45 4c 20 4c 2c 20 44 49 53 50 4c 41 43 45 4d 45 4e 54 20 ┆ VARIABLE LEVEL L, DISPLACEMENT ┆ 0x340…360 41 f8 c8 00 48 a8 fa 04 37 05 31 ec fa 05 47 04 00 31 f9 34 00 20 20 43 41 4c 20 4c 2c 41 20 3a ┆A H 7 1 G 1 4 CAL L,A :┆ 0x360…380 20 43 41 4c 4c 20 50 52 4f 43 45 44 55 52 45 20 57 49 54 48 20 41 44 44 52 45 53 53 20 41 20 41 ┆ CALL PROCEDURE WITH ADDRESS A A┆ 0x380…3a0 54 20 4c 45 56 45 4c 20 4c f8 d2 00 38 a8 fa 04 37 06 31 ec fa 05 47 05 00 31 f9 24 00 20 49 4e ┆T LEVEL L 8 7 1 G 1 $ IN┆ 0x3a0…3c0 54 20 30 2c 41 20 3a 20 49 4e 43 52 45 4d 45 4e 54 20 54 2d 52 45 47 49 53 54 45 52 20 42 59 20 ┆T 0,A : INCREMENT T-REGISTER BY ┆ 0x3c0…3e0 41 f8 dc 00 31 a8 fa 04 37 07 31 ec fa 05 47 06 00 31 f9 1d 00 20 20 4a 4d 50 20 30 2c 41 20 3a ┆A 1 7 1 G 1 JMP 0,A :┆ 0x3e0…400 20 4a 55 4d 50 20 54 4f 20 41 44 44 52 45 53 53 20 41 f8 e6 00 3d a8 fa 04 37 08 31 ec fa 05 47 ┆ JUMP TO ADDRESS A = 7 1 G┆ 0x400…420 07 00 31 f9 29 00 20 20 4a 50 43 20 30 2c 41 20 3a 20 4a 55 4d 50 20 43 4f 4e 44 49 54 49 4f 4e ┆ 1 ) JPC 0,A : JUMP CONDITION┆ 0x420…440 41 4c 20 54 4f 20 41 44 44 52 45 53 53 20 41 f8 f0 00 08 71 f9 00 00 f8 fa 00 3a 73 ff 09 4a fa ┆AL TO ADDRESS A q :s J ┆ 0x440…460 05 47 00 00 31 eb fa 05 38 00 3b 31 4b e6 ff 0a 4a fa 05 47 00 00 31 eb fa 05 38 00 3b 31 4b e6 ┆ G 1 8 ;1K J G 1 8 ;1K ┆ 0x460…480 ff 0b 4a fa 05 47 00 00 31 eb fa 05 38 00 3b 31 4b f8 04 01 0e 73 ff 0c df fa 05 47 0f 00 31 f8 ┆ J G 1 8 ;1K s G 1 ┆ 0x480…4a0 0e 01 08 71 f9 00 00 f8 18 01 36 74 fc 38 ff 0d 4a ff 0e e6 ff 0f e6 e4 ff 10 4a 4b e6 e4 ff 11 ┆ q 6t 8 J JK ┆ 0x4a0…4c0 4b f9 19 00 20 46 49 4e 44 20 42 41 53 45 20 4c 23 20 4c 45 56 45 4c 53 20 44 4f 57 4e f8 22 01 ┆K FIND BASE L# LEVELS DOWN " ┆ 0x4c0…4e0 12 7e ba db fa 09 38 0e 3b 47 00 00 68 31 de f8 2c 01 22 a8 fa 04 37 0f 31 ec fa 09 38 10 38 0f ┆ ü 8 ;G h1 , " 7 1 8 8 ┆ 0x4e0…500 3b 39 3b 31 e8 fa 04 37 0e 31 ee fa 05 47 01 00 31 f8 36 01 07 7f 13 2b f8 40 01 11 a8 fa 04 37 ┆;9;1 7 1 G 1 6 + @ 7┆ 0x500…520 11 31 ec fa 05 38 0f 3b 31 f8 4a 01 07 75 ff 0d f8 54 01 08 71 f9 00 00 f8 5e 01 0a 74 01 39 ff ┆ 1 8 ;1 J u T q ^ t 9 ┆ 0x520…540 12 e5 f8 68 01 0d 85 ff 09 e6 ff 0a e6 ff 0b f8 72 01 1c 85 ff 01 e6 ff 02 e6 ff 03 e6 ff 04 e6 ┆ h r ┆ 0x540…560 ff 05 e6 ff 06 e6 ff 07 e6 ff 08 f8 7c 01 11 a8 fa 04 37 13 31 ec fa 05 47 f4 01 31 f8 86 01 11 ┆ ø 7 1 G 1 ┆ 0x560…580 a8 fa 04 37 11 31 ec fa 05 47 00 00 31 f8 90 01 24 a8 fa 04 37 14 31 ec fa 05 47 00 00 31 f9 10 ┆ 7 1 G 1 $ 7 1 G 1 ┆ 0x580…5a0 00 20 50 52 4f 47 52 41 4d 20 43 4f 55 4e 54 45 52 f8 9a 01 22 a8 fa 04 37 0f 31 ec fa 05 47 00 ┆ PROGRAM COUNTER " 7 1 G ┆ 0x5a0…5c0 00 31 f9 0e 00 20 42 41 53 45 20 52 45 47 49 53 54 45 52 f8 a4 01 26 a8 fa 04 37 15 31 ec fa 05 ┆ 1 BASE REGISTER & 7 1 ┆ 0x5c0…5e0 47 00 00 31 f9 12 00 20 54 4f 50 53 54 41 43 4b 20 52 45 47 49 53 54 45 52 f8 ae 01 24 73 ff 10 ┆G 1 TOPSTACK REGISTER $s ┆ 0x5e0…600 4a fa 05 47 01 00 31 eb fa 05 38 13 3b 31 4b f9 0b 00 20 44 41 54 41 20 53 54 4f 52 45 f8 b8 01 ┆J G 1 8 ;1K DATA STORE ┆ 0x600…620 19 aa fa 11 45 0c 00 53 54 41 52 54 20 58 2d 50 4c 2f 30 31 f7 04 f8 c2 01 05 aa f8 cc 01 5e a8 ┆ E START X-PL/01 ^ ┆ 0x620…640 fa 04 37 15 31 ec fa 05 47 00 00 31 e8 fa 04 37 0f 31 ec fa 05 47 01 00 31 e8 fa 04 37 14 31 ec ┆ 7 1 G 1 7 1 G 1 7 1 ┆ 0x640…660 fa 05 47 00 00 31 e8 fa 08 38 10 47 01 00 39 31 ec fa 05 47 00 00 31 e8 fa 08 38 10 47 02 00 39 ┆ G 1 8 G 91 G 1 8 G 9┆ 0x660…680 31 ec fa 05 47 00 00 31 e8 fa 08 38 10 47 03 00 39 31 ec fa 05 47 00 00 31 f8 d6 01 05 7c f8 e0 ┆1 G 1 8 G 91 G 1 ø ┆ 0x680…6a0 01 44 a8 fa 04 37 16 31 ec fa 09 38 09 38 14 3b 39 3b 31 e8 fa 04 37 0e 31 ec fa 09 38 0a 38 14 ┆ D 7 1 8 8 ;9;1 7 1 8 8 ┆ 0x6a0…6c0 3b 39 3b 31 e8 fa 04 37 17 31 ec fa 09 38 0b 38 14 3b 39 3b 31 e8 fa 04 37 14 31 ed fa 05 47 01 ┆;9;1 7 1 8 8 ;9;1 7 1 G ┆ 0x6c0…6e0 00 31 f8 ea 01 0f 80 97 db 02 fa 05 38 16 3b 31 df f8 f4 01 12 81 fc db fc db 02 fa 05 38 01 3b ┆ 1 8 ;1 8 ;┆ 0x6e0…700 31 f7 02 f8 fe 01 22 a8 fa 04 37 15 31 ed fa 05 47 01 00 31 e8 fa 08 38 10 38 15 3b 39 31 ec fa ┆1 " 7 1 G 1 8 8 ;91 ┆ 0x700…720 05 38 17 3b 31 f8 08 02 1e 81 f8 db f8 db 02 fa 05 38 02 3b 31 f7 02 f9 09 00 20 4f 50 45 52 41 ┆ 8 ;1 8 ;1 OPERA┆ 0x720…740 54 4f 52 f8 12 02 0f 80 95 db 02 fa 05 38 17 3b 31 df f8 1c 02 1c 81 00 00 00 00 02 fa 05 47 00 ┆TOR 8 ;1 G ┆ 0x740…760 00 31 f7 02 f9 07 00 20 52 45 54 55 52 4e f8 26 02 3f a8 fa 04 37 15 31 ec fa 09 38 0f 3b 47 01 ┆ 1 RETURN & ? 7 1 8 ;G ┆ 0x760…780 00 64 31 e8 fa 04 37 14 31 ec fa 0d 38 10 38 15 3b 47 03 00 63 39 3b 31 e8 fa 04 37 0f 31 ec fa ┆ d1 7 1 8 8 ;G c9;1 7 1 ┆ 0x780…7a0 0d 38 10 38 15 3b 47 02 00 63 39 3b 31 f8 30 02 12 81 01 00 01 00 02 fa 05 47 01 00 31 f7 02 f8 ┆ 8 8 ;G c9;1 0 G 1 ┆ 0x7a0…7c0 3a 02 1a a8 fa 08 38 10 38 15 3b 39 31 ec fa 0a 38 10 38 15 3b 39 3b 60 31 f8 44 02 12 81 02 00 ┆: 8 8 ;91 8 8 ;9;`1 D ┆ 0x7c0…7e0 02 00 02 fa 05 47 02 00 31 f7 02 f8 4e 02 2a a8 fa 04 37 15 31 ee fa 05 47 01 00 31 e8 fa 08 38 ┆ G 1 N * 7 1 G 1 8┆ 0x7e0…800 10 38 15 3b 39 31 ed fa 0d 38 10 38 15 3b 47 01 00 63 39 3b 31 f8 58 02 12 81 03 00 03 00 02 fa ┆ 8 ;91 8 8 ;G c9;1 X ┆ 0x800…820 05 47 03 00 31 f7 02 f8 62 02 2a a8 fa 04 37 15 31 ee fa 05 47 01 00 31 e8 fa 08 38 10 38 15 3b ┆ G 1 b * 7 1 G 1 8 8 ;┆ 0x820…840 39 31 ee fa 0d 38 10 38 15 3b 47 01 00 63 39 3b 31 f8 6c 02 12 81 04 00 04 00 02 fa 05 47 04 00 ┆91 8 8 ;G c9;1 l G ┆ 0x840…860 31 f7 02 f8 76 02 32 a8 fa 04 37 15 31 ee fa 05 47 01 00 31 e8 fa 08 38 10 38 15 3b 39 31 ec fa ┆1 v 2 7 1 G 1 8 8 ;91 ┆ 0x860…880 15 38 10 38 15 3b 39 3b 38 10 38 15 3b 47 01 00 63 39 3b 5f 31 f8 80 02 12 81 05 00 05 00 02 fa ┆ 8 8 ;9;8 8 ;G c9;_1 ┆ 0x880…8a0 05 47 05 00 31 f7 02 f8 8a 02 32 a8 fa 04 37 15 31 ee fa 05 47 01 00 31 e8 fa 08 38 10 38 15 3b ┆ G 1 2 7 1 G 1 8 8 ;┆ 0x8a0…8c0 39 31 ec fa 15 38 10 38 15 3b 39 3b 38 10 38 15 3b 47 01 00 63 39 3b 61 31 f8 94 02 12 81 06 00 ┆91 8 8 ;9;8 8 ;G c9;a1 ┆ 0x8c0…8e0 06 00 02 fa 05 47 06 00 31 f7 02 f8 9e 02 1d a8 fa 08 38 10 38 15 3b 39 31 ec fa 0d 38 10 38 15 ┆ G 1 8 8 ;91 8 8 ┆ 0x8e0…900 3b 39 3b 47 02 00 62 31 f8 a8 02 12 81 08 00 08 00 02 fa 05 47 08 00 31 f7 02 f8 b2 02 32 a8 fa ┆;9;G b1 G 1 2 ┆ 0x900…920 04 37 15 31 ee fa 05 47 01 00 31 e8 fa 08 38 10 38 15 3b 39 31 ec fa 15 38 10 38 15 3b 39 3b 38 ┆ 7 1 G 1 8 8 ;91 8 8 ;9;8┆ 0x920…940 10 38 15 3b 47 01 00 63 39 3b 69 31 f8 bc 02 12 81 09 00 09 00 02 fa 05 47 09 00 31 f7 02 f8 c6 ┆ 8 ;G c9;i1 G 1 ┆ 0x940…960 02 32 a8 fa 04 37 15 31 ee fa 05 47 01 00 31 e8 fa 08 38 10 38 15 3b 39 31 ec fa 15 38 10 38 15 ┆ 2 7 1 G 1 8 8 ;91 8 8 ┆ 0x960…980 3b 39 3b 38 10 38 15 3b 47 01 00 63 39 3b 6a 31 f8 d0 02 12 81 0a 00 0a 00 02 fa 05 47 0a 00 31 ┆;9;8 8 ;G c9;j1 G 1┆ 0x980…9a0 f7 02 f8 da 02 32 a8 fa 04 37 15 31 ee fa 05 47 01 00 31 e8 fa 08 38 10 38 15 3b 39 31 ec fa 15 ┆ 2 7 1 G 1 8 8 ;91 ┆ 0x9a0…9c0 38 10 38 15 3b 39 3b 38 10 38 15 3b 47 01 00 63 39 3b 66 31 f8 e4 02 12 81 0b 00 0b 00 02 fa 05 ┆8 8 ;9;8 8 ;G c9;f1 ┆ 0x9c0…9e0 47 0b 00 31 f7 02 f8 ee 02 32 a8 fa 04 37 15 31 ee fa 05 47 01 00 31 e8 fa 08 38 10 38 15 3b 39 ┆G 1 2 7 1 G 1 8 8 ;9┆ 0x9e0…a00 31 ec fa 15 38 10 38 15 3b 39 3b 38 10 38 15 3b 47 01 00 63 39 3b 67 31 f8 f8 02 12 81 0c 00 0c ┆1 8 8 ;9;8 8 ;G c9;g1 ┆ 0xa00…a20 00 02 fa 05 47 0c 00 31 f7 02 f8 02 03 32 a8 fa 04 37 15 31 ee fa 05 47 01 00 31 e8 fa 08 38 10 ┆ G 1 2 7 1 G 1 8 ┆ 0xa20…a40 38 15 3b 39 31 ec fa 15 38 10 38 15 3b 39 3b 38 10 38 15 3b 47 01 00 63 39 3b 68 31 f8 0c 03 12 ┆8 ;91 8 8 ;9;8 8 ;G c9;h1 ┆ 0xa40…a60 81 0d 00 0d 00 02 fa 05 47 0d 00 31 f7 02 f8 16 03 32 a8 fa 04 37 15 31 ee fa 05 47 01 00 31 e8 ┆ G 1 2 7 1 G 1 ┆ 0xa60…a80 fa 08 38 10 38 15 3b 39 31 ec fa 15 38 10 38 15 3b 39 3b 38 10 38 15 3b 47 01 00 63 39 3b 65 31 ┆ 8 8 ;91 8 8 ;9;8 8 ;G c9;e1┆ 0xa80…aa0 f8 20 03 1a 81 0e 00 0e 00 02 fa 05 47 0e 00 31 f7 02 f9 05 00 20 52 45 41 44 f8 2a 03 11 a8 fa ┆ G 1 READ * ┆ 0xaa0…ac0 04 37 15 31 ed fa 05 47 01 00 31 f8 34 03 16 95 45 03 00 3f 3f 20 ea fa 08 38 10 38 15 3b 39 31 ┆ 7 1 G 1 4 E ?? 8 8 ;91┆ 0xac0…ae0 e8 f8 3e 03 10 aa fa 07 45 02 00 20 20 31 f7 04 e9 f8 48 03 1b 81 0f 00 0f 00 02 fa 05 47 0f 00 ┆ > E 1 H G ┆ 0xae0…b00 31 f7 02 f9 06 00 20 57 52 49 54 45 f8 52 03 22 aa e3 fa 0d 45 08 00 2d 23 23 23 23 23 20 20 31 ┆1 WRITE R " E -##### 1┆ 0xb00…b20 ea fa 09 38 10 38 15 3b 39 3b 31 f7 02 e7 f8 5c 03 11 a8 fa 04 37 15 31 ee fa 05 47 01 00 31 f8 ┆ 8 8 ;9;1 Ø 7 1 G 1 ┆ 0xb20…b40 66 03 1d 81 10 00 10 00 02 fa 05 47 10 00 31 f7 02 f9 08 00 20 57 52 49 54 45 4c 4e f8 70 03 05 ┆f G 1 WRITELN p ┆ 0xb40…b60 aa f8 7a 03 05 83 f8 84 03 12 81 f4 db f4 db 02 fa 05 38 03 3b 31 f7 02 f8 8e 03 1a 96 fa 14 41 ┆ z 8 ;1 A┆ 0xb60…b80 0d 38 0e 43 00 38 0f 43 00 38 10 43 00 38 11 43 00 31 f8 98 03 2a a8 fa 04 37 15 31 ed fa 05 47 ┆ 8 C 8 C 8 C 8 C 1 * 7 1 G┆ 0xb80…ba0 01 00 31 e8 fa 08 38 10 38 15 3b 39 31 ec fa 0d 38 10 38 11 3b 38 17 3b 63 39 3b 31 f8 a2 03 12 ┆ 1 8 8 ;91 8 8 ;8 ;c9;1 ┆ 0xba0…bc0 81 f0 db f0 db 02 fa 05 38 04 3b 31 f7 02 f8 ac 03 1a 96 fa 14 41 0d 38 0e 43 00 38 0f 43 00 38 ┆ 8 ;1 A 8 C 8 C 8┆ 0xbc0…be0 10 43 00 38 11 43 00 31 f8 b6 03 1d a8 fa 0c 38 10 38 11 3b 38 17 3b 63 39 31 ec fa 09 38 10 38 ┆ C 8 C 1 8 8 ;8 ;c91 8 8┆ 0xbe0…c00 15 3b 39 3b 31 f8 c0 03 11 a8 fa 04 37 15 31 ee fa 05 47 01 00 31 f8 ca 03 2d 81 ec db ec db 02 ┆ ;9;1 7 1 G 1 - ┆ 0xc00…c20 fa 05 38 05 3b 31 f7 02 f9 18 00 20 47 45 4e 45 52 41 54 45 20 4e 45 57 20 42 4c 4f 43 4b 20 4d ┆ 8 ;1 GENERATE NEW BLOCK M┆ 0xc20…c40 41 52 4b f8 d4 03 1a 96 fa 14 41 0d 38 0e 43 00 38 0f 43 00 38 10 43 00 38 11 43 00 31 f8 de 03 ┆ARK A 8 C 8 C 8 C 8 C 1 ┆ 0xc40…c60 43 a8 fa 0c 38 10 38 15 3b 47 01 00 63 39 31 ec fa 05 38 11 3b 31 e8 fa 0c 38 10 38 15 3b 47 02 ┆C 8 8 ;G c91 8 ;1 8 8 ;G ┆ 0xc60…c80 00 63 39 31 ec fa 05 38 0f 3b 31 e8 fa 0c 38 10 38 15 3b 47 03 00 63 39 31 ec fa 05 38 14 3b 31 ┆ c91 8 ;1 8 8 ;G c91 8 ;1┆ 0xc80…ca0 f8 e8 03 22 a8 fa 04 37 0f 31 ec fa 09 38 15 3b 47 01 00 63 31 e8 fa 04 37 14 31 ec fa 05 38 17 ┆ " 7 1 8 ;G c1 7 1 8 ┆ 0xca0…cc0 3b 31 f8 f2 03 12 81 e7 db e7 db 02 fa 05 38 06 3b 31 f7 02 f8 fc 03 11 a8 fa 04 37 15 31 ed fa ┆;1 8 ;1 7 1 ┆ 0xcc0…ce0 05 38 17 3b 31 f8 06 04 12 81 e3 db e3 db 02 fa 05 38 07 3b 31 f7 02 f8 10 04 11 a8 fa 04 37 14 ┆ 8 ;1 8 ;1 7 ┆ 0xce0…d00 31 ec fa 05 38 17 3b 31 f8 1a 04 12 81 df db df db 02 fa 05 38 08 3b 31 f7 02 f8 24 04 23 9d 12 ┆1 8 ;1 8 ;1 $ # ┆ 0xd00…d20 db fa 0d 38 10 38 15 3b 39 3b 47 00 00 69 31 dd a8 fa 04 37 14 31 ec fa 05 38 17 3b 31 f8 2e 04 ┆ 8 8 ;9;G i1 7 1 8 ;1 . ┆ 0xd20…d40 11 a8 fa 04 37 15 31 ee fa 05 47 01 00 31 f8 38 04 05 83 f8 42 04 11 7d 9b db fa 09 38 14 3b 47 ┆ 7 1 G 1 8 B å 8 ;G┆ 0xd40…d60 00 00 69 31 f8 4c 04 05 aa f8 56 04 17 aa fa 0f 45 0a 00 45 4e 44 20 58 2d 50 4c 2f 30 31 f7 04 ┆ i1 L V E END X-PL/01 ┆ 0xd60…d80 f8 60 04 07 75 ff 12 f8 6a 04 08 71 f9 00 00 f8 74 04 11 be fa 05 45 00 00 31 e6 fa 04 38 0c 31 ┆ ` u j q t E 1 8 1┆ 0xd80…da0 f8 7e 04 1d b3 f5 fa 05 47 00 00 31 e6 fa 0d 45 08 00 58 50 4c 30 43 4f 4d 4d 31 e6 92 f8 88 04 ┆ ü G 1 E XPL0COMM1 ┆ 0xda0…dc0 12 95 f5 fa 05 47 00 00 31 ea fa 04 38 0c 31 f8 92 04 0c b4 f5 fa 05 47 00 00 31 f8 9c 04 1d b3 ┆ G 1 8 1 G 1 ┆ 0xdc0…de0 f5 fa 05 47 00 00 31 e6 fa 0d 38 0c 3b 45 04 00 2e 43 4f 44 5e 31 e6 92 f8 a6 04 11 a8 fa 04 37 ┆ G 1 8 ;E .COD^1 7┆ 0xde0…e00 18 31 ec fa 05 47 00 00 31 f8 b0 04 10 7e 00 32 fa 07 47 00 00 0a 5d 31 de f8 ba 04 2a 92 f5 fa ┆ 1 G 1 ü 2 G Å1 * ┆ 0xe00…e20 05 47 00 00 31 ea fa 08 38 09 38 18 3b 39 31 e6 fa 08 38 0a 38 18 3b 39 31 e6 fa 08 38 0b 38 18 ┆ G 1 8 8 ;91 8 8 ;91 8 8 ┆ 0xe20…e40 3b 39 31 f8 c4 04 11 a8 fa 04 37 18 31 ed fa 05 47 01 00 31 f8 ce 04 07 7f 12 2b f8 d8 04 0c b4 ┆;91 7 1 G 1 + ┆ 0xe40…e60 f5 fa 05 47 00 00 31 f8 e2 04 0a 96 fa 04 41 12 31 f8 ec 04 0f a7 fa 09 45 04 00 58 50 4c 30 31 ┆ G 1 A 1 E XPL01┆ 0xe60…e80 f8 10 27 00 91 90 00 02 02 02 02 02 02 02 02 02 02 02 02 04 03 02 02 02 02 03 02 02 02 02 02 02 ┆ ' ┆ 0xe80…ea0 05 49 4e 44 45 58 01 41 01 46 01 54 01 50 09 53 54 41 43 4b 53 49 5a 45 09 49 4e 54 45 52 50 52 ┆ INDEX A F T P STACKSIZE INTERPR┆ 0xea0…ec0 45 54 04 42 41 53 45 01 53 01 42 01 4c 04 42 41 53 45 08 46 49 4c 45 4e 41 4d 45 06 43 4f 44 45 ┆ET BASE S B L BASE FILENAME CODE┆ 0xec0…ee0 5f 41 06 43 4f 44 45 5f 4c 06 43 4f 44 45 5f 46 03 4a 50 43 03 4a 4d 50 04 49 4e 54 5f 03 43 41 ┆_A CODE_L CODE_F JPC JMP INT_ CA┆ 0xee0…f00 4c 03 53 54 4f 03 4c 4f 44 03 4f 50 52 03 4c 49 54 05 43 58 4d 41 58 02 02 03 02 02 02 02 02 77 ┆L STO LOD OPR LIT CXMAX w┆