#!/bin/sh

/usr/local/bin/lynx http://www.shmu.sk/predpoved/predpoved.cgi?3 -dump > /home/wochter/public_html/wap/predpoved-wap-text



echo '<?xml version="1.0"?>' > /home/wochter/public_html/wap/predpoved.wml

echo '<!-- created by WAPtor (http://www.wapdrive.net/) -->' >> /home/wochter/public_html/wap/predpoved.wml
echo '<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml">' >> /home/wochter/public_html/wap/predpoved.wml

echo '<wml>' >> /home/wochter/public_html/wap/predpoved.wml

echo '<!-- THIS IS THE FIRST CARD IN THE DECK -->' >> /home/wochter/public_html/wap/predpoved.wml
echo '<card id="MainCard" title="WochteR - Predpoved pocasia">' >> /home/wochter/public_html/wap/predpoved.wml
echo '<p align="center">' >> /home/wochter/public_html/wap/predpoved.wml

/bin/cat /home/wochter/public_html/wap/predpoved-wap-text >> /home/wochter/public_html/wap/predpoved.wml

echo "</p> </card> </wml>" >> /home/wochter/public_html/wap/predpoved.wml