|
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 - metrics - download
Length: 355 (0x163)
Types: SEQ, TextFile
Names: »FILL_DISP_RAMS_HIGH.SEQ«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »FILL_DISP_RAMS_HIGH.SEQ«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »FILL_DISP_RAMS_HIGH.SEQ«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 4db73f2242861a0d (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 63 .CODE 0x63
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 0x63
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 0x63
4c bc 62 FSM {62}
4e 10 REPEAT #0x10
4f c4 ff 43 WFSM.L #0xff,{43}
52 16 UNTIL
53 bc 49 FSM {49}
55 93 05 65 ADD #0x05,0x65
58 93 05 47 ADD #0x05,0x47
5b 95 ff c0 1f ADD.W #0xffc0,0x1f
5f 54 19 3f DJNZ 0x19,0x3f
62 5c END
63 ; --------------------------------------------------------------------------------------
63 ; Subroutine
63 ; --------------------------------------------------------------------------------------
63 da b0 21' 42 CHN_SND 0x21,{S.DECODER:42}
67 da a0 19 41 CHN_SND 0x19,{S.UIR:41}
6b 10 REPEAT #0x10
6c c4 ff 43 WFSM.L #0xff,{43}
6f 16 UNTIL
70 2c RET
P1FIS2 ADDRESS P21IS5 DEC0 P26IS5 DEC1 P2BIS5 DEC2 P30IS5 DEC3 35 00 1F 18 00 00 00 00 63 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 10 C4 FF 43 16 BC 49 93 05 65 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