|
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: »TEST_PASS_RANDOMS.TYP«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »TEST_PASS_RANDOMS.TYP«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »TEST_PASS_RANDOMS.TYP«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »TEST_PASS_RANDOMS.TYP«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 85028302d73e7dae (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 36 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 PASS_RANDOMS_PASS
; P11OF1 TESTING_B_SIDE
12 R2_:
12 25 .DATA 0x25
13 R3_:
13 2d .DATA 0x2d
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 43 .CODE 0x43
19 6d .CODE 0x6d
1a 52 .CODE 0x52
1b 04 .DATA 0x4
1c 2f .DATA 0x2f
1d e0 .DATA 0xe0
1e ff .DATA 0xff
1f bf .DATA 0xbf
20 0d .DATA 0xd
21 00 .DATA 0x0
22 00 .DATA 0x0
23 00 .DATA 0x0
24 00 .DATA 0x0
25 00 .DATA 0x0 ; P25OS8 EXPECT
26 00 .DATA 0x0
27 00 .DATA 0x0
28 00 .DATA 0x0
29 00 .DATA 0x0
2a 00 .DATA 0x0
2b 00 .DATA 0x0
2c 00 .DATA 0x0
2d 00 .DATA 0x0 ; P2DOS8 RESULT
2e 00 .DATA 0x0
2f 00 .DATA 0x0
30 00 .DATA 0x0
31 00 .DATA 0x0
32 00 .DATA 0x0
33 00 .DATA 0x0
34 00 .DATA 0x0
35 00 .DATA 0x0
36 EXPERIMENT:
36 18 CALL 0x43
37 91 0c 4f 1b MOV.W #0x0c4f,0x1b
3b 18 CALL 0x43
3c 91 14 6f 1b MOV.W #0x146f,0x1b
40 18 CALL 0x43
41 64 SET PT
42 5c END
43 ; --------------------------------------------------------------------------------------
43 ; Subroutine
43 ; --------------------------------------------------------------------------------------
43 8f e9 1d MOV #0xe9,0x1d
46 19 CALL 0x6d
47 bc 5b FSM {5b}
49 6a CLR PX
4a 1a CALL 0x52
4b 8f ea 1d MOV #0xea,0x1d
4e 19 CALL 0x6d
4f bc 5c FSM {5c}
51 66 SET PX
52 ; --------------------------------------------------------------------------------------
52 ; Subroutine
52 ; --------------------------------------------------------------------------------------
52 da 32 25 39 CHN_RCV {TV.WDR:39},0x25
56 ae 88 25 VINV [0x8],0x25
59 b0 84 21 29 VAND [0x4],0x21,0x29
5d bc 13 FSM {13}
5f d2 00 3b FSM_8X #0x00,{3b}
62 bc 5b FSM {5b}
64 da 33 39 CHN_RCV {TV.WDR:39},@R3
67 af 88 VINV [0x8],R3
69 b1 28 42 VJMP NE,[0x8],R2,R3,0x42
6c 2c RET
6d ; --------------------------------------------------------------------------------------
6d ; Subroutine
6d ; --------------------------------------------------------------------------------------
6d c8 ff ff 2b WFSM.W #0xffff,{2b}
71 da 50 1b 3b CHN_SND 0x1b,{T.UIR:3b}
75 bc 4b FSM {4b}
77 2c RET
P11OF0 PASS_RANDOMS_PASS\r P11OF1 TESTING_B_SIDE\r P25OS8 EXPECT\r P2DOS8 RESULT\r \r 36\r 00\r 25\r 2D\r 00\r 00\r 00\r 00\r \r 43\r 6D\r 52\r 04\r 2F\r E0\r FF\r BF\r 0D\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 91\r 0C\r 4F\r 1B\r 18\r 91\r 14\r 6F\r 1B\r 18\r 64\r 5C\r 8F\r E9\r 1D\r 19\r BC\r 5B\r 6A\r 1A\r 8F\r EA\r 1D\r 19\r BC\r 5C\r 66\r DA\r 32\r 25\r 39\r AE\r 88\r 25\r B0\r 84\r 21\r 29\r BC\r 13\r D2\r 00\r 3B\r BC\r 5B\r DA\r 33\r 39\r AF\r 88\r B1\r 28\r 42\r 2C\r C8\r FF\r FF\r 2B\r DA\r 50\r 1B\r 3B\r BC\r 4B\r 2C\r «nul»