Whois ile ilgili
alias SZ.whois.notice set %SZ.Whois.Notice $iif($1 == on,$true,$false)
on ^*:SNOTICE:*: {
if ($nick == $me) { halt }
if (*whois*you* iswm $1-) { set %SZ.Whois.Notice $nick
echo -a 41,15\15,1\1,15\15,1\ 154••14[4Uyari14] 7 $1- $+ %SZ.Whois.Times 15Whois Cekiyor! 9 $time 15 $+ 14]4••15,1 15,1/1,15/15,1/1,15/ 15,1
haltdef
if (!%SZ.Whois.Date) set %SZ.Whois.Date $adate
else { inc %SZ.Whois.Times 0 } {
inc %SZ.Whois.Times
var %SZ.Whois.User $iif(*** == $1,$2,$1),%SZ.Whois.Mask = $remove($iif(*** == $1,$3,$2),$chr(40),$chr(41))
if (%SZ.Whois.Notice) .msg %SZ.Whois.User 2Merhaba 4 %SZ.Whois.User 2Whoisime Bakan 4 # $+ $(%SZ.Whois.Times) 2Sayili Kisisin. | .msg %SZ.Whois.User 2Komutla ilgili Herhangi Bir Sorunun Varsa Lütfen 4#Yardim 2KanaLina Basvurun... | .msg %SZ.Whois.User 4Nick 2veya 4Kanal 2ilgili Herhangi Bir Sorunun Varsa Lütfen 4#Security 2KanaLina Basvurun.. | .msg %SZ.Whois.User 2Hos Sohbetler Dilerim... %SZ.Whois. $+ . }
}
}
Arkdaslar Boyle Bi Kod Var Bana Whois Cekildiginde gosterıyo Ozelıme Girdigi Zaman Bana Yazı Yazdıgı Gibi Bu Yazıların Karsıdakıne gıtmesıni istiyorum whois cekmeden yanı bana yazdıgı zaman cıksın ıstıyorum? yardim edermısın |