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 Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   Mynetteki Preator botun özelliği (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/187535-mynetteki-preator-botun-ozelligi.html)

uFuK 14 Mart 2009 19:08

Mynetteki Preator botun özelliği
 
Kişi listemi ekleyen birisi botun bir özelliği hakkında anlatım yaptı ve yapılıp yapılamayacağını sordu onun üzerine bende kodladım.

Addonun Çalışma Mantığı: {
Alias'la veya belirlediğiniz kanalda ekle parametresini kullandığınızda hash tablosuna belirlediğiniz nicki ekleyecek. Bu eklenen nick botun özelinde "!kefilim nick" komutunu kullandığında kanaldaki istediği usere voice verebilecek. !kefilim nick veya !ekle nick yada /ufuk ekle nick şeklinde girilen nickler kanala girdiklerinde otomatik olarak voice alıcaklar.

Kanal Kayıt Sistemi

hash listesine kanal yardımıyla "Opta olanlar" %channel'de belirtilen kanal olmak kaydıyla aşağıdaki komutları kullanarak ACC listesine nick ekleyebilir,silebilir,listeleyebilir.

PHP- Kodu:

!ekle nick --> "addona erişim sağlar"
!sil nick --->  "addona erişimi olan nicki siler" 
!liste ------> "addona erişimi olan nickleri listeler" 

Elle komut olarak mIRC'nde bu kod ekli olan kişi aşağıdaki komutları kullanarak ACC Listesine nick ekleyebilir,silebilir,listeleyebilir.

PHP- Kodu:

/ufuk ekle nick --> "addona erişim sağlar."
/ufuk sil nick   --->  "addona erişimi olan nicki siler" 
/ufuk liste ------> "addona erişimi olan nickleri listeler" 

Kod;

PHP- Kodu:

on *:start: { 
  
hmake yetki 1000 
  hload yetki yetki
.hash 
  set 
%channel #ufuk


on *:text:*:?: { 
  if ($
== !kefilim) { 
    var %
nick $nick
    
if %nick == $hmatch(yetki,%nick) { 
      
cs voice %channel $hadd -sm yetki $hsave yetki yetki.hash msg $chan 4,0Belirttiğiniz nicke yetki ekledim
    }
    if %
nick != $hmatch(yetki,%nick) { msg $chan Hash Listemde YoksunuzFounderle Temasa Geçin. }
  }
}

on *:text:*:#: { 
  
if $chan == %channel {
    if 
$nick isop $chan 
      if ($
== !ekle) { hadd -sm yetki $hsave yetki yetki.hash msg $chan Belirttiğin nicki ACC listesine ekledim. } 
      if ($
== !sil) { hdel -sm yetki $hsave yetki yetki.hash  msg $chan Belirttiğin nicki ACC listesinden sildim. } 
      if ($
== !liste) { 
        var %
i 1 
        
while %<= $hget(yetki,0).item 
          
msg $chan $hget(yetki,%i).item
          inc 
%
        
}
      }
    }
  }
}
alias ufuk 
  if ($
== ekle) { hadd -sm yetki $hsave yetki yetki.hash 
  if ($
== sil) { hdel -sm yetki $hsave yetki yetki.hash  
  if ($
== liste) { 
    var %
i 1 
    
while %<= $hget(yetki,0).item 
      
msg $chan $hget(yetki,%i).item
      inc 
%
    
}
  }
}

on *:join:#: { 
  
var %nick $nick
  
if %nick == $hmatch(yetki,%nick) { 
    
cs voice %channel %nick 
  
}


ALT R remoteye yükleyin ve ACC listesine bir nick ekleyerek başlayın.

Dipnot: set %channel #ufuk

#ufuk kısmını kendinize göre editleyin.



IRCMasteR 15 Mart 2009 22:41

Cevap: Mynetteki Preator botun özelliği
 
denedim ama her hangi bir tepki vermedi calismiyor

uFuK 17 Mart 2009 02:11

Cevap: Mynetteki Preator botun özelliği
 
PHP- Kodu:

on *:start: { 
  
hmake yetki 1000 
  hload yetki yetki
.hash 
  set 
%channel #ufuk


on *:text:*:?: { 
  if ($
== !kefilim) { 
    var %
nick $nick
    
if %nick == $hmatch(yetki,%nick) { 
      
cs voice %channel $hadd -sm yetki $hsave yetki yetki.hash msg $nick 4,0Belirttiğiniz nicke yetki ekledim
    }
    if %
nick != $hmatch(yetki,%nick) { msg $nick Hash Listemde YoksunuzFounderle Temasa Geçin. }
  }
}

on *:text:*:#: { 
  
if $nick isop $chan 
    if ($
== !ekle) { hadd -sm yetki $hsave yetki yetki.hash msg $chan Belirttiğin nicki ACC listesine ekledim. } 
    if ($
== !sil) { hdel -sm yetki $hsave yetki yetki.hash  msg $chan Belirttiğin nicki ACC listesinden sildim. } 
    if ($
== !liste) { 
      var %
i 1 
      
while %<= $hget(yetki,0).item 
        
msg $chan $hget(yetki,%i).item
        inc 
%
      
}
    }
  }
}


