|
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: 3456 (0xd80) Names: »XRPT.OVL«
└─⟦bb4171d11⟧ Bits:30009071 QUICKCODE Version 2.1C └─⟦this⟧ »XRPT.OVL«
0x000…080 (0,) 0xe5[0x80] 0x080…0a0 (1,) 00 48 0c 00 00 00 00 80 89 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ H ┆ 0x0a0…0c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ […0x2…] 0x100…120 (2,) 11 b9 95 0e 04 7e 23 12 13 0d c2 85 89 21 00 00 39 22 c3 95 21 a5 78 3e 05 cd 7e 30 c3 a2 89 c3 ┆ ü# ! 9" ! x> ü0 ┆ 0x120…140 3d 92 21 a5 78 3e 06 cd 7e 30 c3 b0 89 c3 3d 92 21 92 76 3e 01 cd 89 2a 21 59 92 f5 3e 01 cd 89 ┆= ! x> ü0 = ! v> *!Y > ┆ 0x140…160 2a 21 92 76 06 01 cd 51 2a cd 63 2a 21 bd 95 06 03 cd 9c 2a 21 92 76 3e 01 cd 89 2a 21 5a 92 f5 ┆*! v Q* c*! *! v> *!Z ┆ 0x160…180 3e 01 cd 89 2a 21 92 76 06 01 cd 51 2a cd 63 2a 21 c0 95 06 03 cd 9c 2a 2a bb 95 af 77 23 77 21 ┆> *! v Q* c*! ** w#w!┆ 0x180…1a0 (3,) 06 1a 3e 01 cd 50 92 21 9e 92 3e 07 cd 89 2a cd 31 19 21 92 76 3e 01 cd 89 2a cd 31 19 21 a5 92 ┆ > P ! > * 1 ! v> * 1 ! ┆ 0x1a0…1c0 3e 01 cd 89 2a cd 31 19 21 92 76 3e 01 cd 89 2a cd 31 19 21 a6 92 3e 0b cd 89 2a cd 31 19 cd 57 ┆> * 1 ! v> * 1 ! > * 1 W┆ 0x1c0…1e0 31 21 a5 78 11 52 06 01 01 8b cd 06 1a 3e 01 cd 50 92 21 b1 92 3e 17 cd 89 2a cd 31 19 21 bd 95 ┆1! x R > P ! > * 1 ! ┆ 0x1e0…200 3e 03 cd 89 2a cd 31 19 21 c8 92 3e 15 cd 89 2a cd 31 19 21 c0 95 3e 03 cd 89 2a cd 31 19 cd 57 ┆> * 1 ! > * 1 ! > * 1 W┆ 0x200…220 (4,) 31 21 a5 78 11 52 06 01 a0 8b cd 06 1a 3e 01 cd 50 92 21 1b 93 3e 04 cd 89 2a cd 31 19 cd 57 31 ┆1! x R > P ! > * 1 W1┆ 0x220…240 21 a5 78 11 52 06 01 bf 8b cd 06 1a 3e 01 cd 50 92 21 1f 93 3e 05 cd 89 2a cd 31 19 cd 57 31 21 ┆! x R > P ! > * 1 W1!┆ 0x240…260 a5 78 11 52 06 01 08 8c cd 06 1a 3e 01 cd 50 92 21 24 93 3e 08 cd 89 2a cd 31 19 21 92 76 3e 01 ┆ x R > P !$ > * 1 ! v> ┆ 0x260…280 cd 89 2a 21 a5 92 f5 3e 01 cd 89 2a 21 92 76 06 01 cd 51 2a cd 63 2a cd 31 19 21 2c 93 3e 0b cd ┆ *! > *! v Q* c* 1 !, > ┆ 0x280…2a0 (5,) 11 52 06 01 c8 8c cd 06 1a 3e 01 cd 50 92 21 e3 92 3e 0c cd 89 2a cd 31 19 21 92 76 3e 01 cd 89 ┆ R > P ! > * 1 ! v> ┆ 0x2a0…2c0 2a cd 31 19 21 65 93 3e 22 cd 89 2a cd 31 19 21 92 76 3e 01 cd 89 2a cd 31 19 21 87 93 3e 0c cd ┆* 1 !e >" * 1 ! v> * 1 ! > ┆ 0x2c0…2e0 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 e7 8c cd 06 1a 3e 01 cd 50 92 21 1b 93 3e 04 cd 89 ┆ * 1 W1! x R > P ! > ┆ 0x2e0…300 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 06 8d cd 06 1a 3e 01 cd 50 92 21 1f 93 3e 05 cd 89 2a ┆* 1 W1! x R > P ! > *┆ 0x300…320 (6,) 06 01 bb 8d cd 06 1a 3e 01 cd 50 92 21 df 93 3e 14 cd 89 2a cd 31 19 21 92 76 3e 01 cd 89 2a cd ┆ > P ! > * 1 ! v> * ┆ 0x320…340 31 19 21 f3 93 3e 08 cd 89 2a cd 31 19 21 92 76 3e 01 cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 ┆1 ! > * 1 ! v> * 1 W1! x R┆ 0x340…360 06 01 06 8e cd 06 1a 3e 01 cd 50 92 21 fb 93 3e 0c cd 89 2a cd 31 19 21 92 76 3e 01 cd 89 2a cd ┆ > P ! > * 1 ! v> * ┆ 0x360…380 31 19 21 07 94 3e 0f cd 89 2a cd 31 19 21 92 76 3e 01 cd 89 2a cd 31 19 21 16 94 3e 0d cd 89 2a ┆1 ! > * 1 ! v> * 1 ! > *┆ 0x380…3a0 (7,) 01 cd 50 92 21 43 94 3e 0b cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 db 8e cd 06 1a 3e 01 ┆ P !C > * 1 W1! x R > ┆ 0x3a0…3c0 cd 50 92 21 dd 92 3e 06 cd 89 2a cd 31 19 21 92 76 3e 01 cd 89 2a 21 f3 93 f5 3e 08 cd 89 2a 21 ┆ P ! > * 1 ! v> *! > *!┆ 0x3c0…3e0 92 76 06 01 cd 51 2a cd 63 2a cd 31 19 21 4e 94 3e 0a cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 ┆ v Q* c* 1 !N > * 1 W1! x R┆ 0x3e0…400 06 01 1b 8f cd 06 1a 3e 01 cd 50 92 21 58 94 3e 14 cd 89 2a cd 31 19 21 92 76 3e 01 cd 89 2a cd ┆ > P !X > * 1 ! v> * ┆ 0x400…420 (8,) 31 19 cd 57 31 21 a5 78 11 52 06 01 a4 8f cd 06 1a 3e 01 cd 50 92 21 1f 93 3e 05 cd 89 2a cd 31 ┆1 W1! x R > P ! > * 1┆ 0x420…440 19 cd 57 31 21 a5 78 11 52 06 01 ce 8f cd 06 1a 3e 01 cd 50 92 21 94 94 3e 10 cd 89 2a cd 31 19 ┆ W1! x R > P ! > * 1 ┆ 0x440…460 21 bd 95 3e 03 cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 0e 90 cd 06 1a 3e 01 cd 50 92 21 ┆! > * 1 W1! x R > P !┆ 0x460…480 6c 94 3e 0c cd 89 2a cd 31 19 21 92 76 3e 01 cd 89 2a cd 31 19 21 a4 94 3e 1f cd 89 2a cd 31 19 ┆l > * 1 ! v> * 1 ! > * 1 ┆ 0x480…4a0 (9,) 5b 92 e5 2a b9 95 d1 06 0f 3e 04 cd 33 2a 2a b9 95 cd 87 2a 47 c5 33 21 52 3e e5 21 00 00 e5 e5 ┆Æ * > 3** *G 3!R> ! ┆ 0x4a0…4c0 e5 2d e5 21 a5 78 cd 52 1e 21 a5 78 11 52 06 01 57 8a cd 06 1a 21 5f 92 3e 05 cd 89 2a cd 31 19 ┆ - ! x R ! x R W !_ > * 1 ┆ 0x4c0…4e0 2a b9 95 cd 87 2a cd 31 19 21 64 92 3e 13 cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 76 8a ┆* * 1 !d > * 1 W1! x R v ┆ 0x4e0…500 cd 06 1a 3e 01 cd 50 92 21 77 92 3e 27 cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 c1 8a cd ┆ > P !w >' * 1 W1! x R ┆ 0x500…520 (10,) 31 21 a5 78 11 52 06 01 36 8b cd 06 1a 3e 01 cd 50 92 21 dd 92 3e 06 cd 89 2a cd 31 19 21 bd 95 ┆1! x R 6 > P ! > * 1 ! ┆ 0x520…540 3e 03 cd 89 2a cd 31 19 21 a6 92 3e 0b cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 81 8b cd ┆> * 1 ! > * 1 W1! x R ┆ 0x540…560 06 1a 3e 01 cd 50 92 21 e3 92 3e 0c cd 89 2a cd 31 19 21 92 76 3e 01 cd 89 2a cd 31 19 21 ef 92 ┆ > P ! > * 1 ! v> * 1 ! ┆ 0x560…580 3e 20 cd 89 2a cd 31 19 21 92 76 3e 01 cd 89 2a cd 31 19 21 0f 93 3e 0c cd 89 2a cd 31 19 cd 57 ┆> * 1 ! v> * 1 ! > * 1 W┆ 0x580…5a0 (11,) 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 48 8c cd 06 1a 3e 01 cd 50 92 21 37 93 3e 19 cd 89 ┆ * 1 W1! x R H > P !7 > ┆ 0x5a0…5c0 2a cd 31 19 21 bd 95 3e 03 cd 89 2a cd 31 19 21 50 93 3e 15 cd 89 2a cd 31 19 21 c0 95 3e 03 cd ┆* 1 ! > * 1 !P > * 1 ! > ┆ 0x5c0…5e0 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 7d 8c cd 06 1a 3e 01 cd 50 92 21 24 93 3e 08 cd 89 ┆ * 1 W1! x R å > P !$ > ┆ 0x5e0…600 2a cd 31 19 21 c0 95 3e 03 cd 89 2a cd 31 19 21 2c 93 3e 0b cd 89 2a cd 31 19 cd 57 31 21 a5 78 ┆* 1 ! > * 1 !, > * 1 W1! x┆ 0x600…620 (12,) cd 31 19 cd 57 31 21 a5 78 11 52 06 01 30 8d cd 06 1a 3e 01 cd 50 92 21 93 93 3e 0e cd 89 2a cd ┆ 1 W1! x R 0 > P ! > * ┆ 0x620…640 31 19 21 bd 95 3e 03 cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 7b 8d cd 06 1a 3e 01 cd 50 ┆1 ! > * 1 W1! x R æ > P┆ 0x640…660 92 21 dd 92 3e 06 cd 89 2a cd 31 19 21 92 76 3e 01 cd 89 2a cd 31 19 21 a1 93 3e 32 cd 89 2a cd ┆ ! > * 1 ! v> * 1 ! >2 * ┆ 0x660…680 31 19 21 92 76 3e 01 cd 89 2a cd 31 19 21 d3 93 3e 0c cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 ┆1 ! v> * 1 ! > * 1 W1! x R┆ 0x680…6a0 (13,) cd 31 19 cd 57 31 21 a5 78 11 52 06 01 25 8e cd 06 1a 3e 01 cd 50 92 21 1b 93 3e 04 cd 89 2a cd ┆ 1 W1! x R % > P ! > * ┆ 0x6a0…6c0 31 19 cd 57 31 21 a5 78 11 52 06 01 44 8e cd 06 1a 3e 01 cd 50 92 21 1f 93 3e 05 cd 89 2a cd 31 ┆1 W1! x R D > P ! > * 1┆ 0x6c0…6e0 19 cd 57 31 21 91 61 eb 21 59 92 06 01 78 cd 03 2a c2 73 8e 21 a5 78 11 52 06 01 73 8e cd 06 1a ┆ W1! a !Y x * s ! x R s ┆ 0x6e0…700 3e 01 cd 50 92 21 23 94 3e 20 cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 92 8e cd 06 1a 3e ┆> P !# > * 1 W1! x R >┆ 0x700…720 (14,) 31 19 21 a5 92 3e 01 cd 89 2a cd 31 19 21 92 76 3e 01 cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 ┆1 ! > * 1 ! v> * 1 W1! x R┆ 0x720…740 06 01 66 8f cd 06 1a 3e 01 cd 50 92 21 6c 94 3e 0c cd 89 2a cd 31 19 21 92 76 3e 01 cd 89 2a cd ┆ f > P !l > * 1 ! v> * ┆ 0x740…760 31 19 21 78 94 3e 11 cd 89 2a cd 31 19 21 92 76 3e 01 cd 89 2a cd 31 19 21 89 94 3e 0b cd 89 2a ┆1 !x > * 1 ! v> * 1 ! > *┆ 0x760…780 cd 31 19 cd 57 31 21 a5 78 11 52 06 01 85 8f cd 06 1a 3e 01 cd 50 92 21 1b 93 3e 04 cd 89 2a cd ┆ 1 W1! x R > P ! > * ┆ 0x780…7a0 (15,) 21 92 76 3e 01 cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 2d 90 cd 06 1a 3e 01 cd 50 92 21 ┆! v> * 1 W1! x R - > P !┆ 0x7a0…7c0 c3 94 3e 0f cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 4c 90 cd 06 1a 3e 01 cd 50 92 21 d2 ┆ > * 1 W1! x R L > P ! ┆ 0x7c0…7e0 94 3e 04 cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 6b 90 cd 06 1a 3e 01 cd 50 92 21 d6 94 ┆ > * 1 W1! x R k > P ! ┆ 0x7e0…800 3e 0e cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 8a 90 cd 06 1a 3e 01 cd 50 92 21 e4 94 3e ┆> * 1 W1! x R > P ! >┆ 0x800…820 (16,) cd 50 92 21 24 95 3e 10 cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 30 91 cd 06 1a 3e 01 cd ┆ P !$ > * 1 W1! x R 0 > ┆ 0x820…840 50 92 21 34 95 3e 0a cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 4f 91 cd 06 1a 3e 01 cd 50 ┆P !4 > * 1 W1! x R O > P┆ 0x840…860 92 21 3e 95 3e 05 cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 6e 91 cd 06 1a 3e 01 cd 50 92 ┆ !> > * 1 W1! x R n > P ┆ 0x860…880 21 43 95 3e 13 cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 8d 91 cd 06 1a 3e 01 cd 50 92 21 ┆!C > * 1 W1! x R > P !┆ 0x880…8a0 (17,) 1a 3e 01 cd 50 92 21 9d 95 3e 05 cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 33 92 cd 06 1a ┆ > P ! > * 1 W1! x R 3 ┆ 0x8a0…8c0 3e 01 cd 50 92 21 a2 95 3e 17 cd 89 2a cd 31 19 cd 57 31 21 a5 78 cd 0a 19 cd 82 2c c9 2a c3 95 ┆> P ! > * 1 W1! x , * ┆ 0x8c0…8e0 f9 cd 38 2c 2a bb 95 36 64 23 36 00 cd 82 2c c9 32 c7 95 21 c5 95 c3 d6 1c 59 4e 2e 52 50 54 2a ┆ 8,* 6d#6 , 2 ! YN.RPT*┆ 0x8e0…900 20 20 20 20 20 20 20 20 2d 52 45 50 4f 52 54 20 50 52 4f 47 52 41 4d 2a 20 49 46 20 52 45 50 4f ┆ -REPORT PROGRAM* IF REPO┆ 0x900…920 (18,) 54 4f 20 54 48 45 20 50 52 49 4e 54 45 52 3f 20 47 45 54 20 4d 51 3a 52 4c 50 54 52 45 41 44 45 ┆TO THE PRINTER? GET MQ:RLPTREADE┆ 0x920…940 4e 44 44 4f 20 20 53 54 4f 52 45 20 20 54 4f 20 4d 51 3a 52 44 53 4b 20 20 44 4f 20 57 48 49 4c ┆NDDO STORE TO MQ:RDSK DO WHIL┆ 0x940…960 45 20 21 28 4d 51 3a 52 44 53 4b 29 20 3c 3e 20 20 2e 41 4e 44 2e 20 21 28 4d 51 3a 52 44 53 4b ┆E !(MQ:RDSK) <> .AND. !(MQ:RDSK┆ 0x960…980 29 20 3c 3e 20 57 41 4e 54 20 52 45 50 4f 52 54 20 53 45 4e 54 20 54 4f 20 41 20 46 49 4c 45 20 ┆) <> WANT REPORT SENT TO A FILE ┆ 0x980…9a0 (19,) 31 30 20 53 41 59 20 45 4e 54 45 52 20 46 49 4c 45 20 4e 41 4d 45 20 47 45 54 20 4d 51 3a 52 46 ┆10 SAY ENTER FILE NAME GET MQ:RF┆ 0x9a0…9c0 49 4c 45 53 54 4f 52 45 20 54 52 49 4d 28 4d 51 3a 52 46 49 4c 45 29 20 54 4f 20 4d 51 3a 52 46 ┆ILESTORE TRIM(MQ:RFILE) TO MQ:RF┆ 0x9c0…9e0 49 4c 45 45 4e 44 49 46 20 20 52 44 53 4b 20 54 4f 20 4d 51 3a 52 50 54 20 20 44 4f 20 57 48 49 ┆ILEENDIF RDSK TO MQ:RPT DO WHI┆ 0x9e0…a00 4c 45 20 4d 51 3a 52 50 54 20 3d 20 40 20 32 33 2c 31 30 20 53 41 59 20 45 4e 54 45 52 20 52 45 ┆LE MQ:RPT = @ 23,10 SAY ENTER RE┆ 0xa00…a20 (20,) 51 3a 52 44 53 4b 29 20 3d 20 53 45 54 20 41 4c 54 45 52 4e 41 54 45 20 54 4f 20 26 4d 51 3a 52 ┆Q:RDSK) = SET ALTERNATE TO &MQ:R┆ 0xa20…a40 46 49 4c 45 53 45 54 20 41 4c 54 45 52 4e 41 54 45 20 4f 4e 45 4e 44 49 46 20 52 44 53 4b 45 52 ┆FILESET ALTERNATE ONENDIF RDSKER┆ 0xa40…a60 41 53 45 52 45 50 4f 52 54 20 46 4f 52 4d 20 26 4d 51 3a 52 50 54 53 45 54 20 50 52 49 4e 54 20 ┆ASEREPORT FORM &MQ:RPTSET PRINT ┆ 0xa60…a80 4f 46 46 53 45 54 20 41 4c 54 45 52 4e 41 54 45 20 4f 46 46 49 46 20 21 28 4d 51 3a 52 44 53 4b ┆OFFSET ALTERNATE OFFIF !(MQ:RDSK┆ 0xa80…b00 (21,) 0xe5[0x80] 0xb00…b20 (22,) 0c cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 a9 90 cd 06 1a 3e 01 cd 50 92 21 f0 94 3e 0a ┆ * 1 W1! x R > P ! > ┆ 0xb20…b40 cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 d3 90 cd 06 1a 3e 01 cd 50 92 21 fa 94 3e 10 cd ┆ * 1 W1! x R > P ! > ┆ 0xb40…b60 89 2a cd 31 19 21 bd 95 3e 03 cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 f2 90 cd 06 1a 3e ┆ * 1 ! > * 1 W1! x R >┆ 0xb60…b80 01 cd 50 92 21 0a 95 3e 1a cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 11 91 cd 06 1a 3e 01 ┆ P ! > * 1 W1! x R > ┆ 0xb80…ba0 (23,) 56 95 3e 0d cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 ac 91 cd 06 1a 3e 01 cd 50 92 21 63 ┆V > * 1 W1! x R > P !c┆ 0xba0…bc0 95 3e 11 cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 d6 91 cd 06 1a 3e 01 cd 50 92 21 74 95 ┆ > * 1 W1! x R > P !t ┆ 0xbc0…be0 3e 0f cd 89 2a cd 31 19 21 bd 95 3e 03 cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 f5 91 cd ┆> * 1 ! > * 1 W1! x R ┆ 0xbe0…c00 06 1a 3e 01 cd 50 92 21 83 95 3e 1a cd 89 2a cd 31 19 cd 57 31 21 a5 78 11 52 06 01 14 92 cd 06 ┆ > P ! > * 1 W1! x R ┆ 0xc00…c20 (24,) 52 54 20 44 4f 45 53 4e 54 20 45 58 49 53 54 2c 20 47 4f 20 49 4e 54 4f 20 64 42 41 53 45 53 54 ┆RT DOESNT EXIST, GO INTO dBASEST┆ 0xc20…c40 4f 52 45 20 20 20 20 54 4f 20 4d 51 3a 52 4c 50 54 44 4f 20 57 48 49 4c 45 20 21 28 4d 51 3a 52 ┆ORE TO MQ:RLPTDO WHILE !(MQ:R┆ 0xc40…c60 4c 50 54 29 20 3c 3e 20 20 2e 41 4e 44 2e 20 21 28 4d 51 3a 52 4c 50 54 29 20 3c 3e 20 53 54 4f ┆LPT) <> .AND. !(MQ:RLPT) <> STO┆ 0xc60…c80 52 45 20 40 20 32 31 2c 31 30 20 53 41 59 20 57 41 4e 54 20 52 45 50 4f 52 54 20 53 45 4e 54 20 ┆RE @ 21,10 SAY WANT REPORT SENT ┆ 0xc80…ca0 (25,) 3f 20 20 20 20 20 20 20 47 45 54 20 4d 51 3a 52 44 53 4b 49 46 20 21 28 4d 51 3a 52 44 53 4b 29 ┆? GET MQ:RDSKIF !(MQ:RDSK)┆ 0xca0…cc0 3d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆= ┆ 0xcc0…ce0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 4f 20 4d 51 3a 52 46 49 4c 45 44 ┆ TO MQ:RFILED┆ 0xce0…d00 4f 20 57 48 49 4c 45 20 4d 51 3a 52 46 49 4c 45 20 3d 20 20 20 20 20 20 20 20 20 40 20 32 32 2c ┆O WHILE MQ:RFILE = @ 22,┆ 0xd00…d20 (26,) 50 4f 52 54 20 4e 41 4d 45 20 47 45 54 20 4d 51 3a 52 50 54 49 46 20 21 28 4d 51 3a 52 4c 50 54 ┆PORT NAME GET MQ:RPTIF !(MQ:RLPT┆ 0xd20…d40 29 20 3d 20 50 4c 45 41 53 45 20 53 45 54 20 55 50 20 50 52 49 4e 54 45 52 20 20 20 20 20 20 20 ┆) = PLEASE SET UP PRINTER ┆ 0xd40…d60 20 20 20 53 45 54 20 43 4f 4e 53 4f 4c 45 20 4f 46 46 57 41 49 54 53 45 54 20 43 4f 4e 53 4f 4c ┆ SET CONSOLE OFFWAITSET CONSOL┆ 0xd60…d80 45 20 4f 4e 53 45 54 20 50 52 49 4e 54 20 4f 4e 45 4e 44 49 46 20 52 4c 50 54 49 46 20 21 28 4d ┆E ONSET PRINT ONENDIF RLPTIF !(M┆