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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Atama (https://www.ircforumlari.net/mirc-scripting-sorunlari/509665-atama.html)

Aynı kod bende çalışıp sende çalışmıyorsa, sorun kodda değil sende olsa gerek diye düşünüyorum, farklı bir mircte deneyebilir yada kodu alırken hata yapıp yapmadığını kontrol edebilirsin ;)

<deneme> YedekNick rumuzu [ #deneme ] kanalında yardım bekliyor. Atanan görevli: deneme
<deneme> YedekNick rumuzu [ #deneme ] kanalında yardım bekliyor. Atanan görevli: robo-c-op

Alıntı:

Med Cezir Nickli Üyeden Alıntı (Mesaj 1041236907)

Eyvallah kardeşim hallettim. Buna ek olarak bir şey daha isteyeceğim Şu anda yardımcı olamıyoruz diye mesaj gönderilen user'a şayet kanaldan çıkmaz ise kanaldan kicklenmesini sağlayabilir miyiz?

İlgilenecek yetkili olmadığında 10 sn. içinde kanaldan part etmezse kicklenir, süreyi kırmızı ile belirttim istersen değişebilirsin. Kanaldan part veya süre dolmadan kicklenirse timer kendini durduracaktır.

Kod:

on !*:join:#kanal: { .timer 1 1 kontrolet $nick $chan } 
 

alias -l kontrolet {

  if $1 isreg $2 { var %\/ = 1 | while ($nick(#kanal,%\/,@)) { if !$istok(Muaf1 Muaf2 Muaf3 Muaf4 ,$v1,32) { set %:ops $addtok($nick(#kanal,%\/,@),%:ops,32) } | inc %\/ }

    if $gettok(%:ops,0,32) > 0 { msg #kanal $1 rumuzu [ $2 ] kanalında yardım bekliyor. Atanan görevli: $gettok(%:ops,$rand(1,$token(%:ops,0,32)),32) }

    else { msg #kanal  $1  Şuanda Sizinle İlgilenilemeyecek! Daha Sonra Geliniz. | $+(.,timer,$1,$2) 1 10 kick $2 $1 Kanalda Beklemek Yasaktır! }

    unset %:ops

  }

}

on *:part:#kanal:if $timer($+($nick,$chan)) { $+(.,timer,$nick,$chan) off }

on *:kick:#kanal:if $timer($+($knick,$chan)) { $+(.,timer,$knick,$chan) off }

Alıntı:

Med Cezir Nickli Üyeden Alıntı (Mesaj 1041237059)

Kod:

on !*:join:#kanal: { .timer 1 1 kontrolet $nick $chan } 
 

alias -l kontrolet {

  if $1 isreg $2 { var %\/ = 1 | while ($nick(#kanal,%\/,@)) { if !$istok(Muaf1 Muaf2 Muaf3 Muaf4 ,$v1,32) { set %:ops $addtok($nick(#kanal,%\/,@),%:ops,32) } | inc %\/ }

    if $gettok(%:ops,0,32) > 0 { msg #kanal $1 rumuzu [ $2 ] kanalında yardım bekliyor. Atanan görevli: $gettok(%:ops,$rand(1,$token(%:ops,0,32)),32) }

    else { msg #kanal  $1  Şuanda Sizinle İlgilenilemeyecek! Daha Sonra Geliniz. | $+(.,timer,$1,$2) 1 10 kick $2 $1 Kanalda Beklemek Yasaktır! }

    unset %:ops

  }

}

on *:part:#kanal:if $timer($+($nick,$chan)) { $+(.,timer,$nick,$chan) off }

on *:kick:#kanal:if $timer($+($knick,$chan)) { $+(.,timer,$knick,$chan) off }

Merhaba,

Bu kodla yapılan atamaların dağılımını nasıl sağlarız. Örnk ; Kanala giren X rumuzlu bir kullanıcıya Y rumuzlu op'u atıyorsa. Daha sonra veya aynı anda kanala giren başka bir usera Z opunu atasın istiyorum.

Daha önce benzer atama konularında yardımcı olmuştuk, onlardan yola çıkarak birşeyler yapabilirsin bence.

Aynı kodları tekrar yazmak yerine daha farklı ve basit bir şekilde alternatif olarak son atanan nicki muaf tutmak yolu ilede bu şekilde birşey yapılabilir.

Kod:

on !*:join:#kanal: { .timer 1 1 kontrolet $nick $chan } 
 

alias -l kontrolet {

  if $1 isreg $2 { var %\/ = 1 | while ($nick(#kanal,%\/,@)) { if !$istok(Muaf1 Muaf2 Muaf3 Muaf4 ,$v1,32) && %ata:nick != $v1 { set %:ops $addtok($nick(#kanal,%\/,@),%:ops,32) } | inc %\/ }

    if $gettok(%:ops,0,32) > 0 { set %ata:nick $gettok(%:ops,$rand(1,$token(%:ops,0,32)),32) | msg #kanal $1 rumuzu [ $2 ] kanalında yardım bekliyor. Atanan görevli: %ata:nick }

    else { msg #kanal  $1  Şuanda Sizinle İlgilenilemeyecek! Daha Sonra Geliniz. | $+(.,timer,$1,$2) 1 10 kick $2 $1 Kanalda Beklemek Yasaktır! }

    unset %:ops

  }

}

on *:part:#kanal:if $timer($+($nick,$chan)) { $+(.,timer,$nick,$chan) off }

on *:kick:#kanal:if $timer($+($knick,$chan)) { $+(.,timer,$knick,$chan) off }

Alıntı:

Med Cezir Nickli Üyeden Alıntı (Mesaj 1041235945)

Bence sorun sadece kanalda hiç op olmaması değil, muaf kısmındaki oplardan başka kanalda op kalmaması durumunda sınırsız döngü oluşmasındanda kaynaklanıyor.

Bunun için kodunu değiştirdim kendimce yazdım, Kanalda atanacak op yoksa "Şuanda Sizinle İlgilenilemeyecek! Daha Sonra Geliniz." şeklinde cevap verir, Kırmızı yerleri kendine göre ayarlayıp kullanabilirsin;

Kod:

on !*:join:#kanal: { .timer 1 1 kontrolet $nick $chan } 
 

alias -l kontrolet {

  if $1 !isop $2 { var %\/ = 1 | while ($nick($2,%\/,@)) { if !$istok(Muaf1 Muaf2 Muaf3 Muaf4 ,$v1,32) { var %:ops $addtok($nick($2,%\/,@),%:ops,32) } | inc %\/ }

    $iif($gettok(%:ops,0,32) > 0 ,msg $2 $1 rumuzu [ $2 ] kanalında yardım bekliyor. Atanan görevli: $gettok(%:ops,$rand(1,$token(%:ops,0,32)),32),msg $2  $1  Şuanda Sizinle İlgilenilemeyecek! Daha Sonra Geliniz.) 

  }

}

güzel bi çalışma ellerinize sağlık hocam. benim sizin gibi tüm üstadlardan farklı bi kodda düzenleme yapmanız için ricada bulunsan;

on *:join:#deneme: { updatenl | /timer 1 1 /kontrolet $nick $chan | /set %host $address($nick,1) }
alias kontrolet {
if ($1 != $me) && ($1 !isop $2) && ($1 !ishop $2) && (Admin !isin %Host) && (Oper !isin %Host) && ($1 !ison #aday) {
if $1 !isop $2 { var %\/ = 1 | while ($nick($2,%\/,@)) { if !$istok(Muaf1 Muaf2 Muaf3 Muaf4 ,$v1,32) { var %:ops $addtok($nick($2,%\/,@),%:ops,32) } | inc %\/ }
$iif($gettok(%:ops,0,32) > 0 ,msg #aday $1 rumuzu [ $2 ] kanalında yardım bekliyor. Atanan görevli: $gettok(%:ops,$rand(1,$token(%:ops,0,32)),32),msg $2 $1 Şuanda Sizinle İlgilenilemeyecek! Daha Sonra Geliniz.)
}
}

op olmaması durumunda sizinle ilgilenilmiyecek bölümünde botun kendisi op durumunda ise kendini atıyor kendini muaf tutsa hem atamada hemde ilgilenmiyecek demesinde orda bi sıkıntı oluştu sanki neden olabilir acaba ve birde

hocam kırmızı ile belirtilen bölümü sizden aldım diğerinide bendeki ile bütünleştirdim buna eklemek istediğim 2 özellik var birincisi #helpteam kanalında !muafhelp nick komutu ile o nick girişinde atama yapmasını engellemek ikincisi ise helpteam kanalında atama yaptıgında @ durumunda olanların nicklerini seslensin istiyorum.

yardımınız için şimdiden teşekkür ederim

Alıntı:

Med Cezir Nickli Üyeden Alıntı (Mesaj 1041294505)

Kod:

on !*:join:#kanal: { .timer 1 1 kontrolet $nick $chan } 
 

alias -l kontrolet {

  if $1 isreg $2 { var %\/ = 1 | while ($nick(#kanal,%\/,@)) { if !$istok(Muaf1 Muaf2 Muaf3 Muaf4 ,$v1,32) && %ata:nick != $v1 { set %:ops $addtok($nick(#kanal,%\/,@),%:ops,32) } | inc %\/ }

    if $gettok(%:ops,0,32) > 0 { set %ata:nick $gettok(%:ops,$rand(1,$token(%:ops,0,32)),32) | msg #kanal $1 rumuzu [ $2 ] kanalında yardım bekliyor. Atanan görevli: %ata:nick }

    else { msg #kanal  $1  Şuanda Sizinle İlgilenilemeyecek! Daha Sonra Geliniz. | $+(.,timer,$1,$2) 1 10 kick $2 $1 Kanalda Beklemek Yasaktır! }

    unset %:ops

  }

}

on *:part:#kanal:if $timer($+($nick,$chan)) { $+(.,timer,$nick,$chan) off }

on *:kick:#kanal:if $timer($+($knick,$chan)) { $+(.,timer,$knick,$chan) off }

Selam arkadaşlar Sistemi sorunsuz kullanıyorum hiç bir problemim yok ama yanlız ben burda atanan nicki Sadece op deilde #help kanalında bulunan founder sop op helfop yetkilileri taplamak istiyorum ben bu kodu biraz kendimce geliştirmeye calıstım fakat bir eklenti istiyorum

[UguR] 03:21 <HelpDepartman> HeLp KanaLı Saat : 03:21:23 Tarih : [ 13/03/2014 ] İtibariyLe Toplamda 38 Kişi Tarafından Ziyaret Edildi.
[UguR] 03:21 <HelpDepartman> ......
[UguR] 03:21 <HelpDepartman> #Help KanaLinda UguR Nickli kullaniciya OxiR Yardim vermektedir. Baska bir HeLper müdahale etmesin.
[UguR] 03:21 <HelpDepartman> ......
[UguR] 03:21 <HelpDepartman> UguR Rumuzu #help Kanalın'da Yardım Bekliyor. Atanan Görevli: OxiR
[UguR] 03:21 <HelpDepartman> Atanan HeLper Meşkul ise Helper Görevlileri IRCd/Services (NickServ/ChanServ/MemoServ) Hakkında Yardımcı Olabilir

bu sekilde kullanıyorum ama bunu

[UguR] 03:21 <HelpDepartman> UguR Rumuzu #help Kanalın'da Yardım Bekliyor. Atanan Görevli: OxiR
[UguR] 03:21 <HelpDepartman> Atanan HeLper Meşkul ise Helper Görevlileri IRCd/Services (NickServ/ChanServ/MemoServ) Hakkında Yardımcı Olabilir

bu kısmını bu şekilde olmasını istiyorum

[UguR] 03:21 <HelpDepartman> UguR Rumuzu #help Kanalın'da Yardım Bekliyor. Atanan Görevli: Nick1 Atanan HeLper Meşkul ise Nick2 Helper Görevlisi Yardımcı Olabilir.
[UguR] 03:21 <HelpDepartman>
[UguR] 03:21 <HelpDepartman> UguR Nick'ine Voice Vererek Yardım Veren Helperimiz Oxir

İstedigim kod bu sekilde calışmalı :

[UguR] 06:07 <HelpDepartman> HeLp KanaLı Saat : 06:07:56 Tarih : [ 13/03/2014 ] İtibariyLe Toplamda 40 Kişi Tarafından Ziyaret Edildi.
[UguR] 06:07 <HelpDepartman> ......
[UguR] 06:07 <HelpDepartman> #Help KanaLinda UguR Nickli kullaniciya OxiR Yardim vermektedir. Baska bir HeLper müdahale etmesin.
[UguR] 06:07 <HelpDepartman> ......
[UguR] 06:07 <HelpDepartman> UguR Rumuzu #help Kanalın'da Yardım Bekliyor. Atanan Görevli: OxiR
[UguR] 06:08 <HelpDepartman> ......
[UguR] 06:08 <HelpDepartman> Atanan Görevli: OxiR Atanan HeLper Meşkul ise @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Helper Görevlisi Yardımcı Olabilir.
[UguR] 06:08 <HelpDepartman> ......
[UguR] 06:08 <HelpDepartman> UguR Nick'ine Voice Vererek Yardım Veren Helperimiz Oxir

bu sekilde yapmanız mümkünmüdür

-Op,Sop,Halfop(@,&%) lara göre atama yapar.
-Atanan görevliye birde yedek atar.

Örnek Çalışma Şekli
<MedCezir> test rumuzu #zindan kanalında yardım bekliyor. Atanan görevli: Soccer
<MedCezir> Atanan Görevli: Soccer Atanan HeLper Meşkul ise X Helper Görevlisi Yardımcı Olabilir.

Kod:

on !*:join:#kanal: { .timer 1 1 kontrolet $nick $chan } 
 

alias -l kontrolet {

  if $1 isreg $2 { var %\/ = 1 | while ($nick(#kanal,%\/,&@%)) { if !$istok(Muaf1 Muaf2 Muaf3 Muaf4 ,$v1,32) && %ata:nick != $v1 { set %:ops $addtok($nick(#kanal,%\/,&@%),%:ops,32) } | inc %\/ }

    if $gettok(%:ops,0,32) > 0 { set %ata:nick $gettok(%:ops,$rand(1,$token(%:ops,0,32)),32) | set %:ops $remtok(%:ops,%ata:nick,1,32)

    msg #kanal $1 rumuzu [ $2 ] kanalında yardım bekliyor. Atanan görevli: %ata:nick | msg #kanal Atanan Görevli: %ata:nick Atanan HeLper Meşkul ise $gettok(%:ops,$rand(1,$token(%:ops,0,32)),32) Helper Görevlisi Yardımcı Olabilir. }

    else { msg #kanal  $1  Şuanda Sizinle İlgilenilemeyecek! Daha Sonra Geliniz. | $+(.,timer,$1,$2) 1 10 kick $2 $1 Kanalda Beklemek Yasaktır! }

    unset %:ops

  }

}

on *:part:#kanal:if $timer($+($nick,$chan)) { $+(.,timer,$nick,$chan) off }

on *:kick:#kanal:if $timer($+($knick,$chan)) { $+(.,timer,$knick,$chan) off }

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] sorunsuz calısıyor ben birde voice veren nicki bu şekilde yansıtsın istiyorum

Olmasını istedigim :

[UguR] 06:08 <HelpDepartman> UguR Nick'ine Voice Vererek Yardım Veren Helperimiz Oxir Baska bir HeLper müdahale etmesin.

Arkadaşlar çokmu şey istiyoruz anlamıyorumki forumda yüzlerce benzeri olan bir konuyu aramanız çokmu zor. Yapamayacağınız birşey olsa zaten yapıp veriyoruz, onun dışındaki konuları araştırın öğrenin diye size bırakıyoruz.

Bknz. [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Yine yapamazsan forumdaki mevcut dersi inceleyebilirsin.

Bknz. [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Eğer öğrenmeni, çabalamanı istemesem istediğini vermek bu cevabı vermekten daha kolay olurdu, o yüzden bir dahaki sefere araştırmanı tavsiye ediyorum.