|
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: 615 (0x267)
Types: EM, TextFile
Names: »READ_NOVRAM.EM«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »READ_NOVRAM.EM«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »READ_NOVRAM.EM«
[set board_type [read BOARD TYPE,,,,,,,,,,,,,,: ]]
[eq [extract [var board_type] 1 3] MEM]
[set mem_size [read 8 or 32 MBYTE MEMORY (8,32) : ]]
[set board_name MEM[read WHICH MEMORY (0,1,2,3) : ]]
[eq [var mem_size] 32]
[set board_type MEM32]
[else]
[eq [var mem_size] 8]
[set board_type MEM8]
[else]
[write *** ILLEGAL MEMORY BOARD TYPE ***]
[end]
[end]
[else]
[set board_name [var board_type]]
[end]
[display_novram_info [var board_type] [xeq [var board_name] READ_NOVRAM_DATA]]
[kill board_type]
[kill board_name]
[kill mem_size]