alias ufuk 
  if ($
== ekle) { hadd -sm yetki $hsave yetki yetki.hash 
  if ($
== sil) { hdel -sm yetki $hsave yetki yetki.hash  
  if ($
== liste) { 
    var %
i 1 
    
while %<= $hget(yetki,0).item 
      
msg $chan $hget(yetki,%i).item
      inc 
%
    
}
  }
}

on *:join:#: { 
  
var %nick $nick
  
if %nick == $hmatch(yetki,%nick) { 
    
cs voice %channel %nick 
  
}


Kodda teknik açıdan bir sorun yok ama senin dediğinle alakasız olan ufak bir sorun vardı şikayet üzerine editledim. text:?: da $chan kullanmışım:)

Kullanımını harfiyen yaparsan çalışıcaktır. Teknik bir sorun yok birçok kullanan arkadaş var mynette

Alıntı:

Unutma: /ufuk ekle nick
yada;
kanalda optayken;
!ekle nick

Komutlarını kullanıp hash tablosuna addonu yönetecek nickleri eklemelisin.

Ve unutma: yukardaki set %channel #ufuk u kendi kanalına göre editlemelisin. Yani userlerin voice alacağı orjinal kanala göre.

Micron 19 Mart 2009 20:11

Cevap: Mynetteki Preator botun özelliği
 
Hocam Botu Verebılırmsınız Bizde
BakaLım

uFuK 22 Mart 2009 14:21

Cevap: Mynetteki Preator botun özelliği
 
Verdim zaten senin yazının bir üstündeki post'ta kod. Onu alıp remoteye kopyalıyorsun boş bir sayfaya.

Açıkcası bu koda birtek teşekkür mesajı olmamasıda üzdü beni. Onuda belirteyim..

Ama yinede bir arkadaşımın ricası üzerine bu sistemi Mynet MeLi özel oda yardımcısını bir üst versiona çıkartarak hem mevcut codeyi hemde MeLi'yi yükselticem.

Yani bunun çok daha gelişmişi bir kayıt sistemini eklicem MeLi'ye, koruma sistemi bakımındanda üst düzeye çıkartıcam bu aralar giremiyorum hiç boş vaktim yok ama bu akşam yapmaya başlayacağım inşallah.


¿ 11 Nisan 2009 05:35

Cevap: Mynetteki Preator botun özelliği
 
FenomeNs iyi düşünmüşsün ama eksikleri var Preator'un çalışma mantığı; kefil olunan nick'in kayıt süresi en az 14 gün ise autovoice listesine ekleniyor. Ayrıca nick'ler de veriables'e ekleniyor.

Çalışma Mantığı:

Autovoice listesinde olmayan nick'e kanal'a girişte özelde karşılama özelliği.

<Praetor> Merhaba About Felsefe Kanalına hoşgeldiniz, Kanal genelinde sohbet edebilmeniz için kayıtlı bir nicke ve Kanal Voice verme botu olan ben Praetor e Kayıt olmanız gerekmektedir. Detaylı bilgi için bu sohbet penceresinde lütfen yardım yazınız.

Bilgilendirme.

Autovoice listesinde olmayan nick için;

<About> yardım
<Praetor> Merhaba About , Felsefe kanalında, sohbet edebilmek için nickinizin 14 günlük şifreli bir nick olması ve Praetor 'a kaydolmanız gerekmektedir.. Nickiniz henüz 4 günlük, 10 gün sonra kanalda voiceli muhteremlerden biri size referans olup bota Ekleyebilir. Veya 14 günlük başka bir nickiniz varsa onu Ekleyebilir. Bu işlemleri yapmadan kanalda konuşabilmek için yetkilileri rahatsız etmeyeceğiniz için şimdiden teşekkür ederiz.


Autovoice listesinde olan nick için;

