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/)
-   -   Çözüldü !seslen alias sorunu (https://www.ircforumlari.net/mirc-scripting-sorunlari/691269-seslen-alias-sorunu.html)

Emrax 08 Nisan 2015 04:34
!seslen alias sorunu
 
Merhaba arkadaşlar kolay gelsin.

Elimde bulunan seslenme aliası ile tüm kanaldaki nicklere seslenebiliyorum. Ancak ben bunu benim üzerimden kanaldaki op ve üstünün yapmasını istiyorum.

!seslen Burda mısınız?

yazıldığında, önce kanaldaki herkese seslenip, sonra "Burda mısınız?" yazacak bir kod oluşturmaya kalkıştım ama bir türlü başaramadım. Sanırım uzun zaman geçmiş. Şöyle birşeyler denedim ama olmadı.

Şimdiden teşekkür ederim yardımlarınız için.

Kod:
alias seslen { Var %x = $nick(#,0) | Var %y | While %x { If $nick(#,%x) != $me { %y = $addtok(%y,$nick(#,%x),32) } | Dec %x } | Say %y $1- }
on *:text:!*:#cart:{
  if $nick isop #cart {
if ($1 == !seslen) { /seslen | timer 1 2 msg #cart 4,1WARNING:0,1 $2- }
}
}

KuL 08 Nisan 2015 22:13
Cevap: !seslen alias sorunu
 
Alıntı:
Emrax Nickli Üyeden Alıntı (Mesaj 1041642603)
Merhaba arkadaşlar kolay gelsin.

Elimde bulunan seslenme aliası ile tüm kanaldaki nicklere seslenebiliyorum. Ancak ben bunu benim üzerimden kanaldaki op ve üstünün yapmasını istiyorum.

!seslen Burda mısınız?

yazıldığında, önce kanaldaki herkese seslenip, sonra "Burda mısınız?" yazacak bir kod oluşturmaya kalkıştım ama bir türlü başaramadım. Sanırım uzun zaman geçmiş. Şöyle birşeyler denedim ama olmadı.

Şimdiden teşekkür ederim yardımlarınız için.

Kod:
alias seslen { Var %x = $nick(#,0) | Var %y | While %x { If $nick(#,%x) != $me { %y = $addtok(%y,$nick(#,%x),32) } | Dec %x } | Say %y $1- }
on *:text:!*:#cart:{
  if $nick isop #cart {
if ($1 == !seslen) { /seslen | timer 1 2 msg #cart 4,1WARNING:0,1 $2- }
}
}
Bilmiyorum dogrumu anladim, ama sen sanirim seslensin istiyorsun.

Yani Kanaldaki herkesin Nickini yazsin sonunada, yazdigin seyi yani $2- yi?

Eger öyleyse, buyur Kardes:

Kod:
on *:text:*:#Kanal:{
  if $nick isop # {
    if ($1 == !seslen) { var %x = $nick(#,0) | while %x { if $nick(#,%x) != $me { var %y = $addtok(%y,$nick(#,%x),32) } | dec %x } | msg # %y $2- }
  }
}
text eventi kullanirken zaten altda if $1 == komut yazmissin o yüzden text eventinde !* yazman gerekmez, tek * yeterli.

ve Kosul olarak $nick isop #kanal ada pek gerek yok, en üst satirdaki kanali alir zaten eger # yazarsan :)

Cikan Sonuc:

Kod:
[21:08:57] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]> !seslen Burda misiniz len bir bakin?
[21:08:57] <@Y-Bot> deneme23 deneme14 deneme52 Ku|L| Burda misiniz len bir bakin?

Toprak 08 Nisan 2015 22:41
Cevap: !seslen alias sorunu
 
Buda benden olsun :)

Kod:
on *:text:*:#:{
  if $regex($1,/^[!\.]seslen$/Si) && $regex($nick(#,$nick).pnick,/(%|@|&|~|\.)/) && $2 {
    msg # $regsubex($str(-,$nick(#,0)),/./g, $iif($nick(#,\n) != $me, $nick(#,\n)) $chr(32)) $2-
  }
}
Buda kanaldaki seslenen nick'lere random renk atar.

Kod:
on *:text:*:#:{
  if $regex($1,/^[!\.]seslen$/Si) && $regex($nick(#,$nick).pnick,/(%|@|&|~|\.)/) && $2 {
    msg # $regsubex($str(-,$nick(#,0)),/./g, $+($chr(3),$r(1,4)) $iif($nick(#,\n) != $me, $nick(#,\n)) $+($chr(32),$chr(3))) $2-
  }
}
Screen;
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

wolera 30 Haziran 2015 22:48
Cevap: !seslen alias sorunu
 
Kanal Founder ve sopları haric sadece opları tablamak için nasıl bir düzenleme yapılabilir?

Feragat 01 Temmuz 2015 19:26
Cevap: !seslen alias sorunu
 
Alıntı:
wolera Nickli Üyeden Alıntı (Mesaj 1041664694)
Kanal Founder ve sopları haric sadece opları tablamak için nasıl bir düzenleme yapılabilir?
Buna bir kaç yol ile ulaşabilirsin.

1- $nick() tanımı ve mirc.chm anlatımı.

Kod:
$nick(#,N/nick,aohvr,aohvr)

Returns Nth nickname in the channels nickname listbox on channel #.
Properties: color, pnick, idle

$nick(#mIRC,0)  returns the total number of nicknames on #mIRC
$nick(#mIRC,1)  returns the 1st nickname on #mIRC

Both aohvr parameters are optional. The first specifies which nicks you'd like included, and the second specifies the nicks you'd like excluded, where:

  a = all nicks, o = ops, h = halfops, v = voiced, r = regular

$nick(#mIRC,1,o)  return the first op on #mIRC
$nick(#mIRC,0,a,o)  return the total number of nicks not including ops on #mIRC

The pnick property returns the nickname in a .@%+nick format.
$nick(#kanal,Sıra,o)

Örnek:
-
Kod:
//while ¿ { inc -u %u | echo -a $$nick(#,%u,o) }
Kanaldaki +o modesi almış kullanıcıları listeler. (+oa +oq vs bunlara dahildir.)

2- $nick().pnick Properties (özelliği)

Örnek:
Kod:
//while ^\?$ { inc -u %u | if (@* iswm $$nick(#,%u).pnick) echo -a $v2 }
Sadece @ Prefixine sahip kullanıcıları döner.

- Kanal @ (op) larını bulmak için isaop operatörünü falan da kullanabilirsin. Yol çok. Üstteki örneklerde sadece kanal @ larına nasıl ulaşabileceğinin anlatımı var. Gerisi ihtiyacın olan kodları şekillendirmeye kalmış.

Zalimsin 20 Ekim 2019 15:55
Cevap: !seslen alias sorunu
 
Alıntı:
Toprak Nickli Üyeden Alıntı (Mesaj 1041642852)
Buda benden olsun :)

Kod:
on *:text:*:#:{
  if $regex($1,/^[!\.]seslen$/Si) && $regex($nick(#,$nick).pnick,/(%|@|&|~|\.)/) && $2 {
    msg # $regsubex($str(-,$nick(#,0)),/./g, $iif($nick(#,\n) != $me, $nick(#,\n)) $chr(32)) $2-
  }
}
Buda kanaldaki seslenen nick'lere random renk atar.

Kod:
on *:text:*:#:{
  if $regex($1,/^[!\.]seslen$/Si) && $regex($nick(#,$nick).pnick,/(%|@|&|~|\.)/) && $2 {
    msg # $regsubex($str(-,$nick(#,0)),/./g, $+($chr(3),$r(1,4)) $iif($nick(#,\n) != $me, $nick(#,\n)) $+($chr(32),$chr(3))) $2-
  }
}
Screen;
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

denedim ama calışmadı @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ustad

OperServ 21 Ekim 2019 06:07
Cevap: !seslen alias sorunu
 
Alıntı:
off Nickli Üyeden Alıntı (Mesaj 1042174322)
denedim ama calışmadı @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ustad
Koda bir sorun yok kod kanaldaki bir user .seslen nick yapinca nickleri siralar eger kendin yapmak istiyorsan

Kod:
on *:input:#:{
if $regex($1,/^[!\.]seslen$/Si) && $regex($nick(#,$nick).pnick,/(%|@|&|~|\.)/) && $2 {
    msg # $regsubex($str(-,$nick(#,0)),/./g, $+($chr(3),$r(1,4)) $iif($nick(#,\n) != $me, $nick(#,\n)) $+($chr(32),$chr(3))) $2-
  }
}
kirmizi renkle belirledigim yeri diger kodlada degistirebilirsin .seslen nick veya !seslen nick kolay gelsin

Zalimsin 24 Ekim 2019 19:49
Cevap: !seslen alias sorunu
 
Alıntı:
OperServ Nickli Üyeden Alıntı (Mesaj 1042174554)
Koda bir sorun yok kod kanaldaki bir user .seslen nick yapinca nickleri siralar eger kendin yapmak istiyorsan

Kod:
on *:input:#:{
if $regex($1,/^[!\.]seslen$/Si) && $regex($nick(#,$nick).pnick,/(%|@|&|~|\.)/) && $2 {
    msg # $regsubex($str(-,$nick(#,0)),/./g, $+($chr(3),$r(1,4)) $iif($nick(#,\n) != $me, $nick(#,\n)) $+($chr(32),$chr(3))) $2-
  }
}
kirmizi renkle belirledigim yeri diger kodlada degistirebilirsin .seslen nick veya !seslen nick kolay gelsin
bunu kanal aoplar !seslen dediginde butun kanala seslense olurmu

Mylife 25 Ekim 2019 00:11
Cevap: !seslen alias sorunu
 
Alıntı:
off Nickli Üyeden Alıntı (Mesaj 1042176267)
bunu kanal aoplar !seslen dediginde butun kanala seslense olurmu
input eventini text eventi ile değiştirmeniz gerekir. Yukarıda örneği verilmiş düzgün bir şekilde ekleme yaparsanız calışır. Bir sayfanın içinde birden fazla text eventi kullanılırsa o halde kod işlevsiz kalır bu detay ı unutmiyalım.

SenatoR-SuVaRi 19 Aralık 2019 05:01
Cevap: !seslen alias sorunu
 
öncelikle selam guzel kod yapmıssınız elinize sağlık peki bu koda muaf nick eklenebilirmi kamal koruma botu kanal radyo botu ismi gecmesin istiyorum bir de mümkünse kim seslenmisse onun nicki görünsün
örnek Ali #kanalda size sesleniyor mehmet osman yayın alacak varmı
mümkünse şimdiden tesekkürler

Emrehan 19 Aralık 2019 21:58
Cevap: !seslen alias sorunu
 
Alıntı:
SenatoR-SuVaRi Nickli Üyeden Alıntı (Mesaj 1042211720)
öncelikle selam guzel kod yapmıssınız elinize sağlık peki bu koda muaf nick eklenebilirmi kamal koruma botu kanal radyo botu ismi gecmesin istiyorum bir de mümkünse kim seslenmisse onun nicki görünsün
örnek Ali #kanalda size sesleniyor mehmet osman yayın alacak varmı
mümkünse şimdiden tesekkürler
Kod:
on *:input:#:{
  if $regex($1,/^[!\.]seslen$/Si) && $regex($nick(#,$nick).pnick,/(%|@|&|~|\.)/) && $2 {
    msg # $regsubex($str(-,$nick(#,0)),/./g, $+($chr(3),$r(1,4)) $iif($nick(#,\n) != $me,$iif($nick(#,\n) != Nick1,$iif($nick(#,\n) != Nick2,$nick(#,\n)))) $+($chr(32),$chr(3),5)) ==>6 $nick 1size5 $chan 1kanalında sesleniyor: $+($chr(3),12,$2-)
  }
}
ya da;

Kod:
on *:input:#:{
  if $regex($1,/^[!\.]seslen$/Si) && $2 {
    .hadd -ms seslen $chan $2- | who $chan
  }
}

raw 352:*:{
  if $hget(seslen,$2) {
    if $regex($7,/(%|@|&|~|\.)/) {
      if $regex($6,/( $+ $me $+ |Nick1|Nick2|Nick3)/Si) { return }
      .hadd -m seslen nickler $hget(seslen,nickler) $+($chr(3),$r(1,4),$6)
    }
  }
}
raw 315:*:{
  if $hget(seslen,$2) && $hget(seslen,nickler) {
    msg $2 $hget(seslen,nickler) $+($chr(32),$chr(3),5) ==>6 $me 1size5 $2 1kanalında sesleniyor: $+($chr(3),12,$hget(seslen,$2))
    .hfree -sw seslen
  }
}
İki şekilde de yapabilirsiniz. Gerekli noktaları kırmızı ile belirttim.

İyi forumlar.

SenatoR-SuVaRi 20 Aralık 2019 05:23
Cevap: !seslen alias sorunu
 
Emrehan elinize sağlık çok teşekkür ederim.

İyi forumlar.

Umud1990 21 Mayıs 2021 08:12
Cevap: !seslen alias sorunu
 
Alıntı:
Feragat Nickli Üyeden Alıntı (Mesaj 1041665034)
Buna bir kaç yol ile ulaşabilirsin.

1- $nick() tanımı ve mirc.chm anlatımı.

Kod:
$nick(#,N/nick,aohvr,aohvr)

Returns Nth nickname in the channels nickname listbox on channel #.
Properties: color, pnick, idle

$nick(#mIRC,0)  returns the total number of nicknames on #mIRC
$nick(#mIRC,1)  returns the 1st nickname on #mIRC

Both aohvr parameters are optional. The first specifies which nicks you'd like included, and the second specifies the nicks you'd like excluded, where:

  a = all nicks, o = ops, h = halfops, v = voiced, r = regular

$nick(#mIRC,1,o)  return the first op on #mIRC
$nick(#mIRC,0,a,o)  return the total number of nicks not including ops on #mIRC

The pnick property returns the nickname in a .@%+nick format.
$nick(#kanal,Sıra,o)

Örnek:
-
Kod:
//while ¿ { inc -u %u | echo -a $$nick(#,%u,o) }
Kanaldaki +o modesi almış kullanıcıları listeler. (+oa +oq vs bunlara dahildir.)

2- $nick().pnick Properties (özelliği)

Örnek:
Kod:
//while ^\?$ { inc -u %u | if (@* iswm $$nick(#,%u).pnick) echo -a $v2 }
Sadece @ Prefixine sahip kullanıcıları döner.

- Kanal @ (op) larını bulmak için isaop operatörünü falan da kullanabilirsin. Yol çok. Üstteki örneklerde sadece kanal @ larına nasıl ulaşabileceğinin anlatımı var. Gerisi ihtiyacın olan kodları şekillendirmeye kalmış.
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Merhaba üstad peki şöyle bir sorun var , kanal text satırının belli bi sayı sınırı olduğu için bi sayıdan sonra tam olarak herkese seslenmiyor bot üzerinde herkese kendi sayfasında seslenmiş gözüküyor fakat farklı bir yerden bakılınca seslenmiyor , bu max satırı ( 100 ) sayıcak olursak kanala hepsinin seslenilmesi için nasıl ypabiliriz ? Şimdiden teşekkür ederim.

Feragat 22 Mayıs 2021 17:48
Cevap: !seslen alias sorunu
 
Alıntı:
Umud1990 Nickli Üyeden Alıntı (Mesaj 1042490307)
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Merhaba üstad peki şöyle bir sorun var , kanal text satırının belli bi sayı sınırı olduğu için bi sayıdan sonra tam olarak herkese seslenmiyor bot üzerinde herkese kendi sayfasında seslenmiş gözüküyor fakat farklı bir yerden bakılınca seslenmiyor , bu max satırı ( 100 ) sayıcak olursak kanala hepsinin seslenilmesi için nasıl ypabiliriz ? Şimdiden teşekkür ederim.
Kalabalık kanallarda herkese seslenmek için @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] in 22 Ocak 2014, 02:34 tarihinde yaptığı bir kod var. Onu kullanıp ihtiyaçlarına göre düzenleyebilirsin.

Kullanımı: Kanalda /seslen

Kod:
alias seslen {
  var %a 1,%b,%c $nick(#,0)
  while %a <= %c { 
    if ($len(%b) > 820 || %a == %c) { say %b | var %b }
    var %b %b $nick(#,%a) | inc %a
  }
  say - | say $1-
}
Kolay gelsin.

YouMyCure 22 Mayıs 2021 18:51
Cevap: !seslen alias sorunu
 
Alıntı:
Feragat Nickli Üyeden Alıntı (Mesaj 1042490808)
Kalabalık kanallarda herkese seslenmek için @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] in 22 Ocak 2014, 02:34 tarihinde yaptığı bir kod var. Onu kullanıp ihtiyaçlarına göre düzenleyebilirsin.

Kullanımı: Kanalda /seslen

Kod:
alias seslen {
  var %a 1,%b,%c $nick(#,0)
  while %a <= %c { 
    if ($len(%b) > 820 || %a == %c) { say %b | var %b }
    var %b %b $nick(#,%a) | inc %a
  }
  say - | say $1-
}
Kolay gelsin.
efsane geri döndü :)

Joop 14 Ağustos 2021 18:35
Cevap: !seslen alias sorunu
 
Alıntı:
Emrehan Nickli Üyeden Alıntı (Mesaj 1042212221)
Kod:
on *:input:#:{
  if $regex($1,/^[!\.]seslen$/Si) && $regex($nick(#,$nick).pnick,/(%|@|&|~|\.)/) && $2 {
    msg # $regsubex($str(-,$nick(#,0)),/./g, $+($chr(3),$r(1,4)) $iif($nick(#,\n) != $me,$iif($nick(#,\n) != Nick1,$iif($nick(#,\n) != Nick2,$nick(#,\n)))) $+($chr(32),$chr(3),5)) ==>6 $nick 1size5 $chan 1kanalında sesleniyor: $+($chr(3),12,$2-)
  }
}
ya da;

Kod:
on *:input:#:{
  if $regex($1,/^[!\.]seslen$/Si) && $2 {
    .hadd -ms seslen $chan $2- | who $chan
  }
}

raw 352:*:{
  if $hget(seslen,$2) {
    if $regex($7,/(%|@|&|~|\.)/) {
      if $regex($6,/( $+ $me $+ |Nick1|Nick2|Nick3)/Si) { return }
      .hadd -m seslen nickler $hget(seslen,nickler) $+($chr(3),$r(1,4),$6)
    }
  }
}
raw 315:*:{
  if $hget(seslen,$2) && $hget(seslen,nickler) {
    msg $2 $hget(seslen,nickler) $+($chr(32),$chr(3),5) ==>6 $me 1size5 $2 1kanalında sesleniyor: $+($chr(3),12,$hget(seslen,$2))
    .hfree -sw seslen
  }
}
İki şekilde de yapabilirsiniz. Gerekli noktaları kırmızı ile belirttim.

İyi forumlar.
bu kodda sadee yetkilileremi sesleniyor banamı öyle denk geldi

Emrehan 14 Ağustos 2021 19:21
Cevap: !seslen alias sorunu
 
Alıntı:
Joop Nickli Üyeden Alıntı (Mesaj 1042522978)
bu kodda sadee yetkilileremi sesleniyor banamı öyle denk geldi
Merhaba,

Evet, sadece yetkililer baz alınsın şeklinde ayarlıdır.

Joop 14 Ağustos 2021 21:12
Cevap: !seslen alias sorunu
 
Alıntı:
Emrehan Nickli Üyeden Alıntı (Mesaj 1042523020)
Merhaba,

Evet, sadece yetkililer baz alınsın şeklinde ayarlıdır.
muaf tutulan ickler harici tüm kanal'a ayarlayabiliriyiz peki[COLOR="Silver"]

Subzero 15 Ağustos 2021 04:23
Cevap: !seslen alias sorunu
 
Kodda Sıkıntı Oldugundan Paylaşımdan Kaldırdım.

TimeMirc 15 Ağustos 2021 05:20
Cevap: !seslen alias sorunu
 
Alıntı:
Joop Nickli Üyeden Alıntı (Mesaj 1042523022)
muaf tutulan ickler harici tüm kanal'a ayarlayabiliriyiz peki[COLOR="Silver"]
Kod:
on *:text:*:#: {
  if $regex($1,/^([.!]seslen)/Si) {
    if !$istok(Nick1 Nick2 Nick3 Nick4 Nick5,$nick,32) { msg # 4Bu komutu kullanmaya yetkiniz yok. | return }
    unset %y | set %s 0 | var %i = 1  | while %i <= $nick(#,0) {
      if !$istok(Muaf1 Muaf2 Muaf3 Muaf4 Muaf5,$nick(#,%i),32) {
    $iif(%y,set %y %y $nick(#,%i),set %y $nick(#,%i)) | inc %s | if %s = 15 {  msg # 0,6 %y | set %s 0 | unset %y } } | inc %i } 
    msg # 0,6 ~ %y ~ | msg # 3 -
  }
}
Nick1 Nick2 Nick3 Nick4 Nick5 : !seslen komutu için yetki atamasıdır , çoğaltılabilir azaltılabilir.

Muaf1 Muaf2 Muaf3 Muaf4 Muaf5 : !seslen komutundan muaf tutulacaklar içindir , çoğaltılabilir azaltılabilir.

Sanırım bu işine yarar @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]




Bilgilendirme : Code Alıntıdır.

Emrehan 15 Ağustos 2021 13:32
Cevap: !seslen alias sorunu
 
Alıntı:
Joop Nickli Üyeden Alıntı (Mesaj 1042523022)
muaf tutulan ickler harici tüm kanal'a ayarlayabiliriyiz peki[COLOR="Silver"]
Merhaba,

Kod:
on *:input:#:{
  if $regex($1,/^[!\.]seslen$/Si) && $2 {
    msg # $regsubex($str(-,$nick(#,0)),/./g, $+($chr(3),$r(1,4)) $iif($nick(#,\n) != $me,$iif($nick(#,\n) != Nick1,$iif($nick(#,\n) != Nick2,$nick(#,\n)))) $+($chr(32),$chr(3),5)) ==>6 $nick 1size5 $chan 1kanalında sesleniyor: $+($chr(3),12,$2-)
  }
}
ya da;

Kod:
on *:input:#:{
  if $regex($1,/^[!\.]seslen$/Si) && $2 {
    .hadd -ms seslen $chan $2- | who $chan
  }
}
raw 352:*:{
  if $hget(seslen,$2) {
    if $regex($6,/( $+ $me $+ |Nick1|Nick2|Nick3)/Si) { return }
    .hadd -m seslen nickler $hget(seslen,nickler) $+($chr(3),$r(1,4),$6)
  }
}
raw 315:*:{
  if $hget(seslen,$2) && $hget(seslen,nickler) {
    msg $2 $hget(seslen,nickler) $+($chr(32),$chr(3),5) ==>6 $me 1size5 $2 1kanalında sesleniyor: $+($chr(3),12,$hget(seslen,$2))
    .hfree -sw seslen
  }
}
İki şekilde de yapabilirsiniz. Gerekli noktaları kırmızı ile belirttim.

İyi forumlar.

Akabinde 01 Aralık 2021 18:28
Cevap: !seslen alias sorunu
 
Emeginize SagLık


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

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