|
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: »PREP_LL_PROPAGATE_1.SEQ«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »PREP_LL_PROPAGATE_1.SEQ«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »PREP_LL_PROPAGATE_1.SEQ«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »PREP_LL_PROPAGATE_1.SEQ«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 693635c420f7a5ee (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 34 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0
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 60 .CODE 0x60
19 60 .CODE 0x60
1a 56 .CODE 0x56
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
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 00 .DATA 0x0
2d 00 .DATA 0x0
2e 00 .DATA 0x0
2f 00 .DATA 0x0
30 07 .DATA 0x7
31 ff .DATA 0xff
32 ff .DATA 0xff
33 80 .DATA 0x80
34 EXPERIMENT:
34 c4 00 59 WFSM.L #0x00,{59}
37 c4 02 58 WFSM.L #0x02,{58}
3a 8e 2b 2a MOV 0x2b,0x2a
3d 18 CALL 0x60
3e b0 48 2c 1b VMOV [0x8],0x2c,0x1b
42 19 CALL 0x60
43 bc 5b FSM {5b}
45 bc 5b FSM {5b}
47 04 REPEAT #0x04
48 a8 08 30 SR.0 #0x1,0x30,[0x8]
4b 16 UNTIL
4c 58 2b 3a DJNN 0x2b,0x3a
4f c4 00 59 WFSM.L #0x00,{59}
52 c4 00 58 WFSM.L #0x00,{58}
55 5c END
56 ; --------------------------------------------------------------------------------------
56 ; Subroutine
56 ; --------------------------------------------------------------------------------------
56 bc 4e FSM {4e}
58 bc 5a FSM {5a}
5a 10 REPEAT #0x10
5b c4 ff 43 WFSM.L #0xff,{43}
5e 16 UNTIL
5f 2c RET
60 ; --------------------------------------------------------------------------------------
60 ; Subroutine
60 ; --------------------------------------------------------------------------------------
60 1a CALL 0x56
61 da 90 1b 40 CHN_SND 0x1b,{S.TYPVAL:40}
65 bc 66 FSM {66}
67 2c RET
34 00 18 18 00 00 00 00 60 60 56 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 04 00 00 00 00 07 FF FF 80 C4 00 59 C4 02 58 8E 2B 2A 18 B0 48 2C 1B 19 BC 5B BC 5B 04 A8 08 30 16 58 2B 3A C4 00 59 C4 00 58 5C BC 4E BC 5A 10 C4 FF 43 16 2C 1A DA 90 1B 40 BC 66 2C«nul»