DataMuseum.dk

Presents historical artifacts from the history of:

CR80 Hard and Floppy Disks

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about CR80 Hard and Floppy Disks

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦cfc27b820⟧ TextFile

    Length: 2334 (0x91e)
    Types: TextFile
    Names: »RESTORE_CURSOR1S«

Derivation

└─⟦b8af24a88⟧ Bits:30005796 CR80 Disc Pack ( MINICAMPS )
    └─ ⟦this⟧ »USERS.D!LN.D!SOURCE.D!RESTORE_CURSOR1S« 

TextFile

BEGIN
CREATE 0 #120F 7 16
APPEND #120F 0 (#1111)
INITREAD #120F 16 DUMP
APPEND #120F 6 (#0001 #107F #1201)
INITREAD #120F 16 DUMP
APPEND #120F 6 (#2001 #107F #1221)
CREATE 0 #122F 7 130
WAITINIT 20
WAITINIT 20
"
"
"CLEAR MEMORY
"-------------
"
INITREAD #122F 128 DUMP
APPEND #122F 8 (#0003 #031E #0E04 #522B)
WAITINIT 20
"
"
"ASSIGN SPLIT 0
"---------------
"
INITREAD #122F 128 DUMP
APPEND #122F 17 (#0103 #0C1E #0E04 #532B #3030 #3031 #3831 #3230 #0037)
WAITINIT 20
"
"FORMAT MODE OFF
"---------------
"
INITREAD #122F 128 DUMP
APPEND #122F 11 (#0403 #061E #0E04 #572B #0E30 #0040)
WAITINIT 20
"
"
"CLEAR SPLIT 0
"-------------
"
INITREAD #122F 128 DUMP
APPEND #122F 11 (#0503 #061E #0E04 #572B #0E30 #0052)
WAITINIT 20
"
"DEFINE USER FIELD 1
"---------------
"
INITREAD #122F 128 DUMP
APPEND #122F 23 (#0603 #121E #0D04 #0D0D #2020 #2020 #4554 #5453 #4946 #4C45 #2044 #0020)
WAITINIT 20
"
"
INITREAD #122F 128 DUMP
APPEND #122F 19 (#0803 #0E1E #0E04 #4027 #0E08 #4427 #0E41 #4228 #3030 #0032)
APPEND #122F 22 (#0603 #111E #2004 #2020 #280E #3042 #3230 #2020 #280E #3042 #3230)
WAITINIT 20
"
"
"DATA IN SPLIT 0 AND USER FIELD 1
"---------------
"
INITREAD #122F 128 DUMP
APPEND #122F 34 (#0703 #1D1E #2004 #6120 #0D62 #6362 #2B0E #0F5F #2C20 #4241 #3B0F #432C #0F44 #2C37 #4645 #340E #6261)
WAITINIT 20
"
"
"DEFINE USER FIELD 2
"---------------
"
INITREAD #122F 128 DUMP
APPEND #122F 28 (#0603 #171E #0D04 #0D0D #0D0D #0D0D #200D #2020 #5420 #5345 #4654 #4549 #444C #2020)
WAITINIT 20
"
"
INITREAD #122F 128 DUMP
APPEND #122F 19 (#0803 #0E1E #0E04 #4027 #0E08 #4427 #0E41 #4228 #3030 #0032)
APPEND #122F 22 (#0603 #111E #2004 #2020 #2020 #5420 #5345 #4654 #4549 #444C #2020)
APPEND #122F 19 (#0803 #0E1E #0E04 #4027 #0E08 #4427 #0E41 #4228 #3030 #0032)
WAITINIT 20
"
"
"DATA IN SPLIT 0 AND USER FIELD 2
"---------------
"
INITREAD #122F 128 DUMP
APPEND #122F 26 (#0703 #151E #0D04 #6162 #2B0E #0F5F #2320 #4241 #4D0F #4323 #0E44 #6134 #6362)
WAITINIT 20
"
"
"FIRST LINE DISPLAY IN SPLIT 0
"-------------------------------
"
INITREAD #122F 128 DUMP
APPEND #122F 15 (#0A03 #0A1E #0E04 #572B #0E30 #3024 #3030 #0031)
WAITINIT 20
"
"
"FORMAT MODE ON
"--------------
"
INITREAD #122F 128 DUMP
APPEND #122F 11 (#0B03 #061E #0E04 #572B #0E30 #0041)
WAITINIT 20
"
"
CANCEL CRID #120F
CANCEL CRID #122F
DISMANTLE #122F
DISMANTLE #120F
END 2