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/)
-   -   Kayıt sistemli bot [login] (https://www.ircforumlari.net/mirc-scripting-sorunlari/2930-kayit-sistemli-bot-login.html)

erdem55 09 Mayıs 2005 23:21

[nick] [Welcome Messages]: İstanbul Kanalına Hosgeldiniz.
[nick] Siz kayıtlı kullanıcımız #istanbul kanalın'da farkı ve sohbeti bizimle yaşayın
[nick] Systeme kayıtlı bir nicktir
boyle yani 2. kez girisimde bana kanalin ortasinda boyle dese systeme kayitli 1 nicktir diye dese ?

erdem55 10 Mayıs 2005 01:07

1 de el33t yanlis sifre yazinca sifrenin yanlis oldugunu soyleyehn 1 sey ekleyemez miyiz? ve sifre unutulursa kanaldas !sifre yazsam mesela bot notice olarak kullanici adimi ve sifremi yollasa yani register olanlari 1 dosyaya loglasa onlari kullanici istediginde verse? cok oldu ama.)))

el33t 10 Mayıs 2005 09:46

İstediklerinin hepsini yazdım.
Umarım işine yarar..

Kod:


on @*:JOIN:#istanbul:{
  notice $nick [Welcome Messages]: istanbul Kanalına Hosgeldiniz.
  if ($read(registered.txt,s,$nick) = EVET) { notice $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 on
raw 307:*:{
  if (%sifregonder != true) { notice $2 Siz kayıtlı kullanıcımız #istanbul 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)) { notice $1 Bu nick sisteme kayıtlı bir nicktir, lütfen login olunuz. }
  else {
        notice $1 Her $network Kullanıcımıza İstanbul kanalında operatör olabilme şansı. Bu uygulama sadece kayıtlı nickler icindir
        notice $1 Nasılmı? benim özelime kayıt olunuz
        notice $1 Kayıt olmak icin lutfen özelime !Register Şifre Yazınız.
        notice $1 Önemli Not; Kendi kayıtlı nickinizin sifresini yazmayın!
        notice $1 Örnektir. !register 12345
  }
}
on *:text:*:?:{
  if ($1 = !register) {
        if ($read(registered.txt,s,$nick) = EVET) {
          if ($read(bot-registered.txt,s,$nick)) { notice $nick Bu nick zaten kayıtlı! }
          else { if $2 { write bot-registered.txt $nick $2 | notice $nick Sisteme kayıt oldunuz. Şifreniz: $2 } | elseif !$2 { notice $nick Şifre nerde? } }
        }
        elseif ($read(registered.txt,s,$nick) != EVET) { notice $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) { notice $nick Nickiniz kayıtlı değil, kaydetmek için !register <şifre> yazınız. }
        }
        elseif ($read(registered.txt,s,$nick) != EVET) { notice $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)) { notice $nick Bu nick sisteme kayıtlı bile değil. }
        else {
        whois $nick | set %sifregonder true | .enable #catchraw }
  }
  else { notice $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 } } }


erdem55 10 Mayıs 2005 11:00

kardes bunu aldim ama bu ozele gelip farki ve sohbeti bizimle yasayin diyor. nick sisteme kayitsizsa !register demiyor yani !register !login kullanilmiyor

CHECKREG Unknown command


soyle 1 hata verdi. Sen bana benim seni ne zamn nerde bulabilecegimi soylersen yuzyuze konussak?

el33t 10 Mayıs 2005 20:00

Yukardaki kodun HEPSINI remote'a koyarsan sorun olmaz.

erdem55 11 Mayıs 2005 00:38

el33t koydum ya aynen koydum hicbir sey degistirmeden sadece kanal ismi degistirdim.


-
Unknown command
-
Unknown command
-
} Unknown command
-
ELSEIF Unknown command

* /if: Kapalı ayraç bulunamadı (Satır 2, script3.txt)
-
-
* /if: Kapalı ayraç bulunamadı (Satır 2, script3.txt)
-
* /if: Kapalı ayraç bulunamadı (Satır 2, script3.txt)
-
* /if: Kapalı ayraç bulunamadı (Satır 2, script3.txt)
-
* /if: Kapalı ayraç bulunamadı (Satır 2, script3.txt)
-
* /if: Kapalı ayraç bulunamadı (Satır 2, script3.txt)


