<<==============================================================        00005000
                                                                        00010000
                        incdisc1 - b5                                   00015000
                                                                        00020000
                disc information include file                           00025000
                                                                        00030000
==============================================================>>        00035000
                                                                        00040000
                                                                        00045000
<< *********************** disc label *********************** >>        00050000
                                                                        00055000
define disc'label'address = 0d#;  << sector address of disc label >>    00060000
                                                                        00065000
<< offsets into the disc label >>                                       00070000
                                                                        00075000
equate disc'lab'type'word = %6;      << type/subtype word           >>  00080000
equate disc'lab'cold'load'id = %7;   << cold load id word           >>  00085000
equate disc'lab'gen'index = %7;      << generation index, pv        >>  00090000
equate disc'lab'volume'name = %12;   << volume name (4 words)       >>  00095000
equate disc'lab'init'date = %16;     << initial date                >>  00100000
equate disc'lab'dirbase = %17;       << directory base              >>  00105000
equate disc'lab'dirsize =%20;        << directory size (sectors)    >>  00110000
equate disc'lab'accnt'name = %21;    << account name(4 wds), pv     >>  00115000
equate disc'lab'group'name = %25;    << group name(4 wds), pv       >>  00120000
equate disc'lab'set = %31;           << vol set name(4 wds), pv     >>  00125000
equate disc'lab'dfs'map'ok = 121;    << flag to indicate free       >>  00130000
                                     << space map is ok or damaged  >>  00135000
equate disc'lab'dt'check'sum = 122;  << dt check sum                >>  00140000
equate disc'lab'dirty'dt'flag = 123; << dt dirty flag               >>  00145000
equate disc'lab'dt'high = 124;       << high order dt address       >>  00150000
equate disc'lab'dt'low = 125;        << low order dt address        >>  00155000
equate disc'lab'map'high = 126;      << high order free space map   >>  00160000
                                     << address                     >>  00165000
equate disc'lab'map'low = 127;       << low order free space map    >>  00170000
                                     << address                     >>  00175000
                                                                        00180000
                                                                        00185000
<< fields in disc'lab'type'word >>                                      00190000
                                                                        00195000
define disc'lab'type = (6:6)#;      << disc type         >>             00200000
define disc'lab'subtype = (12:4)#;  << disc subtype      >>             00205000
define disc'lab'mv = (1:1)#;        << master volume, pv >>             00210000
define disc'lab'sc = (0:1)#;        << scratch volume    >>             00215000
define disc'lab'sr = (2:1)#;        << serial volume     >>             00220000
                                                                        00225000
                                                                        00230000
<< disc type values >>                                                  00235000
                                                                        00240000
equate mh'disc'type = 0;       << moving head disc type >>              00245000
equate fh'disc'type = 1;       << fixed head disc type  >>              00250000
equate floppy'disc'type = 2;   << floppy disc type      >>              00255000
equate cs'80'type = 3;         << command set '80 type  >>              00260000
                                                                        00265000
                                                                        00270000
<< fixed head disc subtype values >>                                    00275000
                                                                        00280000
equate num'fh'disc'subtypes = 3;  << number of fh disc subtypes >>      00285000
                                                                        00290000
equate st'2660'2m = 1;   << 2660 - 2 megabyte >>                        00295000
equate st'2660'4m = 2;   << 2660 - 4 megabyte >>                        00300000
                                                                        00305000
                                                                        00310000
<< moving head disc subtype values >>                                   00315000
                                                                        00320000
equate num'mh'disc'subtypes = 13;  << number of mh disc subtypes >>     00325000
                                                                        00330000
