|
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 - metrics - download
Length: 1024 (0x400)
Types: SEQ, TextFile
Names: »PREP_CUR_INSTR_BH_LW.SEQ«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─⟦this⟧ »PREP_CUR_INSTR_BH_LW.SEQ«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─⟦this⟧ »PREP_CUR_INSTR_BH_LW.SEQ«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─⟦this⟧ »PREP_CUR_INSTR_BH_LW.SEQ«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 536860908571f00b (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 1f .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0
12 R2_:
12 18 .DATA 0x18
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 50 .CODE 0x50
19 00 .DATA 0x0
1a 00 .DATA 0x0
1b 00 .DATA 0x0
1c 00 .DATA 0x0
1d 00 .DATA 0x0
1e 00 .DATA 0x0
1f EXPERIMENT:
1f c4 00 59 WFSM.L #0x00,{59}
22 c4 00 58 WFSM.L #0x00,{58}
25 8f 3a 1b MOV #0x3a,0x1b
28 18 CALL 0x50
29 18 CALL 0x50
2a 8f 32 1b MOV #0x32,0x1b
2d 8f 39 1c MOV #0x39,0x1c
30 18 CALL 0x50
31 18 CALL 0x50
32 8f 0e 1b MOV #0x0e,0x1b
35 8f 01 1d MOV #0x01,0x1d
38 18 CALL 0x50
39 8f 3a 1b MOV #0x3a,0x1b
3c 18 CALL 0x50
3d 8f 00 1d MOV #0x00,0x1d
40 8f 32 1b MOV #0x32,0x1b
43 8f 39 1c MOV #0x39,0x1c
46 18 CALL 0x50
47 18 CALL 0x50
48 8f 0e 1b MOV #0x0e,0x1b
4b 8f 01 1d MOV #0x01,0x1d
4e 18 CALL 0x50
4f 5c END
50 ; --------------------------------------------------------------------------------------
50 ; Subroutine
50 ; --------------------------------------------------------------------------------------
50 da a0 19 41 CHN_SND 0x19,{S.UIR:41}
54 bc 4a FSM {4a}
56 2c RET
1F 00 18 18 00 00 00 00 50 00 00 00 00 00 00 C4 00 59 C4 00 58 8F 3A 1B 18 18 8F 32 1B 8F 39 1C 18 18 8F 0E 1B 8F 01 1D 18 8F 3A 1B 18 8F 00 1D 8F 32 1B 8F 39 1C 18 18 8F 0E 1B 8F 01 1D 18 5C DA A0 19 41 BC 4A 2C«nul»