|
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 - download
Length: 2048 (0x800)
Names: »MAIL.CMD«
└─⟦56ce7e438⟧ Bits:30004227 Adventure - Gomuko - WordStar - MAIL
└─⟦56ce7e438⟧ Bits:30004341 Adventure - Gomuko - WordStar - MAIL
└─⟦this⟧ »MAIL.CMD«
0x000…020 (0,) b8 02 a6 ca 11 1d 3a b9 02 cd b3 20 2a ba 37 2b 77 e1 f1 c9 cd 46 1d e5 f5 2a b6 02 7c b5 ca 23 ┆ : * 7+w F * ø #┆
0x020…040 1d 36 00 f1 21 8c 06 be e1 c0 32 ab 36 c9 3a ba 02 b7 ca 3f 1d c5 d5 e5 cd ba 02 b7 c3 8a 1a 3e ┆ 6 ! 2 6 : ? >┆
0x040…060 03 cd 58 1d b7 c9 3a bd 02 b7 ca 56 1d c5 d5 e5 cd bd 02 c3 8a 1a 3e 06 c5 d5 e5 21 8a 1a e5 2a ┆ X : V > ! *┆
0x060…080 01 00 cd 65 17 79 e9 e5 f5 21 d9 02 35 c2 77 1d 2b 7e 23 77 cd 7a 1d f1 e1 c9 cd 2e 1d f5 c4 da ┆ e y ! 5 w +ü#w z . ┆
0x080…0a0 1c f1 c9 f5 c5 e5 21 e1 35 22 dd 35 22 df 35 01 14 00 cd 2e 17 e1 c1 f1 c9 fe 0d c8 fe 0a c8 c5 ┆ ! 5" 5" 5 . ┆
0x0a0…0c0 47 3a 61 35 4f 78 cd b1 1d 3a 49 02 0c b9 78 c1 c9 03 fe 20 d0 03 fe 09 c0 f5 0b 0b 79 f6 07 4f ┆G:a5Ox :I x y O┆
0x0c0…0e0 03 f1 c9 c5 4e 23 46 fe 20 dc 94 0a da d7 1d cd b1 1d 70 2b 71 c1 c9 ca d2 1d 03 ea d2 1d 0b 0b ┆ N#F p+q ┆
0x0e0…100 c3 d2 1d cd 94 21 f5 c5 d5 e5 cd 6f 0b eb 2a bf 37 eb 3a 49 02 4f 26 00 3a 48 02 3d 95 e5 21 aa ┆ ! o * 7 :I O& :H = ! ┆
0x100…120 (1,) 02 b6 e1 c2 07 1e 0d 44 e5 d5 cd 33 23 d1 3a 63 35 b7 c2 4e 1e 1a be c2 25 1e 23 13 04 0d c2 15 ┆ D 3# :c5 N % # ┆
0x120…140 1e e1 c3 48 1e d5 c5 06 00 09 eb 09 eb c1 2b 1b 1a be c2 39 1e 0d c2 2e 1e d1 e1 60 cd ab 22 1a ┆ H + 9 . ` " ┆
0x140…160 cd fe 1f 13 0d c2 3f 1e e1 d1 c1 f1 b7 c9 cd f7 20 06 00 eb cd c3 02 cd e8 16 cd c9 02 cd 21 21 ┆ ? !!┆
0x160…180 c3 21 1e e5 21 61 35 86 3c 21 49 02 be e1 d8 f5 e5 cd 67 1d cd a6 1e 2a 60 35 cd ef 21 c3 a0 1e ┆ ! !a5 <!I g *`5 ! ┆
0x180…1a0 f5 e5 cd a6 1e 21 49 02 3a 61 35 3c be d2 98 1e 3e 20 cd fe 1f c3 88 1e 2a 60 35 3e 2b cc fe 1f ┆ !I :a5< > *`5>+ ┆
0x1a0…1c0 2c 26 00 c3 ad 22 f5 e5 3a 60 35 3c 21 48 02 be da 18 21 3e 0a cd fe 1f 2a 60 35 2d c3 ad 22 f5 ┆,& " :`5<!H !> *`5- " ┆
0x1c0…1e0 3e 0f cd c7 1e f1 c9 fe 0e ca 6f 1e d5 cd e3 1e ca dc 1e d1 f5 ee 80 cd 9c 1f f1 c9 eb cd ff 1a ┆> o ┆
0x1e0…200 eb d1 c9 fe 1a ca 3a 1f d0 fe 18 ca 2b 1f d2 41 1f fe 16 ca 09 1f d2 16 1f fe 0f da 5d 1f eb 21 ┆ : + A Å !┆
0x200…220 (2,) 6f 72 20 75 73 65 72 20 72 65 73 70 6f 6e 73 65 0d 0a 20 20 20 57 41 49 54 20 54 4f 20 41 43 54 ┆or user response WAIT TO ACT┆
0x220…240 49 4f 4e 0d 0a 20 20 20 2a 20 20 2d 20 74 65 73 74 20 66 6f 72 20 65 78 69 74 20 0d 0a 20 20 20 ┆ION * - test for exit ┆
0x240…260 49 46 20 41 43 54 49 4f 4e 3d 27 30 27 0d 0a 20 20 20 20 20 20 53 45 54 20 54 41 4c 4b 20 6f 6e ┆IF ACTION='0' SET TALK on┆
0x260…280 0d 0a 20 20 20 20 20 20 43 41 4e 43 45 4c 0d 0a 20 20 20 45 4e 44 49 46 0d 0a 20 20 20 2a 20 20 ┆ CANCEL ENDIF * ┆
0x280…2a0 2d 20 74 65 73 74 20 66 6f 72 20 6e 65 77 20 65 6e 74 72 69 65 73 0d 0a 20 20 20 49 46 20 41 43 ┆- test for new entries IF AC┆
0x2a0…2c0 54 49 4f 4e 3d 27 31 27 20 0d 0a 20 20 20 20 20 20 2a 20 20 2d 20 61 64 64 20 6e 65 77 20 6e 61 ┆TION='1' * - add new na┆
0x2c0…2e0 6d 65 73 20 74 6f 20 4d 41 49 4c 2e 44 42 46 0d 0a 20 20 20 20 20 20 44 4f 20 4d 41 49 4c 45 4e ┆mes to MAIL.DBF DO MAILEN┆
0x2e0…300 54 52 0d 0a 20 20 20 45 4e 44 49 46 0d 0a 20 20 20 2a 20 20 2d 20 74 65 73 74 20 74 6f 20 6d 61 ┆TR ENDIF * - test to ma┆
0x300…320 (3,) 6b 65 20 6c 61 62 65 6c 73 0d 0a 20 20 20 49 46 20 41 43 54 49 4f 4e 3d 27 32 27 0d 0a 20 20 20 ┆ke labels IF ACTION='2' ┆
0x320…340 20 20 20 2a 20 20 2d 20 70 72 69 6e 74 20 6d 61 69 6c 20 6c 61 62 65 6c 73 0d 0a 20 20 20 20 20 ┆ * - print mail labels ┆
0x340…360 20 44 4f 20 4d 41 49 4c 4c 41 42 0d 0a 20 20 20 45 4e 44 49 46 0d 0a 20 20 20 2a 20 20 20 2d 20 ┆ DO MAILLAB ENDIF * - ┆
0x360…380 74 65 73 74 20 74 6f 20 77 72 69 74 65 20 66 6f 72 6d 20 6c 65 74 74 65 72 73 0d 0a 20 20 20 49 ┆test to write form letters I┆
0x380…3a0 46 20 41 43 54 49 4f 4e 3d 27 33 27 0d 0a 20 20 20 20 20 20 2a 20 20 2d 20 70 72 69 6e 74 20 66 ┆F ACTION='3' * - print f┆
0x3a0…3c0 6f 72 6d 20 6c 65 74 74 65 72 20 74 6f 20 6e 61 6d 65 73 20 69 6e 20 4d 41 49 4c 2e 44 42 46 0d ┆orm letter to names in MAIL.DBF ┆
0x3c0…3e0 0a 20 20 20 20 20 20 44 4f 20 4d 41 49 4c 4c 54 54 52 0d 0a 20 20 20 45 4e 44 49 46 0d 0a 45 4e ┆ DO MAILLTTR ENDIF EN┆
0x3e0…400 44 44 4f 0d 0a 52 45 54 55 52 4e 0d 0a 20 20 20 20 20 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a ┆DDO RETURN ┆
0x400…420 (4,) 52 08 87 cd 65 17 eb af c9 3a 42 36 b7 11 64 08 c8 11 62 08 af c9 11 66 08 3a 43 36 b7 c8 11 68 ┆R e :B6 d b f :C6 h┆
0x420…440 08 3a 44 36 b7 c8 11 6a 08 af c9 cd 94 24 cd e0 1b cd 32 27 cd f7 24 c3 99 1f e5 2a a9 36 c3 47 ┆ :D6 j $ 2' $ * 6 G┆
0x440…460 1f e5 2a a9 36 36 00 eb 2a bf 37 e5 cd 38 18 d1 e1 1a b7 ca 99 1f cd d4 1e 13 c3 51 1f fe 05 ca ┆ * 66 * 7 8 Q ┆
0x460…480 63 1f d0 fe 01 d8 23 f5 cd cb 1b 5e 23 cd cb 1b f1 56 fe 01 c8 fe 02 ca 8f 1f fe 03 ca 94 1f fe ┆c # ^# V ┆
0x480…4a0 04 ca 51 1f 1a b7 11 6c 08 c8 11 6e 08 af c9 eb 19 2b eb c9 eb cd 05 1b 2b d1 d1 c9 f5 c5 4f 3a ┆ Q l n + + O:┆
0x4a0…4c0 64 35 a1 47 79 e6 7f fe 1e ca b1 1f fe 1f c2 b8 1f 3a b8 03 a8 c3 9e 1f fe 7f c2 bf 1f 3e 7e cd ┆d5 Gy : >ü ┆
0x4c0…4e0 99 1d dc 80 1e fe 09 c2 da 1f 3e 20 cd f8 1f 3a 61 35 e6 07 c2 ca 1f c3 f5 1f fe 20 d2 f2 1f fe ┆ > :a5 ┆
0x4e0…500 0a ca f2 1f fe 0d ca f2 1f f5 3e 5e cd f8 1f f1 c6 40 cd f8 1f c1 f1 c9 fe 20 da fe 1f b0 f5 3a ┆ >^ @ :┆
0x500…520 (5,) 63 35 b7 c2 1f 20 f1 f5 fe 20 cc 8e 0b d4 e3 20 e5 21 b3 02 34 35 c2 1b 20 e6 7f e1 cd b3 20 f1 ┆c5 ! 45 ┆
0x520…540 e5 f5 cd f7 20 21 61 35 e6 7f fe 0a ca 50 20 fe 0d ca 48 20 34 cd c3 02 2a ba 37 f1 f5 77 cd c9 ┆ !a5 P H 4 * 7 w ┆
0x540…560 02 23 cd 1e 21 f1 e1 c9 36 00 2a bc 37 c3 42 20 2b 34 3a 48 02 3d be da 71 20 3a 49 02 f5 2a bc ┆ # ! 6 * 7 B +4:H = q :I * ┆
0x560…580 37 cd 65 17 22 bc 37 f1 2a ba 37 cd 65 17 c3 42 20 35 2a b0 37 f1 fe e5 c5 d5 cd f7 20 eb 2a 49 ┆7 e " 7 * 7 e B 5* 7 *I┆
0x580…5a0 02 26 00 e5 19 eb e5 2a b6 37 cd 5b 17 e1 eb cd 67 1d cd c3 02 cd e8 16 cd c9 02 cd 67 1d e1 cd ┆ & * 7 Æ g g ┆
0x5a0…5c0 c3 02 3e 20 12 13 2d c2 a4 20 cd c9 02 d1 c1 e1 c3 21 21 f5 c5 4f 3a c0 02 b7 ca ce 20 d5 e5 79 ┆ > - !! O: y┆
0x5c0…5e0 f5 cd 1c 23 f1 2a 60 35 cd c0 02 c3 d1 30 3e 09 cd 58 1d c1 f1 c9 f5 c5 4f c3 ce 20 f5 af cd e3 ┆ # *`5 0> X O ┆
0x5e0…600 20 f1 c9 e5 21 58 35 ae f2 f4 20 ae 77 e1 fa 73 22 c3 67 22 ae e1 c9 f5 3a 5b 35 b7 ca 19 21 e5 ┆ !X5 w s" g" :Æ5 ! ┆
0x600…620 (6,) 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a ┆ ┆
[…0xe…]
0x7e0…800 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 55 52 4e ┆ URN┆