Beiträge anzeigen
Diese Sektion erlaubt es ihnen alle Beiträge dieses Mitglieds zu sehen. Beachten sie, dass sie nur solche Beiträge sehen können, zu denen sie auch Zugriffsrechte haben.
Hallo
ich habe den yahoo-weather baustein komplett überarbeitet und ist nun wieder vollständig nutzbar
vorteil ist das man den network_buffer nicht vergroessern muss
und nun ganze 9 tage wwetter-forecast vorhanden ist
viel spass damit
http://www.oscat.de/community/index.php/topic,2546.0.html
PROGRAM Weather
VAR
YAHOO_WEATHER :YAHOO_WEATHER;
IP_C : IP_C;
S_BUF : NETWORK_BUFFER;
R_BUF : NETWORK_BUFFER;
YW : YAHOO_WEATHER_DATA;
IP_CONTROL : IP_CONTROL;
YAHOO_WEATHER_DESC_GE : YAHOO_WEATHER_DESC_GE;
tbTimer : TON;
bYWbusy : BOOL;
bYWdone : BOOL;
dwERROR_C : DWORD;
END_VAR
IP_CONTROL(
IP:= IP4_DECODE('192.168.001.014'),
PORT:= ,
TIME_OUT:=t#5000ms ,
IP_C:=IP_C ,
S_BUF:=S_BUF ,
R_BUF:=R_BUF );
tbTimer(PT:=t#4h,in:=TRUE);
IF tbTimer.Q THEN
tbTimer(IN:=FALSE);
END_IF
YAHOO_WEATHER(
ACTIVATE:=tbTimer.IN ,
UNITS:=FALSE ,
LOCATION:= '551801',
IP_C:= IP_C,
S_BUF:=S_BUF ,
R_BUF:=R_BUF ,
YW:=YW ,
BUSY=> bYWbusy,
DONE=> bYWdone,
ERROR_C=> dwERROR_C,
ERROR_T=> byERROR_T);
YAHOO_WEATHER_DESC_GE(ACTIVATE:=NOT YAHOO_WEATHER.BUSY , YW:= YW);