Tekil Mesaj gösterimi
Alt 30 Ekim 2007, 15:04   #9
Çevrimdışı
moonshield
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: mIRCTurk NoMercy




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if $2 == MODE { var %chan $3 var %mode $4 var %mnick $5 if $4 == -v { if $3 == #operhelp { sw $sockname KICK $3 $5 : $+ $botfnick($1) tarafindan voice'iniz alindi. #OperHelp kanalında bekleme yapmak yasaktır hoş sohbetler dileriz ... } } if %chan == #operhelp { if *-* !iswm $4 { if *+* iswm $4 { if *q* iswm $4 || *a* iswm $4 || *o* iswm $4 { ;sw MNet SAJOIN $botfnick($1) #helpers } } } if %mode == +v { sw $sockname privmsg #helpdesk : $+ %mnick usere $unick($1) "helpdesk" yardım vermektedir. if (%voices1. [ $+ [ $unick($1) ] ]) { inc %voices1. [ $+ [ $unick($1) ] ] 1 goto yaz } eLse { set %voices1. [ $+ [ $unick($1) ] ] 1 goto yaz } } goto son :yaz write -s $+ $unick($1) voices1.txt $unick($1) nicki  %voices1. [ $+ [ $unick($1) ] ]  kez yardım verdi haLt :son haLt } } if $2 == MODE { var %chan $3 var %mode $4 var %mnick $5 if $4 == -v { if $3 == #help { sw $sockname KICK $3 $5 : $+ $botfnick($1) tarafindan voice'iniz alindi. #Help kanalında bekleme yapmak yasaktır hoş sohbetler dileriz ... } } if %chan == #help { if *-* !iswm $4 { if *+* iswm $4 { if *q* iswm $4 || *a* iswm $4 || *o* iswm $4 { sw MNet SAJOIN $botfnick($1) #helpers,#eğitim,#sınav } } } if %mode == +v { sw $sockname privmsg #helpers : $+ %mnick usere $unick($1) "helper" yardım vermektedir. if (%voice. [ $+ [ $unick($1) ] ]) { inc %voice. [ $+ [ $unick($1) ] ] 1 goto yaz } eLse { set %voice. [ $+ [ $unick($1) ] ] 1 goto yaz } } goto son :yaz write -s $+ $unick($1) voices.txt $unick($1) nicki  %voice. [ $+ [ $unick($1) ] ]  kez yardım verdi haLt :son haLt } }

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if $2 == PRIVMSG && $3 == #helpers { var %irt $right($4-,-1) if $gettok(%irt,1,32) == !rapor && (Sysop_* iswm $botfnick($1) || *Visor_* iswm $botfnick($1) || Csop_* iswm $botfnick($1) || Admin_* iswm $botfnick($1) || $botfnick($1) == MNet) { sw $sockname privmsg #helpers 4Muhabbet1.4NET 1Helper'lerinin #help kanalında verdikleri voice sayısı; var %s 1 while %s <= $lines(voices.txt) { sw $sockname privmsg #helpers > $read(voices.txt,%s) inc %s } } } if $2 == PRIVMSG && $3 == #helpdesk { var %irt $right($4-,-1) if $gettok(%irt,1,32) == !rapor && (Sysop_* iswm $botfnick($1) || Helpdesk_Murat iswm $botfnick($1) || Csop_* iswm $botfnick($1) || Admin_* iswm $botfnick($1) || $botfnick($1) == MNet) { sw $sockname privmsg #helpdesk 4Muhabbet1.4NET 1Helpdesk_'lerinin #operhelp kanalında verdikleri voice sayısı; var %s 1 while %s <= $lines(voices1.txt) { sw $sockname privmsg #helpdesk > $read(voices1.txt,%s) inc %s } } }

Kodlari verebilirim nereye koyağınıda söyleyeyim helpbot' koyacaksın. Scriptin kurulu olduğu dosya içinede iki tane txt acıcaksın voices.txt voices1.txt yapacaksın isimlerini silmesinide soracak olursan daha yapmadım onu yapınca veririm.

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklamver bizimmekan