$LARGE(READSUB HAS READ$DB$MOD; EXPORTS READ$DB)
$LARGE(WRITESUB HAS WRITE$DB$MOD; EXPORTS WRITE$DB)
$TITLE('USER INTERFACE MODULE FOR 86/310, 286/310 5.25" 12MB')
USERINTERFACEMOD: DO;

$INCLUDE(:F1:COMMON.LIT)

DECLARE /* DUMB TERMINAL ESCAPE CODES */
  CLEAR$25TH$LINE LITERALLY '0DH, 0AH, 0AH',
  CLEAR$SCREEN    LITERALLY '0AH, 0AH';

DECLARE
  USER$COPYRIGHT(*) BYTE PUBLIC DATA(
      'COPYRIGHT INTEL CORP. 1980,1983', EOLN),
  PART$NUM(*)        BYTE PUBLIC DATA('P/N 173965-010'),
  USER$SIGNON(*)     BYTE PUBLIC DATA( /* 70 CHARACTERS OF SIGN-ON */
    CLEAR$25TH$LINE, CLEAR$SCREEN,
    'SDTWIN5 - 86/310 Winchester/SMD SDT,  V1.2                      ', EOLN);

DECLARE /* THE LARGER THE FOLLOWING, THE LONGER THE DELAY */
  DELAY$FACTOR BYTE PUBLIC INITIAL(10);

DECLARE
  DEFAULT$DRIVE$DESCRIPTOR$TABLE LITERALLY
    'STRUCTURE(
      TOTAL$CYLINDERS WORD,
      FIXED$HEADS BYTE,
      REMOVABLE$HEADS BYTE,
      SECTORS$PER$TRACK BYTE,
      BYTES$PER$SECTOR WORD,
      NUMOF$ALTERNATE$CYLINDERS WORD)';

DECLARE
  CONTROLLER$215(4) STRUCTURE(
    WAKEUP           WORD,
    INTERRUPT$NUMBER BYTE ) PUBLIC
      DATA(0100H, 05H,
           0,     0FFH, /* WAKEUP=0 NOT USED, INTERRUPT=FF NOT USED */
           0,     0FFH,
           0,     0FFH),

  CONTROLLER$220(4) STRUCTURE(
    WAKEUP           WORD,
    INTERRUPT$NUMBER BYTE ) PUBLIC
      DATA(0,      0FFH, /* WAKEUP=0 NOT USED, INTERRUPT=FF NOT USED */
           0,      0FFH,
           0,      0FFH,
           0,      0FFH);

DECLARE
  MULTIBUS$8259$PIC$BASE$PORT$NUMBER WORD PUBLIC DATA( 0C0H ),
  MULTIBUS$8259$PIC$MASK$PORT$NUMBER WORD PUBLIC DATA( 0C2H );
$EJECT
DECLARE
  CONTROLLER$215$0$DRIVE(4) DEFAULT$DRIVE$DESCRIPTOR$TABLE PUBLIC
       /*          HEADS                                */
       /* CYLS  FIXED RMVAL  SECT/TRK  BYTES/SECT  ALTS */
       /* ----   ---   ---     ---       -----     ---- */
    DATA(  306,    4,    0,      9,       1024,       8,
           306,    4,    0,      9,       1024,       8,
           306,    4,    0,      9,       1024,       8,
           306,    4,    0,      9,       1024,       8  ),

  CONTROLLER$215$1$DRIVE(4) DEFAULT$DRIVE$DESCRIPTOR$TABLE PUBLIC
    DATA(  306,    4,    0,      9,       1024,       8,
           306,    4,    0,      9,       1024,       8,
           306,    4,    0,      9,       1024,       8,
           306,    4,    0,      9,       1024,       8  ),

  CONTROLLER$215$2$DRIVE(4) DEFAULT$DRIVE$DESCRIPTOR$TABLE PUBLIC
    DATA(  306,    4,    0,      9,       1024,       8,
           306,    4,    0,      9,       1024,       8,
           306,    4,    0,      9,       1024,       8,
           306,    4,    0,      9,       1024,       8  ),

  CONTROLLER$215$3$DRIVE(4) DEFAULT$DRIVE$DESCRIPTOR$TABLE PUBLIC
    DATA(  306,    4,    0,      9,       1024,       8,
           306,    4,    0,      9,       1024,       8,
           306,    4,    0,      9,       1024,       8,
           306,    4,    0,      9,       1024,       8  ),

  CONTROLLER$220$0$DRIVE(4) DEFAULT$DRIVE$DESCRIPTOR$TABLE PUBLIC
    DATA(  589,    7,    0,     18,       1024,      29,
           589,    7,    0,     18,       1024,      29,
           589,    7,    0,     18,       1024,      29,
           589,    7,    0,     18,       1024,      29  ),

  CONTROLLER$220$1$DRIVE(4) DEFAULT$DRIVE$DESCRIPTOR$TABLE PUBLIC
    DATA(  589,    7,    0,     18,       1024,      29,
           589,    7,    0,     18,       1024,      29,
           589,    7,    0,     18,       1024,      29,
           589,    7,    0,     18,       1024,      29  ),

  CONTROLLER$220$2$DRIVE(4) DEFAULT$DRIVE$DESCRIPTOR$TABLE PUBLIC
    DATA(  589,    7,    0,     18,       1024,      29,
           589,    7,    0,     18,       1024,      29,
           589,    7,    0,     18,       1024,      29,
           589,    7,    0,     18,       1024,      29  ),

  CONTROLLER$220$3$DRIVE(4) DEFAULT$DRIVE$DESCRIPTOR$TABLE PUBLIC
    DATA(  589,    7,    0,     18,       1024,      29,
           589,    7,    0,     18,       1024,      29,
           589,    7,    0,     18,       1024,      29,
           589,    7,    0,     18,       1024,      29  );

END USERINTERFACEMOD;