|
|
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: 1024 (0x400)
Types: TYP, TextFile, VAL
Names: »WRITE_NOVRAM.TYP«, »WRITE_NOVRAM.VAL«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─⟦this⟧ »WRITE_NOVRAM.TYP«
└─⟦this⟧ »WRITE_NOVRAM.VAL«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─⟦this⟧ »WRITE_NOVRAM.TYP«
└─⟦this⟧ »WRITE_NOVRAM.VAL«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─⟦this⟧ »WRITE_NOVRAM.TYP«
└─⟦this⟧ »WRITE_NOVRAM.VAL«
10 ; --------------------------------------------------------------------------------------
10 ; Hash df376cfc0ec4551c (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 22 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 CHECKSUM_OK
12 R2_:
12 1e .DATA 0x1e
13 R3_:
13 21 .DATA 0x21
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 45 .CODE 0x45
19 5f .CODE 0x5f
1a 00 .DATA 0x0 ; P1AIS1 ADDR
1b 00 .DATA 0x0 ; P1BIS1 DATA
1c 7f .DATA 0x7f
1d aa .DATA 0xaa
1e 00 .DATA 0x0
1f 00 .DATA 0x0
20 00 .DATA 0x0
21 00 .DATA 0x0
22 EXPERIMENT:
22 18 CALL 0x45
23 58 1c 22 DJNN 0x1c,EXPERIMENT
26 46 1d 43 JMP NZ,0x1d,0x43
29 64 SET PT
2a 9e 1b 1d XOR 0x1b,0x1d
2d 8e 1a 1f MOV 0x1a,0x1f
30 a6 01 1f LEFT.0 #0x1,0x1f,[0x1]
33 18 CALL 0x45
34 93 fe 1f ADD #0xfe,0x1f
37 19 CALL 0x5f
38 8f fe 1f MOV #0xfe,0x1f
3b 18 CALL 0x45
3c 8f fe 1f MOV #0xfe,0x1f
3f 8e 1d 1b MOV 0x1d,0x1b
42 19 CALL 0x5f
43 d8 FSM2
44 5c END
45 ; --------------------------------------------------------------------------------------
45 ; Subroutine
45 ; --------------------------------------------------------------------------------------
45 c3 2b WP12_FSM R2,{2b}
47 cc 60 20 RFSM.H {60},0x20
4a a6 61 20 LEFT.0 #0x4,0x20,[0x1]
4d 84 1e INC.W 0x1e
4f c3 2b WP12_FSM R2,{2b}
51 cd 60 RFSM.H {60},@R3
53 97 0f 21 AND #0x0f,0x21
56 9a 21 20 OR 0x21,0x20
59 84 1e INC.W 0x1e
5b 9e 20 1d XOR 0x20,0x1d
5e 2c RET
5f ; --------------------------------------------------------------------------------------
5f ; Subroutine
5f ; --------------------------------------------------------------------------------------
5f c3 2b WP12_FSM R2,{2b}
61 8e 1b 21 MOV 0x1b,0x21
64 a8 61 21 SR.0 #0x4,0x21,[0x1]
67 c0 21 61 WP2_FSM 0x21,{61}
6a 84 1e INC.W 0x1e
6c c3 2b WP12_FSM R2,{2b}
6e c0 1b 61 WP2_FSM 0x1b,{61}
71 2c RET
P1AIS1 ADDR\r P1BIS1 DATA\r P11OF0 CHECKSUM_OK\r \r 22\r 00\r 1E\r 21\r 00\r 00\r 00\r 00\r \r 45\r 5F\r 00\r 00\r 7F\r AA\r 00\r 00\r 00\r 00\r 18\r 58\r 1C\r 22\r 46\r 1D\r 43\r 64\r 9E\r 1B\r 1D\r 8E\r 1A\r 1F\r A6\r 01\r 1F\r 18\r 93\r FE\r 1F\r 19\r 8F\r FE\r 1F\r 18\r 8F\r FE\r 1F\r 8E\r 1D\r 1B\r 19\r D8\r 5C\r C3\r 2B\r CC\r 60\r 20\r A6\r 61\r 20\r 84\r 1E\r C3\r 2B\r CD\r 60\r 97\r 0F\r 21\r 9A\r 21\r 20\r 84\r 1E\r 9E\r 20\r 1D\r 2C\r C3\r 2B\r 8E\r 1B\r 21\r A8\r 61\r 21\r C0\r 21\r 61\r 84\r 1E\r C3\r 2B\r C0\r 1B\r 61\r 2C\r «nul»