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

⟦0339ccfb7⟧ TextFile

    Length: 3188 (0xc74)
    Types: TextFile
    Names: »TEST_ALL«

Derivation

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

TextFile

BEGIN
DEFINE PATTERN 1 = '(:01:)(:15:)(:30:)(:05:)(:01:)VZCZC'
DEFINE PATTERN 2 = '(:00:)(:30:)(:24:)(:01:)FM CHRISTIAN ROVSING A/S'
DEFINE PATTERN 3 = '(:00:)(:30:)(:24:)(:01:)TO CHRISTIAN ROVSING A/S'
DEFINE PATTERN 4 = '(:00:)(:30:)(:02:)(:01:)BT'
DEFINE PATTERN 5 = '(:00:)(:30:)(:20:)(:01:)COMPANY CONFIDENTIAL'
DEFINE PATTERN 6 = '(:00:)(:30:)(:44:)(:01:)THE QUICK BROWN FOX JUMPS OVER THE LAZY DOG.'
DEFINE PATTERN 7 = '(:00:)(:30:)(:16:)(:01:)0123456789.;:-?/'
DEFINE PATTERN 8 = '(:02:)(:30:)(:04:)(:01:)NNNN'
CREATE 0 #110F 7 16
APPEND #110F 0 (#1111)
INITREAD #110F 16 DUMP
APPEND #110F 6 ( #0001 #107F #1101 )
INITREAD #110F 16 DUMP
APPEND #110F 6 ( #2001 #107F #1121 )
CREATE 0 #112F 7 130
INITREAD #110F 16 DUMP
APPEND #110F 6 ( #3001 #107F #1131 )
CREATE 0 #113F 7 130
INITREAD #110F 16 DUMP
APPEND #110F 6 ( #4001 #107F #1141 )
CREATE 0 #114F 7 130
INITREAD #110F 16 DUMP
APPEND #110F 6 ( #5001 #107F #1151 )
CREATE 0 #115F 7 130
REPEAT 2
  BEGIN
    INITREAD #112F 128 DUMP
    INITREAD #112F 128 DUMP
    INITREAD #112F 128 DUMP
    INITREAD #113F 128 DUMP
    INITREAD #113F 128 DUMP
    INITREAD #113F 128 DUMP
    INITREAD #114F 128 DUMP
    INITREAD #114F 128 DUMP
    INITREAD #114F 128 DUMP
    INITREAD #115F 128 DUMP
    INITREAD #115F 128 DUMP
    INITREAD #115F 128 DUMP
    INITAPPEND #112F 3 ( #0007 #0010 )        "INPUT REQUEST, LDU NO. #10"
    INITAPPEND #113F 3 ( #0007 #0020 )        "INPUT REQUEST, LDU NO. #20"
    INITAPPEND #114F 3 ( #0007 #0030 )        "INPUT REQUEST, LDU NO. #30"
    INITAPPEND #115F 3 ( #0007 #0040 )        "INPUT REQUEST, LDU NO. #40"
    INITAPPEND #112F 10 PATTERN 1
    INITAPPEND #113F 10 PATTERN 1
    INITAPPEND #114F 10 PATTERN 1
    APPEND #115F 10 PATTERN 1
    INITAPPEND #112F 28 PATTERN 2
    INITAPPEND #113F 28 PATTERN 2
    INITAPPEND #114F 28 PATTERN 2
    APPEND #115F 28 PATTERN 2
    INITAPPEND #112F 28 PATTERN 3
    INITAPPEND #113F 28 PATTERN 3
    INITAPPEND #114F 28 PATTERN 3
    APPEND #115F 28 PATTERN 3
    INITAPPEND #112F  6 PATTERN 4
    INITAPPEND #113F  6 PATTERN 4
    INITAPPEND #114F  6 PATTERN 4
    APPEND #115F  6 PATTERN 4
    INITAPPEND #112F 24 PATTERN 5
    INITAPPEND #113F 24 PATTERN 5
    INITAPPEND #114F 24 PATTERN 5
    APPEND #115F 24 PATTERN 5
    INITAPPEND #112F 48 PATTERN 6
    INITAPPEND #113F 48 PATTERN 6
    INITAPPEND #114F 48 PATTERN 6
    APPEND #115F 48 PATTERN 6
    INITAPPEND #112F 20 PATTERN 7
    INITAPPEND #113F 20 PATTERN 7
    INITAPPEND #114F 20 PATTERN 7
    APPEND #115F 20 PATTERN 7
    INITAPPEND #112F 24 PATTERN 5
    INITAPPEND #113F 24 PATTERN 5
    INITAPPEND #114F 24 PATTERN 5
    APPEND #115F 24 PATTERN 5
    INITAPPEND #112F  6 PATTERN 4
    INITAPPEND #113F  6 PATTERN 4
    INITAPPEND #114F  6 PATTERN 4
    APPEND #115F  6 PATTERN 4
    INITAPPEND #112F  8 PATTERN 8
    INITAPPEND #113F  8 PATTERN 8
    INITAPPEND #114F  8 PATTERN 8
    APPEND #115F  8 PATTERN 8
    WAITINIT 5
    WAITINIT 5
    WAITINIT 5
    WAITINIT 5
  END
WAITINIT 50
LIST OPERATIONS
CANCEL CRID #110F
CANCEL CRID #112F
CANCEL CRID #113F
CANCEL CRID #114F
CANCEL CRID #115F
DISMANTLE #110F
DISMANTLE #112F
DISMANTLE #113F
DISMANTLE #114F
DISMANTLE #115F
END