mIRC Home    About    Download    Register    News    Help

Print Thread
#105249 14/12/04 08:28 AM
Joined: Mar 2004
Posts: 540
A
Armada Offline OP
Fjord artisan
OP Offline
Fjord artisan
A
Joined: Mar 2004
Posts: 540
Im writing this scrip to mirror one channel to another but im having one problem heres the code first
Code:
 
on *:TEXT:*:#scripts:{
  if ($cid == 1) {
    //scid 2
    if ($left($ialchan($nick,$chan,1).pnick,1) == ~) || ($left($ialchan($nick,$chan,1).pnick,1) == &) || ($left($ialchan($nick,$chan,1).pnick,1) == @) || ($left($ialchan($nick,$chan,1).pnick,1) == %) || ($left($ialchan($nick,$chan,1).pnick,1) == +) {
      var %mirror.msg $replace($1-,$chr(191),$chr(63))
      msg %mirror.chan MirrorScript¿ $+ $chan $+ ¿ $+ $left($ialchan($nick,$chan,1).pnick,1) $+ $nick $+ ¿ $+ %mirror.msg
    }
    else {
      var %mirror.msg $replace($1-,$chr(191),$chr(63))
      msg %mirror.chan MirrorScript¿ $+ $chan $+ ¿ $+ $nick $+ ¿ $+ %mirror.msg
    }
  }
}
 

for some reason the if never happens it goes to the else everytime

#105250 14/12/04 08:58 AM
I
Iori
Iori
I
If the $nick().pnick is only on #scripts on CID 1, there won't be an $ialchan() entry for it after you have used /scid 2.

Try this, I think it's what you're after
Code:
on *:TEXT:*:#scripts:{
  if ($cid == 1) {
    if $nick(#,$nick,~&@%+) { var %nick = $left($nick(#,$nick).pnick,1) $+ $nick }
    else %nick = $nick
    scid 2
    msg %mirror.chan MirrorScript¿ $+ $chan $+ ¿ $+ %nick $+ ¿ $+ $replace($1-,¿,?)
  }
}

#105251 15/12/04 12:22 AM
Joined: Mar 2004
Posts: 540
A
Armada Offline OP
Fjord artisan
OP Offline
Fjord artisan
A
Joined: Mar 2004
Posts: 540
Hmm cool thanks I tried and worked but how about for on input
Code:
 
on *:INPUT:#scripts: {
  if ($left($1,3) == /me) {
    describe $chan $1-
    if ($cid == 1) {
      if $nick($active,$me,~&@%+) { var %nick = $left($me($active,$me).pnick,1) $+ $me }
      else %nick = $me
      scid 2
      msg %mirror.chan MirrorScript¿ $+ $active $+ ¿ $+ * %nick $+ ¿ $+ $1-
    }
  }
  elseif ($left($1,9) == /describe) {
    if ($cid == 1) {
      if $nick($active,$me,~&@%+) { var %nick = $left($me($active,$me).pnick,1) $+ $me }
      else %nick = $me
      scid 2
      msg %mirror.chan MirrorScript¿ $+ $active $+ ¿ $+ * %nick $+ ¿ $+ $1-
    }
  }

  elseif ($left($1,1) == /) && ($ctrlenter == $false) {
    if ($cid == 1) {
      echo -s 4Command Ignored by NetMirror:15 $1-
    }    
  }
  else {
    if ($cid == 1) {
      if $nick(#,$me,~&@%+) { var %nick = $left($me(#,$me).pnick,1) $+ $me }
      else %nick = $me
      scid 2
      msg %mirror.chan MirrorScript¿ $+ $active $+ ¿ $+ %nick $+ ¿ $+ $1-
    }
  }
}

 

#105252 15/12/04 08:53 AM
I
Iori
Iori
I
* Iori wakes up....
This line
  • var %nick = $left($remove($nick(#,$nick).pnick,$nick),1) $+ $nick

can replace these two in the text script.
  • if $nick(#,$nick,~&@%+) { var %nick = $left($nick(#,$nick).pnick,1) $+ $nick }
    else %nick = $nick


The input is the same
Code:
on *:INPUT:#scripts: {
  if $cid == 1 {
    if $1 isin /describe /me {
      [color:Maroon]var %nick = $left($remove($nick(#,[color:Salmon]$me[/color]).pnick,,[color:Salmon]$me[/color]),1) $+ ,[color:Salmon]$me[/color][/color]
      scid 2
      msg %mirror.chan $+(MirrorScript¿,#,¿,* %nick,¿$1-)
    }
    elseif /* iswm $1 && !$ctrlenter { echo -s 4Command Ignored by NetMirror:15 $1- }    
    else {
      var %nick = $left($remove($nick(#,$me).pnick,$me),1) $+ $me
      scid 2
      msg %mirror.chan $+(MirrorScript¿,#,¿,%nick,¿,$1-)
    }
  }
}

#105253 15/12/04 10:22 AM
Joined: Mar 2004
Posts: 540
A
Armada Offline OP
Fjord artisan
OP Offline
Fjord artisan
A
Joined: Mar 2004
Posts: 540
Thank you Kind sir/madam


Link Copied to Clipboard