 fidonet (2:5030/539.20)  SU.OS2.PROG 
 From : Sergey I. Yevtushenko               2:5020/400      19 Apr 01  01:11:42 
 To   : All                                                 19 Apr 01  13:38:34 
 Subj :  ..                                                            

From: evsi@naverex.kiev.ua (Sergey I. Yevtushenko)

H   ,   ᬮ ண    www.weather.com.
ᥬ  ᠩ:  ண 筮    ⥫ ப 
 ꥬ 쭮 ᭮.   - ⥬  ७
뢠.  뢠   㪠 - .   ᪠
᪠  ࠧ ᮢᥬ  . 饬, ᤥ  ਯ,  ᠬ
몠稢 ࠭  ⠥ ⮫쪮   ⥬.
, ⢥, ⠭  楫.

砫 ᠬ ਯ:

-------------------------------------------------------------

/**/

fin='UPXX0016'

'@wget -c -q http://www.weather.com/weather/local/'fin

do while lines(fin) > 0
    str = linein(fin)

    if pos('<!-- insert day/date here -->', str) = 0
        then iterate;

    /* Next line contains date */
    parse value linein(fin) with day'</A><BR>'dt

    call charout, strip(day)' 'dt' '
    /* Look for next </TR> */

    do forever

        if lines(fin) <= 0 then
            leave

        str = strip(linein(fin))

        if left(str,5) = '</TR>' then
            leave

        if pos('&deg',str) > 0 then
        do
            parse value str with deg'&' .
            call charout, format((deg-32)*0.5555887,,2)' '
        end
    end

    say
end
-------------------------------------------------------------

  짮.  ࠧ ਤ 室   ᠩ,  
। ࠢ URL-  㦭 ⭮.  URL- 
(http://www.weather.com/weather/local/UPXX0016)   .   
ᯮ짮  ⮢ 窮.   ᠩ 筮   
誥 "Enter city or zip" த  ࠭    ⮭.
Hਬ ࠥ "Odessa, Ukraine",   砥   .
  祭 URL- (http://www.weather.com/weather/local/UPXX0021) 
뢠  䠩 (UPXX0021)  ⠢塞  ६ fin  ਯ.
, ਯ ⮢  ࠡ. ᪠  砥 ਬ୮  ⠪:

Tonight Apr 18 6.67
Thu Apr 19 16.11 8.33
Fri Apr 20 17.22 8.89
Sat Apr 21 17.22 7.78
Sun Apr 22 17.78 9.45
Mon Apr 23 18.89 8.89
Tue Apr 24 19.45 8.89
Wed Apr 25 20.00 8.33
Thu Apr 26 18.33 8.33
Fri Apr 27 18.33 7.78

⢥⢥  , , ᫮, ⥬ , ⥬ .

,   ࠡ⠥  ᨫ쭮 , ப  ,  ࠭
ࠧ஬ 
ਬ୮ 70.

Regards,
  Sergey.

*--------------------------------------
ES@Home
http://www.naverex.kiev.ua/~evsi/
--- ifmail v.2.15dev5
 * Origin: ES@Home (2:5020/400)
