|
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: 980 (0x3d4)
Types: EM, TextFile
Names: »DISP_C_ADDRESS.EM«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »DISP_C_ADDRESS.EM«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »DISP_C_ADDRESS.EM«
[#lt,%1%,20]
[eq,%3%,TYP]
[eq,%2%,uir]
[set frame [disp_frame, [#extract,[not,%4%],1C,5],wcs]]
[else]
[set frame [disp_frame, [#extract,%4%,1C,5],wcs]]
[end]
[else]
[eq,%2%,uir]
[set frame [disp_frame, [#extract,[not,%4%],2A,5],wcs]]
[else]
[set frame [disp_frame, [#extract,%4%,2A,5],wcs]]
[end]
[end]
FRAME ->,[var frame],,,OFFSET ->,[#extract,[not,%1%],3B,5]
[kill frame]
[else]
[#case,%1%]
[when,3F]GP 0
[when,3E]GP 1
[when,3D]GP 2
[when,3C]GP 3
[when,3B]GP 4
[when,3A]GP 5
[when,39]GP 6
[when,38]GP 7
[when,37]GP 8
[when,36]GP 9
[when,35]GP A
[when,34]GP B
[when,33]GP C
[when,32]GP D
[when,31]GP E
[when,30]GP F
[when,2F]TOP
[when,2E]TOP+1
[when,2D]SPARE
[when,2C]LOOP REGISTER
[when,2B]BOT-1
[when,2A]BOT
[when,29]WRITE DISABLE
[when,28]LOOP COUNTER
[when,27]TOP-8
[when,26]TOP-7
[when,25]TOP-6
[when,24]TOP-5
[when,23]TOP-4
[when,22]TOP-3
[when,21]TOP-2
[when,20]TOP-1
[endcase]
[end]