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
}
}