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

⟦0dedac2c3⟧ SEQ, TextFile

    Length: 1024 (0x400)
    Types: SEQ, TextFile
    Names: »TEST_CUR_LEX_ADDRESSING.SEQ«

Derivation

└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
    └─ ⟦this⟧ »TEST_CUR_LEX_ADDRESSING.SEQ« 
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
    └─ ⟦this⟧ »TEST_CUR_LEX_ADDRESSING.SEQ« 
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
    └─ ⟦this⟧ »TEST_CUR_LEX_ADDRESSING.SEQ« 

Disassembly

10 ; --------------------------------------------------------------------------------------
10 ;  Hash a1b2735119995db5 (no python module)
10 ; --------------------------------------------------------------------------------------
10			PC_:
10 3c                     	.CODE	EXPERIMENT
11			R1_:
11 00                     	.DATA	0x0			; P11OF1 TEST_CUR_LEX_ADDRESSING
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 6a                     	.CODE	0x6a
19 62                     	.CODE	0x62
1a 58                     	.CODE	0x58
1b 0f                     	.DATA	0xf			; P1BOS1 CURRENT_LEX
1c 00                     	.DATA	0x0			; P1COS8 EXPECTED_RESULT
1d 00                     	.DATA	0x0
1e 00                     	.DATA	0x0
1f 0f                     	.DATA	0xf
20 00                     	.DATA	0x0
21 00                     	.DATA	0x0
22 00                     	.DATA	0x0
23 0f                     	.DATA	0xf
24 ff                     	.DATA	0xff
25 ff                     	.DATA	0xff
26 ff                     	.DATA	0xff
27 ff                     	.DATA	0xff
28 07                     	.DATA	0x7
29 ff                     	.DATA	0xff
2a ff                     	.DATA	0xff
2b 80                     	.DATA	0x80
2c 00                     	.DATA	0x0			; P2COS8 ACTUAL_RESULT
2d 00                     	.DATA	0x0
2e 00                     	.DATA	0x0
2f 00                     	.DATA	0x0
30 00                     	.DATA	0x0
31 00                     	.DATA	0x0
32 00                     	.DATA	0x0
33 00                     	.DATA	0x0
34 00                     	.DATA	0x0
35 00                     	.DATA	0x0
36 00                     	.DATA	0x0
37 00                     	.DATA	0x0
38 00                     	.DATA	0x0
39 00                     	.DATA	0x0
3a 00                     	.DATA	0x0
3b 00                     	.DATA	0x0
3c			EXPERIMENT:
3c 8e  1b  3b             	MOV	0x1b,0x3b
3f 18                     	CALL	0x6a
40 19                     	CALL	0x62
41 bc  5b                 	FSM	{5b}
43 bc  5b                 	FSM	{5b}
45 07                     	REPEAT	#0x07
46 a8  04  30             	SR.0	#0x1,0x30,[0x4]
49 16                     	UNTIL
4a b0  28  1c  2c  57     	VJMP	NE,[0x8],0x1c,0x2c,0x57
4f 86  1f                 	DEC	0x1f
51 86  23                 	DEC	0x23
53 58  1b  3c             	DJNN	0x1b,EXPERIMENT
56 66                     	SET	PX
57 5c                     	END
58 ; --------------------------------------------------------------------------------------
58 ; Subroutine
58 ; --------------------------------------------------------------------------------------
58 bc  4e                 	FSM	{4e}
5a bc  5a                 	FSM	{5a}
5c 10                     	REPEAT	#0x10
5d c4  ff  43             	WFSM.L	#0xff,{43}
60 16                     	UNTIL
61 2c                     	RET
62 ; --------------------------------------------------------------------------------------
62 ; Subroutine
62 ; --------------------------------------------------------------------------------------
62 1a                     	CALL	0x58
63 bc  62                 	FSM	{62}
65 da  92  2c  30         	CHN_RCV	{S.TYPVAL:30},0x2c
69 2c                     	RET
6a ; --------------------------------------------------------------------------------------
6a ; Subroutine
6a ; --------------------------------------------------------------------------------------
6a 1a                     	CALL	0x58
6b da  90  2c  40         	CHN_SND	0x2c,{S.TYPVAL:40}
6f bc  66                 	FSM	{66}
71 2c                     	RET

TextFile

P11OF1 TEST_CUR_LEX_ADDRESSING
P1BOS1 CURRENT_LEX
P1COS8 EXPECTED_RESULT
P2COS8 ACTUAL_RESULT

3C
00
18
18
00
00
00
00

6A
62
58
0F
00
00
00
0F
00
00
00
0F
FF
FF
FF
FF
07
FF
FF
80
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
00
8E
1B
3B
18
19
BC
5B
BC
5B
07
A8
04
30
16
B0
28
1C
2C
57
86
1F
86
23
58
1B
3C
66
5C
BC
4E
BC
5A
10
C4
FF
43
16
2C
1A
BC
62
DA
92
2C
30
2C
1A
DA
90
2C
40
BC
66
2C«nul»