1 / 239

;*****************************************************************************

;*****************************************************************************. ;* *. ;* ANSI DETECTION V2.1 *.

lucas-langley
Télécharger la présentation

;*****************************************************************************

An Image/Link below is provided (as is) to download presentation Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author. Content is provided to you AS IS for your information and personal use only. Download presentation by click this link. While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server. During download, if you can't get a presentation, the file might be deleted by the publisher.

E N D

Presentation Transcript

  1. ;*****************************************************************************;*****************************************************************************

  2. ;* *

  3. ;* ANSI DETECTION V2.1 *

  4. ;* *

  5. ;* written by: Steve Catmull *

  6. ;* additional coding: David Terry *

  7. ;* *

  8. ;* started: 04-26-93 *

  9. ;* *

  10. ;*****************************************************************************;*****************************************************************************

  11. BOOLEAN hasansi ; Result of ANSI - detection test (true or false)

  12. BOOLEAN hasrip ; Result of ANSI - detection test (RIP & ANSI)

  13. STRING graphdef ; Stores response to the "ask" prompt below

  14. STRING ask ; Constant that contains "want graphics" minus default resp.

  15. INTEGER numticks ; Used to store number of clock ticks that I have waited.

  16. STRING maxticks ; Stores the maximum number of ticks to wait for response.

  17. INTEGER waitlen ; Number of characters specified as wait time (2 or 3 digit)

  18. STRING delayticks ; If no byte pending delay x ticks and try again.

  19. STRING temp ; Stores the token of what user inputed.

  20. STRING default_yes ; Used to store setting from PCBOARD.DAT for the default

  21. STRING rest_ANSI ; Store rest of input buffer if any after ANSI CPR.

  22. STRING temp_dir ; Temporary/work directory as defined in PCBSetup

  23. STRING bkspace ; Sequence of characters for destructive backspace dwt

  24. STRING esc ; Constant used instead of chr(27)

  25. STRING cr_lf ; Constant used instead of chr(13)+chr(10)

  26. BOOLEAN recorded ; Not really used anymore but leave it in here.

  27. BOOLEAN compatible ; Used to determine is sysop wants to use compatible mode.

  28. BOOLEAN debug ; Used for debugging (capturing incoming response)

  29. STRING nonews ; For parsing out what user enters

  30. STRING nowelc ; For parsing out what user enters

  31. STRING ansi ; For parsing out what user enters

  32. STRING rip ; For parsing out what user enters

  33. STRING noansi ; For parsing out what user enters

  34. STRING autoansr ; Used to skip graphics question if graphics detected

  35. STRING rip_detect ; Used to disable RIPscrip checking. For those without RIP.

  36. STRING allow_quick ; Used to enable or disable the "quick" login feature.

  37. temp = "" ; Initialized to non null for WHILE

  38. bkspace = chr(8)+chr(32)+chr(8) ; destructive backspace dwt

  39. maxticks = 50 ; (50/18.2 seconds)

  40. delayticks = 3 ; Wait 3 ticks if no input (when checking for response)

  41. debug = false

  42. esc = chr(27)

  43. cr_lf = chr(13)+chr(10)

  44. rip_detect = true ; Assume RIPscrip detection.

  45. allow_quick="Q" ; Add to the valid entry string

  46. ; Analyze Command line passed

  47. temp=gettoken()

  48. while (temp != "") DO

  49. if (mid(upper(temp),2,1) = "W") then

  50. waitlen = len(temp)-instr(temp,":")

More Related