|
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: SEQ, TextFile
Names: »TEST_CALL_RETURN_ONE.SEQ«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »TEST_CALL_RETURN_ONE.SEQ«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »TEST_CALL_RETURN_ONE.SEQ«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »TEST_CALL_RETURN_ONE.SEQ«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 24b800e263906720 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 33 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 TEST_FAILED
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 5c .CODE 0x5c
19 00 .DATA 0x0
1a 01 .DATA 0x1
1b 1e .DATA 0x1e
1c 00 .DATA 0x0
1d 00 .DATA 0x0
1e 00 .DATA 0x0
1f 00 .DATA 0x0
20 00 .DATA 0x0
21 ff .DATA 0xff
22 ff .DATA 0xff
23 ff .DATA 0xff
24 ff .DATA 0xff
25 ff .DATA 0xff
26 ff .DATA 0xff
27 ff .DATA 0xff
28 00 .DATA 0x0
29 00 .DATA 0x0
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
33 EXPERIMENT:
33 10 REPEAT #0x10
34 18 CALL 0x5c
35 a6 02 19 LEFT.0 #0x1,0x19,[0x2]
38 51 40 00 19 41 JMP.W EQ,#0x4000,0x19,0x41
3d 91 00 01 19 MOV.W #0x0001,0x19
41 16 UNTIL
42 91 00 30 1b MOV.W #0x0030,0x1b
46 90 19 31 MOV.W 0x19,0x31
49 68 CLR PT
4a 10 REPEAT #0x10
4b 18 CALL 0x5c
4c a8 02 31 SR.0 #0x1,0x31,[0x2]
4f 4a 31 56 JMP.W NZ,0x31,0x56
52 91 20 00 31 MOV.W #0x2000,0x31
56 50 28 19 5b JMP.W EQ,0x28,0x19,0x5b
5a 64 SET PT
5b 16 UNTIL
5c ; --------------------------------------------------------------------------------------
5c ; Subroutine
5c ; --------------------------------------------------------------------------------------
5c da a0 19 41 CHN_SND 0x19,{S.UIR:41}
60 da c0 1f 43 CHN_SND 0x1f,{S.MISC:43}
64 bc 62 FSM {62}
66 da c2 28 36 CHN_RCV {S.MISC:36},0x28
6a 99 3f ff 1f AND.W #0x3fff,0x1f
6e 5c END
P11OF0 TEST_FAILED 33 00 18 18 00 00 00 00 5C 00 01 1E 00 00 00 00 00 FF FF FF FF FF FF FF 00 00 00 00 00 00 00 00 00 00 00 10 18 A6 02 19 51 40 00 19 41 91 00 01 19 16 91 00 30 1B 90 19 31 68 10 18 A8 02 31 4A 31 56 91 20 00 31 50 28 19 5B 64 16 DA A0 19 41 DA C0 1F 43 BC 62 DA C2 28 36 99 3F FF 1F 5C«nul»