home *** CD-ROM | disk | FTP | other *** search
- Path: sparky!uunet!europa.asd.contel.com!darwin.sura.net!dtix!mimsy!afterlife!adm!news
- From: fred@poly2.nist.gov (Frederick R. Phelan Jr.)
- Newsgroups: comp.sys.sgi
- Subject: Re: Screen background
- Message-ID: <32333@adm.brl.mil>
- Date: 3 Sep 92 14:10:11 GMT
- Sender: news@adm.brl.mil
- Lines: 92
-
-
-
- --------- Received message begins Here ---------
-
- |
- |Is there a simple way to have whatever picture I like as a screen background
- |on my IRIS 4D? Should I perhaps add something to my user.ps or startup.ps?
- |Thanx,
- |
- |Ricky (valente@sgi-4d.sissa.it)
- |
- |International School for Advanced Studies
- |Trieste, ITALY
-
- See the man pages on xsetroot, and bgpaste ... enclosed is
- a script someone gave me that is kind of neat ... it will
- give you some ideas.
-
-
- Fred Phelan
- ---
- Fred Phelan
- fred@poly2.nist.gov
- /*___________________________________________________
- ____ __ ___ __ ___ ___ ___
- /__ /_/ /__ / / /__/ /__/ /__ / /__/ /\ /
- / / ( /__ /_/ / / / /___ /___ / / / \/
- ___________________________________________________*/
-
- --------- weather ---------
- #!/bin/csh -f
- # weather
- # Sets the background to the latest USA weather map.
- #
- # Original:
- # Ron Boisvert, NIST, 25 Jun 92
- #
- # Modified for SGI:
- # F.R. Phelan Jr.
- # NIST Polymers Division
- # September 1, 1992
- #
- #
- #Background info:
- #nslookup vmd.cso.uiuc.edu
- #Non-authoritative answer:
- #Name: VMD.CSO.UIUC.EDU
- #Addresses: 128.174.5.98, 192.17.13.1
- #
-
- #Default settings ...
- set NameOfThisScript = weather
- set infile = /usr/tmp/weather.$$.ftp
- set gif_file = /usr/tmp/weather.$$.GIF
- set rgb_file1 = /usr/tmp/weather.$$.rgb.1
- set rgb_file2 = /usr/tmp/weather.$$.rgb.2
-
-
- # Usage.
- if ($#argv == 0) then
- echo
- echo $NameOfThisScript":"
- echo "A script to paint the root background to the current weather map."
- echo
- echo "Usage: $NameOfThisScript [any character]"
- echo
- exit 1
- endif
-
- onintr cleanup
-
- cat > $infile << END
- user anonymous
- cd wx
- binary
- get CVIS.GIF $gif_file
- bye
- END
-
- ftp -n 128.174.5.98 < $infile
- fromgif $gif_file $rgb_file1
- izoom $rgb_file1 $rgb_file2 1.06 1.7
-
- echo .......... Painting Root Window
- bgpaste -t 0 0 0 $rgb_file2
-
- # give the machine some time to paste ...
- sleep 20
-
- cleanup:
-
- rm -f $infile $gif_file $rgb_file1 $rgb_file2
-