|
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: »PREP_TEST_PLUS_MINUS.TYP«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »PREP_TEST_PLUS_MINUS.TYP«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »PREP_TEST_PLUS_MINUS.TYP«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »PREP_TEST_PLUS_MINUS.TYP«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 0ba5ecf6ab135b2d (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 37 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 ADD_ZEROS_PASS
; P11OF1 SUB_ZEROS_PASS
12 R2_:
12 23 .DATA 0x23
13 R3_:
13 23 .DATA 0x23
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 54 .CODE 0x54
19 5b .CODE 0x5b
1a 62 .CODE 0x62
1b 00 .DATA 0x0
1c 00 .DATA 0x0
1d 00 .DATA 0x0
1e 00 .DATA 0x0
1f 00 .DATA 0x0
20 00 .DATA 0x0
21 00 .DATA 0x0
22 00 .DATA 0x0
23 00 .DATA 0x0 ; P23OS8 RESULT
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 00 .DATA 0x0
2c 0f .DATA 0xf
2d f0 .DATA 0xf0
2e d3 .DATA 0xd3
2f ff .DATA 0xff
30 0d .DATA 0xd
31 00 .DATA 0x0
32 0f .DATA 0xf
33 f0 .DATA 0xf0
34 ff .DATA 0xff
35 83 .DATA 0x83
36 0d .DATA 0xd
37 EXPERIMENT:
37 18 CALL 0x54
38 8f ff 2e MOV #0xff,0x2e
3b 19 CALL 0x5b
3c 0a REPEAT #0x0a
3d 8a 1b INV 0x1b
3f 93 11 1b ADD #0x11,0x1b
42 b0 47 1b 1c VMOV [0x7],0x1b,0x1c
46 a4 01 04 2e VSUB [0x1],#0x04,0x2e
4a 18 CALL 0x54
4b 16 UNTIL
4c 1a CALL 0x62
4d 64 SET PT
4e 8f 8d 35 MOV #0x8d,0x35
51 1a CALL 0x62
52 66 SET PX
53 5c END
54 ; --------------------------------------------------------------------------------------
54 ; Subroutine
54 ; --------------------------------------------------------------------------------------
54 ae 88 1b VINV [0x8],0x1b
57 da 30 1b 38 CHN_SND 0x1b,{TV.WDR:38}
5b ; --------------------------------------------------------------------------------------
5b ; Subroutine
5b ; --------------------------------------------------------------------------------------
5b da 50 2b 3b CHN_SND 0x2b,{T.UIR:3b}
5f bc 5a FSM {5a}
61 2c RET
62 ; --------------------------------------------------------------------------------------
62 ; Subroutine
62 ; --------------------------------------------------------------------------------------
62 da 50 31 3b CHN_SND 0x31,{T.UIR:3b}
66 bc 4b FSM {4b}
68 bc 13 FSM {13}
6a bc 5b FSM {5b}
6c da 33 39 CHN_RCV {TV.WDR:39},@R3
6f af 88 VINV [0x8],R3
71 af 28 53 VJMP NZ,[0x8],R3,0x53
74 2c RET
P11OF0 ADD_ZEROS_PASS\r P11OF1 SUB_ZEROS_PASS\r P23OS8 RESULT\r \r 37\r 00\r 23\r 23\r 00\r 00\r 00\r 00\r \r 54\r 5B\r 62\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 0F\r F0\r D3\r FF\r 0D\r 00\r 0F\r F0\r FF\r 83\r 0D\r 18\r 8F\r FF\r 2E\r 19\r 0A\r 8A\r 1B\r 93\r 11\r 1B\r B0\r 47\r 1B\r 1C\r A4\r 01\r 04\r 2E\r 18\r 16\r 1A\r 64\r 8F\r 8D\r 35\r 1A\r 66\r 5C\r AE\r 88\r 1B\r DA\r 30\r 1B\r 38\r DA\r 50\r 2B\r 3B\r BC\r 5A\r 2C\r DA\r 50\r 31\r 3B\r BC\r 4B\r BC\r 13\r BC\r 5B\r DA\r 33\r 39\r AF\r 88\r AF\r 28\r 53\r 2C\r «nul»