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: 3078 (0xc06) Types: TextFile Names: »LINK_SPLIT.S«
└─⟦b8af24a88⟧ Bits:30005796 CR80 Disc Pack ( MINICAMPS ) └─ ⟦this⟧ »USERS.D!LN.D!SOURCE.D!LINK_SPLIT.S«
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) DUMP BUFFER 2 FROM 0 TO 50 WAITINIT 20 " "ASSIGN SPLIT 1 "--------------- " INITREAD #122F 128 DUMP APPEND #122F 17 (#0203 #0C1E #0E04 #532B #3031 #3031 #3831 #3230 #0037) DUMP BUFFER 2 FROM 0 TO 50 WAITINIT 20 " "BLANK SPLIT 1 "-------------- " INITREAD #122F 128 DUMP APPEND #122F 12 (#0303 #071E #0E04 #572B #0E31 #612B) DUMP BUFFER 2 FROM 0 TO 50 WAITINIT 20 " "FORMAT MODE OFF "--------------- " INITREAD #122F 128 DUMP APPEND #122F 11 (#0403 #061E #0E04 #572B #0E30 #0040) DUMP BUFFER 2 FROM 0 TO 50 WAITINIT 20 " " "CLEAR SPLIT 0 "------------- " INITREAD #122F 128 DUMP APPEND #122F 11 (#0503 #061E #0E04 #572B #0E30 #0052) DUMP BUFFER 2 FROM 0 TO 50 WAITINIT 20 " "DATA IN SPLIT 0 "--------------- " INITREAD #122F 128 DUMP APPEND #122F 28 (#0603 #171E #0D04 #4241 #4443 #4645 #4847 #0D49 #410D #4342 #5444 #4746 #4948 #0D0D) DUMP BUFFER 2 FROM 0 TO 50 WAITINIT 20 " " INITREAD #122F 128 DUMP APPEND #122F 30 (#0803 #191E #0D04 #0D0D #0D0D #0D0D #0D0D #0D0D #0D0D #0D0D #0D0D #0D0D #0D0D #4241 #4443) WAITINIT 20 " " "CLEAR SPLIT 1 "------------- " INITREAD #122F 128 DUMP APPEND #122F 11 (#0703 #061E #0E04 #572B #0E31 #0052) DUMP BUFFER 2 FROM 0 TO 50 WAITINIT 20 " " "DATA IN SPLIT 1 "--------------- " INITREAD #122F 128 DUMP APPEND #122F 30 (#0803 #191E #0D04 #610D #6362 #6564 #6766 #6869 #0D0D #0D0D #6261 #6463 #6665 #6867 #0D69) DUMP BUFFER 2 FROM 0 TO 50 WAITINIT 20 " " "DATA IN SPLIT 1 "--------------- " INITREAD #122F 128 DUMP APPEND #122F 33 (#0803 #1C1E #0D04 #0D0D #0D0D #0D0D #0D0D #0D0D #0D0D #0D0D #0D0D #0D0D #6261 #6463 #6665 #6867 #0069) DUMP BUFFER 2 FROM 0 TO 50 WAITINIT 20 " " "FIRST LINE DISPLAY IN SPLIT 1 "------------------------------- " INITREAD #122F 128 DUMP APPEND #122F 11 (#0A03 #061E #0E04 #3024 #3230 #0038) DUMP BUFFER 2 FROM 0 TO 50 WAITINIT 20 " " "DATA IN SPLIT 1 PAGE 2 "---------------------- " INITREAD #122F 128 DUMP APPEND #122F 30 (#0803 #191E #0D04 #300D #3231 #3433 #3635 #3837 #0D0D #0D0D #3231 #3433 #3635 #3837 #0D39) DUMP BUFFER 2 FROM 0 TO 50 WAITINIT 20 " " "LINK SPLIT 0 AND SPLIT 1 "------------------------ " INITREAD #122F 128 DUMP APPEND #122F 10 (#0903 #051E #0E04 #652B #3031) DUMP BUFFER 2 FROM 0 TO 50 WAITINIT 20 " " "FIRST LINE DISPLAY IN SPLIT 0 "------------------------------- " INITREAD #122F 128 DUMP APPEND #122F 15 (#0A03 #0A1E #0E04 #572B #0E30 #3024 #3030 #0031) DUMP BUFFER 2 FROM 0 TO 50 WAITINIT 20 " " "FORMAT MODE ON "-------------- " INITREAD #122F 128 DUMP APPEND #122F 11 (#0B03 #061E #0E04 #572B #0E30 #0041) DUMP BUFFER 2 FROM 0 TO 50 WAITINIT 20 " " CANCEL CRID #120F CANCEL CRID #122F DISMANTLE #122F DISMANTLE #120F END D