|
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: 387 (0x183)
Types: SEQ, TextFile
Names: »PAUSE_MPC_FRU.SEQ«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »PAUSE_MPC_FRU.SEQ«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »PAUSE_MPC_FRU.SEQ«
10 ; --------------------------------------------------------------------------------------
10 ; Hash f017bbd4d3c24094 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 38 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 MACRO_PC_PASSED
12 R2_:
12 22 .DATA 0x22
13 R3_:
13 22 .DATA 0x22
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 27 .DATA 0x27
1a ff .DATA 0xff
1b 00 .DATA 0x0 ; P1BOS8 MACRO_PC.TYP
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 ; P22OS8 PATTERN.TYP
23 00 .DATA 0x0 ; P23OS8 MACRO_PC.VAL
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 ; P2AOS8 PATTERN.VAL
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 10 .DATA 0x10
32 00 .DATA 0x0
33 00 .DATA 0x0
34 00 .DATA 0x0
35 00 .DATA 0x0
36 00 .DATA 0x0
37 30 .DATA 0x30
38 EXPERIMENT:
38 91 00 30 36 MOV.W #0x0030,0x36
3c 18 CALL 0x60
3d 91 04 01 36 MOV.W #0x0401,0x36
41 18 CALL 0x60
42 bc 3e FSM {3e}
44 da 92 1b 30 CHN_RCV {S.TYPVAL:30},0x1b
48 60 PAUSE
49 97 f0 2a AND #0xf0,0x2a
4c b0 27 24 2b 5f VJMP NE,[0x7],0x24,0x2b,0x5f
51 a7 10 LEFT.0 #0x1,R3,[0x10]
53 4f 19 19 5b JMP NE,#0x19,0x19,0x5b
57 0d REPEAT #0x0d
58 a7 10 LEFT.0 #0x1,R3,[0x10]
5a 16 UNTIL
5b 54 19 38 DJNZ 0x19,EXPERIMENT
5e 64 SET PT
5f 5c END
60 ; --------------------------------------------------------------------------------------
60 ; Subroutine
60 ; --------------------------------------------------------------------------------------
60 da a0 32 41 CHN_SND 0x32,{S.UIR:41}
64 10 REPEAT #0x10
65 c4 ff 43 WFSM.L #0xff,{43}
68 16 UNTIL
69 da 91 40 CHN_SND @R2,{S.TYPVAL:40}
6c bc 66 FSM {66}
6e 2c RET
P11OF0 MACRO_PC_PASSED P22OS8 PATTERN.TYP P2AOS8 PATTERN.VAL P1BOS8 MACRO_PC.TYP P23OS8 MACRO_PC.VAL 38 00 22 22 00 00 00 00 60 27 FF 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 10 00 00 00 00 00 30 91 00 30 36 18 91 04 01 36 18 BC 3E DA 92 1B 30 60 97 F0 2A B0 27 24 2B 5F A7 10 4F 19 19 5B 0D A7 10 16 54 19 38 64 5C DA A0 32 41 10 C4 FF 43 16 DA 91 40 BC 66 2C