|
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: 2048 (0x800)
Types: EM, TextFile
Names: »WDRS.EM«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »WDRS.EM«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »WDRS.EM«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »WDRS.EM«
[eq,[MEM0_EXISTS],TRUE]
[write MEM0.WDR,->,TYP=,[arg 1 [var MEM0.WDR]],,
VAL=,[arg 2 [var MEM0.WDR]],,
VPAR=,[arg 3 [var MEM0.WDR]],,
CBITS=,[arg 4 [var MEM0.WDR]]]
[end]
[eq,[MEM1_EXISTS],TRUE]
[write MEM1.WDR,->,TYP=,[arg 1 [var MEM1.WDR]],,
VAL=,[arg 2 [var MEM1.WDR]],,
VPAR=,[arg 3 [var MEM1.WDR]],,
CBITS=,[arg 4 [var MEM1.WDR]]]
[end]
[eq,[MEM2_EXISTS],TRUE]
[write MEM2.WDR,->,TYP=,[arg 1 [var MEM2.WDR]],,
VAL=,[arg 2 [var MEM2.WDR]],,
VPAR=,[arg 3 [var MEM2.WDR]],,
CBITS=,[arg 4 [var MEM2.WDR]]]
[end]
[eq,[MEM3_EXISTS],TRUE]
[write MEM3.WDR,->,TYP=,[arg 1 [var MEM3.WDR]],,
VAL=,[arg 2 [var MEM3.WDR]],,
VPAR=,[arg 3 [var MEM3.WDR]],,
CBITS=,[arg 4 [var MEM3.WDR]]]
[end]
[set t.wdr [xeq typ read_wdr 0]]
[set v.wdr [xeq val read_wdr 0]]
[write TYP.WDR,,->,TYP=,[arg 1 [var t.wdr]],,,TPAR= [arg 2 [var t.wdr]]]
[write VAL.WDR,,->,VAL=,[arg 1 [var v.wdr]],,,VPAR= [arg 2 [var v.wdr]]]
[kill t.wdr]
[kill v.wdr]«nul»