surekli bu hatalari veriuyor. onceki kod kanala giren nickin ozeline gidiyordur ama bu ozelede gelmiyor. !login diyorsun bu ustteki hatalai veriyor statuste

el33t 11 Mayıs 2005 09:42

[code] tagları yüzünden sorun çıkmış, aşağıdakini kopyala..

on @*:JOIN:#istanbul:{
notice $nick [Welcome Messages]: istanbul Kanalına Hosgeldiniz.
if ($read(registered.txt,s,$nick) = EVET) { notice $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 on
raw 307:*:{
if (%sifregonder != true) { notice $2 Siz kayıtlı kullanıcımız #istanbul 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)) { notice $1 Bu nick sisteme kayıtlı bir nicktir, lütfen login olunuz. }
else {
notice $1 Her $network Kullanıcımıza İstanbul kanalında operatör olabilme şansı. Bu uygulama sadece kayıtlı nickler icindir
notice $1 Nasılmı? benim özelime kayıt olunuz
notice $1 Kayıt olmak icin lutfen özelime !Register Şifre Yazınız.
notice $1 Önemli Not; Kendi kayıtlı nickinizin sifresini yazmayın!
notice $1 Örnektir. !register 12345
}
}
on *:text:*:?:{
if ($1 = !register) {
if ($read(registered.txt,s,$nick) = EVET) {
if ($read(bot-registered.txt,s,$nick)) { notice $nick Bu nick zaten kayıtlı! }
else { if $2 { write bot-registered.txt $nick $2 | notice $nick Sisteme kayıt oldunuz. Şifreniz: $2 } | elseif !$2 { notice $nick Şifre nerde? } }
}
elseif ($read(registered.txt,s,$nick) != EVET) { notice $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) { notice $nick Nickiniz kayıtlı değil, kaydetmek için !register <şifre> yazınız. }
}
elseif ($read(registered.txt,s,$nick) != EVET) { notice $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)) { notice $nick Bu nick sisteme kayıtlı bile değil. }
else {
whois $nick | set %sifregonder true | .enable #catchraw }
}
else { notice $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 } } }

Yeppa 11 Mayıs 2005 10:04

sifreli sifresiz herkese notice atiyor :) kanal 5 join oldugunda flooddan dusuyoruz. birde nedense login olamıyor.

erdem55 11 Mayıs 2005 12:42

el33t tamamdir. code harika sen 1 harika ama arkadasin dedigi gibi bender belirtmistim. Kanala nickini servera kaydetmis 1 kisi girince #chan kanalina hosgeldiniz desin. herkese derse flooddan duser. 1 de kanala girdiginde # kanalina hosgeldiniz notice olabilir tamam da diger nicki kaydetymek icn register yerlerinoi bot ozele gelip soylese olmaz mi ben degistirdim notice $1 kismini msg $nick yaptim ama olmadi sen 1 bakar misin?
cok sagol

erdem55 11 Mayıs 2005 12:52

alias checkreg {
if ($read(bot-registered.txt,s,$2)) { notice $1 Bu nick sisteme kayıtlı bir nicktir, lütfen login olunuz. }
else {
notice $1 Her $network Kullanıcımıza İstanbul kanalında operatör olabilme şansı. Bu uygulama sadece kayıtlı nickler icindir
notice $1 Nasılmı? benim özelime kayıt olunuz
notice $1 Kayıt olmak icin lutfen özelime !Register Şifre Yazınız.
notice $1 Önemli Not; Kendi kayıtlı nickinizin sifresini yazmayın!
notice $1 Örnektir. !register 12345
}
bu mesaji da servera kayitli olmayan usere bile gonderiyor yine flooddan duser. !register diyince nickiniz servera kaytili degil diyor ama yne de o mesaji gondermis oluyor. flooddanm yine duser. bunu sadece nicki servera kayitli olan nicklere atsa olmaz mi? yani bu code sadece kanala servera nicki kayitli 1 user girince aktif olan 1 kod olsun diyorum. cunku kalabalik 1 serverda kayitsiz botlara motlara bu mesaji yazarsa duser o nedenle verimli olmaz . yardimlarin icin cok sagol degisitirebilirsen cok sevinirim


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

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