|| TRIPOS Input/Output header.


MANIFEST
$( || General actions.
   Act.Dummy      =1000
   Act.Read       =1001
   Act.Write      =1002
   Act.Seek       =1008
   Act.EndInput   =1003
   Act.EndOutput  =1004
   Act.Findinput  =1005
   Act.Findoutput =1006
   Act.End        =1007
   Act.Readcode   =1030

   || Mag tape
   act.offline    =1007
   act.wreof      =1008
   act.spacefw    =1009
   act.spacerv    =1010
   act.wreig      =1011
   act.rewind     =1012


   || Device packet offset manifests.
   || Common:
   Pkt.Action     =Pkt.Type
   Pkt.Status     =Pkt.Res1
   Pkt.Status2    =Pkt.Res2
   || Timer:
   Pkt.Time1      =Pkt.Res1
   Pkt.Time2      =Pkt.Res2
   Pkt.Delay      =Pkt.Arg1
   || Disc & MT drivers:
   Pkt.BuffAddr   =Pkt.Arg1
   Pkt.WordCount  =Pkt.Arg2
   Pkt.Drive      =Pkt.Arg3
   Pkt.Unit       =Pkt.Drive
   Pkt.Cylinder   =Pkt.Arg4
   Pkt.Surface    =Pkt.Arg5
   Pkt.Sector     =Pkt.Arg6

   || Stream control block.
   Id.InScb       =['S'<<BitsPerByte]+'I'
   Id.OutScb      =['S'<<BitsPerByte]+'O'
   Scb.Link       =0
   Scb.Id         =1
   Scb.Type       =2
   Scb.Buf        =3
   Scb.Pos        =4
   Scb.End        =5
   Scb.Funcs      =6
   Scb.Func1      =6
   Scb.Rdch       = Scb.Func1
   Scb.Func2      =7
   Scb.Wrch       = Scb.Func2
   Scb.Func3      =8
   Scb.Args       =9
   Scb.Arg1       =9
   Scb.Arg2       =10
   Scb.NFunc      =Scb.Args-Scb.Funcs
   Scb.Upb        =10
$)

MANIFEST
$( // Load format types
   t.hunk         =1000
   t.reloc        =1001
   t.end          =1002
   t.abshunk      =1003
   t.absreloc     =1004
   t.relocb       =1005
   t.absrelocb    =1006
$)