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

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

- - Ortak kanal istegi? (https://www.ircforumlari.net/mirc-scripting-sorunlari/308896-ortak-kanal-istegi.html)

Ortak kanal istegi?

Selam arkadaslar ben whois çektiğim kişilyeolan ortak kanalları #x kanalına atmak istiyorum ? Yardımcı olabilirmisiniz ?

Serdar Hoca'nın yaptıgı böyle bir kod var ama kanala aktarmasını yapamadım yardım ederseniz Sevinirim.

Kod:

 

alias ortakkanal {

  if ($server == $null) { //echo -a 4Herhangi bir server'a bağlı değilsiniz. }

  elseif ($chan($me) == 0) { //echo -a 4Herhangi bir kanala girmiş değilsiniz. }

  elseif (!$1) { //echo -a 4Ortak kanallarınızın bulunacağı nick belirtilmedi. }

  elseif ($1 == $me) { //echo -a 4Kendi nickinizi giremezsiniz. }

  elseif ($comchan($1,0) == 0) { //echo -a 4Beliritlen nick bulunamadı. }

  else {

    var %oid 1

    set %orka $comchan($1,0)

    unset %knms

    while (%oid <= %orka) {

      set %knms $comchan($1,%oid) $+ $chr(32) $+ %knms

      inc %oid

    }

    //echo -a 8,5 $+ $1 15 adlı kişi ile ortak bulunduğunuz kanallar: 8 $+ %knms 

  } 

}

Cevap: Ortak kanal istegi?

alias ortakkanal {
if ($server == $null) { //echo -a 4Herhangi bir server'a bağlı değilsiniz. }
elseif ($chan($me) == 0) { //echo -a 4Herhangi bir kanala girmiş değilsiniz. }
elseif (!$1) { //echo -a 4Ortak kanallarınızın bulunacağı nick belirtilmedi. }
elseif ($1 == $me) { //echo -a 4Kendi nickinizi giremezsiniz. }
elseif ($comchan($1,0) == 0) { //echo -a 4Beliritlen nick bulunamadı. }
else {
var %oid 1
set %orka $comchan($1,0)
unset %knms
while (%oid <= %orka) {
set %knms $comchan($1,%oid) $+ $chr(32) $+ %knms
inc %oid
}
msg #X 8,5 $+ $1 15 adlı kişi ile ortak bulunduğunuz kanallar: 8 $+ %knms
}
}

alias whois {
whois $1
ortakkanal $1
halt
}