Add-on ve snippet(parça) kod istekleri buraya - Sayfa 55 - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Rakun · 31 Aralık 2016, 18:37

Merhaba İF ailesi ;

Öncelikle, cümleten yeni yılınız kutlu olsun. Yeni yıl hepimize sağlık,mutluluk,huzur,bereket,sevgi ve saygı getirsin.

Bir kod'a ihtiyacım var. Eğer yardımcı olursanız çok mutlu olurum.

Şimdi #takip kanalında bir bot kullanıyorum, bu kod kanallar da uygulanan nick ban sus gibi uyarıları #takip kanalına yansıtıyor.

Bot'un içerisine bir kod eklemek istiyorum ;

Misal ; Aaa op'u takip kanalına bir access ekleyeceği zaman , !yetkiekle nick 3 şeklinde yaptığı zaman bot belirtilen nick'e access eklesin istiyorum. Bunu nasıl yapabilirim ?

Örnek ;

!yetkiekle Nick 3
Takip Bot : Xxx nickine 3.seviyeden access eklenmiştir.

işlem tamamen bu şekilde olacak..

Teşekkürler, iyi forumlar. Yeni yılınız kutlu olsun tekrardan..

aLone · 01 Ocak 2017, 02:13

Rakun Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Merhaba İF ailesi ;

Öncelikle, cümleten yeni yılınız kutlu olsun. Yeni yıl hepimize sağlık,mutluluk,huzur,bereket,sevgi ve saygı getirsin.

Bir kod'a ihtiyacım var. Eğer yardımcı olursanız çok mutlu olurum.

Şimdi #takip kanalında bir bot kullanıyorum, bu kod kanallar da uygulanan nick ban sus gibi uyarıları #takip kanalına yansıtıyor.

Bot'un içerisine bir kod eklemek istiyorum ;

Misal ; Aaa op'u takip kanalına bir access ekleyeceği zaman , !yetkiekle nick 3 şeklinde yaptığı zaman bot belirtilen nick'e access eklesin istiyorum. Bunu nasıl yapabilirim ?

Örnek ;

!yetkiekle Nick 3
Takip Bot : Xxx nickine 3.seviyeden access eklenmiştir.

işlem tamamen bu şekilde olacak..

Teşekkürler, iyi forumlar. Yeni yılınız kutlu olsun tekrardan..

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] istediğiniz tarzda Kode, defalarca paylaşılmış arama yaparsanız mutlaka bulursunuz.
Mevcut kodeleri incelerseniz, Çok rahat bir şekilde sizde kendinize göre bir kod yazabilirsiniz,
En azından yapmayı deneyin: takıldığınız yerlerde sorarsanız emin olun fazlasıyla yardım alırsınız,
Ayrıca bir satır dahi kendi çabanızla birşeyler yaparsanız, emin olun büyük keyf alırsınız

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:text:*:#kanal: {
  if $regex($1,/^[!.](YetkiEkle|YetkiSil|YetkiList)/i) {
    if ($regml(1) == YetkiEkle) {
      if (!$2 ) || (!$3) { msg $chan UYARI: $qt($nick) Hatalı Kullanım: [.!] !YetkiEkle Nick Seviye | return }
      set -u5 %:_k $chan | .enable #acs | cs access $chan add $2 $3
    }
    if ($regml(1) == YetkiSil) {
      if (!$2 ) { msg $chan UYARI: $qt($nick) Hatalı Kullanım: [.!] !YetkiSil Nick | return }
      set -u5 %:_k $chan | .enable #acs | cs access $chan del $2
    }
    if ($regml(1) == YetkiList) {
      set -u5 %:_k $chan | .enable #acs | cs access $chan list
    }
  }
}
#acs off
on 1:notice:*:?: {
  if $regex($nick,/chanserv/i) {
    msg %:_k $1- | .timerac 1 5 .disable #acs
  } 
}
#acs end

çok farklı yollardan farklı sorgu ve koşullarla yazılabılır, basit bir örnek sadece.

Rakun · 01 Ocak 2017, 18:41

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] hocam ; Çok teşekkür ederim tam istediğim gibi oldu. Ellerine,emeğine sağlık.

Haklısınız elbette, bende yapılmış örnekleri ya da paylaşılmış kodları inceleyerek,ekleyerek ya da deneyerek en iyi şekilde öğrenmeye çalışıyorum. Bilgim ve yapabileceğim dahilinde.

Peki yukarda paylaşmış olduğunuz kod'da, bu komutları sadece istediğim nickler kullansın istiyorum. Nasıl yapabilirim ?

Örneğin ; aaa ve bbb nickleri takip kanalında !yetkiekle 'yetkisil !yetkilist komutlarını kullanabilsin.

Teşekkür ederim tekrar,iyi forumlar.

