|
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: 220 (0xdc)
Types: TYP, TextFile, VAL
Names: »TEST_SCAN_PAREG.TYP«, »TEST_SCAN_PAREG.VAL«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »TEST_SCAN_PAREG.TYP«
└─ ⟦this⟧ »TEST_SCAN_PAREG.VAL«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »TEST_SCAN_PAREG.TYP«
└─ ⟦this⟧ »TEST_SCAN_PAREG.VAL«
10 ; --------------------------------------------------------------------------------------
10 ; Hash c3bbcf2edb0d7311 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 1b .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 SCAN_PAREG_PASS
12 R2_:
12 1a .DATA 0x1a
13 R3_:
13 19 .DATA 0x19
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 2c .CODE 0x2c
19 00 .DATA 0x0 ; P19OS1 RESULT
1a ff .DATA 0xff ; P1AOS1 EXPECTED
1b EXPERIMENT:
1b d8 FSM2
1c 18 CALL 0x2c
1d 8a 1a INV 0x1a
1f 18 CALL 0x2c
20 82 1a INC 0x1a
22 18 CALL 0x2c
23 00 07 REPEAT #0x07
25 a6 01 1a LEFT.0 #0x1,0x1a,[0x1]
28 18 CALL 0x2c
29 16 UNTIL
2a 64 SET PT
2b 5c END
2c ; --------------------------------------------------------------------------------------
2c ; Subroutine
2c ; --------------------------------------------------------------------------------------
2c d0 1a 40 FSM_8X 0x1a,{40}
2f d4 08 41 19 RCV_P1 #0x08,{41},0x19
33 4e 19 1a 2b JMP NE,0x19,0x1a,0x2b
37 2c RET
P11OF0 SCAN_PAREG_PASS\r P19OS1 RESULT\r P1AOS1 EXPECTED\r \r 1B\r 00\r 1A\r 19\r 00\r 00\r 00\r 00\r \r 2C\r 00\r FF\r D8\r 18\r 8A\r 1A\r 18\r 82\r 1A\r 18\r 00\r 07\r A6\r 01\r 1A\r 18\r 16\r 64\r 5C\r D0\r 1A\r 40\r D4\r 08\r 41\r 19\r 4E\r 19\r 1A\r 2B\r 2C\r