DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400 DFS Tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400 DFS Tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦0f87b8a6b⟧ FIU, TextFile

    Length: 444 (0x1bc)
    Types: FIU, TextFile
    Names: »PAUSE_UADDR_PARITY.FIU«

Derivation

└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
    └─ ⟦this⟧ »PAUSE_UADDR_PARITY.FIU« 
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
    └─ ⟦this⟧ »PAUSE_UADDR_PARITY.FIU« 

Disassembly

10 ; --------------------------------------------------------------------------------------
10 ;  Hash 55bce931281d8595 (no python module)
10 ; --------------------------------------------------------------------------------------
10				PC_:
10 22                     		.CODE	EXPERIMENT
11				R1_:
11 00                     		.DATA	0x0			; P11OF0 PASS_UADR_PARITY
									; P11OF1 PARITY_OK
12				R2_:
12 18                     		.DATA	0x18
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 57                     		.CODE	0x57
19 00                     		.DATA	0x0
1a 40                     		.DATA	0x40
1b 3f                     		.DATA	0x3f
1c 02                     		.DATA	0x2
1d 4e                     		.DATA	0x4e
1e 7f                     		.DATA	0x7f
1f ff                     		.DATA	0xff
20 40                     		.DATA	0x40			; P20OS2 DATA
21 01                     		.DATA	0x1
22				EXPERIMENT:
22 da  80  1a  13         		CHN_SND	0x1a,{F.UIR:13}
26 08                     		REPEAT	#0x08
27 18                     		CALL	0x57
28 3e  56                 		JMP	NPX,0x56
2a 9f  40  20             		XOR	#0x40,0x20
2d 18                     		CALL	0x57
2e 3a  56                 		JMP	PX,0x56
30 a6  01  21             		LEFT.0	#0x1,0x21,[0x1]
33 9b  01  21             		OR	#0x01,0x21
36 16                     		UNTIL
37 8f  00  20             		MOV	#0x00,0x20
3a 07                     		REPEAT	#0x07
3b 18                     		CALL	0x57
3c 3e  56                 		JMP	NPX,0x56
3e 9f  80  19             		XOR	#0x80,0x19
41 9f  80  20             		XOR	#0x80,0x20
44 18                     		CALL	0x57
45 3a  56                 		JMP	PX,0x56
47 a6  01  20             		LEFT.0	#0x1,0x20,[0x1]
4a 9b  01  20             		OR	#0x01,0x20
4d 97  3f  20             		AND	#0x3f,0x20
50 b0  a1  19  20         		VOR	[0x1],0x19,0x20
54 16                     		UNTIL
55 64                     		SET	PT
56 5c                     		END
57 ; --------------------------------------------------------------------------------------
57 ; Subroutine
57 ; --------------------------------------------------------------------------------------
57 da  70  1e  10         		CHN_SND	0x1e,{F.MDREG:10}
5b bc  3c                 		FSM	{3c}
5d d2  ff  50             		FSM_8X	#0xff,{50}
60 bc  53                 		FSM	{53}
62 60                     		PAUSE
63 d4  08  51  1a         		RCV_P1	#0x08,{51},0x1a
67 97  02  1a             		AND	#0x02,0x1a
6a 66                     		SET	PX
6b 46  1a  6f             		JMP	NZ,0x1a,0x6f
6e 6a                     		CLR	PX
6f 2c                     		RET

TextFile

P11OF0 PASS_UADR_PARITY\r
P11OF1 PARITY_OK\r
P20OS2 DATA\r
\r
22\r
00\r
18\r
18\r
00\r
00\r
00\r
00\r
\r
57\r
00\r
40\r
3F\r
02\r
4E\r
7F\r
FF\r
40\r
01\r
DA\r
80\r
1A\r
13\r
08\r
18\r
3E\r
56\r
9F\r
40\r
20\r
18\r
3A\r
56\r
A6\r
01\r
21\r
9B\r
01\r
21\r
16\r
8F\r
00\r
20\r
07\r
18\r
3E\r
56\r
9F\r
80\r
19\r
9F\r
80\r
20\r
18\r
3A\r
56\r
A6\r
01\r
20\r
9B\r
01\r
20\r
97\r
3F\r
20\r
B0\r
A1\r
19\r
20\r
16\r
64\r
5C\r
DA\r
70\r
1E\r
10\r
BC\r
3C\r
D2\r
FF\r
50\r
BC\r
53\r
60\r
D4\r
08\r
51\r
1A\r
97\r
02\r
1A\r
66\r
46\r
1A\r
6F\r
6A\r
2C\r