aLone · 01 Ocak 2017, 19:51

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:text:*:#kanal: {
  if $regex($1,/^[!.](YetkiEkle$|YetkiSil$|YetkiList$)/Si) {
    if !$read(admin.txt,w,$nick) { msg $chan $qt($nick) Bu Komutu Kullanmaya Yetkili Degilsiniz. | return }
    if ($regml(1) == YetkiEkle) {
      if (!$2 ) || (!$3) { msg $chan UYARI: $qt($nick) Hatalı Kullanım: [.!] !YetkiEkle Nick Seviye | return }
      set -u5 %:_k $chan | .enable #acs | cs access $chan add $2 $3
    }
    if ($regml(1) == YetkiSil) {
      if (!$2 ) { msg $chan UYARI: $qt($nick) Hatalı Kullanım: [.!] !YetkiSil Nick | return }
      set -u5 %:_k $chan | .enable #acs | cs access $chan del $2
    }
    if ($regml(1) == YetkiList) {
      set -u5 %:_k $chan | .enable #acs | cs access $chan list
    }
  }
}
#acs off
on 1:notice:*:?: {
  if $regex($nick,/chanserv/i) {
    msg %:_k $1- | .timerac 1 5 .disable #acs
  } 
}
#acs end

admin.txt dosyasına kullanmasını istediğin nickleri ekleyebilirsin

Yada

Kod: Kodu kopyalamak için üzerine çift tıklayın!

if !$istok(nick1 nick2 nick3,$nick,32) { msg $chan $qt($nick) Bu Komutu Kullanmaya Yetkili Degilsiniz. | return }

$istok la kullanmasını istediğin yada istemediklerini belirleyebilirsin

Rakun · 22 Ocak 2017, 23:02

Hayırlı geceler İF ;

Öncelikle ; Selam olsun tüm üstadlara ve kullanıcılara,.

Bir kod'a ihtiyacım var ;

Amaç :

Operatörlere takip etmeleri için ekli oldukları kanalları random olarak atamak istiyorum.

Misal :

op ve sopların toplandığı kanal #A kanalı olsun, Görev aldıkları kanallar : #B #C #D vs vs olsun,

Random olarak her bir görevliye yetkili oldukları kanallar da atama yapmak istiyorum.

İlginiz ve yardımınız için teşekkür ederim.

aLone · 23 Ocak 2017, 21:14

Rakun Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Hayırlı geceler İF ;

Öncelikle ; Selam olsun tüm üstadlara ve kullanıcılara,.

Bir kod'a ihtiyacım var ;

Amaç :

Operatörlere takip etmeleri için ekli oldukları kanalları random olarak atamak istiyorum.

Misal :

op ve sopların toplandığı kanal #A kanalı olsun, Görev aldıkları kanallar : #B #C #D vs vs olsun,

Random olarak her bir görevliye yetkili oldukları kanallar da atama yapmak istiyorum.

İlginiz ve yardımınız için teşekkür ederim.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on !*:Join:#opkanalı: {
  if !$istok(muafnick1 muafnick2,$nick,32) { 
    if $hget(giris,$nick) { return }
    else {
      knl $nick
      .hinc -msu3000 giris $nick
    }
  }
}
alias knl {
  var %// = $nick,%:/ = #kanal1 #kanal2 #kanal3 - $& 
    #kanal7 #kanal8 #kanal9 - #kanal10 #kanal11 #kanal12 - $&
    #kanalA #kanalB #kanalC - #kanalD #kanalE #kanalF - $&
    #kanalA1 #kanalB1 #kanalC1 - #kanalD1 #kanalE1 #kanalF1 
  $iif(!%:.,Set %:. 1,inc %:.) | msg #opkanalı BILGI $qt($nick) Takip Edeceginiz kanallar Sunlardır! $&
    $qt($gettok(%:/,%:.,45))  | if %:. == $numtok(%:/,45) { unset %:. }
}

bir kodeyı dediğin sekıl duzenledım ama ne kadar işe yarar bilmiyorum.
istediğin kod hakkında biraz daha bilgi verirsen baska birseyler yapılabılır.

Alper · 23 Ocak 2017, 21:25

Merhaba,

Aşağıdaki koda muaf nasıl ekleyebilirim ? Normal nick olsa hallederdim gibime geliyor ama ident ile fullname olunca orda kalıyorum.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:snotice:*: {  
  if $regex($1-,Client connecting on port) && ($regex($10,/[bcdfghjklmnprstvyz]{3}/i) || $regex($11,/[bcdfghjklmnprstvyz]{3}/i)) { kline $9 +0 7Random 4Ident/Fullname 9Koruması %ver1 } 
}

Teşekkürler.

Rakun · 23 Ocak 2017, 21:53

