IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - Arkadaşlar @bankick ayrı pencere yardım

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

- - Arkadaşlar @bankick ayrı pencere yardım (https://www.ircforumlari.net/mirc-scripting-sorunlari/527111-arkadaslar-bankick-ayri-pencere-yardim.html)

Arkadaşlar @bankick ayrı pencere yardım

Op olduğum Kanallarda Biri kanaldan birini banlar atarsa ayrı pencere olsun istiyorum @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Kick Gibi Şöyle Bir Kod var elimde ama Sadece Op olduğum Kanallarda Göstersin İstiyorum ..
window -eknl12 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Kick 0 0 718 504 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Kick Arial 12 {
aline -l 4 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Kick $knick
echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Kick 3[ $+ $time $+ 3] Banlayan:12 $nick 3Banlanan:4 $knick 3Kanal:4 # 3Sebep: $1-
}

Cevap: Arkadaşlar @bankick ayrı pencere yardım

:ban: kelimesini aratın kodun event kısmına düzenleme yapılırsa istediğiniz olur

Cevap: Arkadaşlar @bankick ayrı pencere yardım

q0kh4n ın dediği gibi kick eventinde aşağıdaki kırmızı ile belirttiğim yerdeki gibi bir ekleme yapmanda kafidir.

Kod:

on @*:kick:#:if !$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]kick) { window -el12 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]kick Arial 12  } | aline -l 4 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Kick $knick | echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]kick [ $+ $time $+ 3] Banlayan:12 $nick 3Banlanan:4 $knick 3Kanal:4 # 3Sebep: $1-

Cevap: Arkadaşlar @bankick ayrı pencere yardım

Yaklaşık 1.5 saattir arıyorum ancak kodu hala bulamadım. Kanal listesindeki bir kişiye sağ tıkladığımda bulunduğu tüm kanallardaki sadece seçtiğim kişinin konuşmasını echo ile ayrı pencerede nasıl listeletebilirim ? Daha önce kullandığım bir koddu ancak bulamıyorum. Teşekkürler.

Şöyle bir kod buldum. Ancak siyah ve ayrı pencerede çıkartıyor. Mirc sekmesinde notice penceresi olarak nasıl çıkartabiliriz ?

PHP- Kodu:

  
alias userh {
if (!$regex($1,^#+) || !$2) { echo $color(info text) -e * /userh: Hatalı kullanım: /userh <#channel> <user> | returnex }
var %1 = 1,%2 = $line($1,0), $&
%n = $regsubex($2,/(\[|\]|\^|\||\\)/g,$+(\,\1)\s) | while (%1 <= %2) {
if ($regex($gettok($line($1,%1),1,32),$+(<?,%n,>)) || $regex($gettok($line($1,%1),2,32),$+(<?,%n,>))) {
inc %c $len($line($1,%1)) | inc %cc | win $1 $2 $line($1,%1)
}
inc %1
}
if ($window(@-)) { aline @- – | aline @- Toplam gönderdiği satır: %cc – Toplam karakter: %c | unset %c %cc | return }
echo $color(info text) -ate $1 kanalında, $2 rumuzu için konuşma kaydı bulunamadı.
}
alias -l win if (!$window(@-)) { window -aCdlk0 +l @- | aline @- – $2 rumuzunun $1 kanalındaki konuşma kaydı: | aline @- – | titlebar @- $2 konuşma kaydı. } | aline -p @- $3-

Cevap: Arkadaşlar @bankick ayrı pencere yardım

Alıntı:

kheldor Nickli Üyeden Alıntı (Mesaj 1041400328)

PHP- Kodu:

  
alias userh {
if (!$regex($1,^#+) || !$2) { echo $color(info text) -e * /userh: Hatalı kullanım: /userh <#channel> <user> | returnex }
var %1 = 1,%2 = $line($1,0), $&
%n = $regsubex($2,/(\[|\]|\^|\||\\)/g,$+(\,\1)\s) | while (%1 <= %2) {
if ($regex($gettok($line($1,%1),1,32),$+(<?,%n,>)) || $regex($gettok($line($1,%1),2,32),$+(<?,%n,>))) {
inc %c $len($line($1,%1)) | inc %cc | win $1 $2 $line($1,%1)
}
inc %1
}
if ($window(@-)) { aline @- – | aline @- Toplam gönderdiği satır: %cc – Toplam karakter: %c | unset %c %cc | return }
echo $color(info text) -ate $1 kanalında, $2 rumuzu için konuşma kaydı bulunamadı.
}
alias -l win if (!$window(@-)) { window -aCdlk0 +l @- | aline @- – $2 rumuzunun $1 kanalındaki konuşma kaydı: | aline @- – | titlebar @- $2 konuşma kaydı. } | aline -p @- $3-

Kod:

menu nicklist { 

  .Nick Konuşma Bilgisi Al:/set -e %nbilgi $snick(#,1) | userh # %nbilgi

}

alias userh {

  ;if (!$regex($1,^#+) || !$2) { echo $color(info text) -e * /userh: Hatalı kullanım: /userh <#channel> <user> | returnex }

  var %1 = 1,%2 = $line($chan,0), $&

    %n = $regsubex(%nbilgi,/(\[|\]|\^|\||\\)/g,$+(\,\1)\s) | while (%1 <= %2) {

    if ($regex($gettok($line($chan,%1),1,32),$+(<?,%n,>)) || $regex($gettok($line($chan,%1),2,32),$+(<?,%n,>))) {

      inc %c $len($line($chan,%1)) | inc %cc | win $chan %nbilgi $line($chan,%1)

    }

    inc %1

  }

  if ($window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { aline @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] – | aline @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Toplam gönderdiği satır: %cc – Toplam karakter: %c | unset %c %cc | return }

  echo $color(info text) -ate $1 kanalında, $2 rumuzu için konuşma kaydı bulunamadı.

}

alias -l win if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -aemg1k0 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | aline @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] – $2 rumuzunun $1 kanalındaki konuşma kaydı: | aline @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] –  } | aline -p @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $3-

Nick listesinde 1 nick'in üzerine tıklayıp, sağ tuş yaparak Nick Konuşma Bilgisi Al Sekmesini seçtiğinde Notice penceresi açılır ve aktif kanaldaki konuşma kaydını yansıtır. Renk olayını ise Bkz: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] burayı inceleyerek zevkine göre düzenleyebilirsin veya mIRC Renk kodlarına CTRL + K tuş kombinasyonunu kullanarak erişip düzenleyebilirsin.

Cevap: Arkadaşlar @bankick ayrı pencere yardım

Harikasın tam olarak aradığım buydu. ;)

Cevap: Arkadaşlar @bankick ayrı pencere yardım

!bilgi nick #kanal şeklinde nasıl kullanabiliriz?

Alıntı:

Feragat Nickli Üyeden Alıntı (Mesaj 1041400364)

Kod:

menu nicklist { 

  .Nick Konuşma Bilgisi Al:/set -e %nbilgi $snick(#,1) | userh # %nbilgi

}

alias userh {

  ;if (!$regex($1,^#+) || !$2) { echo $color(info text) -e * /userh: Hatalı kullanım: /userh <#channel> <user> | returnex }

  var %1 = 1,%2 = $line($chan,0), $&

    %n = $regsubex(%nbilgi,/(\[|\]|\^|\||\\)/g,$+(\,\1)\s) | while (%1 <= %2) {

    if ($regex($gettok($line($chan,%1),1,32),$+(<?,%n,>)) || $regex($gettok($line($chan,%1),2,32),$+(<?,%n,>))) {

      inc %c $len($line($chan,%1)) | inc %cc | win $chan %nbilgi $line($chan,%1)

    }

    inc %1

  }

  if ($window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { aline @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] – | aline @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Toplam gönderdiği satır: %cc – Toplam karakter: %c | unset %c %cc | return }

  echo $color(info text) -ate $1 kanalında, $2 rumuzu için konuşma kaydı bulunamadı.

}

alias -l win if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -aemg1k0 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | aline @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] – $2 rumuzunun $1 kanalındaki konuşma kaydı: | aline @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] –  } | aline -p @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $3-

Cevap: Arkadaşlar @bankick ayrı pencere yardım

Alıntı:

wolera Nickli Üyeden Alıntı (Mesaj 1041664695)

!bilgi nick #kanal şeklinde nasıl kullanabiliriz?

on *:text: ve on *:input: eventlarını kullanarak yapabilirsin.

Cevap: Arkadaşlar @bankick ayrı pencere yardım

Remote kullanım şekli bu bu komutu

!bilgi nick #kanal şeklinde ayarlamak istiyorum aşağıdaki verdiğim gibi deniyorum olmuyor ne yapmam gerekiyor?

on *:input:#:{
if ($1 == !bilgi) { /set -e %nbilgi $1(#,1) | userh $2 %nbilgi }

}

/set -e %nbilgi $snick(#,1) | userh # %nbilgi

Alıntı:

Feragat Nickli Üyeden Alıntı (Mesaj 1041664922)

on *:text: ve on *:input: eventlarını kullanarak yapabilirsin.

Cevap: Arkadaşlar @bankick ayrı pencere yardım

Kod:

alias buls { $iif($window(bilgis),window -c @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s) | $iif($hget(goster),hfree goster) | window -h @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s | filter -ww $1 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s $+(*,$2,*) | hadd -m goster bilgi $2- | .timerbilgi 1 2 bilgis | return }

alias goster while ak=beyaz=amk=akillimertkorkusuz { inc -u %% | echo -t $active $regsubex($$line(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s,%%),/( $+ $hget(goster,bilgi) $+ )/ig,$+($chr(3),$r(3,13),\1,$chr(3))) | .timergoster 1 2 window -c @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s }

alias bilgis $iif(%= = 1,msg $hget(kanal,kanal),echo -atg) $+(4,$hget(goster,bilgi),) Toplam bulunan satir sayisi $line(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s,0) Görmek icin $iif(%= = 1,!goster,/goster) yapiniz.

on *:input:#:{

  if !Goster = $1 { 

    if !$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s) { msg $active Bilgi bulunmuyor, yeni arama yapin. | return }

    if $line(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s,0) > 700 && $input($1 Kanalinda toplam $line($1,0) satir yazi yazilmis $+ $crlf $+ $crlf $+ Arama yapmak istedinizden eminmisiniz? $+ $crlf $+ $crlf $+  Bu islem bi süre kasabilir mircinizi. $+ $crlf $+ $crlf $+ $me,y,mIRC Istek) {

      while ak=beyaz=amk=akillimertkorkusuz { inc -u %% | msg $active $regsubex($$line(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s,%%),/( $+ $hget(goster,bilgi) $+ )/ig,$+($chr(3),$r(3,13),\1,$chr(3))) | .timergoster 1 2 window -c @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s } 

      return

    }

    while ak=beyaz=amk=akillimertkorkusuz { inc -u %% | msg $active $regsubex($$line(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s,%%),/( $+ $hget(goster,bilgi) $+ )/ig,$+($chr(3),$r(3,13),\1,$chr(3))) | .timergoster 1 2 window -c @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s } 

  }

  if $1 = !ara {

    if (!$2) { echo -a Lütfen Aranicak kanali bos birakmayin. | return }

    if (!$3) { echo -a Lütfen Aranicak kelimeyide ayni sekilde. Kullanimi: !ara #kanal kelime | return }

    buls $2-

  }

}

on *:text:*:#:{

  if $regex($1,/[.!]bul/i) {

    if (!$2) { msg # Lütfen Aranicak kanali bos birakmayin. | return }

    if (!$3) { msg # Lütfen Aranicak kelimeyide ayni sekilde. | return }

    msg # Arama baslamistir..

    set -u5 %= 1 | hadd -m kanal kanal # | buls $2-

  }

  if $regex($1,/[.!]goster/) {

    while ak=beyaz=amk=akillimertkorkusuz { inc -u %% | msg $active $regsubex($$line(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s,%%),/( $+ $hget(goster,bilgi) $+ )/ig,$+($chr(3),$r(3,13),\1,$chr(3))) | .timergoster 1 2 window -c @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]s } 

  }

}

/buls #kanal kelime
Kendin kullanmak icin: !ara #kanal #kelime
Baskasinin kullanimi: !bul #kanal #kelime
kanali belirtmelisin.