Pomoc - Szukaj - Użytkownicy - Kalendarz
Pełna wersja: Pogodzia w PHP
Forum PHP.pl > Forum > Gotowe rozwiązania
Bakus
17.01.2004, 01:38:30
Witam szanownych państwa...
Zainspirowany tematem "pogoda" i kodem napisanym przez Indianin'a (w tym samym topicu) zrobiłem pogodzię w php...
Z resztą sami zobaczcie:
pogoda_onet.php (link nie działa)

Pliki potrzebne do ruszenia skryptu u siebie:
pogonetka.php (link nie działa)

I w końcu źródełko...

[PHP] pobierz, plaintext 
  1. <!----------------------------------------------------------------------------
  2. Autor skryptu: Krysztof Andrzej Błachut vel Bakus
  3. Adres e-mail: kab@neostrada.pl && hostmaster@idn.myftp.org
  4.  
  5. Dane pogodowe i obrazki pochodzą z portalu http://pogoda.onet.pl i są własnościami ich twórców.
  6.  
  7. Kod możesz wykorzystywać pod warunkiem zachowania tego komentarza w nie zmienion
  8. j formie!
  9. ----------------------------------------------------------------------------->
  10. <?php
  11. //	error_reporting(E_ALL);
  12.  
  13. 	$sty1		= implode('', file(&#092;"./onet/def01.css\"));
  14. 	$sty2		= implode('', file(&#092;"./onet/style002.css\"));
  15. 	$styl		= '';
  16. 	$styl		.= '<STYLE TYPE=\"text/css\">' . &#092;"n\";
  17. 	$styl		.= '<!--' . &#092;"n\";
  18. 	$styl		.= $sty1 . &#092;"nn\" . $sty2;
  19. 	$styl		.= '-->' . &#092;"n\";
  20. 	$styl		.= '</STYLE>' . &#092;"n\";
  21.  
  22. 	$mapaurl		= 'http://pogoda.onet.pl/0,196,38,0,0,3,0,pogoda.html';
  23. 	$mapagrabstart	= '<img src=0 height=5></td></tr></table>';
  24. 	$mapagrabend	= '<table border=0 cellspacing=0 cellpadding=0 width=\"100%\"><tr><td bgcolor=\"#FDC404\"><img src=0 height=1 alt=\"\">';
  25.  
  26. 	$html		= implode('', file($mapaurl));
  27. 	$tmp		= eregi($mapagrabstart . &#092;"(.*)\" . $mapagrabend, $html, $mapa);
  28. 	$mapa		= $mapa[1];
  29. 	$mapa		= str_replace($mapagrabstart, '', $mapa);
  30. 	$mapa		= str_replace($mapagrabend, '', $mapa);
  31. 	$temp		= eregi('<table border=0 cellspacing=0 cellpadding=0 width=305 bgcolor=\"#FDC404\"><tr><td align=right width=\"12%\"><a href=\"'.&#092;"(.*)\" . 'alt=\"następny okres\"></a></td></tr></table>', $html, $todel);
  32. 	$mapa		= str_replace($todel[0], '', $mapa);
  33. 	$mapa		= str_replace('src=0', 'src=\"./onet/0.gif\"', $mapa);
  34. 	$mapa		= str_replace('src=\"_d/ico/', 'src=\"./onet/', $mapa);
  35. 	$mapa		= str_replace('src=\"_d/map/e0.gif', 'src=\"./onet/0.gif', $mapa);
  36. 	$mapa		= str_replace('src=\"_d/map/00n.gif', 'src=\"./onet/00n.gif\"', $mapa);
  37. 	$mapa		= str_replace('src=\"_d/map/00d.gif', 'src=\"./onet/00d.gif\"', $mapa);
  38. 	$mapa		= str_replace('href=\"', 'target=\"_blank\" href=\"http://pogoda.onet.pl/', $mapa);
  39.  
  40. 	$opisurl		= 'http://pogoda.onet.pl/podsumowanie.html';
  41. 	$opisgrabstart	= '<br>Satelita<br></td></tr></table>';
  42. 	$opisgrabend	= '</div><br><table border=0 cellspacing=0 cellpadding=0 align=right>';
  43.  
  44. 	$html		= implode('', file($opisurl));
  45. 	$tmp		= eregi($opisgrabstart . &#092;"(.*)\" . $opisgrabend, $html, $opis);
  46. 	$opis		= $opis[1];
  47. 	$opis		= str_replace($opisgrabstart, '', $opis);
  48. 	$opis		= str_replace($opisgrabend, '', $opis);
  49. 	$opis		= str_replace(' w ', ' w&nbsp;', $opis);
  50. 	$opis		= str_replace(' z ', ' z&nbsp;', $opis);
  51. 	$opis		= str_replace(' i ', ' i&nbsp;', $opis);
  52. 	$opis		= str_replace(' a ', ' a&nbsp;', $opis);
  53. ?>
  54. <HTML><HEAD>
  55. <META HTTP-EQUIV=\"Content-type\" CONTENT=\"text/html; charset=iso-8859-2\">
  56. <META HTTP-EQUIV=\"Reply-to\" CONTENT=\"kab@neostrada.pl\">
  57. <META HTTP-EQUIV=\"Pragma\" CONTENT=\"no-cache\">
  58. <META NAME=\"Author\" CONTENT=\"Krzysztof Andrzej Błachut\">
  59. <TITLE>Pogoda</TITLE>
  60. <?php print $styl; ?>
  61. </HEAD><BODY>
  62. <TABLE ALIGN=\"CENTER\" WIDTH=\"740\" BORDER=\"0\">
  63. 	<TR>
  64. 		<TD ALIGN=\"LEFT\" VALIGN=\"TOP\" WIDTH=\"310\"><TABLE ALIGN=\"LEFT\" VALIGN=\"TOP\" WIDTH=\"305\" HEIGHT=\"250\" CELLSPACING=\"0\" CELLPADDING=\"0\" BORDER=\"0\"><TR><TD><?php print $mapa; ?></TD></TR></TABLE></TD>
  65. 		<TD VALIGN=\"TOP\" STYLE=\"font-family: Verdana; font-size: 10pt; text-align: justify\"><?php print $opis; ?></TD>
  66. 	</TR>
  67. </TABLE>
  68. </BODY></HTML>
[PHP] pobierz, plaintext


<b>Proszę o komentarze...</b>
tiraeth
17.01.2004, 19:47:58
Niezłe ale mógłbyś np. zrobić wersję w wielkości np. 75% tej co teraz jest... smile.gif
Bakus
17.01.2004, 22:51:41
Owszem... Wyrzucając większość str_replace kod jest torszkę winksmiley.jpg mniejszy, ale w takim wypadku są problemy z obrazkami...
Onet nie zawsze zwraca je wszystkie... nie wiem, czy tylko u mnie, ale czasami było widać, że nie wszystkie się wczytały i dla tego postanowiłem przeżucić wszystkie obrazki na serwer na którym stoi skrypt. Dzięki temu wszystko (jak na razie) działa bez błędów...
tiraeth
18.01.2004, 10:35:34
Jeżeli wszystkie obrazki z Onet.pl wrzucasz na swój serwer to dodaj skrypt, która zmieni ich rozmiar do 75% razem z Jakością i wtedy więcej osób skorzysta z tego bo tak to zaduze aby np. do menu wrzucic....
Forgoot
21.10.2004, 18:16:31
Efekt moża zobaczyć: KLIK
Pobrać skrypt oraz dodatkowe pliki: KLIK
To jest wersja lo-fi głównej zawartości. Aby zobaczyć pełną wersję z większą zawartością, obrazkami i formatowaniem proszę kliknij tutaj.
Invision Power Board © 2001-2025 Invision Power Services, Inc.