Tekil Mesaj gösterimi
Alt 21 Ağustos 2005, 13:55   #8
Çevrimdışı
erdem55
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



on *:join:#zurna:{ set %loginnick $nick | set %loginchan $chan | timer 1 5 checklogin %loginnick }

alias checklogin {
if (%loginnick isop %loginchan) { unset %loginnick | unset %loginchan | Halt }
if (%loginNick !isvoice %loginchan) {
if ($read(registered1.txt,s,%loginnick) = EVET) {
notice %loginnick [Welcome Messages]: Zurna Kanalına Hosgeldiniz.
notice %loginnick Siz kayıtlı kullanıcımız zurna kanalında farkı ve sohbeti bizimle yaşayın. Lütfen !login olunuz. }
else { whois %loginnick | .enable #catchraw | unset %loginnick | %loginchan }
}
}

#catchraw on
raw 307:*:{
if (%sifregonder != true) {
msg $2 Siz kayıtlı kullanıcımız Zurna kanalında farkı ve sohbeti bizimle yaşayın.
notice $2 [Welcome Messages]: Zurna Kanalına Hosgeldiniz.
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) {
.disable #catchraw
}
elseif (%sifregonder = true) { unset %sifregonder }
}
#catchraw end

alias checkreg {
if ($read(bot-registered.txt,s,$2)) { notice $1 Bu nick sisteme kayıtlı bir nicktir, lütfen login olunuz. }
else {
msg $1 Her $network Kullanıcımıza İstanbul kanalında operatör olabilme şansı. Bu uygulama sadece kayıtlı nickler icindir
msg $1 Nasılmı? benim özelime kayıt olunuz
msg $1 Kayıt olmak icin lutfen özelime !Register Şifre Yazınız.
msg $1 Önemli Not; Kendi kayıtlı nickinizin sifresini yazmayın!
msg $1 Örnektir. !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 } | elseif !$2 { msg $nick Şifre nerde? } }
}
elseif ($read(registered.txt,s,$nick) != EVET) { msg $nick Nickinizin nickserv'de kayıtlı olması gerekmektedir, bot 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 Şifre nerde? } | elseif $2 { if ($read(bot-registered.txt,s,$nick) = $2) { msg $nick Login oldunuz! | gvoice $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 baş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, bot 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 nick sisteme kayıtlı bile değil. }
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)) { mode $v2 +v $1 } | dec %a } } }

Tamamen kendim değiştirdim. Ve şuanda hiçbir sorunmda yok.
Asii_genc Arkadaşıma verdiğim sözü senin yüüznden üstümde kırdım. O istemişti düzeltmemi ve bende öyle böyle düzeltmiştim ve kimseye bu kodu vermem için söz verdirmişti. Buyur Belkide bişiler öğreniyorumdur ne dersin

Bu arada kodu ilk yazan kişi el33t dir. Ben sadece benim istediğim şeyleri yapması için ayarladım yani kendime göre hata gördüğüm eyleri düzelttim


Konu erdem55 tarafından (21 Ağustos 2005 Saat 14:08 ) değiştirilmiştir.
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Benimmekan Mobil Sohbet