|
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: TextFile, VAL
Names: »TEST_NOT_B_OP.VAL«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »TEST_NOT_B_OP.VAL«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »TEST_NOT_B_OP.VAL«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »TEST_NOT_B_OP.VAL«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 47a640d527d4b2fb (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 30 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 V_NOT_B_OP_PASS
12 R2_:
12 22 .DATA 0x22
13 R3_:
13 1a .DATA 0x1a
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 42 .CODE 0x42
19 5a .CODE 0x5a
1a c9 .DATA 0xc9 ; P1AOS8 EXPECT
1b 36 .DATA 0x36
1c c9 .DATA 0xc9
1d 36 .DATA 0x36
1e c9 .DATA 0xc9
1f 36 .DATA 0x36
20 c9 .DATA 0xc9
21 36 .DATA 0x36
22 00 .DATA 0x0 ; P22OS8 RESULT
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
2a 00 .DATA 0x0
2b 04 .DATA 0x4
2c 3f .DATA 0x3f
2d ff .DATA 0xff
2e 07 .DATA 0x7
2f d7 .DATA 0xd7
30 EXPERIMENT:
30 18 CALL 0x42
31 19 CALL 0x5a
32 8f 5f 2c MOV #0x5f,0x2c
35 18 CALL 0x42
36 19 CALL 0x5a
37 8f 4f 2c MOV #0x4f,0x2c
3a 18 CALL 0x42
3b 19 CALL 0x5a
3c 8f 6f 2c MOV #0x6f,0x2c
3f 18 CALL 0x42
40 64 SET PT
41 5c END
42 ; --------------------------------------------------------------------------------------
42 ; Subroutine
42 ; --------------------------------------------------------------------------------------
42 da 40 2b 3b CHN_SND 0x2b,{V.UIR:3b}
46 bc 4b FSM {4b}
48 bc 13 FSM {13}
4a d2 00 3b FSM_8X #0x00,{3b}
4d bc 5b FSM {5b}
4f da 32 22 39 CHN_RCV {TV.WDR:39},0x22
53 ae 88 22 VINV [0x8],0x22
56 b1 28 41 VJMP NE,[0x8],R2,R3,0x41
59 2c RET
5a ; --------------------------------------------------------------------------------------
5a ; Subroutine
5a ; --------------------------------------------------------------------------------------
5a 8e 1a 2a MOV 0x1a,0x2a
5d 04 REPEAT #0x04
5e a8 01 2a SR.0 #0x1,0x2a,[0x1]
61 a7 08 LEFT.0 #0x1,R3,[0x8]
63 16 UNTIL
64 b0 a1 2a 21 VOR [0x1],0x2a,0x21
68 2c RET
P11OF0 V_NOT_B_OP_PASS\r P1AOS8 EXPECT\r P22OS8 RESULT\r \r 30\r 00\r 22\r 1A\r 00\r 00\r 00\r 00\r \r 42\r 5A\r C9\r 36\r C9\r 36\r C9\r 36\r C9\r 36\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 04\r 3F\r FF\r 07\r D7\r 18\r 19\r 8F\r 5F\r 2C\r 18\r 19\r 8F\r 4F\r 2C\r 18\r 19\r 8F\r 6F\r 2C\r 18\r 64\r 5C\r DA\r 40\r 2B\r 3B\r BC\r 4B\r BC\r 13\r D2\r 00\r 3B\r BC\r 5B\r DA\r 32\r 22\r 39\r AE\r 88\r 22\r B1\r 28\r 41\r 2C\r 8E\r 1A\r 2A\r 04\r A8\r 01\r 2A\r A7\r 08\r 16\r B0\r A1\r 2A\r 21\r 2C\r «nul»