Download
slide1 n.
Skip this Video
Loading SlideShow in 5 Seconds..
;***************************************************************************** PowerPoint Presentation
Download Presentation
;*****************************************************************************

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

64 Views Download Presentation
Download Presentation

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

- - - - - - - - - - - - - - - - - - - - - - - - - - - E N D - - - - - - - - - - - - - - - - - - - - - - - - - - -
Presentation Transcript

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

  2. ;* *

  3. ;* ANSI DETECTION V2.3 *

  4. ;* *

  5. ;* written by: Steve Catmull *

  6. ;* *

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

  8. ;* *

  9. ;*****************************************************************************;*****************************************************************************

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

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

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

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

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

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

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

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

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

  19. STRING nonews ; For parsing out what user enters

  20. STRING nowelc ; For parsing out what user enters

  21. STRING ansi ; For parsing out what user enters

  22. STRING rip ; For parsing out what user enters

  23. STRING noansi ; For parsing out what user enters

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

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

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

  27. STRING RIPVer ; IF RIPscrip, contains the version num. of term software

  28. STRING RIPVen ; If RIPscrip, contains the vender code of term software

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

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

  31. rip_detect = true ; Assume RIPscrip detection.

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

  33. esc = chr(27) ; define the ESC character

  34. ; Analyze Command line passed

  35. temp=gettoken()

  36. while (temp != "") DO

  37. if (mid(upper(temp),2,3) = "NOR") then ;Check for RIP

  38. rip_detect = false

  39. else if (mid(upper(temp),2,3) = "NOQ") then ;Force Welcome screen

  40. allow_quick = ""

  41. else if (mid(upper(temp),2,1) = "C") then ;Compatible mode

  42. compatible = true

  43. else if (mid(upper(temp),2,1) = "A") then ;Force best answer

  44. autoansr = true

  45. endif

  46. temp=gettoken()

  47. endwhile

  48. temp="" ; Return temp how we found it.

  49. ; /* If the user is connected locally then default autoamtically to ANSI

  50. ; capable.