<Namesis> yardım
<Praetor> Merhaba Namesis , Praetor; Felsefe Kanalı Referans sistemi ile User (Vop) ekleme yardımcısıdır. Kanalda konuşmak, bir usere referans olmak veya diğer işlemler için yardım yazınız.
<Praetor> Referans olduğunuz arkadaşınızın nickini Praetor 'a Ekleyebilirsiniz. Ekleyeceğiniz nick 14 günlük olmalıdır. Eklediğiniz nick kanal kurallarına uymamakta israr veya gayri ahlaki davranışlar gösterirse sizin kanal kaydınızın (Vop) silinmesine sebep olabilir. Bota nick eklemek için vopekle nick yazınız. Bir nickin durumunu oğrenmek için durum nick yazınız.. istatistikler için ise istatistik yazınız..


Nick ekleme.

<Namesis> vopekle About
<Praetor> Eklemek istediğiniz bu nickin "About" kayıt süresi henüz 4 gün, 10 gün sonra bu nicki kaydedebilirsiniz. Veya Praetor 'a eklemek istediğiniz arkadaşın nick kayıt süresi 14 gün veya fazla olan bir nicki varsa o nicki eklemelisiniz. Yukardaki işlemleri yapmadan (+v) ekletmek için yetkilileri rahatsız etmeyeceğiniz için şimdiden teşekkür ederiz. Hoşsohbetler.


Nick durum kontrol.

<Namesis> durum Out
<Praetor> Bu nick "Out" Kanal Vop listesine eklenmiş bir nicktir. Referans olan nick; Namesis Kayıt Zamanı; 15/03/2009 19:00:28 Notlar;


Aklıma gelen özellikleri bundan ibarettir. Kolay gelsin...

Teoman 06 Ağustos 2009 14:52

Cevap: Mynetteki Preator botun özelliği
 
Kodda sorun var calismiyor ve namesis sende orjinali varmı

¿ 06 Ağustos 2009 16:59

Cevap: Mynetteki Preator botun özelliği
 
VaLLahi oLsaydı payLaşırdım ama maLesef yok.. OLan kişide payLaşmaz emin oL ßaqzıLarı ßöyLe işte ßişey yaparLar devLet sırrı qißi sakLarLar.. :) ßundan sonra ßizLerde mi¿ öyLe yapsak.. AsLında yapmak Lazım ki, payLaşmayı öqrensinLer.. :)

Teoman 07 Ağustos 2009 14:00

Cevap: Mynetteki Preator botun özelliği
 
Bunu yapacak olan bir arkadaş vardır buralarda illaki rica etsek bu olaya bir el atabilirmisiniz arkadaşlar.

uFuK 05 Eylül 2010 04:37

Cevap: Mynetteki Preator botun özelliği
 
Kodun çalışmaması için hiçbir neden yok. Çalıştıramıyorsunuz çalışmıyor diyorsunuz. Denemediğim kodu neden buraya vereyim?

Ayrıca ben burada Preator bot demedim özelliği dedim. Kanal kayıt sistemi bu başlı başına bir bot değil ufacık bi kod. Ne bekliyorsunuzki.

Mynet Yönetimi Özel Odalara Bot Yaptırmaya İzin Vermiyor. İzin verse güzel bir kanal botu yapıcam.

Felsefe kanalında izin var argo tabirle taşşaklı adamlarda yani :)

Lost 07 Ekim 2010 01:52

Cevap: Mynetteki Preator botun özelliği
 
Biraz Geç Oldu Ama, Şu An Felsefe Odasında bulunan, Tarafımdan Yazılmış Felsefe nickli Bota Ait Voice Addonunu Vereyim.

