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

⟦37d1bef70⟧ TextFile

    Length: 2766 (0xace)
    Types: TextFile
    Names: »TEST.FODCCIS«

Derivation

└─⟦7d52498cf⟧ Bits:30005127 8" CR80 Floppy CR80FD_0087 ( FAT1 TDX TEST PROGRAM VOL: FLOPPY 96.03.20KV )
    └─⟦300c0b4c9⟧ 
        └─ ⟦this⟧ »TEST.FODCCIS« 
└─⟦82c820f12⟧ Bits:30005487 8" CR80 Floppy CR80FD_0209 ( VOL: FLOPPY FD 0 #3 TDX Test progr HOST/LTUX MASSOURCE Backup af x 2 heads 880419 )
    └─⟦332002524⟧ 
        └─ ⟦this⟧ »TEST.FODCCIS« 

TextFile

BEGIN
"
DEFINE PATTERN 1 = '(:3:)(:7:)***THE QUICK BROWN FOX JUMPS OVER THE LAZY DOG. 0123456789.'
"
"****INIT DEVICE #2F SUBDEVICE 3 + 5 ****
"----------------------------------------
CREATE 0 #2F0F 5 16                      "CREATE LOG LINE SUBDEV 0"
APPEND #2F0F 0 (0)                       "SYNCRONIZE LTUX"
INITREAD #2F0F 16 DUMP                   "SETUP READ FOR SUBDEV 0"
APPEND #2F0F 6 (#3001 #107F #2F31)       "OPEN SUBDEV 3"
WAITINIT 30
CREATE 0 #2F3F 8 132                     "CREATE LOG LINE SUBDEV 3"
INITREAD #2F0F 16 DUMP                   "SETUP READ FOR SUBDEV 0"
APPEND #2F0F 6 (#5001 #107F #2F51)       "OPEN SUBDEV 5"
WAITINIT 30
CREATE 0 #2F5F 8 132                     "CREATE LOG LINE SUBDEV 5"
"
"****OPEN LINK SUBDEVICE 3 + 5 ****
"----------------------------------
INITREAD #2F3F 130 DUMP                  "SETUP RESPONSE READ"
INITREAD #2F5F 130 DUMP                  "SETUP RESPONSE READ"
"                                         OPEN 25
APPEND #2F3F 12 (#0207 #0301 #1407 #FF02 #FF0E #01FF)
APPEND #2F5F 12 (#0207 #0301 #1407 #FF02 #FF0E #00FF)
WAITINIT 30
INITREAD #2F3F 130 DUMP                  "SETUP RESPONSE READ"
INITREAD #2F5F 130 DUMP                  "SETUP RESPONSE READ"
APPEND #2F3F 3 (#0207 #02)               "SETUP LINES"
APPEND #2F5F 3 (#0207 #02)               "SETUP LINES"
WAITINIT 60                              "WAIT 20 SEC"
INITREAD #2F3F 130 DUMP                  "SETUP RESPONSE READ"
INITREAD #2F5F 130 DUMP                  "SETUP RESPONSE READ"
APPEND #2F3F 3 (#0207 #03)               "SET UP LINK"
APPEND #2F5F 3 (#0207 #03)               "SET UP LINK"
WAITINIT 300                             "WAIT 100 SEC"
"
"APPEND/READ 100 QUICK BROWN .... -PACKETS
"------------------------------------------
REPEAT 32000
BEGIN
  INITREAD #2F3F 130
  INITREAD #2F3F 130
  INITAPPEND #2F3F 59 PATTERN 1          "OUTPUT TEST PATTERN"
  WAITINIT 30                            "WAIT 10 SEC (IF NEEDED)"
  INITREAD #2F5F 130
  INITREAD #2F5F 130
  INITAPPEND #2F5F 59 PATTERN 1          "OUTPUT TEST PATTERN"
  WAITINIT 30                            "WAIT 10 SEC IF NEEDED"
END
"
"**** CLEAN UP ****
"------------------
INITREAD #2F3F 130 DUMP
INITREAD #2F5F 130 DUMP
INITREAD #2F3F 130 DUMP
INITREAD #2F5F 130 DUMP
APPEND #2F3F 3 (#0207 #12)               "PUT LINES DOWN"
APPEND #2F5F 3 (#0207 #12)               "PUT LINES DOWN"
WAITINIT 300
INITREAD #2F3F 130 DUMP                  "SETUP RESPONSE READ"
INITREAD #2F5F 130 DUMP                  "SETUP RESPONSE READ"
APPEND #2F3F 3 (#0207 #11)               "CLOSE X25"
APPEND #2F5F 3 (#0207 #11)               "CLOSE X25"
WAITINIT 30
"
LIST OPERATIONS                          "EVERY OPERATION COMPLETED"
"
DISMANTLE #2F0F
DISMANTLE #2F3F
DISMANTLE #2F5F
"
END -