File Archive

 
Output of file : ASYLIB.BI contained in archive : ASYLIB11.ZIP

' DECLARE statements required to set up QB4 <--> AsyLIB
' interface.
' (C) Copyright 1987-1988 InfoSoft
' ALL RIGHTS RESERVED
'

' FUNCTIONS _must_ be declared to work correctly !
DECLARE FUNCTION AnsiCol% (Col%, ansi$)
DECLARE FUNCTION AnsiColor% (fg%, bg%, AnsColor$)
DECLARE FUNCTION AnsiRow% (Row%, ansi$)
DECLARE FUNCTION BaudRate% (ComPort%)
DECLARE FUNCTION Buffr2File% (Fh%, s$, bcount%)
DECLARE FUNCTION File2Buffr% (Fh%, s$, bcount%)
DECLARE FUNCTION FirstF% (fil$, ret$)
DECLARE FUNCTION NextF% (ret$)
DECLARE FUNCTION KeyReady%
DECLARE FUNCTION KBOption% (k$)
DECLARE FUNCTION CarrierDetect% (cp%)
DECLARE FUNCTION ScrCompiler% (fil$, Scr$)
DECLARE FUNCTION ScrReader% (Scr$, ptr%, arg$, arg%)


' Subs need not be DECLARED unless you want either TYPE checking
' or to invoke them without using the keyword CALL

DECLARE SUB AddToDir (DIR AS ANY, proto$())
DECLARE SUB CanAbort ()
DECLARE SUB CCITCRC (dat$, CRCHi%, CRCLo%)
DECLARE SUB CheckSumCRC (DataString$, ChkSum%, CRC%, CRCHi%, CRCLo%)
DECLARE SUB CommPortInit (ComPort%, BPS%, Parity%, WordLen%, StopBit%)
DECLARE SUB CommPortSetUp (ComPort%, Parity%, WordLen%, StopBit%, Errcode%, BufSiz%)
DECLARE SUB CRXlate (strng$)
DECLARE SUB DTRHi (Cport%)
DECLARE SUB DTRHi (Cport%)
DECLARE SUB MPacing (x%)
DECLARE SUB RecASCII (fil$, BSMode%)
DECLARE SUB RecChar (TimeLimit%, NextChar$, Status%)
DECLARE SUB RecShell (rsf$, id$, Cport%, Success%)
DECLARE SUB RecvGen (fil$, mode%, Success%)
DECLARE SUB RecXmodem (fil$, Success%, CharTime%)
DECLARE SUB RecXmodem1k (fil$, Success%)
DECLARE SUB RecYmodemB (Success%)
DECLARE SUB RecYmodemG (fil$, Success%)
DECLARE SUB ScrFRead (Scr$, fil$)
DECLARE SUB ScrFWrite (Scr$, fil$)
DECLARE SUB SendASCII (fil$, pacing%)
DECLARE SUB SendChar (char$)
DECLARE SUB SendGen (fil$, mode%, Success%)
DECLARE SUB SendShell (ssf$, id$, Cport%, Success%)
DECLARE SUB SendStr (send$)
DECLARE SUB SendString (send$, pacing%)
DECLARE SUB SendXmodem (fil$, Success%, CharTime%)
DECLARE SUB SendXmodem1k (fil$, Success%)
DECLARE SUB SendYmodemB (Success%)
DECLARE SUB SendYmodemG (fil$, Success%)
DECLARE SUB SetBeep (Freq%, Duration%)
DECLARE SUB SetBline (Brow%)
DECLARE SUB SetCRChar (c$)
DECLARE SUB TAnsiCLS ()
DECLARE SUB TAnsiPrint (ansi$, AnsRow%, AnsCol%)
DECLARE SUB XferMsg (proto%, FileName$, SRFlag%, BlockCnt%, Bsiz%, RetryCnt%, ErrType%)
DECLARE SUB XmitTextFile (fil$, pcount)