|
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: 2432 (0x980)
Types: TextFile
Names: »ALPHABET_ALL«
└─⟦b8af24a88⟧ Bits:30005796 CR80 Disc Pack ( MINICAMPS )
└─ ⟦this⟧ »USERS.D!CAH.D!ALPHABET_ALL«
BEGIN
DEFINE PATTERN 1 = '(:01:)(:10:)(:30:)(:05:)(:01:)VZCZC'
DEFINE PATTERN 2 = '(:00:)(:30:)(:60:)(:01:)X X!X"X#X$X%X&X(:39:)X(X)X*X+X,X-X.X/X01234 56789X:X;X<X=X>X?X@XX'
DEFINE PATTERN 3 = '(:00:)(:30:)(:40:)(:01:)ABCDEFGHIJKLMNOPQRSTUVWXYZ X[X\X]X^X_X`X'
DEFINE PATTERN 4 = '(:00:)(:30:)(:36:)(:01:)abcdefghijklmnopqrstuvwxyz X{X|X}X~X'
DEFINE PATTERN 9 = '(:02:)(:30:)(:04:)(:01:)NNNN'
DUMP PATTERN 1
DUMP PATTERN 2
DUMP PATTERN 3
DUMP PATTERN 4
DUMP PATTERN 9
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 1
BEGIN
INITREAD #112F 128 DUMP
INITREAD #112F 128 DUMP
INITREAD #113F 128 DUMP
INITREAD #113F 128 DUMP
INITREAD #114F 128 DUMP
INITREAD #114F 128 DUMP
INITREAD #115F 128 DUMP
INITREAD #115F 128 DUMP
INITAPPEND #112F 3 ( #0007 #0001 ) "INPUT REQUEST, LDU NO. #01"
INITAPPEND #113F 3 ( #0007 #0002 ) "INPUT REQUEST, LDU NO. #02"
INITAPPEND #114F 3 ( #0007 #0003 ) "INPUT REQUEST, LDU NO. #03"
INITAPPEND #115F 3 ( #0007 #0004 ) "INPUT REQUEST, LDU NO. #04"
INITAPPEND #112F 10 PATTERN 1
INITAPPEND #113F 10 PATTERN 1
INITAPPEND #114F 10 PATTERN 1
APPEND #115F 10 PATTERN 1
INITAPPEND #112F 64 PATTERN 2
INITAPPEND #113F 64 PATTERN 2
INITAPPEND #114F 64 PATTERN 2
APPEND #115F 64 PATTERN 2
INITREAD #112F 128 DUMP
INITREAD #113F 128 DUMP
INITREAD #114F 128 DUMP
INITREAD #115F 128 DUMP
INITAPPEND #112F 44 PATTERN 3
INITAPPEND #113F 44 PATTERN 3
INITAPPEND #114F 44 PATTERN 3
APPEND #115F 44 PATTERN 3
INITAPPEND #112F 40 PATTERN 4
INITAPPEND #113F 40 PATTERN 4
INITAPPEND #114F 40 PATTERN 4
APPEND #115F 40 PATTERN 4
INITAPPEND #112F 8 PATTERN 9
INITAPPEND #113F 8 PATTERN 9
INITAPPEND #114F 8 PATTERN 9
APPEND #115F 8 PATTERN 9
WAITINIT 20
END
WAITINIT 50
LIST OPERATIONS
CANCEL CRID #112F
CANCEL CRID #113F
CANCEL CRID #114F
CANCEL CRID #115F
CANCEL CRID #110F
DISMANTLE #112F
DISMANTLE #113F
DISMANTLE #114F
DISMANTLE #115F
DISMANTLE #110F
END C