viewing paste Unknown #763 | Plain text

Posted on the
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
<header>,{
        set .@n$,"[Daily Reward]";
        mes .@n$;
        mes "Hey! Have you taken your reward today?";
        select("Yes");
        if (dr_time$ != gettimestr("%Y%m%d",9)) {
                next;
                mes .@n$;
                mes "LIAR!!!";
                mes "Telling lies are no good.";
                mes "Please take your reward!";
                next;
                set dr_time$, gettimestr("%Y%m%d",9);
                switch (gettime(4)) {
                        Case 0: getitem 671,1; break;
                        Case 1: getitem 672,1; break;
                        Case 2: getitem 673,1; break;
                        Case 3: getitem 674,1; break;
                        Case 4: getitem 675,1; break;
                        Case 5: getitem 676,1; break;
                        Case 6: getitem 677,1; break;
                }
                next;
                mes .@n$;
                mes "Don't tell lies next time...";
                mes "Have a nice day!";
                close;
        }
        next;
        mes .@n$;
        mes "Then don't talk to me!";
        close;
}
Viewed 1061 times, submitted by unknown.