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

⟦d16fb1554⟧ TextFile

    Length: 1048 (0x418)
    Types: TextFile
    Names: »CURSOR_MOVE«

Derivation

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

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
INITREAD #122F 128 DUMP   " SELECT SPLIT #2 AS COMM SPLIT "
APPEND #122F 9 (#0103 #041E #0E04 #572B #0032)
WAITINIT 20
INITREAD #122F 128 DUMP   " MOVE KEYBOARD CURSOR TO SPLIT #2 "
APPEND #122F 9 (#0103 #041E #0E04 #562B #0032)
WAITINIT 20
REPEAT 10
BEGIN
INITREAD #122F 128 DUMP   " MAKE LINE #1 FIRST DISPLAYED LINE "
APPEND #122F 11(#0103 #061E #0E04 #3024 #3030 #0031)
WAITINIT 20
INITREAD #122F 128 DUMP   " MOVE CURSOR TO COLUMN #1, LINE #1 IN SPLIT "
APPEND #122F 8 (#0103 #031E #0F04 #2F2F)
WAITINIT 20
INITREAD #122F 128 DUMP   " MAKE LINE #11 FIRST DISPLAYED LINE "
APPEND #122F 11(#0103 #061E #0E04 #3024 #3030 #0042)
WAITINIT 20
INITREAD #122F 128 DUMP   " MOVE CURSOR TO COLUMN #80, LINE #22 IN SPLIT "
APPEND #122F 8 (#0103 #031E #0F04 #3A60)
WAITINIT 20
END
LIST OPERATIONS
CANCEL CRID #120F
CANCEL CRID #122F
DISMANTLE #122F
DISMANTLE #120F
END