DataMuseum.dkPresents historical artifacts from the history of: CR80 Hard and Floppy Disks |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CR80 Hard and Floppy Disks Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 4134 (0x1026) Types: TextFile Names: »DELTA.TEST.SRC«
└─⟦b8af24a88⟧ Bits:30005796 CR80 Disc Pack ( MINICAMPS ) └─ ⟦this⟧ »HKH.D!DELTA.TEST.SRC«
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