IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Bot Hakkında (notice'i msg'e çevirmek?) (https://www.ircforumlari.net/mirc-scripting-sorunlari/6713-bot-hakkinda-noticei-msge-cevirmek.html)

NeLix 21 Ağustos 2005 11:11

Bot Hakkında (notice'i msg'e çevirmek?)
 
on @*:JOIN:#spor:{
msg #spor $nick [Welcome Messages]: Spor Kanalına Hosgeldiniz.
if ($read(registered.txt,s,$nick) = EVET) { msg #spor $nick Siz kayıtlı kullanıcımız #istanbul kanalında farkı ve sohbeti bizimle yaşayın. Lütfen !login olunuz. }
else { whois $nick | .enable #catchraw }
}

#catchraw off
raw 307:*:{
if (%sifregonder != true) { msg #spor $2 Siz kayıtlı kullanıcımız #Spor kanalında farkı ve sohbeti bizimle yaşayın. }
elseif (%sifregonder = true) { notice $2 Şifreniz: $read(bot-registered.txt,s,$2) }
if (!$read(registered.txt,s,$2)) { write registered.txt $2 EVET }
}
raw 318:*:{
if (%sifregonder != true) {
checkreg $2 | .disable #catchraw
}
elseif (%sifregonder = true) { unset %sifregonder }
}
#catchraw end

alias checkreg {
if ($read(bot-registered.txt,s,$2)) { msg $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 | msg $nick Sisteme kayıt oldunuz. Şifreniz: $2 } | elseif !$2 { notice $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 { notice $nick Şifre nerde? } | elseif $2 { if ($read(bot-registered.txt,s,$nick) = $2) { notice $nick Login oldunuz! | gvoice $nick } | elseif ($read(bot-registered.txt,s,$nick) != $2) { notice $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. }
}
}
on *:text:!şifre:#:{
if ($read(registered.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 } } }

ßen ßu code yi sitede ßuldum notice ßölümlerini msg ye çevirdim ama notice olduğu zaman da çalışmıor du ßunu düzeltmemiz mümkün mü acaba ?

erdem55 21 Ağustos 2005 11:23

nelix birincisi kodda senin istediğin gibi sadece kayıtlı kullanıcılara hg demiyor. O düzeltilecek. İkincisi kanal operatörlerinede hg dicek ve kaydolun dicek bu o sorun var. Kayıt sistemöinde yine sorun var bir kayıtlı user kanala girdiğinde onu registered.txt dosyasına evet olarak kaydedeceği için bir sonraki girişinde ona register ol yerine login olunuz diyecektir bunları düzeltmelisin.

Bu arada msg veya notice dediğin ksıımlarda sorun göremedim. Bilmiyorum belkide gözümden kaçtı aha iy coder ler var forumda onlar daha çok yardım edeceklerdir

NeLix 21 Ağustos 2005 11:30

zaten noticeleri msg çevirmede sorun yokda o senin dediğin dier hatalarda sorun var sen bana yardımcı olur musun zaten sen onu yapmısdın düzeltmişdin ?

erdem55 21 Ağustos 2005 11:43

Ben o Kadar iyi değilim nelix zaen bilgimde yok denilecek kadar az. Arkadaşlar yardımcı olacaklardır eminim

NeLix 21 Ağustos 2005 11:49

valla inş yardımcı olurlar erdem ağßi :)

DarK^ 21 Ağustos 2005 13:35

çevirmeden önceki halini pasteleseydin daha kolay olurdu sanırım , bunda hata bulunmaya calısacak , onda ise hazır addon üzerinde oynama yapılacak

erdem55 21 Ağustos 2005 13:38

Dark bişey çevirmemi zaten sadece noticeleri msg yapmş bide istanbul yerine spor yazmış o kadar

erdem55 21 Ağustos 2005 13:55

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

NeLix 21 Ağustos 2005 14:58

erdem ağßi şimdi üstde verdiğin code doğru mu ?

erdem55 21 Ağustos 2005 15:05

Denersen görürsün canım yalnız hg leri kanala notice gerisini özel msg olarak yollar


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 21:00.

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net