home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / CLIPPER / MISC / MDMCOMM.ZIP / BASIC7.ZIP / MDMCOMM.BI < prev    next >
Encoding:
Text File  |  1980-01-04  |  865 b   |  32 lines
  1. DECLARE SUB LineFeed (Num!)
  2. DECLARE SUB ClearKey ()
  3. DECLARE SUB ShowFile (FileName$)
  4. DECLARE SUB AnyKey ()
  5. DECLARE SUB ClrScrn ()
  6. DECLARE SUB ReadDorinfo ()
  7. DECLARE SUB StatusLine ()
  8. DECLARE FUNCTION Carrier! ()
  9. DECLARE SUB Delay (Num!)
  10. DECLARE SUB DeInitComm ()
  11. DECLARE SUB InitComm ()
  12. DECLARE SUB ShowChar (Msg$)
  13. DECLARE SUB ShowCr (Msg$)
  14. DECLARE FUNCTION ReadChar$ (Num!)
  15. DECLARE FUNCTION UserKey$ ()
  16.  
  17. CONST True = -1, False = 0
  18. CONST Modem = 1
  19. CONST ChkCarrier = False
  20.  
  21. COMMON SHARED BBSName   AS STRING * 30
  22. COMMON SHARED SysOpName AS STRING * 30
  23. COMMON SHARED UserName  AS STRING * 30
  24. COMMON SHARED UserCity AS STRING * 30
  25. COMMON SHARED BaudRate  AS STRING * 5
  26. COMMON SHARED TimeLeft AS INTEGER
  27. COMMON SHARED Remote  AS INTEGER
  28. COMMON SHARED Graphics  AS INTEGER
  29. COMMON SHARED More as integer
  30. COMMON SHARED MoreNum as integer
  31.  
  32.