$INCLUDE (samgen.mdf)
%Init
$EJECT
%DeviceOpen([Kbd],OpenByteStreamK)
%DeviceOpen([Vid],OpenByteStreamVid)
%DeviceOpen([Lpt],OpenByteStreamLpt)
%DeviceOpen([Ptr],OpenByteStreamC)
%DeviceOpen([Nul],OpenByteStreamN)
%DeviceOpen([Comm],OpenByteStreamC)
%DeviceOpen([Spl],OpenByteStreamSpl)
%DeviceOpen([Disk],OpenByteStreamAD)
$EJECT
%tagProcs(tagDiskRead,FillBufferAD,FlushBufIllegal,CheckPointBsAD,ReleaseByteStreamAD,SetImageModeIllegal)
%tagProcs(tagDiskWrite,FillBufIllegal,FlushBufferAD,CheckPointBsAD,ReleaseByteStreamAD,SetImageModeIllegal)
%tagProcs(tagDiskModify,FillBufferAD,FlushBufferAD,CheckPointBsAD,ReleaseByteStreamAD,SetImageModeIllegal)
%tagProcs(tagKbdRead,FillBufferK,FlushBufIllegal,ChkptNop,ReleaseEasy,SetImageModeIllegal)
%tagProcs(tagVideoWrite,FillBufIllegal,FlushBufferVid,ChkptNop,ReleaseEasy,SetImageModeIllegal)
%tagProcs(tagLptWrite,FillBufIllegal,FlushBufferLpt,CheckPointBsLpt,ReleaseByteStreamLpt,SetImageModeLpt)
%tagProcs(tagPtrWrite,FillBufIllegal,FlushBufferC,CheckPointBsC,ReleaseByteStreamC,SetImageModeC)
%tagProcs(tagNul,FillBufferN,FlushBufferN,ChkptNop,ReleaseEasy,SetImageModeIllegal)
%tagProcs(tagCommRead,FillBufferC,FlushBufIllegal,CheckPointBsC,ReleaseByteStreamC,SetImageModeC)
%tagProcs(tagCommWrite,FillBufIllegal,FlushBufferC,CheckPointBsC,ReleaseByteStreamC,SetImageModeC)
%tagProcs(tagCommModify,FillBufferC,FlushBufferC,CheckPointBsC,ReleaseByteStreamC,SetImageModeC)
%tagProcs(tagSplWrite,FillBufIllegal,FlushBufferAD,CheckPointBsAD,ReleaseByteStreamSpl,SetImageModeSpl)
$EJECT
%DevDepProc(QueryVidBs,QueryVideoBs)
%DevDepProc(GetBsLfa,GetBsLfaAsync)
%DevDepProc(SetBsLfa,SetBsLfaAsync)
%DevDepProc(SetImageMode,SetImageModeBrn)
%Final
