! Mouse/filestore disc process for Fuji 2243 80 Mb Winchester with Ambit
! controller and RWT interface.  New Mouse version.

%externalstring(47) copyright %alias "GDMR_(C)_2243" = %c
   "Copyright (C) 1987 George D.M. Ross"

%option "-low-nonstandard-nocheck-nodiag-noline"

%include "Moose:Mouse.Inc"

%conststring(31) request mailbox name = "DISC_REQUESTS"

%systemroutinespec phex2(%integer what)
%systemroutinespec phex(%integer what)

%constinteger heads     0 =  11
%constinteger sectors   0 =  16
%constinteger cylinders 0 = 754
%constintegerarray head table0(0 : heads 0 - 1) =
   0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10

%constinteger heads     1 = heads 0
%constinteger sectors   1 = sectors 0
%constinteger cylinders 1 = cylinders 0
%constintegerarray head table1(0 : heads 1 - 1) =
   0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10

%owninteger drive 0 size  = 0
%owninteger drive 1 size  = 0

%include "GDMR_H:Lights.Inc"
%constinteger lights read  = 1
%constinteger lights write = 2
%constinteger lights wait  = 4, lights seek = lights wait
%constinteger lights clear = lights read ! lights write

%include "GDMR_H:Disc.Ambit"
%include "GDMR_H:Disc.Indep"

%end %of %file