viewing paste Unknown #6942 | Athena

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
-       script  faqbind -1,{
        OnInit:
                bindatcmd("faq","faqbind::OnAtcommand",0,10);
                end;
       
 
        OnAtcommand:
                set @faq$,.@atcmd_parameters$[0];
                set @faq,@faq$;
 
if(@faq$ == "list") { dispbottom "Usage: @faq #";
        dispbottom "0=LGP         1=color name        2=achievement      3=capret      4=icons";
        end;
}
 
if(@faq$ == "0" || @faq$ == "LGP" || @faq$ == "RCX") { open "http://google.ru/",strcharinfo(0); }
if(@faq$ == "1" || @faq$ == "color" || @faq$ == "name" || @faq$ == "color name") { open "http://google.ru/",strcharinfo(0); }
if(@faq$ == "2" || @faq$ == "achievement" || @faq$ == "achieve") { open "http://google.ru/",strcharinfo(0); }
if(@faq$ == "3" || @faq$ == "capret" || @faq$ == "kover") { open "http://google.ru/",strcharinfo(0); }
if(@faq$ == "4" || @faq$ == "icon" || @faq$ == "icons") { open "http://google.ru/",strcharinfo(0); }
else {
        dispbottom "[Server] : To use @faq, enter a number 0 or greater. For a full list of available faqs, type '@faq list'.";
        end;
}}
Viewed 267 times, submitted by unknown.