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

⟦944ecfa3f⟧ TextFile

    Length: 854 (0x356)
    Types: TextFile
    Names: »CURSOR_MOVE_2«

Derivation

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

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 LIN 1 FIRST DISP, MOVE CURS TO LIN 1, COL 1"
APPEND #122F 17(#0103 #061E #0E04 #3024 #3030 #1E31 #0403 #2F0F #002F)
WAITINIT 20
INITREAD #122F 128 DUMP "MAKE LIN 11 FIRST DISP, MOVE CURS TO LIN 22, COL 80"
APPEND #122F 17(#0103 #061E #0E04 #3024 #3030 #1E42 #0403 #600F #003A)
WAITINIT 20
END
LIST OPERATIONS
CANCEL CRID #120F
CANCEL CRID #122F
DISMANTLE #122F
DISMANTLE #120F
END