|
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: FIU, TextFile
Names: »PAUSE_ABUS.FIU«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »PAUSE_ABUS.FIU«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »PAUSE_ABUS.FIU«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »PAUSE_ABUS.FIU«
10 ; --------------------------------------------------------------------------------------
10 ; Hash a2538be6f05f7cb4 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 2a .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 PASS_ABUS_PARITY
; P11OF1 PARITY_OK
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 52 .CODE 0x52
19 00 .DATA 0x0
1a 3f .DATA 0x3f
1b c3 .DATA 0xc3
1c 2e .DATA 0x2e
1d 7e .DATA 0x7e
1e 03 .DATA 0x3
1f 00 .DATA 0x0 ; P1FOS1 DATA.SPACE
20 00 .DATA 0x0 ; P20OS4 DATA.NAME
21 00 .DATA 0x0
22 00 .DATA 0x0
23 00 .DATA 0x0
24 00 .DATA 0x0 ; P24OS4 DATA.OFFSET
25 00 .DATA 0x0
26 00 .DATA 0x0
27 01 .DATA 0x1
28 8c .DATA 0x8c
29 00 .DATA 0x0
2a EXPERIMENT:
2a da 70 21 10 CHN_SND 0x21,{F.MDREG:10}
2e da 80 19 13 CHN_SND 0x19,{F.UIR:13}
32 bc 54 FSM {54}
34 00 43 REPEAT #0x43
36 da 60 1f 18 CHN_SND 0x1f,{F.MAR:18}
3a d2 ff 50 FSM_8X #0xff,{50}
3d bc 60 FSM {60}
3f 60 PAUSE
40 18 CALL 0x52
41 3e 51 JMP NPX,0x51
43 d2 ff 50 FSM_8X #0xff,{50}
46 bc 61 FSM {61}
48 60 PAUSE
49 18 CALL 0x52
4a 3a 51 JMP PX,0x51
4c a6 09 1f LEFT.0 #0x1,0x1f,[0x9]
4f 16 UNTIL
50 64 SET PT
51 5c END
52 ; --------------------------------------------------------------------------------------
52 ; Subroutine
52 ; --------------------------------------------------------------------------------------
52 d4 08 51 29 RCV_P1 #0x08,{51},0x29
56 97 10 29 AND #0x10,0x29
59 66 SET PX
5a 46 29 5e JMP NZ,0x29,0x5e
5d 6a CLR PX
5e 2c RET
P11OF0 PASS_ABUS_PARITY\r P11OF1 PARITY_OK\r P1FOS1 DATA.SPACE\r P20OS4 DATA.NAME\r P24OS4 DATA.OFFSET\r \r 2A\r 00\r 18\r 18\r 00\r 00\r 00\r 00\r \r 52\r 00\r 3F\r C3\r 2E\r 7E\r 03\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 01\r 8C\r 00\r DA\r 70\r 21\r 10\r DA\r 80\r 19\r 13\r BC\r 54\r 00\r 43\r DA\r 60\r 1F\r 18\r D2\r FF\r 50\r BC\r 60\r 60\r 18\r 3E\r 51\r D2\r FF\r 50\r BC\r 61\r 60\r 18\r 3A\r 51\r A6\r 09\r 1F\r 16\r 64\r 5C\r D4\r 08\r 51\r 29\r 97\r 10\r 29\r 66\r 46\r 29\r 5E\r 6A\r 2C\r «nul»