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 11:16

Kayıt sistemli bot [login]
 
arkadaslar benim sorum soyle. 1 kanal var 1 serverda bu kanala girince ozele bot geliyor aslinda size gore basit 1 seydir.


Type: Her E-Kolay Kullanıcımıza İstanbul kanalında operatör olabilme şansı. Bu uygulama sadece kayıtlı nickler icindir
Type: Nasılmı? benim özelime kayıt olunuz
Type: Kayıt olmak icin lutfen özelime !Register Şifre Yazınız.
Type: Önemli Not; Kendi kayıtlı nickinizin sifresini yazmayın!
Type: Örnektir. !register 12345

bu sekilde ozele bot geliyor. Sen bota !register sifre yaziyorsun kayit oluyorsun.
Sifreleri sanirim 1 yerde depoluyor. Sonra sen kanaldan cikip giriyorsun. login olmani istiyor login oluyorsun kanalda otomatik voice veriyor. Boyle 1 sistem mumkun mudur.?
1 de bu bot. kanala girince eger nick registerliyse
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


seklinde kanala mesaj yaziyor bu klonuda yardimci olursaniz cok sevinirim

el33t 09 Mayıs 2005 15:19

#istanbul kanalına giren birinin nicki kayıt edilmişse, kullanıcıya hoşgeldiniz lütfen login olunuz gibi bir mesaj gidiyor, eğer daha önceden kayıt olmamışsa kayıt olunuz vs. gibi bir mesaj gidiyor.
Özelde !register şifre yazdıklarında daha önceden kayıt edilmemişse nick kayıt ediliyor ve !login şifre yazınca voice oluyor. -denemedim..-
İşte kod:
on @*:join:#istanbul:{
if ($($+(%,pass.,$chan,.,$nick),2)) { notice $nick Siz kayıtlı kullanıcımız $chan kanalın'da farkı ve sohbeti bizimle yaşayın, lütfen login olunuz. } | else {
notice $nick Her $network Kullanıcımıza $remove($chan,$chr(35)) kanalında operatör olabilme şansı. Bu uygulama sadece kayıtlı nickler icindir
notice $nick Nasılmı? benim özelime kayıt olunuz
notice $nick Kayıt olmak icin lutfen özelime !register Şifre Yazınız.
notice $nick Önemli Not; Kendi kayıtlı nickinizin sifresini yazmayın!
notice $nick Örnektir. !register 12345
}
}
on *:text:*:?:{
if ($1 = !register) {
if ($($+(%,pass.,$chan,.,$nick),2)) { notice $nick Bu nick zaten kayıtlı }
else { if $2 { set $+(%,pass.,$chan,.,$nick) $2 | notice $nick Kayıt oldunuz. Şifreniz: $2 lütfen unutmayın. } }
}
if ($1 = !login) {
if ($($+(%,pass.,$chan,.,$nick),2) == $null) { notice $nick Bu nick kayıtlı değil, kayıt etmek için !register şifre yazınız. }
else { if ($($+(%,pass.,$chan,.,$nick),2) == $2) { notice $nick Login oldunuz! | if ($nick !isvo #istanbul) && ($nick ison #istanbul) { mode #istanbul +v $nick } } }
}
}

Yeppa 09 Mayıs 2005 15:36

süpersin el33t,simdi bunu sadece registerli nicklere yapabilirsek cok daha iyi olur.. senin kodlarına bayılıyorum :)

Yeppa 09 Mayıs 2005 16:03

tuh..
on *:text:*:#:{
if ($1 = !register) {
if ($($+(%,pass.,$chan,.,$nick),2)) { notice $nick Bu nick zaten kayıtlı }
else { if $2 { set $+(%,pass.,$chan,.,$nick) $2 | notice $nick Kayıt oldunuz. Şifreniz: $2 lütfen unutmayın. } }
}
if ($1 = !login) {
if ($($+(%,pass.,$chan,.,$nick),2) == $null) { notice $nick Bu nick kayıtlı değil, kayıt etmek için !register şifre yazınız. }
else { if ($($+(%,pass.,$chan,.,$nick),2) == $2) { notice $nick Login oldunuz! | if ($nick !isvo #istanbul) && ($nick ison #istanbul) { mode #istanbul +v $nick } } }
}
}


su kısım calismiyor sanirim

MephisTo 09 Mayıs 2005 16:06

Alıntı:

el33t Nickli Üyeden Alıntı
on *:text:*:#:{

Şifreleri kanala mı yazıyoruz? el33t gece beşik mi salladın :p

Kod:

on *:text:*:?:{
diye düzeltin.

erdem55 09 Mayıs 2005 19:51

el33t dostum sagolasin guzel kod. ama yukarida belirtmistim sanirim gozunden kacti.
ben dedim ki farki ve sohbeti bizimle yasayin kismini bot kanalima nickini serverda registerlemis 1 nick girdiginde yazsin. Eger nick servera registersizse kanala giren usere hosgeldiniz farki ve sohbeti bizimle yasayin demesin. servera Registersiz nicklerde bota register olamasin. cok uzun oldu ama yardimci olursan cok sevinirim tesekkurler

erdem55 09 Mayıs 2005 20:22

1 de el33t if ile baslayan kisim var ya onu nereye yaziyor bot hani siz kayitli kullanicimiz farki vs..vs.. bunu nereye yaziyor bot? benim istedigim servera kayitli yani ns register komutuyla kayit olmus kullanicilara gitsin bu mesaj kanala girislerinde registersin nickin ozeline felan gitmesin. whoisine mi bakmali acaba? registered ibaresini gorup oyle mi gidecek?

el33t 09 Mayıs 2005 20:51

307 numaralı raw nickin registerlı olup olmadığını gösterir..

raw 307:*:echo 4 -a $2 nicki registerlı!

erdem55 09 Mayıs 2005 22:58

pardon el33t bu raw'i tam olarak kod uzerinde gosterebilir misin? yoksa baska 1 remote acip mi ekleyecegiz?

erdem55 09 Mayıs 2005 23:20

1 de el33t simdi register oduk ya bu kodu 1 daha ki giriste daha once registerli isek bize register olun felan demese direjkt tanisa kayidim oldugunu bilse ben girince bana diretk login olun dese? mumkun mudur

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

erdem55 11 Mayıs 2005 12:53

1 du bu soyledigim mesaj yani nasil mi benim ozelime kayit olunuz mesakji giren servera kayitli usrin ozeline gitsin notice olarak degilde.

Sunay 06 Ocak 2006 19:47

Kayıt olanların Nicklerini ve şifrelerini X adli dosyada not etmek ?
 
Selam Arkadaşım Guzel 1 Addon yazilmiş , fakat kayıt olanlarin şifreleri ve nicklerini X adli bi dosyada kaydetmemiz mumkunku ? kayıt olan olursa direk o dosyaya kayıt olsun şifresi ve nicki ?

EEkreMM 10 Ocak 2006 11:57

Cennetlik olcan sanırım bu gidişte el33t :)

ShRieK 25 Ocak 2006 20:36

teşekkürler yaa mükemmelsiniz ben aranıza yeni katıldım neler var ya inanın şaşırdım kaldım

ReaLTurK 16 Nisan 2006 16:10

KarsıLama ßotu
 
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 } } }


Code el33t 'ye Aittir..

ArkadaşLar ßu Code Kanala Gıren Kayıtlı nıcKe Notıce oLarak Mesaj deıL de Ozelıne Gıdıp normal mesaj Gondermesini İstıyorum .. Bazı KısımLarını yapmaya Calıstım Ama oLmadıı ..Su An Code OrjinaLi Hıc Dokunmadım Yardımcı oLursaNız Sewinirim..

MaeLStrOm 16 Nisan 2006 16:17

Yanıt: KarsıLama ßotu
 
notice $nick kısmını msg $nick olarak değiştirmelisin.

ReaLTurK 16 Nisan 2006 16:25

Yanıt: KarsıLama ßotu
 
MaeLStrOm ßısey daha SorabıLırmıyım ... !

ßu Addonu Kanalda Muhabbet edenLer Icın ßı PuanLama PaneLı oLarak da KuLLanabıLırmıyızz.. Mesela ßı KayıtLı User ßota KaydoLdugunda Kanalda ne Kadar Konustuysa ona qore puan Alsın.. OzeLıne qıdıp !puan dedıgınde Ise Puanını oqrenebıLsın ..

Acaßa mumKun mu ?

aLoSs 16 Nisan 2006 17:45

Yanıt: KarsıLama ßotu
 
[17:44] <ahga> [Welcome Messages]: istanbul Kanalına Hosgeldiniz.
[17:44] <ahga> Siz kayıtlı kullanıcımız #istanbul kanalında farkı ve sohbeti bizimle yaşayın.
[17:44] <ahga> Her Irc.x.Org Kullanıcımıza İstanbul kanalında operatör olabilme şansı. Bu uygulama sadece kayıtlı nickler icindir
[17:44] <ahga> Nasılmı? benim özelime kayıt olunuz
[17:44] <ahga> Kayıt olmak icin lutfen özelime !Register Şifre Yazınız.
[17:44] <ahga> Önemli Not; Kendi kayıtlı nickinizin sifresini yazmayın!
[17:44] <ahga> Örnektir. !register 12345

güzel bot noticeleri msg yaptım

ReaLTurK 16 Nisan 2006 17:54

Yanıt: KarsıLama ßotu
 
Addonu Kanalda Muhabbet edenLer Icın ßı PuanLama PaneLı oLarak da KuLLanabıLırmıyızz.. Mesela ßı KayıtLı User ßota KaydoLdugunda Kanalda ne Kadar Konustuysa ona qore puan Alsın.. OzeLıne qıdıp !puan dedıgınde Ise Puanını oqrenebıLsın ..


Arkadsım Benım Sordugum bu O sorunu Halleddım de .. bu Soruna yardımCı oLucak Arkadas yok mu Lutfen yaa :(

MaeLStrOm 16 Nisan 2006 18:17

Yanıt: KarsıLama ßotu
 
on *:text:*:#istanbul:{
if ($read(registered.txt,s,$nick)) { inc -e $+(%,$nick) 1 }
}
on *:text:*:?:{
if ($1 == !puan) { msg $nick $($+(%,$nick),2) puanınız bulunmaktadır. }
}

Amigo 16 Nisan 2006 19:38

Yanıt: Kayıt sistemli bot [login]
 
on *:join:#aLanya:{ set %loginnick $nick | set %loginchan $chan | checklogin %loginnick }
alias checklogin {
if ($read(registered1.txt,s,%loginnick) = EVET) {
msg #aLanya %loginnick [Welcome Messages]: %loginnick #aLanya kanalına hosgeldiniz.
msg #aLanya %loginnick Siz kayıtlı kullanıcımız #aLanya kanalında farkı ßir sohbeti bizimle yaşayın. | msg %loginnick Lütfen !Login Şifreniz  Yaparak Login oLunuz. }
else { whois %loginnick | .enable #catchraw | unset %loginnick | %loginchan }
}
#catchraw on
raw 307:*:{
if (%sifregonder != true) {
msg #aLanya [Welcome Messages]: $2 #aLanya 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) {
}
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 Her E-KoLay kuLLanıcımıza #aLanya kanaLinda + ( Voice ) oLabiLme Şansı. ßu UyguLama Sadece kayıtLı NickLer Icindir.
msg $1 NasıLmı? ßenim özeLime kayıt oLunuz.
msg $1 Kayıt oLmak Icin Lütfen ÖzeLime !Register Şifre Yazınız.
msg $1 Önemli Not; Kendi kayıtLı Nickinizin Şifresini 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   } | 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 #aLanya +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 } } }


SUAN BENDE CALİSİYOR. TAM ISTEDIGIN GIBI

ReaLTurK 14 Haziran 2006 14:33

Yanıt: Kayıt sistemli bot [login]
 
Hazırcı Olma Gibi Bir niyetim Yok . Ama Mesajı Sıldıgınızden Bu Yana Ugrasıyorum Olmadı .. Tekrar Anlatayım Baska ArkadasLar yardımCı oLabıLırLer beLkı ..

Botun Ozellıgı Olan Kanala ve özele yaptığı Karşılamayı Bazı NickLere ve Kanal Operatörlerine Yapmasın.. Yani

Type: Her E-Kolay Kullanıcımıza İstanbul kanalında operatör olabilme şansı. Bu uygulama sadece kayıtlı nickler icindir
Type: Nasılmı? benim özelime kayıt olunuz
Type: Kayıt olmak icin lutfen özelime !Register Şifre Yazınız.
Type: Önemli Not; Kendi kayıtlı nickinizin sifresini yazmayın!
Type: Örnektir. !register 12345

Bu Karşılama Özeline Gitmeyecek

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

Bu Karşılama Kanala Yansımayacak ..

Lütfen Uğraştım Ama Code yazma Yeteneğim Zayıf Oldugundan Beceremedım .. diEfoRyoU Dediğin Gibi Uğraştım Ama Olmuyor Bir Türlü Yapamıyorum .. YardımLarınızı Bekliyorum..

diEfoRyoU 14 Haziran 2006 21:53

Yanıt: Kayıt sistemli bot [login]
 
on *:join:#aLanya:{ if !$istok(ali veli amca dayi hasan nusret abdul,$nick,32) { set %loginnick $nick | set %loginchan $chan | checklogin %loginnick } }

Kırmızı ile belirttiğim nickleri kendine g&#246;re editlemelisin.
Bu kodu yukardaki kodun en başındaki kısmı silip, onun yerine yapıştırmalısın.
Umarım anlatabilmişimdir.

ReaLTurK 15 Haziran 2006 10:46

Yanıt: Kayıt sistemli bot [login]
 
Son Birşey Daha .. Özür Dileyerekten

Kod:


on *:text:*:#istanbul:{
if ($read(registered.txt,s,$nick)) { inc -e $+(%,$nick) 1 }
}
on *:text:*:?:{
if ($1 == !puan) { msg $nick $($+(%,$nick),2) puanınız bulunmaktadır. }
}

Not: Code MaeLStrOm a Aittir ..

Bu Codede Registered.txt de Bulunup Kanalda Sohbet Edip Puan Kazananlar Variables Kısmına "%ReaLTurK Puan" Şeklinde Yansıyor.. Bunu Puan.txt Diye bir Dosyaya Editleyip Ordan Ozelıne "!puan" Yazıldıgında Okutma Imkanımız Varmı Acaba ?

KutsaL 16 Haziran 2006 09:08

Yanıt: Kayıt sistemli bot [login]
 
Alıntı:

diEfoRyoU Nickli Üyeden Alıntı
on *:join:#aLanya:{ if !$istok(ali veli amca dayi hasan nusret abdul,$nick,32) { set %loginnick $nick | set %loginchan $chan | checklogin %loginnick } }

Kırmızı ile belirttiğim nickleri kendine göre editlemelisin.
Bu kodu yukardaki kodun en başındaki kısmı silip, onun yerine yapıştırmalısın.
Umarım anlatabilmişimdir.


Peki diEfoRyoU Bunu Bir .txt den Okutmaya Çalıştım Senin Kodundan yola cıkarak


on *:join:#aLanya:{ if !$istok($read(karsilama.txt),$nick,32) { set %loginnick $nick | set %loginchan $chan | checklogin %loginnick } }


Elimden bu geLdi bunu denedım Ama Sadece Ilk satırdakını Okuyor .. Yani Nıcklerı Alt Alt a Yazdıgımda Sadece 1. Sıradakını DahıL edıyor bunun Bir Çözümü var mı Acaba ?

djiNn 16 Haziran 2006 11:27

Yanıt: Kayıt sistemli bot [login]
 
Alıntı:

KutsaL Nickli Üyeden Alıntı
Peki diEfoRyoU Bunu Bir .txt den Okutmaya &#199;alıştım Senin Kodundan yola cıkarak


on *:join:#aLanya:{ if !$istok($read(karsilama.txt),$nick,32) { set %loginnick $nick | set %loginchan $chan | checklogin %loginnick } }


Elimden bu geLdi bunu denedım Ama Sadece Ilk satırdakını Okuyor .. Yani Nıcklerı Alt Alt a Yazdıgımda Sadece 1. Sıradakını DahıL edıyor bunun Bir &#199;&#246;z&#252;m&#252; var mı Acaba ?


on *:join:#aLanya:{ if (!$read(karsilama.txt,w,$nick) { set %loginnick $nick | set %loginchan $chan | checklogin %loginnick } }

yaparsan Sorun Cozulecektir..

ReaLTurK 17 Haziran 2006 12:18

Yanıt: Kayıt sistemli bot [login]
 
Soruma Cvp Alamadım Arkadaslar Ne oLur ßırazcık destekcı Olun :( Son Sorum Zaten bu Konu Hakkında :((

MaeLStrOm 17 Haziran 2006 13:24

Yanıt: Kayıt sistemli bot [login]
 
/help /write yazdığında yardımcı olacak bilgiler cıkacaktır.Uğraşarak yapabilirsin sanırım ama bence kodun kendi haliyle kalması daha uygun olur txt ye tekrar tekrar yazdırmaktansa cunku gereksiz kasmaya hi&#231; gerek yok.


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

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