Özele Bırı Gelınce Bu Sekıl Bır Mesaj Yazabılırsın.
|
| Alıntı: |
on *:open:?: {
msg $nick Şu anda yokum falan filan helpe gidin.
}
|
sana whois çekende bir kod yüklü ise o sana whois çektiği an haberdar olabilirsin.
sana whois çeken kişinin scriptinde Remotesinde yüklü olması gereken kod:
Kod:
|
| Alıntı: |
alias whois {
if ($1 == McKruGer) {
.whois $1
.notice McKruGer $me nickli kardeş sana whois çekti.
}
}
|
McKruGer aittir.
Buda Operler Icın Oper isen sana bırı whois cekınce hangi nick whois cekmıs gosterır ve karsı tarafa burdakı mesajları yollar
|
| Alıntı: |
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. $+ . }
}
}
|
Not: Kodların Hepsi Alintidir.