PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:join:#ozgurdusLer:{ set %loginnick $nick | set %loginchan $chan | checklogin %loginnick }
alias checklogin {
if ($read(registered1.txt,s,%loginnick) = EVET) {
msg $1 #ozgurdusLer %loginnick - %loginnick #ozgurdusLer kanalına hosgeldiniz.
msg $1 #ozgurdusLer %loginnick Siz kayıtlı kullanıcımız Lütfen Kendinizi Sisteme !Login Ediniz.. | msg %loginnick Lütfen !Login Şifreniz Yaparak Login oLunuz.
else { whois %loginnick | .enable #catchraw | unset %loginnick | %loginchan }
}
}
#catchraw on
raw 307:*:{
if (%sifregonder != true) {
checkreg $2
}
elseif (%sifregonder = true) { msg $2 Şifreniz: $read(bot-registered.txt,s,$2) }
if (!$read(registered.txt,s,$2)) { write registered.txt $2 EVET }
}
raw 318:*:{
if (%sifregonder != true) {
}
elseif (%sifregonder = true) { unset %sifregonder }
}
#catchraw end
alias checkreg {
if ($read(bot-registered.txt,s,$2)) { msg $1 Bu Nick Sisteme kayıtlı ßir Nicktir, Lütfen !Login olunuz. }
else {
msg $1 1 Merhaba 4 $1 1 KanaLımızda Sohbet EdebiLmeniz için Ben KanaL Botu OLan 4 Pilot'1a Kayıt OLmanız Gerekmektedir. 3 Not : 1 Sadece KayıtLı NickLer Için GeçerLidir.
msg $1 1 Kayıt oLmak Icin Lütfen ÖzeLime 4 !Register Şifre 1 Yazınız.
msg $1 1 Önemli Not; Kendi kayıtLı 4Nickinizin Şifresini 1Yazmayın!
msg $1 1Örnek. 4 !register 12345
}
}
on *:text:*:?:{
if ($1 = !register) {
if ($read(registered.txt,s,$nick) = EVET) {
if ($read(bot-registered.txt,s,$nick)) { msg $nick Bu Nick Zaten kayıtLı! }
else { if $2 { write bot-registered.txt $nick $2 | write registered1.txt $nick EVET | msg $nick Sisteme kayıt oLdunuz. Şifreniz: $2 } | msg $nick $nick Lütfen !Login Şifreniz Yaparak Login oLunuz.
| elseif !$2 { msg $nick Lütfen Şifrenizide Giriniz. } }
}
elseif ($read(registered.txt,s,$nick) != EVET) { msg $nick Nickinizin Nickserv'de kayıtLı oLması Gerekmektedir, ßot Nickinizin kayıtLı oLmadığını Tespit Etti, Eğer KayıtLıysa Lütfen KanaLdan Çıkıp, Tekrar Giriniz. }
}
if ($1 = !login) {
if ($read(registered.txt,s,$nick) = EVET) {
if ($read(bot-registered.txt,s,$nick)) {
if !$2 { msg $nick Lütfen Şifrenizide Giriniz. } | elseif $2 { if ($read(bot-registered.txt,s,$nick) = $2) { msg $nick ( $nick ): Login OLdunuz. Aramıza Hoş GeLdin. | mode #ozgurdusLer +v $nick } | elseif ($read(bot-registered.txt,s,$nick) != $2) { msg $nick Yanlış Şifre!! } }
}
elseif !$read(bot-registered.txt,s,$nick) { msg $nick Nickiniz kayıtLı DeğiL, kaydetmek Için !register Şifre yazınız. }
}
elseif ($read(registered.txt,s,$nick) != EVET) { msg $nick Nickinizin nickserv'de kayıtlı oLması Gerekmektedir, Eğer kayıtLı ise Lütfen kanaldan çıkıp Tekrar Girin. }
}
if ($1 = !unregister) {
if ($read(registered1.txt,s,$nick) = EVET) {
if ($read(bot-registered.txt,s,$nick)) {
write $+(-ds,$nick) registered.txt $nick
write $+(-ds,$nick) registered1.txt $nick
write $+(-ds,$nick) bot-registered.txt $nick
msg $nick Nickiniz kaydı ßaşarı iLe SiLinmiştir.
}
else { if $2 { msg $nick Sisteme kayıtlı Değil. } }
}
elseif ($read(registered.txt,s,$nick) != EVET) { msg $nick Nickinizin Nickserv'de KayıtLı oLması Gerekmektedir, ßot Nickinizin kayıtLı oLmadığını Tespit Etti, Eğer KayıtLıysa Lütfen KanaLdan Çıkıp, Tekrar Giriniz. } }
}
on *:text:!şifre:#:{
if ($read(registered1.txt,s,$nick) = EVET) {
if (!$read(bot-registered.txt,s,$nick)) { msg $nick Bu nickin sisteme kayıtlı olmadığı tespit edildi! }
else {
whois $nick | set %sifregonder true | .enable #catchraw }
}
else { msg $nick Nickinizin Nickserv'de kayıtLı oLmadığı Tespit EdiLdi, Eğer KayıtLı ise Lütfen kanaLdan Çıkıp Tekrar Giriniz. }
}
alias gvoice { if $1 { var %a = $comchan($1,0) | while %a { if ($me isop $comchan($1,%a)) { dec %a } } } }