home *** CD-ROM | disk | FTP | other *** search
/ RBBS in a Box Volume 1 #2 / RBBS_vol1_no2.iso / 001g / farguser.scr < prev    next >
Text File  |  1986-04-16  |  2KB  |  70 lines
  1. turnoff ansi
  2. turnon echo
  3. .Paramater #1 & #2 are to be used to tell it what to do
  4. .Paramater #3 is used to tell it what to do when its done
  5. .Parameter #4 is used to specify a Download Filename
  6. .An example might be  GOTO R RETURN"
  7. .As parameters. The result would be: It would read all your messages,
  8. .and then return.
  9. .R is Read messages. D is Download using CRC. DR is Read messages &
  10. .Download.
  11. .By, Andrew Hoag
  12. NOTE * Loren Jones RBBS *
  13. NOTE * Dialing...   *
  14. DIAL "1"
  15. BEEP 1500
  16. BEEP 500
  17. BEEP 1000
  18. TIMEOUT 240
  19. WAITFOR "MORE (Y),N,NS?"
  20. SEND "~N~{"
  21. WAITFOR "Name?"
  22. SEND "~FIRSTNAME;LASTNAME;PASSWORD~{"
  23. WAITFOR "MORE (Y),N,NS?"
  24. SEND "~N~{"
  25. WAITFOR "Press [ENTER] to Continue?"
  26. SEND "~{"
  27. WAITFOR "Main Functions <B,C,D,E,F,G,H,I,J,K,L,O,P,Q,R,S,U,V,W,X,?>?"
  28. $1 $2
  29. RETURN
  30. R:
  31. SEND "~r;*~{"
  32. TIMEOUT 20 RA
  33. TURNON CAPTURE
  34. WAITFOR "MORE (Y),N,NS?"
  35. SEND "~NS~{"
  36. WAITFOR "Msg # ( 63 to 1437, *, <H>elp)? "
  37. SEND "~{"
  38. WAITFOR "Main Functions <B,C,D,E,F,G,H,I,J,K,L,O,P,Q,R,S,U,V,W,X,?>?"
  39. TURNOFF CAPTURE
  40. RA:
  41. TIMEOUT 180
  42. $3
  43. RETURN
  44. D:
  45. SEND "f~{"
  46. WAITFOR "X,?>?"
  47. SEND "D~{"
  48. SEND "~$4~{"
  49. DOWNLOAD $4 3
  50. $3
  51. DR:
  52. SEND "r;*~{"
  53. TIMEOUT 20 RB
  54. TURNON CAPTURE
  55. WAITFOR "MORE (Y),N,NS?"
  56. SEND "~NS~{"
  57. WAITFOR "Msg # ( 63 to 1437, *, <H>elp)? "
  58. SEND "~{"
  59. WAITFOR "Main Functions <B,C,D,E,F,G,H,I,J,K,L,O,P,Q,R,S,U,V,W,X,?>?"
  60. TURNOFF CAPTURE
  61. RB:
  62. TIMEOUT 180
  63. WAITFOR "Main Functions <B,C,D,E,F,G,H,I,J,K,L,O,P,Q,R,S,U,V,W,X,?>?"
  64. SEND "~f~{"
  65. WAITFOR "X,?>?"
  66. SEND "~D~{"
  67. SEND "~~$4"
  68. DOWNLOAD $4 3
  69. $3
  70.