highlight help

Evil · Post by **Evil** » Thu May 10, 2007 5:10 am

Hello

I am looking for a script for an support chan.

- with higliht function to all @ when a User join. the best way was with a Message like ( a new User has joined the Support chan )

I am not sure does that is working or not

it is easy to hear a sound does we sit 24/7 on a conputer

thx for help or a tip

iamdeath · Post by **iamdeath** » Thu May 10, 2007 8:08 am

You are not clear enough, you want to count users coming in the channel?

Evil · Post by **Evil** » Thu May 10, 2007 8:40 am

no not count.

we have a supoort channel and we work with next tcl.

What I need a script was give the supporter a highlight like a slap or what ever... when a user joins the channel....

since must be an easy script but I have not realy an idea

BR/Evil

Post by **nml375** » Thu May 10, 2007 9:18 am

This would send a notice to all registered ops in the channel. As for beeping, some clients support the "Bel" code, but not all, while other (such as mIRC) implement functions to remotely trigger the playing of sounds. None of these are standardized however. I would believe it would be easier to implement this scriptwize on the clients themselves, either triggering on the notice from the eggdrop, or by simply detecting the join themselves..

Code: Select all

bind join - "#channel %" alert_ops

proc alert_ops {nick host hand chan} {
 foreach op [chanlist $chan +o|+o] {
  puthelp "NOTICE $op :Alert! $nick joined $chan"
 }
}

Evil · Post by **Evil** » Thu May 10, 2007 11:12 am

works great thanks for help....

honeybee · Post by **honeybee** » Thu May 10, 2007 10:36 pm

Code: Select all

## you can activate/deactive the script
## usage: .chanset #channel +\-help.notify
## bot's will not be notified & channel op will also be notified. Ops/friends will not be triggered on onjoin.

bind join - * alert_ops

setudef flag help.notify

proc alert_ops {nick host hand chan} {
 if {[matchattr $hand of|of $chan]} {return 0}
 if {![channel get $chan help.notify]} {return 0}
 foreach users [chanlist $chan] {
 if {([matchattr [nick2hand $users $chan] o|o $chan]) && (![matchattr [nick2hand $users $chan] b])} {
  puthelp "NOTICE $users :Alert! $nick joined $chan"
 }
}

Post by **nml375** » Fri May 11, 2007 8:02 am

Updated version including the channel flag setting suggested by honeybee.
Also will not notice ops when ops, friends, and bots join.

Code: Select all

bind join -ofb&-of * alert_ops

setudef flag help.notify

proc alert_ops {nick host hand chan} {
 if {![channel get $chan help.notify]} {
  return 0
 }
 foreach op [chanlist $chan +o-b|+o] {
  puthelp "NOTICE $op :Alert! $nick joined $chan"
 }
}

Edit: Fixed issue with the flag-credential in the join-binding.

Evil · Post by **Evil** » Fri May 11, 2007 11:37 am

@ honeybee

I have have a fault on line 9 ....

thanks ofr help.... is it working to write it again in one script ?

and it is working does the bot only give an alert when no @ join , so at this time he give a message for all joins

thanks again

BR/Evil

Post by **nml375** » Fri May 11, 2007 1:24 pm

Seems honeybee just missed a } in the end, add it and the script should work as described.

Evil · Post by **Evil** » Sat May 12, 2007 8:46 am

who exactly ?

honeybee · Post by **honeybee** » Sat May 12, 2007 10:29 am

honeybee wrote:

Code: Select all

## you can activate/deactive the script
## usage: .chanset #channel +\-help.notify
## bot's will not be notified & channel op will also be notified. Ops/friends will not be triggered on onjoin.

bind join - * alert_ops

setudef flag help.notify

proc alert_ops {nick host hand chan} {
 if {[matchattr $hand of|of $chan]} {return 0}
 if {![channel get $chan help.notify]} {return 0}
 foreach users [chanlist $chan] {
 if {([matchattr [nick2hand $users $chan] o|o $chan]) && (![matchattr [nick2hand $users $chan] b])} {
   puthelp "NOTICE $users :Alert! $nick joined $chan"
  } 
 }
}

sorry for the missing braces its fixed.