|
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: 657 (0x291) Types: EM, TextFile Names: »CASE_HUNT.EM«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293 └─ ⟦this⟧ »CASE_HUNT.EM« └─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3 └─ ⟦this⟧ »CASE_HUNT.EM«
!Converts hunter status into text [eq,%1%,TRUE] [eq,%2%,TRUE] ILLEGAL,,, [else] HUNTING,,, [end] [else] [eq,%2%,TRUE] [eq,%4%,] VALID,AT,[#extract,%3%,3C,4] [else] VALID,AT,[#extract,%4%,3C,4],FOR, [#case,%3%] [when,8]NEW,STATUS, [when,4]NEW,DATA,,, [when,2]XMIT,ERROR, [when,1]STATUS,SENT [when,0]BAD,CODE,,, [when,3]BAD,CODE,,, [when,5]BAD,CODE,,, [when,6]BAD,CODE,,, [when,7]BAD,CODE,,, [when,9]BAD,CODE,,, [when,A]BAD,CODE,,, [when,B]BAD,CODE,,, [when,C]BAD,CODE,,, [when,D]BAD,CODE,,, [when,E]BAD,CODE,,, [when,F]BAD,CODE,,, [endcase] [end] [else] INVALID,,, [end] [end]