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

⟦033fd60cc⟧ TextFile

    Length: 4134 (0x1026)
    Types: TextFile
    Names: »DELTA.TEST.SRC«

Derivation

└─⟦b8af24a88⟧ Bits:30005796 CR80 Disc Pack ( MINICAMPS )
    └─ ⟦this⟧ »HKH.D!DELTA.TEST.SRC« 

TextFile

PROCEDURE IO_DELTA_INI
BEGIN
    DEFINE PATTERN 1 = #6D0E "BTTY MODE"
    DEFINE PATTERN 2 = #17 "START OF MESSAGE"
    DEFINE PATTERN 3 = #5E0E "END OF MESSAGE"
    DEFINE PATTERN 4 = #520E "CLEAR SPLIT MEMORY"
    DEFINE PATTERN 5 = #3B0E "ENTER"
    DEFINE PATTERN 6 = '(:30:)(:71:)THE QUICK BROWN FOX JUMPS OVER THE LAZY DOG 0123456789!"#$%&*:@;><[](:10:)(:13:)'
    DEFINE PATTERN 7 = #08 "CURSOR LEFT"
    APPEND #133F 1 PATTERN 2
    APPEND #135F 1 PATTERN 2
    APPEND #137F 1 PATTERN 2
    APPEND #139F 1 PATTERN 2
    REPEAT 6
    BEGIN
        INITAPPEND #133F 73 PATTERN 6
        INITAPPEND #135F 73 PATTERN 6
        INITAPPEND #137F 73 PATTERN 6
        INITAPPEND #139F 73 PATTERN 6
    END
    DELAY 50
    APPEND #133F 2 PATTERN 3
    APPEND #135F 2 PATTERN 3
    APPEND #137F 2 PATTERN 3
    APPEND #139F 2 PATTERN 3
    REPEAT 6
    BEGIN
        INITREAD #133F 80 DUMP
        INITREAD #135F 80 DUMP
        INITREAD #137F 80 DUMP
        INITREAD #139F 80 DUMP
    END
    INITAPPEND #133F 2 PATTERN 5
    INITAPPEND #135F 2 PATTERN 5
    INITAPPEND #137F 2 PATTERN 5
    INITAPPEND #139F 2 PATTERN 5
    DELAY 100
END
PROCEDURE IO_DELTA
BEGIN
    DEFINE PATTERN 1 = #6D0E "BTTY MODE"
    DEFINE PATTERN 2 = #17 "START OF MESSAGE"
    DEFINE PATTERN 3 = #5E0E "END OF MESSAGE"
    DEFINE PATTERN 4 = #520E "CLEAR SPLIT MEMORY"
    DEFINE PATTERN 5 = #3B0E "ENTER"
    DEFINE PATTERN 6 = '(:30:)(:71:)THE QUICK BROWN FOX JUMPS OVER THE LAZY DOG 0123456789!"#$%&*:@;><[](:10:)(:13:)'
    DEFINE PATTERN 7 = #08 "CURSOR LEFT"
    APPEND #133F 1 PATTERN 7
    APPEND #135F 1 PATTERN 7
    APPEND #137F 1 PATTERN 7
    APPEND #139F 1 PATTERN 7
    APPEND #133F 1 PATTERN 2
    APPEND #135F 1 PATTERN 2
    APPEND #137F 1 PATTERN 2
    APPEND #139F 1 PATTERN 2
    REPEAT 6
    BEGIN
        INITAPPEND #133F 73 PATTERN 6
        INITAPPEND #135F 73 PATTERN 6
        INITAPPEND #137F 73 PATTERN 6
        INITAPPEND #139F 73 PATTERN 6
    END
    DELAY 50
    APPEND #133F 2 PATTERN 3
    APPEND #135F 2 PATTERN 3
    APPEND #137F 2 PATTERN 3
    APPEND #139F 2 PATTERN 3
    REPEAT 6
    BEGIN
        INITREAD #133F 80 DUMP
        INITREAD #135F 80 DUMP
        INITREAD #137F 80 DUMP
        INITREAD #139F 80 DUMP
    END
    INITAPPEND #133F 2 PATTERN 5
    INITAPPEND #135F 2 PATTERN 5
    INITAPPEND #137F 2 PATTERN 5
    INITAPPEND #139F 2 PATTERN 5
    DELAY 100
END
BEGIN
DEFINE PATTERN 1 = #6D0E "BTTY MODE"
DEFINE PATTERN 2 = #17 "START OF MESSAGE"
DEFINE PATTERN 3 = #5E0E "END OF MESSAGE"
DEFINE PATTERN 4 = #520E "CLEAR SPLIT MEMORY"
DEFINE PATTERN 5 = #3B0E "ENTER"
DEFINE PATTERN 6 = '(:30:)(:71:)THE QUICK BROWN FOX JUMPS OVER THE LAZY DOG 0123456789!"#$%&*:@;><[](:10:)(:13:)'
DEFINE PATTERN 7 = #08 "CURSOR LEFT"
CREATE 0 #130F 5 16
APPEND #130F 0 ( #BB )
INITREAD #130F 16 DUMP
APPEND #130F 6 ( #0001 #103F #1301 )
INITREAD #130F 16 DUMP
APPEND #130F 6 ( #2001 #103F #1321 )
INITREAD #130F 16 DUMP
APPEND #130F 6 ( #3001 #103F #1331 )
INITREAD #130F 16 DUMP
APPEND #130F 6 ( #4001 #103F #1341 )
INITREAD #130F 16 DUMP
APPEND #130F 6 ( #5001 #103F #1351 )
INITREAD #130F 16 DUMP
APPEND #130F 6 ( #6001 #103F #1361 )
INITREAD #130F 16 DUMP
APPEND #130F 6 ( #7001 #103F #1371 )
INITREAD #130F 16 DUMP
APPEND #130F 6 ( #8001 #103F #1381 )
INITREAD #130F 16 DUMP
APPEND #130F 6 ( #9001 #103F #1391 )
DISMANTLE #130F
CREATE 0 #132F 5 16
CREATE 0 #133F 5 80
CREATE 0 #134F 5 16
CREATE 0 #135F 5 80
CREATE 0 #136F 5 16
CREATE 0 #137F 5 80
CREATE 0 #138F 5 16
CREATE 0 #139F 5 80
APPEND #133F 0 ( #BB )
APPEND #135F 0 ( #BB )
APPEND #137F 0 ( #BB )
APPEND #139F 0 ( #BB )
APPEND #133F 2 PATTERN 1
APPEND #135F 2 PATTERN 1
APPEND #137F 2 PATTERN 1
APPEND #139F 2 PATTERN 1
APPEND #133F 2 PATTERN 4
APPEND #135F 2 PATTERN 4
APPEND #137F 2 PATTERN 4
APPEND #139F 2 PATTERN 4
IO_DELTA_INI
IO_DELTA
IO_DELTA
IO_DELTA
LIST OPERATIONS
CANCEL CRID #132F
CANCEL CRID #133F
CANCEL CRID #134F
CANCEL CRID #135F
CANCEL CRID #136F
CANCEL CRID #137F
CANCEL CRID #138F
CANCEL CRID #139F
DISMANTLE #132F
DISMANTLE #133F
DISMANTLE #134F
DISMANTLE #135F
DISMANTLE #136F
DISMANTLE #137F
DISMANTLE #138F
DISMANTLE #139F
END