|
|
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: 1789 (0x6fd)
Types: EM, TextFile
Names: »CW_GROUP_3.EM«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »CW_GROUP_3.EM«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »CW_GROUP_3.EM«
! only called if 2 LSBs of OF_KIND = 3
[#case [#extract [var TYPE_DATA] 39 7]]
! mark words (xxxx111)
[when 07][cw_kind UNDEFINED][cw_type_val]
[when 0F][cw_kind UNDEFINED][cw_type_val]
[when 17][cw_kind UNDEFINED][cw_type_val]
[when 1F][cw_kind AUXILIARY_MARK][cw_auxiliary_mark]
[when 27][cw_kind UNDEFINED][cw_type_val]
[when 2F][cw_kind UNDEFINED][cw_type_val]
[when 37][cw_kind UNDEFINED][cw_type_val]
[when 3F][#eq %1% 180]
[cw_kind AUXILIARY_STATE][cw_auxiliary_state]
[else]
[#eq %1% 480]
[cw_kind AUXILIARY_ALLOCATION][cw_aux_allocation]
[else]
[cw_kind ACTIVATION_LINK][cw_activation_link]
[end]
[end]
[when 47][cw_kind UNDEFINED][cw_type_val]
[when 4F][cw_kind UNDEFINED][cw_type_val]
[when 57][cw_kind UNDEFINED][cw_type_val]
[when 5F][cw_kind ACCEPT_LINK][cw_accept_link]
[when 67][cw_kind UNDEFINED][cw_type_val]
[when 6F][cw_kind UNDEFINED][cw_type_val]
[when 77][cw_kind UNDEFINED][cw_type_val]
[when 7F][cw_kind ACTIVATION_STATE][cw_activation_state]
! UNDEFINED control words (xxxx011)
[when 03][cw_kind UNDEFINED][cw_type_val]
[when 0B][cw_kind UNDEFINED][cw_type_val]
[when 13][cw_kind UNDEFINED][cw_type_val]
[when 1B][cw_kind UNDEFINED][cw_type_val]
[when 23][cw_kind UNDEFINED][cw_type_val]
[when 2B][cw_kind UNDEFINED][cw_type_val]
[when 33][cw_kind UNDEFINED][cw_type_val]
[when 3B][cw_kind UNDEFINED][cw_type_val]
[when 43][cw_kind UNDEFINED][cw_type_val]
[when 4B][cw_kind UNDEFINED][cw_type_val]
[when 53][cw_kind UNDEFINED][cw_type_val]
[when 5B][cw_kind UNDEFINED][cw_type_val]
[when 63][cw_kind UNDEFINED][cw_type_val]
[when 6B][cw_kind UNDEFINED][cw_type_val]
[when 73][cw_kind UNDEFINED][cw_type_val]
[when 7B][cw_kind UNDEFINED][cw_type_val]
[endcase]