Tekil Mesaj gösterimi
Alt 19 Nisan 2009, 04:20   #3
Çevrimdışı
ATLAS
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yararlı Bazı Codeler




userlerin belirttiğiniz kanaldan kanal başvurusu yapabilmesi özelliği
mynet merlyn versiyonun değişik bir şekli (Cr version )
!basvuru #kanal

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#basvuru:{ if !basvuru isin $1 { var %ps:_ $left($md5($r(a,z)),$r(8,20)) if $read(bchan.txt,w,$2) { .msg # Kayıtlamak istediğiniz kanal daha önce kayıtlanmış başka kanal ismi deneyiniz $+($nick,.) } else { write bchan.txt $2 .cs register $2 %ps:_ XXXXX Sohbet Odaları .cs identify $2 %ps:_ .sajoin $2 .fjoin $nick $2 .msg $nick $2 Kanalı tarafınıza kaydedilmiştir. .os topic $2 XXX.Net Keyifli Sohbetler Diler.. .samode $2 +o $nick .as chan $2 set bot XXX-BOT .msg chanserv ftransfer $2 $nick .timer 1 15 part $2 .ban -k $chan $nick Kanal Başvurunuz Kabul edilmiştir. xxxx.Net Keyifli Sohbetler Diler.. } } }

Botunuzun sizi kanal girişlerinizde sunucu sahibi olarak tanıtması

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:join:#:{ if $nick == nick { .msg $chan XXXX.Net Sunucu Sahibi $nick Kanala Giriş Yaptı . } if $nick == xxxxx { .msg $chan Sunucu Genel Sorumlusu xxxxx Kanala Giriş Yaptı . }

Görevlilerinizin nick yasaklamalarının #opers kanalına bot tarafından yansıtılması

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *^:snotice:*: { if (*added*an*SQLINE*for* iswm $1-) { .set %yetkili $11 .msg #opers Yeni bir rumuz yasaklandı. Nick: $11 Yetkili: $6 } }

Sunucuda bir görevli hakkında şikayet edebilme şansı veren bir code
!şikayet nick sebeb

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:?:{ if !şikayet * iswm $1- { var %b = $+(%,sikayet,$nick) if !$(%b,2) { .msg $nick Şikayette talebinde bulundunuz rumuz: $2 sebeb: $3- $+ . Yöneticilerimiz durumdan haberdar edildiler. .msg #opers Opers! $nick rumuzu, kullanıcı şikayetinde bulundu. .msg #opers Şikayet ettiği rumuz: $2 Şikayet sebebi: $3- $+ . inc -u120 $(%b,1) } else { .msg $nick 2 dakika içersinde, yalnız 1 defa şikayet iletebilirsiniz. } if !şikayet iswm $1- { .msg $nick Şikayet iletilmedi. Eksik parametre girdiniz. Lütfen !şikayet <nick> <sebeb> şeklinde kullanın. } } }

Online IRCop admin olmadığında helperlerin yardım maksatlı sorgula nick
şeklinde yasaklı nick sorulayabilmesi

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias sorgula { frozen $1 | set %sorgu $1 | os sqline list } on *:notice:*:?:{ if $nick === OperServ && %sorgu { if %sorgu isin $2 { .msg %kanal Rumuz: $2 Yetkili: $4 Sebeb: $10- } } }

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#opers:{ if !sorgula iswm $1- { .msg #opers sorgulanacak rumuzu belirtmediniz. } if !sorgula * iswm $1- { .set %kanal #opers .sorgula $2 } }



Konu ATLAS tarafından (19 Nisan 2009 Saat 05:00 ) değiştirilmiştir. Sebep: sdfsdf
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver