1 / 320

; READ.PPE - Written by Dan Shore - SysOp

; READ.PPE - Written by Dan Shore - SysOp. ; The Shoreline BBS. ;ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ. ;. ; Revised on : 11/01/95. ; Revised by : Dan Shore.

dmeyers
Télécharger la présentation

; READ.PPE - Written by Dan Shore - SysOp

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. ; READ.PPE - Written by Dan Shore - SysOp

  2. ; The Shoreline BBS

  3. ;ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ;ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ

  4. ;

  5. ; Revised on : 11/01/95

  6. ; Revised by : Dan Shore

  7. ; Purpose : To let user choose which set of 20 tagged messages to

  8. ; read instead of *forcing* only the first 20. Three new

  9. ; subroutines added: DISPLAY_MSG_SETS, GET_NEXT_VALUE

  10. ; PROCESSED_TAGGED

  11. ;

  12. ;ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ;ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ

  13. ;

  14. ; To be used with Msg Tagging PPE (QSCAN, MEC, MORE, READ, RECOVER, KILL)

  15. ;

  16. ; 1) Edit your CMD.LST file(s) to add this:

  17. ;

  18. ; Charges Per PPE/MNU File Specification -or-

  19. ; Command Sec Minute Use Keystroke Substitution

  20. ; ÍÍÍÍÍÍÍÍÍÍÍÍÍÍ ÍÍÍ ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ

  21. ; 1) R 5 0 0 C:\PCB\PPE\READ\READ.PPE

  22. ;

  23. ; Note: You may have to change the pathname to the PPE.

  24. ;

  25. ;ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ;ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ

  26. STRING main_prompt ' Common prompt display variable

  27. STRING tag_msg_file ' File that contains tagged msgs

  28. STRING hold ' Generic string variable

  29. STRING hold2 ' Garbage variable

  30. STRING start_msg_num ' Starting msg number when reading a set

  31. STRING end_msg_num ' Ending msg number when reading a set

  32. BIGSTR user_input_temp ' Temp variable for parsing information

  33. BIGSTR user_input ' Common user input variable - used with tagged msgs

  34. BIGSTR temp ' Generic string variable - used for reading tag list

  35. INT cmd_line_count ' Count number of command line parms

  36. INT x ' Generic int variable

  37. INT msg_num_count ' Number of tagged messages

  38. INT set_number ' 20 Msg number set

  39. ;ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ;ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ

  40. cmd_line_count = TOKCOUNT()

  41. IF (cmd_line_count) THEN

  42. '

  43. ' Get path to swap file directory

  44. '

  45. hold = READLINE(PCBDAT(),204)

  46. hold = FILEINF(hold,6) + ":" + FILEINF(hold,7)

  47. '

  48. ' Determine paths and names of files used by READ.PPE

  49. '

  50. tag_msg_file = hold + "mtg" + STRING(CURCONF()) + ".lst"

More Related