|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 DFS Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 DFS Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 1024 (0x400)
Types: SEQ, TextFile
Names: »PREP_CUR_INSTR_BH.SEQ«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »PREP_CUR_INSTR_BH.SEQ«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »PREP_CUR_INSTR_BH.SEQ«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »PREP_CUR_INSTR_BH.SEQ«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 577dbd4537612733 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 34 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0
12 R2_:
12 19 .DATA 0x19
13 R3_:
13 18 .DATA 0x18
14 R4_:
14 00 .DATA 0x0
15 R5_:
15 00 .DATA 0x0
16 R6_:
16 00 .DATA 0x0
17 R7_:
17 00 .DATA 0x0
18 41 .CODE 0x41
19 ff .DATA 0xff
1a bf .DATA 0xbf
1b ff .DATA 0xff
1c ef .DATA 0xef
1d ff .DATA 0xff
1e fb .DATA 0xfb
1f ff .DATA 0xff
20 fe .DATA 0xfe
21 bf .DATA 0xbf
22 ff .DATA 0xff
23 ef .DATA 0xef
24 ff .DATA 0xff
25 fb .DATA 0xfb
26 ff .DATA 0xff
27 fe .DATA 0xfe
28 00 .DATA 0x0
29 00 .DATA 0x0
2a 00 .DATA 0x0
2b 00 .DATA 0x0
2c 00 .DATA 0x0
2d 00 .DATA 0x0
2e 30 .DATA 0x30
2f 00 .DATA 0x0
30 00 .DATA 0x0
31 03 .DATA 0x3
32 00 .DATA 0x0
33 40 .DATA 0x40
34 EXPERIMENT:
34 da b0 2f 42 CHN_SND 0x2f,{S.DECODER:42}
38 18 CALL 0x41
39 86 28 DEC 0x28
3b 91 00 52 2d MOV.W #0x0052,0x2d
3f 18 CALL 0x41
40 5c END
41 ; --------------------------------------------------------------------------------------
41 ; Subroutine
41 ; --------------------------------------------------------------------------------------
41 da a0 29 41 CHN_SND 0x29,{S.UIR:41}
45 da 91 40 CHN_SND @R2,{S.TYPVAL:40}
48 10 REPEAT #0x10
49 c4 ff 43 WFSM.L #0xff,{43}
4c 16 UNTIL
4d bc 66 FSM {66}
4f 2c RET
34 00 19 18 00 00 00 00 41 FF BF FF EF FF FB FF FE BF FF EF FF FB FF FE 00 00 00 00 00 00 30 00 00 03 00 40 DA B0 2F 42 18 86 28 91 00 52 2D 18 5C DA A0 29 41 DA 91 40 10 C4 FF 43 16 BC 66 2C«nul»