hi help a script with +ipcheck

[masheen]

hi again i nid help with my script here

Code: Select all

bind msg -|- entra kick:msg
bind msg -|- chupi kick:sale

proc kick:msg {nick uhost hand arg} {
	set kchan [lindex $arg 0]
	channel add $kchan
	putquick "JOIN $kchan"
	putquick "PRIVMSG $kchan :Im here - Awaiting orders $nick"
}
proc kick:sale {nick uhost hand arg} {
	global botnick
	set kchan [lindex $arg 0]
	set knick [lindex $arg 1]
	set kreason [lrange $arg 2 end]
	channel remove $kchan
	putquick "NOTICE $nick :Just joined $cchannel."
}

note: i know the naming convention is lame hehe...but what this script does is if i msg it with entra #chan it joins the chan. this script is actually working fine already so all is well with this one...but this time i am hoping if anyone can put in a line or two on this script to FLAG the channel with +ipcheck everytime it joins a chan. is that possible? thanks for anyone who helps [/code]

[nml375]

Something like this then. Also took the liberty of fixing several bugs, aswell as removed stale code...

Code: Select all

bind msg -|- entra kick:msg
bind msg -|- chupi kick:sale

setudef flag ipcheck

proc kick:msg {nick uhost hand arg} {
  set kchan [lindex [split $arg] 0]
  channel add $kchan [list +ipcheck]
  putquick "PRIVMSG $kchan :Im here - Awaiting orders $nick"
}
proc kick:sale {nick uhost hand arg} {
  set kchan [lindex [split $arg] 0]
  channel remove $kchan
  putquick "NOTICE $nick :Just joined $kchan."
}