on *:start: {
hmake yetki 1000
hload yetki yetki.hash
set %channel #kanal
}
on *:text:*:#opodası:{
if ($1 == .sil) && (!$2) { .msg $chan (*I*N*F*O) Lütfen 4Nick Belirtiniz. | return }
if ($1 == .sil) {
var $2 $nick
if !$2 == $hmatch(yetki,$2) { .msg $chan (*E*R*R*O*R*) 12 $2 Nicki Voice Kayıtlarda Bulunamadı. | return }
if $2 == $hmatch(yetki,$2) hdel -sm yetki $2 | hsave yetki yetki.hash | msg $chan (*D*O*N*E*) 4 $2 Nicki Voice Listesinden Silindi. | /mode #felsefe -v $2 }
if ($1 == .ekle) && (!$2) { .msg $chan (*I*N*F*O*) Lütfen 4Nick Belirtiniz. | return }
if ($1 == .ekle) {
var $2 $nick
if $2 == $hmatch(yetki,$2) { .msg $chan (*ALREADY*) 12 $2 Nicki Zaten Ekli durumda | return } }
if ($1 == .ekle) {
.ns status $2
.set %ekleyen $nick
} }
on *:notice:*:*: {
if (Status isin $1-) && ($3 == 3) && ($day == Monday) { hadd -sm yetki $2 12 %ekleyen Tarafından 4 $date Pazartesi Günü 4 $time Saatinde | hsave yetki yetki.hash | msg $chan (*D*O*N*E*) 12 $2 Nicki Voice Listesine Eklendi. | /mode #felsefe +v $2 }
if (Status isin $1-) && ($3 == 3) && ($day == Tuesday) { hadd -sm yetki $2 12 %ekleyen Tarafından 4 $date Salı Günü 4 $time Saatinde | hsave yetki yetki.hash | msg $chan (*D*O*N*E*) 12 $2 Nicki Voice Listesine Eklendi. | /mode #felsefe +v $2 }
if (Status isin $1-) && ($3 == 3) && ($day == Wednesday) { hadd -sm yetki $2 12 %ekleyen Tarafından 4 $date Çarşamba Günü 4 $time Saatinde | hsave yetki yetki.hash | msg $chan (*D*O*N*E*) 12 $2 Nicki Voice Listesine Eklendi. | /mode #felsefe +v $2 }
if (Status isin $1-) && ($3 == 3) && ($day == Thursday) { hadd -sm yetki $2 12 %ekleyen Tarafından 4 $date Perşembe Günü 4 $time Saatinde | hsave yetki yetki.hash | msg $chan (*D*O*N*E*) 12 $2 Nicki Voice Listesine Eklendi. | /mode #felsefe +v $2 }
if (Status isin $1-) && ($3 == 3) && ($day == Friday) { hadd -sm yetki $2 12 %ekleyen Tarafından 4 $date Cuma Günü 4 $time Saatinde | hsave yetki yetki.hash | msg $chan (*D*O*N*E*) 12 $2 Nicki Voice Listesine Eklendi. | /mode #felsefe +v $2 }
if (Status isin $1-) && ($3 == 3) && ($day == Saturday) { hadd -sm yetki $2 12 %ekleyen Tarafından 4 $date Cumartesi Günü 4 $time Saatinde | hsave yetki yetki.hash | msg $chan (*D*O*N*E*) 12 $2 Nicki Voice Listesine Eklendi. | /mode #felsefe +v $2 }
if (Status isin $1-) && ($3 == 3) && ($day == Sunday) { hadd -sm yetki $2 12 %ekleyen Tarafından 4 $date Pazar Günü 4 $time Saatinde | hsave yetki yetki.hash | msg $chan (*D*O*N*E*) 12 $2 Nicki Voice Listesine Eklendi. | /mode #felsefe +v $2 }
if ($nick == NickServ) && (Status isin $1-) && ($3 == 0) { .msg $chan (*E*R*R*O*R*) 12 $2 Nicki Online Değil veya Şifresiz Olduğu için Voice Listesine Eklenemedi } }
if ($1 == .liste) {
var %i 1
while %i <= $hget(yetki,0).item {
msg $chan $hget(yetki,%i).item
inc %i
}
}
on *:join:#felsefe: {
if $me !isop $chan { halt | return }
var %nick $nick
if %nick == $hmatch(ceza,%nick) { halt }
var %nick $nick
if %nick == $hmatch(yetki,%nick) {
mode #felsefe +v %nick
}
}

Not: Biraz fazla görünmüştür Gözünüze Doğaldır. Çünkü Diğer Addonlarıma da Köprü Kurulu bu addondan.
.ekle nick yaptığınızda sadece nicki eklemiyor.
Nicki ekleyen op hangi gün saat kaçta eklemiş bunu da gösteriyor
".bak Nick" komutuyla da bu tarih saat ve ekleyen görülebiliyor, belki onu verebilirim bir süre sonra )
Ama şu an daha çok var.
Ayrıca. ".liste" komutunu kullanırsanız ve Hash tablosunda 100 Küsür kayıt varsa Bot ister istemez nickleri yazarken laga girer bilginiz olsun.
Benim botum laga Girmiyor. merlyn'in _linedance Modülünü kullanıyorum, Oper olmasa da lag problemi yok, verileri sıraya koyuyor, gönderdikçe yazıyor. :)
İyi forumlar

DenperaS 07 Ekim 2010 21:37

Cevap: Mynetteki Preator botun özelliği
 
arkadaşlar hazır burada böyle bir kelime geçmişken şunu soracağım bi kanalda opum ve o kanala girenlerin nickleri bir haftalık şifreli ise o kişilere oto olarak voice vermek istiyorum ve sonrasında diyelimki kanalda 50 kişi var ve bu 50 kişiden 40 ı voiceli ve benim verdiğim voice sayısıda 20 voice al dediğimde sadece benim voice verdiğim kişilerin voicelerini alabilirmiyim diğer opların verdiği voiceler kalsın yardım edebilirmisin.


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

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk