home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Columbia Kermit
/
kermit.zip
/
archives
/
convergent.tar.gz
/
convergent.tar
/
ctsamg.asm
< prev
next >
Wrap
Assembly Source File
|
1993-01-20
|
2KB
|
31 lines
$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