|
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: 413 (0x19d)
Types: TYP, TextFile
Names: »STORE_NOVRAM.TYP«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »STORE_NOVRAM.TYP«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »STORE_NOVRAM.TYP«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 99c62f6673b89916 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 21 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 CHECKSUM_OK
; P11OF1 COUNT_OK
12 R2_:
12 1f .DATA 0x1f
13 R3_:
13 20 .DATA 0x20
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 4e .CODE 0x4e
19 5f .CODE 0x5f
1a 00 .DATA 0x0
1b ff .DATA 0xff
1c 03 .DATA 0x3
1d 00 .DATA 0x0
1e 00 .DATA 0x0
1f 7f .DATA 0x7f
20 aa .DATA 0xaa
21 EXPERIMENT:
21 18 CALL 0x4e
22 58 1f 21 DJNN 0x1f,EXPERIMENT
25 46 20 4d JMP NZ,0x20,0x4d
28 64 SET PT
29 8f fd 1b MOV #0xfd,0x1b
2c 18 CALL 0x4e
2d 8e 1e 1f MOV 0x1e,0x1f
30 18 CALL 0x4e
31 84 1e INC.W 0x1e
33 41 1e 1c 4d JMP LT,0x1e,0x1c,0x4d
37 66 SET PX
38 8f fd 1b MOV #0xfd,0x1b
3b b1 c1 VXOR [0x1],R2,R3
3d 19 CALL 0x5f
3e 78 DEC R2
3f 6e INV PX
40 3e 3b JMP NPX,0x3b
42 8f ff 1b MOV #0xff,0x1b
45 18 CALL 0x4e
46 8f ff 1b MOV #0xff,0x1b
49 80 XHG R2,R3
4a 19 CALL 0x5f
4b bc 62 FSM {62}
4d 5c END
4e ; --------------------------------------------------------------------------------------
4e ; Subroutine
4e ; --------------------------------------------------------------------------------------
4e 02 REPEAT #0x02
4f c2 1a 2b WP12_FSM 0x1a,{2b}
52 cc 60 1d RFSM.H {60},0x1d
55 a8 62 1d SR.0 #0x4,0x1d,[0x2]
58 86 1b DEC 0x1b
5a 16 UNTIL
5b 9e 1e 20 XOR 0x1e,0x20
5e 2c RET
5f ; --------------------------------------------------------------------------------------
5f ; Subroutine
5f ; --------------------------------------------------------------------------------------
5f 02 REPEAT #0x02
60 c2 1a 2b WP12_FSM 0x1a,{2b}
63 c1 61 WP2_FSM R2,{61}
65 86 1b DEC 0x1b
67 80 XHG R2,R3
68 a9 61 SR.0 #0x4,R3,[0x1]
6a 80 XHG R2,R3
6b 16 UNTIL
6c 2c RET
P11OF0 CHECKSUM_OK\r P11OF1 COUNT_OK\r \r 21\r 00\r 1F\r 20\r 00\r 00\r 00\r 00\r \r 4E\r 5F\r 00\r FF\r 03\r 00\r 00\r 7F\r AA\r 18\r 58\r 1F\r 21\r 46\r 20\r 4D\r 64\r 8F\r FD\r 1B\r 18\r 8E\r 1E\r 1F\r 18\r 84\r 1E\r 41\r 1E\r 1C\r 4D\r 66\r 8F\r FD\r 1B\r B1\r C1\r 19\r 78\r 6E\r 3E\r 3B\r 8F\r FF\r 1B\r 18\r 8F\r FF\r 1B\r 80\r 19\r BC\r 62\r 5C\r 02\r C2\r 1A\r 2B\r CC\r 60\r 1D\r A8\r 62\r 1D\r 86\r 1B\r 16\r 9E\r 1E\r 20\r 2C\r 02\r C2\r 1A\r 2B\r C1\r 61\r 86\r 1B\r 80\r A9\r 61\r 80\r 16\r 2C\r