Category : Communication (modem) tools and utilities
Archive : WIGWAM.ZIP
Filename : EURMAP.SCR
Output of file : EURMAP.SCR contained in archive : WIGWAM.ZIP
E EURMAP.SCR Script for downloading weather maps
;
; This script downloads weather maps for offline
; viewing with the .GIF viewer of your choice. EURMAP.SCR
; can be invoked by pressing
; mode, or can be copied to the filename FRONTEND.SCR and
; excuted by logging on with the
;
; Before using the script for the first time, read through
; the script comments and customize the lines underscored by
; *****'s. As supplied, the Graphics Type is '1' VGA, the
; region selected is Continental Europe, and the maps downloaded
; are the Current Weather, to a file named CURRENT.GIF and the
; Forecast Weather, to a file named FORECAST.GIF.
;
; This script is set up to work with TAPCIS version 5.4.
; To use with TAPCIS 5.3, remove the leading semi-colon from the
; two lines enclosed in ;++++++++'s.
;
; The portion of the script enclosed in ;======='s can be
; duplicated if you want to download more than two maps.
;
; Loren Jenkins
; 11-Oct-1992
S GO USMAPS^M
W MAPS
;CompuServe USMAPS
;+++++++++ For TAPCIS 5.3, remove the leading ';' from the next two lines
W I
U #IBX,PB,+539^M
;++++++++++++++++
W g
U #0^M
W !
;Select Graphics Type
;
;Choose the selection which best fits your PC's graphics capabilities.
;
;Type of Graphics
; 1 640 x 480 x 16 colors (VGA, Macintosh II)
; 2 378 x 240 x 16 colors (EGA)
; 3 320 x 200 x 4 colors (CGA, Tandy 1000)
; 4 320 x 200 x 2 colors (Hercules, Macintosh Plus or SE)
;
S 1^M
;****** Select graphics type from the list
W !
;United States (Download mode)
; 1 Short-Term Weather Forecasts
; 2 U.S. National Weather Service Reports
; 3 Other Regions of the World
;
S 3^M
W !
;Weather Maps/Reports (Download mode)
;
; 3 Continental Europe
; 4 United Kingdom / Ireland
; 5 Japan / Far East
;
S 3^M
;**** Select a region 3-5 from the menu above
;
W !
; 1 Short-Term Weather Forecasts
; 2 Other Regions of the World
;
; 3 Satellite (for 09:00 EST 11-Oct-92)
; 4 Current Weather (for 04:00 EST 11-Oct-92)
; 5 Forecast Weather (for 12-Oct-92)
;
S 4^M
;**** Choose a map from the menu list (3-5)
W !
S 2^M
W t) :
; Delete any previous version
K EURCW.GIF
S EURCW.GIF^M
;************** Enter a file name for the downloaded map, ending with ^M
W !
;----------------------------
; The following section (enclosed in ;=======) can be repeated
; for additional weather maps.
;=============================
S 5^M
;**** Choose a map from the menu list
W t) :
; Delete any previous version
K EURFW.GIF
S EURFW.GIF^M
;************** Enter a file name for the downloaded map, ending with ^M
W !
;=============================
S ^M
W !
; End of script, leaving TAPCIS at a navigation prompt
Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!
This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.
But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/