|
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: 340 (0x154)
Types: SEQ, TextFile
Names: »NEW_FILL_DISP_RAMS_HIGH.SEQ«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »NEW_FILL_DISP_RAMS_HIGH.SEQ«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »NEW_FILL_DISP_RAMS_HIGH.SEQ«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 902a6bdc607085e0 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 35 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0
12 R2_:
12 1f .DATA 0x1f
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 5e .CODE 0x5e
19 04 .DATA 0x4
1a 00 .DATA 0x0
1b 00 .DATA 0x0
1c 00 .DATA 0x0
1d 00 .DATA 0x0
1e 52 .DATA 0x52
1f 00 .DATA 0x0 ; P1FIS2 ADDRESS
20 00 .DATA 0x0
21 00 .DATA 0x0 ; P21IS5 DEC0
22 00 .DATA 0x0
23 00 .DATA 0x0
24 00 .DATA 0x0
25 00 .DATA 0x0
26 00 .DATA 0x0 ; P26IS5 DEC1
27 00 .DATA 0x0
28 00 .DATA 0x0
29 00 .DATA 0x0
2a 00 .DATA 0x0
2b 00 .DATA 0x0 ; P2BIS5 DEC2
2c 00 .DATA 0x0
2d 00 .DATA 0x0
2e 00 .DATA 0x0
2f 00 .DATA 0x0
30 00 .DATA 0x0 ; P30IS5 DEC3
31 00 .DATA 0x0
32 00 .DATA 0x0
33 00 .DATA 0x0
34 00 .DATA 0x0
35 EXPERIMENT:
35 10 REPEAT #0x10
36 c4 ff 40 WFSM.L #0xff,{40}
39 16 UNTIL
3a 18 CALL 0x5e
3b bc 66 FSM {66}
3d 8c 1f INV.W 0x1f
3f bf 59 WP1_FSM R2,{59}
41 74 INC R2
42 bf 58 WP1_FSM R2,{58}
44 78 DEC R2
45 97 df 24' AND #0xdf,0x24
48 8f 51 1e MOV #0x51,0x1e
4b 18 CALL 0x5e
4c bc 62 FSM {62}
4e bc 49 FSM {49}
50 93 05 60 ADD #0x05,0x60
53 93 05 47 ADD #0x05,0x47
56 95 ff c0 1f ADD.W #0xffc0,0x1f
5a 54 19 3f DJNZ 0x19,0x3f
5d 5c END
5e ; --------------------------------------------------------------------------------------
5e ; Subroutine
5e ; --------------------------------------------------------------------------------------
5e da b0 21' 42 CHN_SND 0x21,{S.DECODER:42}
62 da a0 19 41 CHN_SND 0x19,{S.UIR:41}
66 10 REPEAT #0x10
67 c4 ff 43 WFSM.L #0xff,{43}
6a 16 UNTIL
6b 2c RET
P1FIS2 ADDRESS P21IS5 DEC0 P26IS5 DEC1 P2BIS5 DEC2 P30IS5 DEC3 35 00 1F 18 00 00 00 00 5E 04 00 00 00 00 52 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 10 C4 FF 40 16 18 BC 66 8C 1F BF 59 74 BF 58 78 97 DF 24 8F 51 1E 18 BC 62 BC 49 93 05 60 93 05 47 95 FF C0 1F 54 19 3F 5C DA B0 21 42 DA A0 19 41 10 C4 FF 43 16 2C