aLone Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on !*:Join:#opkanalı: {
  if !$istok(muafnick1 muafnick2,$nick,32) { 
    if $hget(giris,$nick) { return }
    else {
      knl $nick
      .hinc -msu3000 giris $nick
    }
  }
}
alias knl {
  var %// = $nick,%:/ = #kanal1 #kanal2 #kanal3 - $& 
    #kanal7 #kanal8 #kanal9 - #kanal10 #kanal11 #kanal12 - $&
    #kanalA #kanalB #kanalC - #kanalD #kanalE #kanalF - $&
    #kanalA1 #kanalB1 #kanalC1 - #kanalD1 #kanalE1 #kanalF1 
  $iif(!%:.,Set %:. 1,inc %:.) | msg #opkanalı BILGI $qt($nick) Takip Edeceginiz kanallar Sunlardır! $&
    $qt($gettok(%:/,%:.,45))  | if %:. == $numtok(%:/,45) { unset %:. }
}

bir kodeyı dediğin sekıl duzenledım ama ne kadar işe yarar bilmiyorum.
istediğin kod hakkında biraz daha bilgi verirsen baska birseyler yapılabılır.

İlgin ve yardımın için teşekkür ederim @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ;

Şimdi şöyle izah edeyim detay olarak.

Diyelim ki ;

#A kanalı op ve sopların bulunduğu kanal olsun, #A kanalında !kanalata ya da /kanalata komut isteğini kullandığım da, op ve sopların yetkili ( access ) lerinin ekli olduğu #B #C #D #E kanallarını random ( karma ) olarak op sop yetkisine sahip nicklere 1'er ya da 2'şer kanal atasın.

Atanan bu kanallara o nickler baksın ve takip etsin,komut kullansın vs tam olarak isteğim bu şekilde.

Aynı zamanda bu kanal atama komutunu sadece soplar da kullanabilsin, oplara kanal dağılımı yapmak için.

Tapatalk kullanarak iPhone aracılığıyla gönderildi

Dahaka · 25 Ocak 2017, 20:51

Forumda arattım ama istedigim kodu bulamadım istedigim remote her 15 dakikada bir tek tek ban acsın ban derken +b modundan bahsediyorum
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
teşekkürler şimdiden

aLone · 27 Ocak 2017, 01:41

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Dosyadan kanal ismi sectirebilirsin.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:text:*:#Opkanalı: {
  if ($regex($nick(#,$nick).pnick,[&.~])) {
    if $regex($1,/^[!.]atama$/Si) {
      if ($2) { msg $chan $qt($2) $str($chr(160),2) Sizin kanalınız $str($chr(160),2) $chr(91) $read(dosya.txt) $chr(91)  | return }
      atama 
    }
  }
}
alias atama {
  var %:a 1
  while %:a <= $nick(#Opkanalı,0) {
    if ($me == $nick(#Opkanalı,%:a)) { inc %:a }
    msg $chan $qt($nick(#Opkanalı,%:a)) $str($chr(160),2) Sizin kanalınız $str($chr(160),4) $chr(91) $read(dosya.txt) $chr(93)
    inc %:a
  }
}

Kanal sop & ve founderi ~.
!Atama Nick - sectiğin nicke dosya içindeki kanallardan 1 ini belirtir
!Atama - Kanalda bulunan herkeze 1 er kanal belirler yine dosyadan
dosya.txt içine alt alta #kanala #kanalb gibi yazarsın.

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 00:41 -->-> Daha önceki mesaj 00:28 --

pckopat Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Merhaba,

Aşağıdaki koda muaf nasıl ekleyebilirim ? Normal nick olsa hallederdim gibime geliyor ama ident ile fullname olunca orda kalıyorum.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:snotice:*: {  
  if $regex($1-,Client connecting on port) && ($regex($10,/[bcdfghjklmnprstvyz]{3}/i) || $regex($11,/[bcdfghjklmnprstvyz]{3}/i)) { kline $9 +0 7Random 4Ident/Fullname 9Koruması %ver1 } 
}

Teşekkürler.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on *:snotice:*: { 
  if ($level($9) == muafnick) { halt }
  if $regex($1-,Client connecting on port) && ($regex($10,/[bcdfghjklmnprstvyz]{3}/i) || $regex($11,/[bcdfghjklmnprstvyz]{3}/i)) { kline $9 +0 7Random 4Ident/Fullname 9Koruması %ver1 } 
}

users listesine muafnick:Ayse gibi ekleyebilirsin bu eklediğin nick in ident ve fullname random olsada etkilenmez.
-
ayrıca Snotice mesajlarında ident $10 - Fullname $11 e denk geliyorsa aynı sekilde
($level($10) == muafident) gibi yaparak muaf alabılırsın. genelde fullname who uygulamadan görunmez ama
yapamazsan snotice mesajını kopyala buraya yardımcı oluruz.

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.