home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: DFÜ und Kommunikation / SOS-DFUE.ISO / programm / compusrv / otto15 / doall next >
Encoding:
Text File  |  1993-01-12  |  913 b   |  47 lines
  1. ;Note: this first section (up to 'call "stock"') is used to log-on, 
  2. ;send and collect e-mail.  It is unique to my machine and 
  3. ;communication program.  Autosig users need only change the 
  4. ;first two lines while others will have to create their own script. 
  5.  
  6.  
  7. "c:|"
  8. "cd \newcom|"   ;I keep autosig in c:\newcom. Change.
  9.  
  10. "autosig|"
  11. w 2
  12. "a"             ;pressing A selects E-Mail in my version of Autosig
  13. w c "»"         
  14. if (+0,+0) <> "S" then *chkmail*        
  15. ;if no e-mail to send then skip this part
  16. "|"
  17. *send0*
  18. if c <> "continue." then *send1*
  19. "|"
  20. *send1*
  21. if  c<> "»" then *send0*
  22.  
  23. *chkmail*
  24. "F"             ;read forward all messages
  25. w c "»"
  26.  
  27. "G"             ;go online in terminal mode
  28. w 1
  29. "m|"
  30.  
  31. call "getstock"
  32. call "getnews"
  33. call "getmap"
  34. call "weather"
  35.  
  36. "bye|"          ;logs off
  37.  
  38. ;Autosig unique exit procedure
  39. w c "enter to continue."
  40. "|"
  41. w 1
  42. "x|"
  43.  
  44. end
  45.  
  46.  
  47.