Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

[REBOL] Re: - Old Hippy Needs Help With Clouds

From: gchiu:compkarori at: 4-Jun-2001 20:19

> This has got to be what? Maybe 5 to 10 lines of code... > The only problem is it's 5 or 10 lines of code I don't > know and I looking for a quick fix.
Try this, a very specific solution ( watch for line wrap) Rebol [] root: http://wwwghcc.msfc.nasa.gov url: http://wwwghcc.msfc.nasa.gov/cgi-bin/get-goes?satellite=Global Composite&x=0&y=0&map=none&zoom=1&width=1000&height=500&quality=100 forever [ page: read url if parse page [ thru "IMG SRC=^"" copy imageurl to {"} to end ] [ jpeg: join root imageurl filename: to-file last parse/all image "/" write/binary filename read/binary jpeg print [ "downloaded " filename ] ] wait 00:30:00 ] -- Graham Chiu