home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: DFÜ und Kommunikation / SOS-DFUE.ISO / programm / compusrv / otto15 / weather < prev   
Encoding:
Text File  |  1993-01-15  |  913 b   |  31 lines
  1. ;gets weather forecast for seattle and extended forecast for WA state
  2.  
  3. w c "!"
  4. "go weather|"
  5. w c "!"
  6. "|"
  7. w c "!"
  8. "1|"            ;select "short term forecast" from menu
  9. w c "local: "
  10. "Φ86 "          ;Alt-D signals AUTOSIG to capture screen data to file
  11. w c "name: "
  12. "forecast|"     ;enter filename for screen capture data
  13. "seattle, wa|"  ;now we're ready to enter city and state as requested
  14. w c "!"         ;wait until done
  15. "Φ86 "          ;end screen capture
  16. "|"
  17. w c "!"
  18. "2|"            ;select extended forecast
  19. w c "!"
  20. "2|"            ;select extended forecast
  21. w c "ef id: "
  22. "Φ86 "          ;Alt-D signals AUTOSIG to capture screen data to file
  23. w c "name: "
  24. "forecast|"     ;enter filename for screen capture data, append to last 
  25. "wa|"           ;select WA state
  26. w c "ef id: "   ;wait until done
  27. "Φ86 "          ;end screen capture
  28. "|"             ;return to a menu
  29. w c "!"
  30. end
  31.