|
DataMuseum.dkPresents historical artifacts from the history of: RegneCentralen RC3600/RC7000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RegneCentralen RC3600/RC7000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 5632 (0x1600)
Names: »P1P2«
└─⟦ee9e554ad⟧ Bits:30001809 SG0107 Floppy
└─ ⟦this⟧ »/P1P2«
0x0000…0020 3b 20 43 44 55 4d 50 20 52 45 56 20 31 2e 31 20 20 43 4f 52 45 4c 41 47 45 52 2d 44 55 4d 50 20 ┆; CDUMP REV 1.1 CORELAGER-DUMP ┆ 0x0020…0040 56 45 44 20 50 4c 20 32 33 2e 33 2e 38 32 20 45 46 54 45 52 20 49 44 45 20 49 20 50 48 4b 20 4c ┆VED PL 23.3.82 EFTER IDE I PHK L┆ 0x0040…0060 41 47 55 44 20 28 52 45 56 20 33 2e 30 32 29 0d 0a 0d 0a 20 20 20 20 20 20 2e 54 49 54 4c 20 44 ┆AGUD (REV 3.02) .TITL D┆ 0x0060…0080 55 4d 31 31 20 20 0d 0a 20 20 20 20 20 20 2e 4e 52 45 4c 0d 0a 20 20 20 20 20 20 2e 52 44 58 4f ┆UM11 .NREL .RDXO┆ 0x0080…00a0 20 31 30 20 20 0d 0a 20 20 20 20 20 20 2e 52 44 58 20 20 31 30 20 20 0d 0a 20 20 20 20 20 20 2e ┆ 10 .RDX 10 .┆ 0x00a0…00c0 54 58 54 4d 20 31 20 20 0d 0a 20 20 20 20 20 20 2e 54 58 54 4e 20 31 20 20 0d 0a 20 20 0d 0a 50 ┆TXTM 1 .TXTN 1 P┆ 0x00c0…00e0 47 44 53 3a 20 31 42 30 2b 31 42 35 2b 31 42 31 35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆GDS: 1B0+1B5+1B15 ┆ 0x00e0…0100 20 20 3b 50 53 50 45 43 20 20 0d 0a 20 20 20 20 20 20 54 58 30 36 20 20 20 20 20 20 20 20 20 20 ┆ ;PSPEC TX06 ┆ 0x0100…0120 20 20 20 20 20 20 20 20 20 20 20 3b 50 53 54 41 52 20 20 0d 0a 20 20 20 20 20 20 30 20 20 20 20 ┆ ;PSTAR 0 ┆ 0x0120…0140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 43 48 41 49 4e 20 20 0d 0a 20 20 ┆ ;CHAIN ┆ 0x0140…0160 20 20 20 20 50 43 44 53 2d 50 47 44 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 53 49 ┆ PCDS-PGDS ;SI┆ 0x0160…0180 5a 45 20 20 0d 0a 20 20 20 20 20 20 2e 54 58 54 20 20 27 43 44 55 4d 50 3c 30 3e 27 20 20 20 20 ┆ZE .TXT 'CDUMP<0>' ┆ 0x0180…01a0 20 20 20 20 20 20 20 3b 4e 41 4d 45 20 20 0d 0a 0c 3b 20 50 4c 20 32 33 2e 33 2e 38 32 20 46 5b ┆ ;NAME ; PL 23.3.82 FÆ┆ 0x01a0…01c0 52 44 49 47 20 52 5d 49 4e 44 54 41 53 54 4e 49 4e 47 20 41 46 20 44 45 4c 20 41 46 20 44 4f 4d ┆RDIG RÅINDTASTNING AF DEL AF DOM┆ 0x01c0…01e0 55 53 20 44 55 4d 50 20 50 52 4f 47 52 41 4d 0d 0a 3b 20 44 45 4e 4e 45 20 46 49 4c 20 45 52 20 ┆US DUMP PROGRAM ; DENNE FIL ER ┆ 0x01e0…0200 52 45 54 54 45 54 20 46 52 41 20 4d 55 53 49 4c 20 45 44 49 54 4f 52 20 4f 53 53 45 20 21 21 21 ┆RETTET FRA MUSIL EDITOR OSSE !!!┆ 0x0200…0220 0d 0a 3b 20 46 49 4c 4e 41 56 4e 20 46 4f 52 20 50 4c 20 52 5d 46 49 4c 20 45 52 20 50 31 44 55 ┆ ; FILNAVN FOR PL RÅFIL ER P1DU┆ 0x0220…0240 4d 2f 31 2f 32 2f 33 2f 34 2f 35 0d 0a 0d 0a 42 59 41 44 31 3a 20 42 59 41 44 20 20 20 20 20 20 ┆M/1/2/3/4/5 BYAD1: BYAD ┆ 0x0240…0260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 0d 0a 42 59 41 44 3a 20 ┆ ; BYAD: ┆ 0x0260…0280 20 20 30 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 ┆ 0 ┆ 0x0280…02a0 20 3b 20 54 41 4c 20 49 20 44 45 43 20 54 49 4c 20 55 44 53 4b 52 49 46 54 20 0d 0a 20 20 20 20 ┆ ; TAL I DEC TIL UDSKRIFT ┆ 0x02a0…02c0 20 20 20 20 30 0d 0a 20 20 20 20 20 20 20 20 30 20 0d 0a 20 20 20 20 20 20 20 20 30 20 0d 0a 20 ┆ 0 0 0 ┆ 0x02c0…02e0 20 20 20 20 20 20 20 30 20 0d 0a 4b 4f 4e 54 52 3a 20 30 20 0d 0a 41 42 41 44 52 3a 20 30 20 0d ┆ 0 KONTR: 0 ABADR: 0 ┆ 0x02e0…0300 0a 41 41 44 52 3a 20 20 30 20 0d 0a 42 41 44 52 3a 20 20 30 20 0d 0a 41 42 4b 54 52 3a 20 30 0d ┆ AADR: 0 BADR: 0 ABKTR: 0 ┆ 0x0300…0320 0a 41 4b 54 52 3a 20 20 30 20 0d 0a 42 4b 54 52 3a 20 20 30 20 0d 0a 3b 20 53 55 42 52 20 20 20 ┆ AKTR: 0 BKTR: 0 ; SUBR ┆ 0x0320…0340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 53 55 42 52 20 53 4f 4d 20 54 45 ┆ ; SUBR SOM TE┆ 0x0340…0360 53 54 45 52 20 28 5b 4e 44 52 3a 3d 3e 20 5b 4e 44 52 45 52 20 54 49 4c 29 20 4f 4d 20 42 59 54 ┆STER (ÆNDR:=> ÆNDRER TIL) OM BYT┆ 0x0360…0380 45 20 45 52 20 54 45 58 54 54 45 47 4e 20 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆E ER TEXTTEGN ┆ 0x0380…03a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 41 43 30 20 3f 20 20 20 20 ┆ ; AC0 ? ┆ 0x03a0…03c0 20 41 43 31 20 42 59 20 20 41 43 32 20 3f 20 20 41 43 33 20 28 29 20 0d 0a 20 20 20 20 20 20 20 ┆ AC1 BY AC2 ? AC3 () ┆ 0x03c0…03e0 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 3b 20 ┆ ; ┆ 0x03e0…0400 31 3d 45 4a 20 41 53 43 20 20 3d 2f 33 32 20 20 20 20 20 3d 20 20 20 52 45 54 55 52 41 44 52 20 ┆1=EJ ASC =/32 = RETURADR ┆ 0x0400…0420 0d 0a 54 45 53 54 31 3a 20 0d 0a 20 20 20 20 53 55 42 20 30 2c 30 20 0d 0a 20 20 20 20 53 54 41 ┆ TEST1: SUB 0,0 STA┆ 0x0420…0440 20 30 2c 4b 4f 4e 54 52 20 0d 0a 20 20 20 20 4c 44 41 20 30 2c 2e 31 32 37 20 0d 0a 20 20 20 20 ┆ 0,KONTR LDA 0,.127 ┆ 0x0440…0460 53 4c 20 20 31 2c 30 20 0d 0a 20 20 20 20 49 53 5a 20 4b 4f 4e 54 52 20 20 20 20 20 20 20 20 20 ┆SL 1,0 ISZ KONTR ┆ 0x0460…0480 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 49 46 20 42 59 20 3e 3d 20 31 32 37 20 20 2e 2e 2e 20 ┆ ; IF BY >= 127 ... ┆ 0x0480…04a0 45 4c 53 45 20 0d 0a 20 20 20 20 4c 44 41 20 30 2c 2e 33 32 20 0d 0a 20 20 20 20 53 4c 45 20 30 ┆ELSE LDA 0,.32 SLE 0┆ 0x04a0…04c0 2c 31 20 0d 0a 20 20 20 20 49 53 5a 20 4b 4f 4e 54 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,1 ISZ KONTR ┆ 0x04c0…04e0 20 20 20 20 20 20 20 20 20 20 3b 20 49 46 20 33 32 20 3e 20 42 59 20 2e 2e 2e 20 45 4c 53 45 3a ┆ ; IF 32 > BY ... ELSE:┆ 0x04e0…0500 20 0d 0a 20 20 20 20 4c 44 41 20 30 2c 4b 4f 4e 54 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ LDA 0,KONTR ┆ 0x0500…0520 20 20 20 20 20 20 20 20 3b 20 48 56 49 53 20 56 5b 4b 3a 20 33 32 20 49 20 41 43 30 20 56 45 44 ┆ ; HVIS VÆK: 32 I AC0 VED┆ 0x0520…0540 20 52 45 54 55 52 4e 20 0d 0a 20 20 20 20 53 54 41 20 30 2c 42 4b 54 52 20 20 20 20 20 20 20 20 ┆ RETURN STA 0,BKTR ┆ 0x0540…0560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 28 49 20 47 49 56 45 54 20 46 41 4c 44 20 4f ┆ ; (I GIVET FALD O┆ 0x0560…0580 53 53 45 20 56 5b 4b 29 20 0d 0a 20 20 20 20 20 44 53 5a 20 4b 4f 4e 54 52 0d 0a 20 20 20 20 4c ┆SSE VÆK) DSZ KONTR L┆ 0x0580…05a0 44 41 20 31 2c 2e 33 32 20 0d 0a 20 20 20 4a 4d 50 20 30 2c 33 00 20 20 20 20 20 20 20 20 20 20 ┆DA 1,.32 JMP 0,3 ┆ 0x05a0…05c0 20 20 20 20 20 20 20 20 20 20 20 3b 20 52 45 54 55 52 20 0d 0a 0d 0a 0d 0a 0d 0a 44 49 53 41 53 ┆ ; RETUR DISAS┆ 0x05c0…05e0 3a 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 ┆: ┆ 0x05e0…0600 20 3b 20 48 4f 56 45 44 52 55 54 49 4e 45 20 54 49 4c 20 54 45 53 54 20 46 4f 52 20 41 53 43 49 ┆ ; HOVEDRUTINE TIL TEST FOR ASCI┆ 0x0600…0620 49 2d 54 45 47 4e 3a 20 0d 0a 20 20 20 20 4c 44 41 20 31 2c 57 41 44 52 20 20 20 20 20 20 20 20 ┆I-TEGN: LDA 1,WADR ┆ 0x0620…0640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 57 41 44 52 20 48 45 4e 54 45 53 20 49 20 48 ┆ ; WADR HENTES I H┆ 0x0640…0660 4f 56 45 44 46 55 54 49 4e 45 20 2f 2f 2f 2f 2f 2f 2f 20 48 20 55 20 53 20 4b 20 0d 0a 53 54 41 ┆OVEDFUTINE /////// H U S K STA┆ 0x0660…0680 20 31 2c 41 42 41 44 52 20 0d 0a 4d 4f 56 53 20 31 2c 31 20 0d 0a 4c 44 41 20 30 2c 2e 32 35 35 ┆ 1,ABADR MOVS 1,1 LDA 0,.255┆ 0x0680…06a0 20 0d 0a 41 4e 44 20 20 30 2c 31 20 0d 0a 4a 53 52 20 54 45 53 54 31 20 20 20 20 20 20 20 20 20 ┆ AND 0,1 JSR TEST1 ┆ 0x06a0…06c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 31 2e 20 42 59 54 45 20 5b 4e 44 ┆ ; 1. BYTE ÆND┆ 0x06c0…06e0 52 45 53 20 54 49 4c 20 41 53 43 49 49 2d 54 45 47 4e 20 33 32 20 48 56 49 53 20 49 4b 4b 45 20 ┆RES TIL ASCII-TEGN 32 HVIS IKKE ┆ 0x06e0…0700 4f 4b 20 0d 0a 53 54 41 20 31 2c 41 41 44 52 20 0d 0a 53 54 41 20 30 2c 41 4b 54 52 20 0d 0a 4c ┆OK STA 1,AADR STA 0,AKTR L┆ 0x0700…0720 44 41 20 31 2c 41 42 41 44 52 20 0d 0a 4c 44 41 20 30 2c 2e 32 35 35 20 0d 0a 41 4e 44 20 30 2c ┆DA 1,ABADR LDA 0,.255 AND 0,┆ 0x0720…0740 31 20 0d 0a 4a 53 52 20 54 45 53 54 31 20 0d 0a 53 54 41 20 31 2c 42 41 44 52 20 0d 0a 53 54 41 ┆1 JSR TEST1 STA 1,BADR STA┆ 0x0740…0760 20 30 2c 42 4b 54 52 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 ┆ 0,BKTR ┆ 0x0760…0780 20 20 3b 20 42 5c 52 20 55 44 45 4c 41 44 45 53 20 48 56 49 53 20 49 4b 4b 45 20 44 45 52 20 5b ┆ ; BØR UDELADES HVIS IKKE DER Æ┆ 0x0780…07a0 4e 44 52 45 53 20 49 20 54 45 53 54 31 2d 52 55 54 49 4e 45 4e 20 0d 0a 4c 44 41 20 31 2c 41 4b ┆NDRES I TEST1-RUTINEN LDA 1,AK┆ 0x07a0…07c0 54 52 20 0d 0a 41 4e 44 20 30 2c 31 20 0d 0a 53 54 41 20 31 2c 41 42 4b 54 52 20 20 20 20 20 20 ┆TR AND 0,1 STA 1,ABKTR ┆ 0x07c0…07e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 31 20 48 56 49 53 20 49 4b 4b ┆ ; 1 HVIS IKK┆ 0x07e0…0800 45 20 42 45 47 47 45 20 4f 50 52 20 56 41 52 20 41 53 43 49 49 2d 54 45 47 4e 20 0d 0a 20 0d 0a ┆E BEGGE OPR VAR ASCII-TEGN ┆ 0x0800…0820 53 55 42 20 30 2c 30 20 0d 0a 53 45 20 20 30 2c 31 20 0d 0a 4a 4d 50 20 41 53 43 49 20 0d 0a 20 ┆SUB 0,0 SE 0,1 JMP ASCI ┆ 0x0820…0840 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 20 ┆ ┆ 0x0840…0860 20 20 20 20 3b 20 4b 4f 4e 54 52 4f 4c 20 46 4f 52 20 4f 4d 20 4a 4d 50 20 40 20 44 49 53 2c 30 ┆ ; KONTROL FOR OM JMP @ DIS,0┆ 0x0860…0880 20 45 4c 4c 45 52 20 4a 53 52 20 40 20 44 49 53 2c 30 20 0d 0a 4c 44 41 20 30 2c 41 41 44 52 20 ┆ ELLER JSR @ DIS,0 LDA 0,AADR ┆ 0x0880…08a0 0d 0a 4d 4f 56 5a 52 20 30 2c 30 2c 53 4e 43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ MOVZR 0,0,SNC ┆ 0x08a0…08c0 20 20 20 20 20 20 20 3b 20 2e 2e 2e 2e 20 3f 31 30 30 20 20 3e 30 3f 20 0d 0a 4d 4f 56 5a 52 20 ┆ ; .... ?100 >0? MOVZR ┆ 0x08c0…08e0 30 2c 30 2c 53 5a 43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b ┆0,0,SZC ;┆ 0x08e0…0900 20 20 2e 2e 2e 2e 20 3f 31 30 20 20 3e 30 3f 20 0d 0a 4a 4d 50 20 54 41 4c 55 44 20 0d 0a 4d 4f ┆ .... ?10 >0? JMP TALUD MO┆ 0x0900…0920 56 5a 52 20 30 2c 30 2c 53 4e 43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆VZR 0,0,SNC ┆ 0x0920…0940 20 20 20 3b 20 20 20 2e 2e 2e 2e 20 3f 31 20 20 3e 31 3f 20 0d 0a 4a 4d 50 20 54 41 4c 55 44 20 ┆ ; .... ?1 >1? JMP TALUD ┆ 0x0940…0960 0d 0a 4d 4f 56 5a 52 20 30 2c 30 2c 53 5a 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ MOVZR 0,0,SZR ┆ 0x0960…0980 20 20 20 20 20 20 20 3b 20 20 20 20 2e 2e 2e 2e 20 3f 20 20 3e 2e 2e 2e 2e 3d 30 30 30 30 3f 20 ┆ ; .... ? >....=0000? ┆ 0x0980…09a0 0d 0a 4a 4d 50 20 54 41 4c 55 44 20 0d 0a 4c 44 41 20 40 20 33 2c 54 41 42 45 4c 0d 0a 4c 44 41 ┆ JMP TALUD LDA @ 3,TABEL LDA┆ 0x09a0…09c0 20 31 2c 41 42 41 44 52 20 0d 0a 4c 44 41 20 32 2c 30 2c 33 20 0d 0a 4c 4f 4f 50 31 3a 0d 0a 4d ┆ 1,ABADR LDA 2,0,3 LOOP1: M┆ 0x09c0…09e0 4f 56 5a 4c 20 33 2c 30 20 20 20 20 0d 0a 53 55 42 20 23 20 32 2c 31 2c 53 4e 52 20 0d 0a 4a 4d ┆OVZL 3,0 SUB # 2,1,SNR JM┆ 0x09e0…0a00 50 20 50 53 45 55 44 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 ┆P PSEUD ┆ 0x0a00…0a20 20 20 20 3b 20 46 55 4e 44 45 54 21 20 0d 0a 49 4e 43 20 33 2c 33 20 0d 0a 49 4e 43 20 33 2c 33 ┆ ; FUNDET! INC 3,3 INC 3,3┆ 0x0a20…0a40 20 0d 0a 49 4e 43 20 33 2c 33 20 0d 0a 4c 44 41 20 32 2c 30 2c 33 20 20 0d 0a 4d 4f 56 20 23 20 ┆ INC 3,3 LDA 2,0,3 MOV # ┆ 0x0a40…0a60 32 2c 32 2c 53 5a 52 20 20 20 20 20 20 0d 0a 4a 4d 50 20 4c 4f 4f 50 31 20 20 20 20 20 20 20 20 ┆2,2,SZR JMP LOOP1 ┆ 0x0a60…0a80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 53 5c 47 20 4e 5b 53 54 45 20 ┆ ; SØG NÆSTE ┆ 0x0a80…0aa0 0d 0a 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 ┆ ┆ 0x0aa0…0ac0 20 20 20 20 20 20 20 3b 20 48 56 49 53 20 50 53 45 2d 49 4e 53 54 52 20 49 4b 4b 45 20 46 55 4e ┆ ; HVIS PSE-INSTR IKKE FUN┆ 0x0ac0…0ae0 44 45 54 20 53 4b 52 49 56 45 53 20 54 41 4c 4c 45 54 3a 20 0d 0a 54 41 4c 55 44 3a 20 0d 0a 20 ┆DET SKRIVES TALLET: TALUD: ┆ 0x0ae0…0b00 0d 0a 20 0d 0a 4c 44 41 20 30 2c 41 42 41 44 52 20 0d 0a 4c 44 41 20 31 2c 42 59 41 44 20 0d 0a ┆ LDA 0,ABADR LDA 1,BYAD ┆ 0x0b00…0b20 42 49 4e 44 45 43 20 0d 0a 4c 44 41 20 33 2c 42 59 41 44 20 0d 0a 4c 44 41 20 30 2c 30 2c 33 20 ┆BINDEC LDA 3,BYAD LDA 0,0,3 ┆ 0x0b20…0b40 0d 0a 4c 44 41 20 31 2c 2e 34 38 20 0d 0a 4c 44 41 20 32 2c 2e 32 35 35 20 0d 0a 4d 4f 56 53 20 ┆ LDA 1,.48 LDA 2,.255 MOVS ┆ 0x0b40…0b60 31 2c 31 20 0d 0a 41 44 44 20 32 2c 31 20 0d 0a 53 55 42 5a 20 23 20 31 2c 30 2c 53 5a 43 20 20 ┆1,1 ADD 2,1 SUBZ # 1,0,SZC ┆ 0x0b60…0b80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 43 3d 31 20 49 46 2f 4f 4e 4c 59 20 49 46 20 42 ┆ ; C=1 IF/ONLY IF B┆ 0x0b80…0ba0 59 31 20 3d 20 2e 34 38 0d 0a 4c 44 41 20 32 2c 2e 31 36 0d 0a 4d 4f 56 53 20 32 2c 32 20 0d 0a ┆Y1 = .48 LDA 2,.16 MOVS 2,2 ┆ 0x0ba0…0bc0 53 55 42 20 32 2c 30 20 0d 0a 53 54 41 20 30 2c 30 2c 33 20 0d 0a 4c 44 41 20 30 2c 42 59 41 44 ┆SUB 2,0 STA 0,0,3 LDA 0,BYAD┆ 0x0bc0…0be0 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 3f 20 0d 0a 4c 44 41 20 40 20 32 2c 5a 4f 4e 41 44 20 ┆ ; ? LDA @ 2,ZONAD ┆ 0x0be0…0c00 0d 0a 4f 55 54 54 45 58 54 20 0d 0a 4a 4d 50 20 4e 5b 53 54 45 20 0d 0a 20 20 20 20 20 20 20 20 ┆ OUTTEXT JMP NÆSTE ┆ 0x0c00…0c20 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 3b 20 41 ┆ ; A┆ 0x0c20…0c40 53 43 49 49 20 2d 20 54 45 47 4e 20 55 44 20 0d 0a 41 53 43 49 3a 20 0d 0a 0d 0a 4f 55 54 53 50 ┆SCII - TEGN UD ASCI: OUTSP┆ 0x0c40…0c60 0d 0a 4f 55 54 53 50 0d 0a 4c 44 41 20 40 20 32 2c 5a 4f 4e 41 44 0d 0a 4c 44 41 20 31 2c 41 41 ┆ OUTSP LDA @ 2,ZONAD LDA 1,AA┆ 0x0c60…0c80 44 52 0d 0a 4f 55 54 43 48 41 52 0d 0a 4c 44 41 20 31 2c 42 41 44 52 0d 0a 4f 55 54 43 48 41 52 ┆DR OUTCHAR LDA 1,BADR OUTCHAR┆ 0x0c80…0ca0 0d 0a 4f 55 54 53 50 0d 0a 0d 0a 4a 4d 50 20 4e 5b 53 54 45 0d 0a 0d 0a 50 53 45 55 44 3a 0d 0a ┆ OUTSP JMP NÆSTE PSEUD: ┆ 0x0ca0…0cc0 0d 0a 4d 4f 56 20 30 2c 33 0d 0a 49 4e 43 20 30 2c 30 0d 0a 4c 44 41 20 40 20 5a 4f 4e 41 44 0d ┆ MOV 0,3 INC 0,0 LDA @ ZONAD ┆ 0x0cc0…0ce0 0a 4f 55 54 54 45 58 54 0d 0a 4a 4d 50 20 4e 5b 53 54 45 0d 0a 0d 0a 5a 4f 4e 41 44 3a 20 4c 50 ┆ OUTTEXT JMP NÆSTE ZONAD: LP┆ 0x0ce0…0d00 5a 4f 4e 0d 0a 0d 0a 54 41 42 45 4c 3a 20 50 5a 4a 4d 50 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ZON TABEL: PZJMP ┆ 0x0d00…0d20 20 20 20 20 20 20 20 20 3b 20 48 20 55 20 53 20 4b 20 0d 0a 0d 0a 3b 20 50 4c 20 32 33 2e 33 2e ┆ ; H U S K ; PL 23.3.┆ 0x0d20…0d40 38 32 20 53 4c 55 54 0d 0a 0c 50 5a 4a 4d 50 3a 20 20 20 20 20 20 20 20 32 0d 0a 20 20 20 20 20 ┆82 SLUT PZJMP: 2 ┆ 0x0d40…0d60 20 20 20 20 20 20 20 20 20 20 2e 54 58 54 20 27 57 41 49 54 20 3c 30 3e 27 0d 0a 20 20 20 20 20 ┆ .TXT 'WAIT <0>' ┆ 0x0d60…0d80 20 20 20 20 33 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 54 58 54 20 27 57 41 49 54 49 ┆ 3 .TXT 'WAITI┆ 0x0d80…0da0 3c 30 3e 27 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 34 0d 0a 20 20 20 20 20 20 20 20 20 20 20 ┆<0>' 4 ┆ 0x0da0…0dc0 20 20 20 20 2e 54 58 54 20 27 53 45 4e 44 4d 3c 30 3e 27 0d 0a 20 20 20 20 20 20 20 20 20 20 20 ┆ .TXT 'SENDM<0>' ┆ 0x0dc0…0de0 20 35 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 54 58 54 20 27 57 41 49 54 41 3c 30 3e ┆ 5 .TXT 'WAITA<0>┆ 0x0de0…0e00 27 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 36 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆' 6 ┆ 0x0e00…0e20 2e 54 58 54 20 20 27 57 41 49 54 45 3c 30 3e 27 0d 0a 37 0d 0a 2e 54 58 54 20 27 53 45 4e 44 41 ┆.TXT 'WAITE<0>' 7 .TXT 'SENDA┆ 0x0e20…0e40 27 0d 0a 38 0d 0a 2e 54 58 54 20 27 53 45 41 52 43 27 0d 0a 39 0d 0a 2e 54 58 54 20 27 43 4c 45 ┆' 8 .TXT 'SEARC' 9 .TXT 'CLE┆ 0x0e40…0e60 41 4e 27 0d 0a 31 30 0d 0a 2e 54 58 54 20 27 42 52 45 41 4b 27 0d 0a 0d 0a 31 31 0d 0a 2e 54 58 ┆AN' 10 .TXT 'BREAK' 11 .TX┆ 0x0e60…0e80 54 20 27 53 54 4f 50 50 27 0d 0a 31 32 0d 0a 2e 54 58 54 20 27 53 54 41 52 54 27 0d 0a 31 33 0d ┆T 'STOPP' 12 .TXT 'START' 13 ┆ 0x0e80…0ea0 0a 2e 54 58 54 20 27 52 45 43 48 41 27 0d 0a 31 31 36 0d 0a 2e 54 58 54 20 27 4e 45 58 54 4f 27 ┆ .TXT 'RECHA' 116 .TXT 'NEXTO'┆ 0x0ea0…0ec0 0d 0a 31 31 37 0d 0a 2e 54 58 54 20 27 52 45 54 55 52 27 0d 0a 31 31 38 0d 0a 2e 54 58 54 20 27 ┆ 117 .TXT 'RETUR' 118 .TXT '┆ 0x0ec0…0ee0 43 4c 45 41 52 27 0d 0a 31 31 39 0d 0a 2e 54 58 54 20 27 57 41 49 54 4f 27 0d 0a 31 32 30 0d 0a ┆CLEAR' 119 .TXT 'WAITO' 120 ┆ 0x0ee0…0f00 2e 54 58 54 20 27 53 45 54 49 4e 27 0d 0a 31 32 31 0d 0a 2e 54 58 54 20 27 53 45 54 52 45 27 0d ┆.TXT 'SETIN' 121 .TXT 'SETRE' ┆ 0x0f00…0f20 0a 31 32 32 0d 0a 2e 54 58 54 20 27 53 45 54 43 4f 27 0d 0a 31 32 33 0d 0a 2e 54 58 54 20 27 43 ┆ 122 .TXT 'SETCO' 123 .TXT 'C┆ 0x0f20…0f40 4f 4e 42 59 27 0d 0a 31 32 34 0d 0a 2e 54 58 54 20 27 47 45 54 42 59 27 0d 0a 31 32 35 0d 0a 2e ┆ONBY' 124 .TXT 'GETBY' 125 .┆ 0x0f40…0f60 54 58 54 20 27 50 55 54 42 59 27 0d 0a 31 32 36 0d 0a 2e 54 58 54 20 27 4d 55 4c 54 49 27 0d 0a ┆TXT 'PUTBY' 126 .TXT 'MULTI' ┆ 0x0f60…0f80 31 32 37 0d 0a 2e 54 58 54 20 27 44 49 56 49 44 27 0d 0a 31 32 38 0d 0a 2e 54 58 54 20 27 47 45 ┆127 .TXT 'DIVID' 128 .TXT 'GE┆ 0x0f80…0fa0 54 52 45 27 0d 0a 31 32 39 0d 0a 2e 54 58 54 20 27 50 55 54 52 45 27 0d 0a 31 33 30 0d 0a 2e 54 ┆TRE' 129 .TXT 'PUTRE' 130 .T┆ 0x0fa0…0fc0 58 54 20 27 57 41 49 54 54 27 0d 0a 31 33 31 0d 0a 2e 54 58 54 20 27 52 45 50 45 41 27 0d 0a 31 ┆XT 'WAITT' 131 .TXT 'REPEA' 1┆ 0x0fc0…0fe0 33 32 0d 0a 2e 54 58 54 20 27 54 52 41 4e 53 27 0d 0a 31 33 33 0d 0a 2e 54 58 54 20 27 49 4e 42 ┆32 .TXT 'TRANS' 133 .TXT 'INB┆ 0x0fe0…1000 4c 4f 27 0d 0a 31 33 34 0d 0a 2e 54 58 54 20 27 4f 55 54 42 4c 27 0d 0a 31 33 35 0d 0a 2e 54 58 ┆LO' 134 .TXT 'OUTBL' 135 .TX┆ 0x1000…1020 54 20 27 49 4e 43 48 41 27 0d 0a 31 33 36 0d 0a 2e 54 58 54 20 27 46 52 45 45 53 27 0d 0a 31 33 ┆T 'INCHA' 136 .TXT 'FREES' 13┆ 0x1020…1040 37 0d 0a 2e 54 58 54 20 27 4f 55 54 53 50 27 0d 0a 31 33 38 0d 0a 2e 54 58 54 20 27 4f 55 54 43 ┆7 .TXT 'OUTSP' 138 .TXT 'OUTC┆ 0x1040…1060 48 27 0d 0a 31 33 39 0d 0a 2e 54 58 54 20 27 4f 55 54 4e 4c 27 0d 0a 31 34 30 0d 0a 2e 54 58 54 ┆H' 139 .TXT 'OUTNL' 140 .TXT┆ 0x1060…1080 20 27 4f 55 54 45 4e 27 0d 0a 31 34 31 0d 0a 2e 54 58 54 20 27 4f 55 54 54 45 27 0d 0a 31 34 32 ┆ 'OUTEN' 141 .TXT 'OUTTE' 142┆ 0x1080…10a0 0d 0a 2e 54 58 54 20 27 4f 55 54 4f 43 27 0d 0a 31 34 33 0d 0a 2e 54 58 54 20 27 53 45 54 50 4f ┆ .TXT 'OUTOC' 143 .TXT 'SETPO┆ 0x10a0…10c0 27 0d 0a 31 34 34 0d 0a 2e 54 58 54 20 27 43 4c 4f 53 45 27 0d 0a 31 34 35 0d 0a 2e 54 58 54 20 ┆' 144 .TXT 'CLOSE' 145 .TXT ┆ 0x10c0…10e0 27 4f 50 45 4e 20 27 0d 0a 31 34 36 0d 0a 2e 54 58 54 20 27 57 41 49 54 5a 27 0d 0a 31 34 37 0d ┆'OPEN ' 146 .TXT 'WAITZ' 147 ┆ 0x10e0…1100 0a 2e 54 58 54 20 27 49 4e 4e 41 4d 27 0d 0a 31 34 38 0d 0a 2e 54 58 54 20 27 4d 4f 56 45 20 27 ┆ .TXT 'INNAM' 148 .TXT 'MOVE '┆ 0x1100…1120 0d 0a 31 34 39 0d 0a 2e 54 58 54 20 27 49 4e 54 50 52 27 0d 0a 31 35 30 0d 0a 2e 54 58 54 20 27 ┆ 149 .TXT 'INTPR' 150 .TXT '┆ 0x1120…1140 49 4e 54 47 49 27 0d 0a 31 35 32 0d 0a 2e 54 58 54 20 27 49 4e 54 42 52 27 0d 0a 31 35 36 0d 0a ┆INTGI' 152 .TXT 'INTBR' 156 ┆ 0x1140…1160 2e 54 58 54 20 27 4d 5a 53 54 41 27 0d 0a 31 35 37 0d 0a 2e 54 58 54 20 27 49 52 45 54 55 27 0d ┆.TXT 'MZSTA' 157 .TXT 'IRETU' ┆ 0x1160…1180 0a 31 35 38 0d 0a 2e 54 58 54 20 27 54 41 4b 45 41 27 0d 0a 31 35 39 0d 0a 2e 54 58 54 20 27 54 ┆ 158 .TXT 'TAKEA' 159 .TXT 'T┆ 0x1180…11a0 41 4b 45 56 27 0d 0a 32 31 38 0d 0a 2e 54 58 54 20 27 4e 45 57 43 41 27 0d 0a 32 31 39 0d 0a 2e ┆AKEV' 218 .TXT 'NEWCA' 219 .┆ 0x11a0…11c0 54 58 54 20 27 46 52 45 45 43 27 0d 0a 32 32 30 0d 0a 2e 54 58 54 20 27 43 44 45 4c 41 27 0d 0a ┆TXT 'FREEC' 220 .TXT 'CDELA' ┆ 0x11c0…11e0 32 32 31 0d 0a 2e 54 58 54 20 27 57 41 49 54 53 27 0d 0a 32 32 32 0d 0a 2e 54 58 54 20 27 57 41 ┆221 .TXT 'WAITS' 222 .TXT 'WA┆ 0x11e0…1200 49 54 43 27 0d 0a 32 32 33 0d 0a 2e 54 58 54 20 27 43 57 41 4e 53 27 0d 0a 32 32 34 0d 0a 2e 54 ┆ITC' 223 .TXT 'CWANS' 224 .T┆ 0x1200…1220 58 54 20 27 43 54 45 53 54 27 0d 0a 32 32 35 0d 0a 2e 54 58 54 20 27 43 50 52 49 4e 27 0d 0a 32 ┆XT 'CTEST' 225 .TXT 'CPRIN' 2┆ 0x1220…1240 32 36 0d 0a 2e 54 58 54 20 27 43 54 4f 55 54 27 0d 0a 32 32 37 0d 0a 2e 54 58 54 20 27 53 49 47 ┆26 .TXT 'CTOUT' 227 .TXT 'SIG┆ 0x1240…1260 4e 41 27 0d 0a 32 32 38 0d 0a 2e 54 58 54 20 27 53 49 47 43 48 27 0d 0a 32 32 39 0d 0a 2e 54 58 ┆NA' 228 .TXT 'SIGCH' 229 .TX┆ 0x1260…1280 54 20 27 43 50 41 53 53 27 0d 0a 32 33 30 0d 0a 2e 54 58 54 20 27 43 52 45 41 54 27 0d 0a 32 33 ┆T 'CPASS' 230 .TXT 'CREAT' 23┆ 0x1280…12a0 31 0d 0a 2e 54 58 54 20 27 4c 4f 4f 4b 55 27 0d 0a 32 33 32 0d 0a 2e 54 58 54 20 27 43 48 41 4e ┆1 .TXT 'LOOKU' 232 .TXT 'CHAN┆ 0x12a0…12c0 47 27 0d 0a 32 33 33 0d 0a 2e 54 58 54 20 27 52 45 4d 4f 56 27 0d 0a 32 33 34 0d 0a 2e 54 58 54 ┆G' 233 .TXT 'REMOV' 234 .TXT┆ 0x12c0…12e0 20 27 49 4e 49 54 43 27 0d 0a 32 33 35 0d 0a 2e 54 58 54 20 27 53 45 54 45 4e 27 0d 0a 32 33 36 ┆ 'INITC' 235 .TXT 'SETEN' 236┆ 0x12e0…1300 0d 0a 2e 54 58 54 20 27 43 4f 4d 4f 4e 27 0d 0a 32 33 37 0d 0a 2e 54 58 54 20 27 43 41 4c 4c 20 ┆ .TXT 'COMON' 237 .TXT 'CALL ┆ 0x1300…1320 27 0d 0a 32 33 38 0d 0a 2e 54 58 54 20 27 47 4f 54 4f 20 27 0d 0a 32 33 39 0d 0a 2e 54 58 54 20 ┆' 238 .TXT 'GOTO ' 239 .TXT ┆ 0x1320…1340 27 47 45 54 41 44 27 0d 0a 32 34 30 0d 0a 2e 54 58 54 20 27 47 45 54 50 4f 27 0d 0a 32 34 34 0d ┆'GETAD' 240 .TXT 'GETPO' 244 ┆ 0x1340…1360 0a 2e 54 58 54 20 27 43 53 45 4e 44 27 0d 0a 32 34 35 0d 0a 2e 54 58 54 20 27 53 49 47 47 45 27 ┆ .TXT 'CSEND' 245 .TXT 'SIGGE'┆ 0x1360…1380 0d 0a 32 34 36 0d 0a 2e 54 58 54 20 27 57 41 49 54 47 27 0d 0a 30 0d 0a 30 0d 0a 30 0d 0a 30 0d ┆ 246 .TXT 'WAITG' 0 0 0 0 ┆ 0x1380…13a0 0a 30 0d 0a 30 0d 0a 0c 4c 50 5a 4f 4e 3a 2e 54 58 54 20 20 27 4c 50 54 3c 30 3e 3c 30 3e 27 20 ┆ 0 0 LPZON:.TXT 'LPT<0><0>' ┆ 0x13a0…13c0 20 20 20 20 20 20 20 20 20 20 20 3b 5a 4e 41 4d 45 20 20 0d 0a 20 20 20 20 20 20 5a 20 20 20 20 ┆ ;ZNAME Z ┆ 0x13c0…13e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 53 49 5a 45 20 20 0d 0a 20 20 20 ┆ ;SIZE ┆ 0x13e0…1400 20 20 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 5a 4d 4f ┆ 0 ;ZMO┆ 0x1400…1420 44 45 20 20 0d 0a 20 20 20 20 20 20 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DE 1 ┆ 0x1420…1440 20 20 20 20 20 3b 5a 4b 49 4e 44 20 20 0d 0a 20 20 20 20 20 20 36 35 35 33 35 20 20 20 20 20 20 ┆ ;ZKIND 65535 ┆ 0x1440…1460 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 5a 4d 41 53 4b 20 20 0d 0a 20 20 20 20 20 20 44 45 ┆ ;ZMASK DE┆ 0x1460…1480 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 47 49 56 45 20 20 0d 0a ┆AD ;GIVE ┆ 0x1480…14a0 20 20 20 20 20 20 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b ┆ 1 ;┆ 0x14a0…14c0 5a 46 49 4c 45 20 20 0d 0a 20 20 20 20 20 20 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ZFILE 1 ┆ 0x14c0…14e0 20 20 20 20 20 20 20 20 3b 5a 42 4c 4f 43 20 20 0d 0a 20 20 20 20 20 20 30 20 20 20 20 20 20 20 ┆ ;ZBLOC 0 ┆ 0x14e0…1500 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 5a 43 4f 4e 56 20 20 0d 0a 20 20 20 20 20 ┆ ;ZCONV ┆ 0x1500…1520 20 4c 50 53 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 5a 42 55 46 46 ┆ LPS0 ;ZBUFF┆ 0x1520…1540 20 20 0d 0a 20 20 20 20 20 20 37 33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 73 ┆ 0x1540…1560 20 20 20 3b 5a 53 49 5a 45 20 28 31 33 32 2f 32 2b 53 53 49 5a 45 29 20 20 0d 0a 20 20 20 20 20 ┆ ;ZSIZE (132/2+SSIZE) ┆ 0x1560…1580 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 5a 46 4f 52 4d ┆ 0 ;ZFORM┆ 0x1580…15a0 20 20 0d 0a 20 20 20 20 20 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 0 ┆ 0x15a0…15c0 20 20 20 3b 5a 4c 45 4e 47 20 20 0d 0a 20 20 20 20 20 20 4c 50 42 30 2a 32 20 20 20 20 20 20 20 ┆ ;ZLENG LPB0*2 ┆ 0x15c0…15e0 20 20 20 20 20 20 20 20 20 20 20 20 3b 5a 46 49 52 53 20 20 0d 0a 20 20 20 20 20 20 4c 50 42 30 ┆ ;ZFIRS LPB0┆ 0x15e0…1600 2a 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 5a 54 4f 50 20 20 0d 0a 20 20 ┆*2 ;ZTOP ┆