|
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: 435 (0x1b3)
Types: SEQ, TextFile
Names: »CUR_INSTR_IBUFF_1_FRU.SEQ«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »CUR_INSTR_IBUFF_1_FRU.SEQ«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »CUR_INSTR_IBUFF_1_FRU.SEQ«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 1b27c64461031980 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 35 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 CUR_INSTR1_PASSED
12 R2_:
12 19 .DATA 0x19
13 R3_:
13 3d .DATA 0x3d
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 66 .CODE 0x66
19 ff .DATA 0xff ; P19OS8 EXPECTED.TYP
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 ; P21OS8 EXPECTED.VAL
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 08 .DATA 0x8 ; P29OS1 INDEX
2a 02 .DATA 0x2 ; P2AOS1 BIT_COUNTER
2b 00 .DATA 0x0
2c 00 .DATA 0x0
2d 00 .DATA 0x0
2e 30 .DATA 0x30
2f 00 .DATA 0x0 ; P2FOS8 IBUFF.TYP
30 00 .DATA 0x0
31 03 .DATA 0x3
32 00 .DATA 0x0
33 40 .DATA 0x40
34 00 .DATA 0x0
35 EXPERIMENT:
35 da b0 2f 42 CHN_SND 0x2f,{S.DECODER:42} ; P37OS8 IBUFF.VAL
39 18 CALL 0x66
3a 86 28 DEC 0x28
3c 91 00 52 2d MOV.W #0x0052,0x2d
40 70 19 LD R2,0x19
42 18 CALL 0x66
43 8f 3a 2b MOV #0x3a,0x2b
46 91 01 00 2d MOV.W #0x0100,0x2d
4a 18 CALL 0x66
4b bc 3e FSM {3e}
4d da 92 2f 30 CHN_RCV {S.TYPVAL:30},0x2f
51 b1 22 65 VJMP NE,[0x2],R2,R3,0x65
54 74 INC R2
55 74 INC R2
56 54 29 4a DJNZ 0x29,0x4a
59 8f 08 29 MOV #0x08,0x29
5c 8f 51 2e MOV #0x51,0x2e
5f 8a 2b INV 0x2b
61 54 2a 40 DJNZ 0x2a,0x40
64 64 SET PT
65 5c END
66 ; --------------------------------------------------------------------------------------
66 ; Subroutine
66 ; --------------------------------------------------------------------------------------
66 da a0 29 41 CHN_SND 0x29,{S.UIR:41}
6a 10 REPEAT #0x10
6b c4 ff 43 WFSM.L #0xff,{43}
6e 16 UNTIL
6f da 91 40 CHN_SND @R2,{S.TYPVAL:40}
72 bc 66 FSM {66}
74 2c RET
P11OF0 CUR_INSTR1_PASSED P19OS8 EXPECTED.TYP P21OS8 EXPECTED.VAL P2FOS8 IBUFF.TYP P37OS8 IBUFF.VAL P2AOS1 BIT_COUNTER P29OS1 INDEX 35 00 19 3D 00 00 00 00 66 FF BF FF EF FF FB FF FE BF FF EF FF FB FF FE 00 08 02 00 00 00 30 00 00 03 00 40 00 DA B0 2F 42 18 86 28 91 00 52 2D 70 19 18 8F 3A 2B 91 01 00 2D 18 BC 3E DA 92 2F 30 B1 22 65 74 74 54 29 4A 8F 08 29 8F 51 2E 8A 2B 54 2A 40 64 5C DA A0 29 41 10 C4 FF 43 16 DA 91 40 BC 66 2C