DataMuseum.dkPresents historical artifacts from the history of: CR80 Hard and Floppy Disks |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CR80 Hard and Floppy Disks Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2334 (0x91e) Types: TextFile Names: »RESTORE_CURSOR1S«
└─⟦b8af24a88⟧ Bits:30005796 CR80 Disc Pack ( MINICAMPS ) └─ ⟦this⟧ »USERS.D!LN.D!SOURCE.D!RESTORE_CURSOR1S«
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