12-10-2007, 02:18 PM
Your right, okay after a little work I have it giving me a message with the weather, but it doesn't give me all 10 temperatures, I only get 1 high and 1 low, and it might actually just be the same temperature just labeld under each one. Any ideas on how to get it to show all 10 Temperatures?
Macro ( 10 Day Forecast3 )
Macro ( 10 Day Forecast3 )
str Src Src2 Message zipcode url url2 s a
zipcode="48183"
ARRAY(str) High Low
url.from("http://www.weather.com/weather/tenday/" zipcode "?dp=htempdp")
url2.from("http://www.weather.com/weather/tenday/" zipcode "?dp=ltempdp")
int MatchSuccess i
IntGetFile url Src
Src.setclip
if(findrx(Src ">(\d+)°F</B>" 0 1|4 High)<0) ret
for i 0 High.len
,IntGetFile url2 Src2
,Src2.setclip
,if(findrx(Src ">(\d+)°F</B>" 0 1|4 Low)<0) ret
,for i 0 Low.len
,,Message.from("Highs: " High[1 i] "F" "[]Lows: " Low[1 i] "F")
mes(Message "10-Day Forecast" "isa")
Taking on Quick Macros one day at a time
