Najwyraźniej Twoja przeglądarka ma problemy z obsługą podstawowych znaczników CSS3. Możliwe, że z tego powodu coś może wyglądać beznadziejnie ;-)

PS. Czas zmienić przeglądarkę na coś bliższego nowym standardom.

O'rly ASCII owl xD

26 marca 2007

Pamiętacie jeszcze tą sympatyczną sówkę? Jeszcze całkiem niedawno była tak powszechnie wykorzystywana na różnych kanałach IRCowych i nie tylko.

Cały czas jej różne wersje budzą u mnie taki łagodny uśmiech ;-]

A teraz (ku pamięci) te sówki, które wyszperałem w sieci :)

 {o,o}
 |)__)
 -"-"-
O RLY?
 {-.-}
 |)_(|
 -"-"-
YA RLY
 {0,0}
 (__(|
 -"-"-
NO WAI!
    {x,x}
    (__(|
    -"-"-
NO FAKIN WAI!

Na koniec dorzucam skrypt do xChata do wywalania sówek do rozmowy. :)

(możliwe, że kod jest niepoprawny, jest to spowodowane tym, że nie znam PERLa :-) w każdym bądź razie skrypt działa ;-) )

#!/usr/bin/perl -w
# VIM: set ts=4, set sw=4
#
# made by radmen
# radmen [at] gmail dot com

package IRC::XChat::ORLY;

my $script_name    = "o'rly";
my $script_version = '0.0.1';

IRC::register($script_name,$script_version, "", "");
IRC::print("\cC0\cB$script_name\cB version\cC3 $script_version\cO "
           . "by radmen loading...\nType /rly_help for help :)");

IRC::add_command_handler('ORLY','IRC::Xchat::ORLY::orly');
IRC::add_command_handler('YARLY', 'IRC:Xchat::ORLY::yarly');
IRC::add_command_handler('NOWAI', 'IRC::Xchat::ORLY::nowai');
IRC::add_command_handler('NOFAKINWAI', 'IRC::Xchat::ORLY::nofakinwai');
IRC::add_command_handler('RLY_HELP', 'IRC::Xchat::ORLY::help');


sub orly {
        $chan = IRC::get_info(2);
        Xchat::command("MSG $chan        ___");
        Xchat::command("MSG $chan       {o,o}");
        Xchat::command("MSG $chan       |)__)");
        Xchat::command("MSG $chan       -\"-\"-");
        Xchat::command("MSG $chan       O RLY?");

        return 0;
}

sub yarly {
        $chan = IRC::get_info(2);
        Xchat::command("MSG $chan        ___");
        Xchat::command("MSG $chan       {o.o}");
        Xchat::command("MSG $chan       |)_(|");
        Xchat::command("MSG $chan       -\"-\"-");
        Xchat::command("MSG $chan       YA RLY");

        return 0;
}

sub nowai {
        $chan = IRC::get_info(2);
        Xchat::command("MSG $chan        ___");
        Xchat::command("MSG $chan       {o,o}");
        Xchat::command("MSG $chan       (__(|");
        Xchat::command("MSG $chan       -\"-\"-");
        Xchat::command("MSG $chan       NO WAI!");

        return 0;
}

sub nofakinwai {
        $chan = IRC::get_info(2);
        Xchat::command("MSG $chan     ___");
        Xchat::command("MSG $chan    {x,x}");
        Xchat::command("MSG $chan    (__(|");
        Xchat::command("MSG $chan    -\"-\"-");
        Xchat::command("MSG $chan NO FAKIN WAI!");

        return 0;
}
        

sub help {
        $nick = IRC::get_info(1);
        Xchat::command("MSG $nick There are 4 messages:");
        Xchat::command("MSG $nick /orly");
        Xchat::command("MSG $nick /yarly");
        Xchat::command("MSG $nick /nowai");
        Xchat::command("MSG $nick /nofakinwai");
        Xchat::command("MSG $nick Have fun :)");

        return 0;
}

Komentarze (e308029)

  • Wrzuć na techbloga ;)

  • niee to się chyba na Tech’a nie nadaje :)

  • Jak to nie? Pokazujesz, jak napisać modulik do xchata, poza tym może się komuś przydać. Gdyby nie subskrypcja, to bym to przegapił ;). Swoją drogą muszę swojego bota do Irssi zacząć :>

  • Hehe, póki co niech tak pozostanie ;-)

Disclaimer

Jakkolwiek jestem właścicielem tego bloga, nie ponoszę odpowiedzialności za komentarze napisane przez innych obywateli tego wolnego kraju.

Zastrzegam sobie prawo do kasowania/modyfikowania komentarzy (jeśli uznam to za stosowne).

Zostaw komentarz