home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / wsc4vb24 / termglob.bas < prev    next >
Encoding:
BASIC Source File  |  1999-01-09  |  1.1 KB  |  43 lines
  1. ' Global Variables
  2. Option Explicit
  3. Global ThePort As Integer
  4. Global TheBaudCode As Integer
  5. Global TheDataBits As Integer
  6. Global TheParity As Integer
  7. Global TheStopBits As Integer
  8. Global BaudText(0 To 8) As String
  9. Global ParityText(0 To 7) As String
  10. Global OnLineFlag As Integer
  11. Global FatalFlag As Integer
  12. Global mioState As Integer
  13. Global asState As Integer
  14. Global xyState As Integer
  15. Global FirstXYstate As Integer
  16. Global FirstASstate As Integer
  17. Global WaitingFor As Integer
  18. Global LastPacket As Integer
  19. Global DebugLevel As Integer
  20. Global Protocol As Integer
  21. Global Filename As String
  22. 'Global Constants
  23. Global Const RX_QUE_SIZE = 1040
  24. Global Const TX_QUE_SIZE = 1040
  25. Global Const NAK = &H15
  26. Global Const XY_FILE_NAME = 1
  27. Global Const AS_FILE_NAME = 2
  28. Global Const PHONE_NUMBER = 3
  29. Global Const Dial_1 = 21
  30. Global Const Dial_2 = 22
  31. Global Const Dial_3 = 23
  32. Global Const TX_XM = 31
  33. Global Const TX_YM = 32
  34. Global Const RX_XM = 33
  35. Global Const RX_YM = 34
  36. Global Const RUN_XY = 35
  37. Global Const TX_AS = 41
  38. Global Const RX_AS = 42
  39. Global Const RUN_AS = 43
  40. Global Const XMODEM = 0
  41. Global Const YMODEM = 1
  42.  
  43.