|
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: 1519 (0x5ef)
Types: EM, TextFile
Names: »DISPLAY_NOVRAM_INFO.EM«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »DISPLAY_NOVRAM_INFO.EM«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »DISPLAY_NOVRAM_INFO.EM«
[eq %7% false]
[write *** WARNING BAD CHECKSUM ***]
[end]
[#gt %2% 28]
[write SERIES 400 BOARD]
[set stored_type [sub %2% 28]]
[else]
[write SERIES 100/200/300 BOARD]
[set stored_type %2%]
[end]
[#gt [var stored_type] 9]
[write *** WARNING NOVRAM CONTAINS UNDEFINED BOARD TYPE ***]
[else]
[#case [var stored_type]]
[when 0][set stored_name %1%]
[write *** WARNING NOVRAM CONTAINS ILLEGAL BOARD TYPE ***]
[when 1][set stored_name IOA]
[when 2][set stored_name VAL]
[when 3][set stored_name TYP]
[when 4][set stored_name FIU]
[when 5][set stored_name SEQ]
[when 6][set stored_name SYS]
[when 7][set stored_name MEM32]
[when 8][set stored_name MEM8]
[when 9][set stored_name MEM32]
[endcase]
[ne %1% [var stored_name]]
[write *** WARNING STORED BOARD TYPE DOES NOT MATCH ACTUAL BOARD TYPE ***]
[end]
[kill stored_name]
[end]
[set year [#extract %6% 30 7]]
[set year [add [var year] [convert 1901 A 10]]]
[set year [convert [var year] 10 A]]
[set month [#extract %6% 37 4]]
[set month [convert [var month] 10 A]]
[set day [and %6% 1F]]
[set day [convert [var day] 10 A]]
[write BOARD TYPE,,,,,,,:,[convert %2% 10 A]]
[write SERIAL NUMBER,,,,:,[convert %3% 10 A]]
[write ARTWORK REVISION,:,[convert %4% 10 A]]
[write ECO LEVEL,,,,,,,,:,[convert %5% 10 A]]
[write BUILD DATE,,,,,,,:,[var day]-[var month]-[var year]]
[kill year]
[kill month]
[kill day]
[kill stored_type]