equate up'7900 = 0;   << 7900 - upper platter     >>                    00335000
equate lp'7900 = 1;   << 7900 - lower platter     >>                    00340000
equate st'7900 = 2;   << 7900 - both platters     >>                    00345000
equate st'2888 = 3;   << 2888                     >>                    00350000
equate rp'7905 = 4;   << 7905 - removable platter >>                    00355000
equate fp'7905 = 5;   << 7905 - fixed platter     >>                    00360000
equate cm'7905 = 6;   << 7905 - cylinder mode     >>                    00365000
equate sd'7905 = 7;   << 7905 - system disc mode  >>                    00370000
equate st'7920 = 8;   << 7920                     >>                    00375000
equate st'7925 = 9;   << 7925                     >>                    00380000
equate rp'7906 = 10;  << 7906 - removable platter >>                    00385000
equate fp'7906 = 11;  << 7906 - fixed platter     >>                    00390000
equate st'7906 = 12;  << 7906 - both platters     >>                    00395000
                                                                        00400000
                                                                        00405000
<< floppy disc subtype values >>                                        00410000
                                                                        00415000
equate num'floppy'disc'subtypes = 1;  << number of floppy subtypes >>   00420000
                                                                        00425000
equate floppy'disc'subtype = 0;       << floppy disc subtype >>         00430000
                                                                        00435000
                                                                        00440000
<< command set '80 subtype values >>                                    00445000
                                                                        00450000
equate num'cs'80'subtypes = 7;        << number of cs'80 subtypes >>    00455000
                                                                        00460000
equate st'9110 = 0; << hp 9110 (linus) >>                               00465000
equate st'7911 = 1; << hp 7911         >>                               00470000
equate st'7912 = 2; << hp 7912         >>                               00475000
equate st'9144 = 3; << hp 9144(buffalo)>>                      <<*8115>>00480000
equate st'7914 = 4; << hp 7914         >>                               00485000
equate st'7945 = 5; << hp 7945 (falstaff) >>                   <<*8838>>00490000
equate st'7935 = 8; << hp 7935         >>                               00495000
                                                                        00500000
                                                                        00505000
<< ***************** defective tracks table ***************** >>        00510000
                                                                        00515000
define dtt'disc'address = 1d#;                                          00520000
                                                                        00525000
<< offsets into dtt >>                                                  00530000
                                                                        00535000
equate dtt'number'of'entries = %0;     << number of entries in dtt >>   00540000
equate dtt'first'entry = %1;           << first entry in dtt       >>   00545000
equate dtt'next'alt'track = %176;      << next alternate track     >>   00550000
equate dtt'logical'pack'size = %177;   << logical pack size        >>   00555000
                                                                        00560000
                                                                        00565000
<< info about entries in dtt >>                                         00570000
                                                                        00575000
equate dtt'max'number'entries = 120;  << max number of entries in dtt >>00580000
                                                                        00585000
define dtt'track'number = (0:14)#;    << track number field in entry  >>00590000
define dtt'track'code = (14:2)#;      << track code field in entry    >>00595000
                                                                        00600000
                                                                        00605000
<< values of dtt'track'code >>                                          00610000
                                                                        00615000
equate dtt'suspect = 0;      << suspect track           >>              00620000
equate dtt'suspect'alt = 1;  << suspect alternate track >>              00625000
equate dtt'deleted = 2;      << deleted track           >>              00630000
equate dtt'reassigned = 3;   << reassign track          >>              00635000
                                                                        00640000
                                                                        00645000
<< ***************** defective sectors table ***************** >>       00650000
                                                                        00655000
define dsct'disc'address = 1d#;                                         00660000
                                                                        00665000
equate dsct'number'of'entries = %0;    << number of entries in dsct >>  00670000
equate dsct'first'entry'index = %1;    << index of first entry      >>  00675000
equate dsct'offset'to'first'entry = %6;<< offset to first entry,    >>  00680000
                                       << value of above            >>  00685000
equate dsct'entry'size = %2;           << index of word containing  >>  00690000
                                       << entry size.               >>  00695000
                                                                        00700000
equate dsct'size'of'entry = 2;         << size of entry in words    >>  00705000
equate dsct'max'number'of'entries = 3; << index of word containing  >>  00710000
                                       << max number of entries     >>  00715000
equate dsct'max'entries = 61;          << value of above            >>  00720000
                                                                        00725000
                                                                        00730000
<<==============================================================        00735000
                                                                        00740000
                        end of incdisc1                                 00745000
                                                                        00750000
==============================================================>>        00755000
