|
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: 1161 (0x489)
Types: EM, TextFile
Names: »WDRS.EM«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »WDRS.EM«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦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]