Forums Scripts & Popups Hotlink request

on !^*:join:#: { 
  if ($ialchan($wildsite,$chan,0) > 1) {
    var %i 1
    while $ialchan($wildsite,$chan,%i).nick {
      var %i = %i + 1,%m $v1
      if (%m != $nick) var %cl = $addtok(%cl,%m,44)
    }
    echo -i21 # join $jalign($nick) 10!14 [10 $+ $address $+ 14] 14[10 $+ $numtok(%cl,44) $+ 14]
    halt 
  }
  else {
    echo -i21 # join $jalign($nick) 10!14 [10 $+ $address $+ 14]
    halt
  }
}

on ^*:HOTLINK:*:*:{
  var %r = /join .* \! \[.*@.*] \[\d+\]/Si
  if (($regex($hotline,%r)) && ($regex($1,/\[\d+]/Si))) return
  halt
}

on *:HOTLINK:*:*:{
  echo -s -> Display clones for: $gettok($hotline,2,32)
}

on !^*:Join:#: { 
  if ($ialchan($wildsite,$chan,0) > 1) {
    var %i 1
    while $ialchan($wildsite,$chan,%i).nick {
      var %i = %i + 1,%m $v1
      if (%m != $nick) var %cl = $addtok(%cl,%m,44)
    }
    echo -i21 # 09> $str($chr(160),4) 09joined $str($chr(160),3) 00 $+ $nick 14..14 [09 $+ $replace($address,.,14.09,@,14@09,-,14-09) $+ 14] 14[00 $+ $numtok(%cl,44) $+ 14]
    halt 
  }
  else {
    echo -i21 # 09> $str($chr(160),4) 09joined $str($chr(160),3) 00 $+ $nick 14..14 [09 $+ $replace($address,.,14.09,@,14@09,-,14-09) $+ 14] 
    halt
  }
]