1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
<?php
class bot_data_module implements BotModule {
    static $dni = array(
        'niedziela',
        'poniedzia³ek',
        'wtorek',
        '¶roda',
        'czwartek',
        'pi±tek',
        'sobota',
    );
    static $miesiace = array(
        1 => 'stycznia',
        'lutego',
        'marca',
        'kwietnia',
        'maja',
        'czerwca',
        'lipca',
        'sierpnia',
        'wrze¶nia',
        'pa¼dziernika',
        'listopada',
        'grudnia',
    );
    
    function data($msg, $params) {
        $arg = funcs::utfToAscii($msg->args);
        
        if(empty($arg)) {
            $data = time();
        }
        else
        {
            $data = calendar::parse_date($arg);
            if(!$data) {
                return new BotMsg('Podana data nie zosta³a rozpoznana<br />'."\n"
                    . '<br />'."\n"
                    . '<u>Przyk³ady:</u><br />'."\n"
                    . 'data<br />'."\n"
                    . 'data pojutrze<br />'."\n"
                    . 'data 1.01.2009');
            }
        }
        
        if(date('d.m.Y') == date('d.m.Y', $data)) {
            $txt = 'Dzi¶ jest ';
        }
        else
        {
            $txt = 'Wybrany dzieñ to ';
        }
        
        include('./data/data/data.php');
        
        $txt .= self::$dni[date('w', $data)].', '.date('j', $data).' '.self::$miesiace[date('n', $data)].' '.date('Y').' r., '.(date('z', $data)+1).' dzieñ roku.<br />'."\n"
            . '<br />'."\n";
        
        $msg->session->setClass('pogoda');
        if(!isset($msg->session->geo)) {
            $geo = array('lon' => '52.25', 'lat' => '21.0');
        }
        else
        {
            $geo = $msg->session->geo;
        }
        
        $txt .= 'Imieniny: '.$imieniny[date('n', $data)][date('j', $data)].'<br />'."\n"
            . 'Wschód S³oñca: '.date_sunrise($data, SUNFUNCS_RET_STRING, $geo['lat'], $geo['lon'], 90.58, 1+date('I')).'<br />'."\n"
            . 'Zachód S³oñca: '.date_sunset($data, SUNFUNCS_RET_STRING, $geo['lat'], $geo['lon'], 90.58, 1+date('I'));
        
        return new BotMsg($txt);
    }
    
    function imieniny($msg, $params) {
        $arg = funcs::utfToAscii($arg);
        
        if(empty($arg)) {
            return new BotMsg('Nie podano imienia!<br />'."\n"
                . '<br />'."\n"
                . '<u>Przyk³ady:</u><br />'."\n"
                . 'imieniny Adama<br />'."\n"
                . 'imieniny Ewy');
        }
        
        include('./data/data/imieniny.php');
        
        if(!isset($imiona[$arg])) {
            return new BotMsg('Nie znaleziono imienia w bazie. Pamiêtaj, by podaæ imiê w dope³niaczu liczby pojedynczej!<br />'."\n"
                . '<br />'."\n"
                . '<u>Przyk³ady:</u><br />'."\n"
                . 'imieniny Adama<br />'."\n"
                . 'imieniny Ewy');
        }
        
        foreach($imiona[$arg] as $dzien) {
            $dzien = explode('.', $dzien);
            
            $txt[] = $dzien[0].' '.self::$miesiace[$dzien[1]];
        }
        
        return new BotMsg('Imieniny '.ucfirst($arg).' s± '.implode(', ', $txt));
    }
}
?>