|
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: TYP, TextFile
Names: »PAUSE_BOT.TYP«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »PAUSE_BOT.TYP«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »PAUSE_BOT.TYP«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »PAUSE_BOT.TYP«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 9bdc0e53d2ebfa12 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 3b .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 LOAD_BOT_PASSED
; P11OF1 BOT_REG_WRONG
12 R2_:
12 29 .DATA 0x29
13 R3_:
13 32 .DATA 0x32
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 6f .CODE 0x6f
19 53 .CODE 0x53
1a 41 .DATA 0x41
1b 5f .DATA 0x5f
1c e0 .DATA 0xe0
1d a7 .DATA 0xa7
1e ff .DATA 0xff
1f 0b .DATA 0xb
20 00 .DATA 0x0 ; P20OS8 EXPECT_TOP
21 00 .DATA 0x0
22 00 .DATA 0x0
23 00 .DATA 0x0
24 00 .DATA 0x0
25 00 .DATA 0x0
26 00 .DATA 0x0
27 00 .DATA 0x0
28 00 .DATA 0x0
29 00 .DATA 0x0 ; P29OS8 EXPECT_BOT
2a 00 .DATA 0x0
2b 00 .DATA 0x0
2c 00 .DATA 0x0
2d 00 .DATA 0x0
2e 00 .DATA 0x0
2f 00 .DATA 0x0
30 00 .DATA 0x0
31 00 .DATA 0x0
32 00 .DATA 0x0 ; P32OS8 RESULT
33 00 .DATA 0x0
34 00 .DATA 0x0
35 00 .DATA 0x0
36 00 .DATA 0x0
37 00 .DATA 0x0
38 00 .DATA 0x0
39 00 .DATA 0x0
3a 00 .DATA 0x0
3b EXPERIMENT:
3b 18 CALL 0x6f
3c bc 5b FSM {5b}
3e da 32 20 39 CHN_RCV {TV.WDR:39},0x20
42 bc 5c FSM {5c}
44 da 32 29 39 CHN_RCV {TV.WDR:39},0x29
48 02 REPEAT #0x02
49 86 30 DEC 0x30
4b 99 fc 0f 2f AND.W #0xfc0f,0x2f
4f 19 CALL 0x53
50 16 UNTIL
51 64 SET PT
52 5c END
53 ; --------------------------------------------------------------------------------------
53 ; Subroutine
53 ; --------------------------------------------------------------------------------------
53 d2 ff 43 FSM_8X #0xff,{43}
56 18 CALL 0x6f
57 bc 13 FSM {13}
59 60 PAUSE
5a 6a CLR PX
5b bc 5b FSM {5b}
5d da 33 39 CHN_RCV {TV.WDR:39},@R3
60 b0 28 20 32 52 VJMP NE,[0x8],0x20,0x32,0x52
65 66 SET PX
66 bc 5c FSM {5c}
68 da 33 39 CHN_RCV {TV.WDR:39},@R3
6b b1 28 52 VJMP NE,[0x8],R2,R3,0x52
6e 2c RET
6f ; --------------------------------------------------------------------------------------
6f ; Subroutine
6f ; --------------------------------------------------------------------------------------
6f c8 ff ff 2b WFSM.W #0xffff,{2b}
73 da 50 1a 3b CHN_SND 0x1a,{T.UIR:3b}
77 bc 4b FSM {4b}
79 2c RET
P11OF0 LOAD_BOT_PASSED\r P11OF1 BOT_REG_WRONG\r P20OS8 EXPECT_TOP\r P29OS8 EXPECT_BOT\r P32OS8 RESULT\r \r 3B\r 00\r 29\r 32\r 00\r 00\r 00\r 00\r \r 6F\r 53\r 41\r 5F\r E0\r A7\r FF\r 0B\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 18\r BC\r 5B\r DA\r 32\r 20\r 39\r BC\r 5C\r DA\r 32\r 29\r 39\r 02\r 86\r 30\r 99\r FC\r 0F\r 2F\r 19\r 16\r 64\r 5C\r D2\r FF\r 43\r 18\r BC\r 13\r 60\r 6A\r BC\r 5B\r DA\r 33\r 39\r B0\r 28\r 20\r 32\r 52\r 66\r BC\r 5C\r DA\r 33\r 39\r B1\r 28\r 52\r 2C\r C8\r FF\r FF\r 2B\r DA\r 50\r 1A\r 3B\r BC\r 4B\r 2C\r «nul»