Code:

set jCrX "~"#★★★★★##    HeLp    ##★★★★★##BinDsbind pub o|o ${jCrX}cmdhelp pub_cmdhelpbind msg o|o cmdhelp msg_cmdhelp#End#Help Process#proc msg_cmdhelp {nick host hand text} {set htext [lindex $text 0]if {$htext == "partyline" && [matchattr $hand +p]} {puthelp "NOTICE $nick :reload, save, backup, chandle +ignore, -ignore, ignorelist, +user, -user, +host, -host, chattr, info, userinfo, userlist, chanlist"} elseif {$htext == "owner" && [matchattr $hand +n]} {puthelp "NOTICE $nick :\00302~join, part, cycle, mop, mdeop, v*, dv*, mkick, ${jCrX}+gban, -gban, lock, unlock, mode, up, down, op, deop, voice, devoice, kick, +ban, -ban, bans, rb, invite"} elseif {$htext == "master" && [matchattr $hand +mn]} {puthelp "NOTICE $nick :\00302~mop, mdeop, v*, dv*, +gban, -gban, lock, unlock, mode, up, down, op, deop, voice, devoice, kick, +ban, -ban, bans, rb, invite"} elseif {$htext == "op" && [matchattr $hand +mno]} {puthelp "NOTICE $nick :\00302~lock, unlock, mode, up, down, op, deop, voice, devoice, kick, +ban, -ban, bans, rb, invite"} else {puthelp "NOTICE $nick :\00307\037***\017\00304\u2620\017 \[\00303\002\u275d\00302\u2c7c\u2090\u0064\u1d64\u0067\u2090\u1d63\u2099\u1d62\00304\037\u262a\037\00302\u1d63\u2091\u2090\u209c\u1d62\u2134\u2099\00303\u275e\017\] \00304\u2620\017\00307\037***"puthelp "NOTICE $nick :\[\002\00303\u275d\00302\u2c7c\00304\037\u262a\00303\037\u275e\017\] \00302/msg $::botnick cmdhelp \002<owner/master/op>"}}proc pub_cmdhelp {nick host hand chan text} {set htext [lindex $text 0]if {$htext == "partyline" && [matchattr $hand +p]} {puthelp "NOTICE $nick :\00302${jCrX}reload, ${jCrX}save, ${jCrX}backup, ${jCrX}chandle +ignore, ${jCrX}-ignore, ${jCrX}ignorelist, ${jCrX}+user, ${jCrX}-user, ${jCrX}+host, ${jCrX}-host, ${jCrX}chattr, ${jCrX}info, ${jCrX}userinfo, ${jCrX}userlist, ${jCrX}chanlist"} elseif {$htext == "owner" && [matchattr $hand +n]} {puthelp "NOTICE $nick :\00302${jCrX}join, ${jCrX}part, ${jCrX}cycle, ${jCrX}mop, ${jCrX}mdeop, ${jCrX}v*, ${jCrX}dv*, ${jCrX}mkick, ${jCrX}+gban, ${jCrX}-gban, ${jCrX}lock, ${jCrX}unlock, ${jCrX}mode, ${jCrX}up, ${jCrX}down, ${jCrX}op, ${jCrX}deop, ${jCrX}voice, ${jCrX}devoice, ${jCrX}kick, ${jCrX}+ban, ${jCrX}-ban, ${jCrX}bans, ${jCrX}rb, ${jCrX}invite"} elseif {$htext == "master" && [matchattr $hand +mn]} {puthelp "NOTICE $nick :\00302${jCrX}mop, ${jCrX}mdeop, ${jCrX}v*, ${jCrX}dv*, ${jCrX}+gban, ${jCrX}-gban, ${jCrX}lock, ${jCrX}unlock, ${jCrX}mode, ${jCrX}up, ${jCrX}down, ${jCrX}op, ${jCrX}deop, ${jCrX}voice, ${jCrX}devoice, ${jCrX}kick, ${jCrX}+ban, ${jCrX}-ban, ${jCrX}bans, ${jCrX}rb, ${jCrX}invite"} elseif {$htext == "op" && [matchattr $hand +mno]} {puthelp "NOTICE $nick :\00302${jCrX}lock, ${jCrX}unlock, ${jCrX}mode, ${jCrX}up, ${jCrX}down, ${jCrX}op, ${jCrX}deop, ${jCrX}voice, ${jCrX}devoice, ${jCrX}kick, ${jCrX}+ban, ${jCrX}-ban, ${jCrX}bans, ${jCrX}rb, ${jCrX}invite"} else {puthelp "NOTICE $nick :\00307\037***\017\00304\u2620\017 \[\00303\002\u275d\00302\u2c7c\u2090\u0064\u1d64\u0067\u2090\u1d63\u2099\u1d62\00304\037\u262a\037\00302\u1d63\u2091\u2090\u209c\u1d62\u2134\u2099\00303\u275e\017\] \00304\u2620\017\00307\037***"puthelp "NOTICE $nick :\[\002\00303\u275d\00302\u2c7c\00304\037\u262a\00303\037\u275e\017\] \00302/msg $::botnick cmdhelp \002<owner/master/op>"}}##########End Help###########   putlog "***Commands & Control, Channel Control. Loaded."# End of - Commands & Control, Channel Control. (cmd_chan.tcl)

Code:

set jCrX "~"#★★★★★##    HeLp    ##★★★★★##BinDsbind pub o|o ${jCrX}cmdhelp pub_cmdhelpbind msg o|o cmdhelp msg_cmdhelp#End#Help Process#proc msg_cmdhelp {nick host hand text} {global botnickset htext [lindex $text 0]if {$htext == "partyline"} {puthelp "NOTICE $nick :reload, save, backup, chandle +ignore, -ignore, ignorelist, +user, -user, +host, -host, chattr, info, userinfo, userlist, chanlist"} esleif {$htext == "owner"} {puthelp "NOTICE $nick :\00302~join, part, cycle, mop, mdeop, v*, dv*, mkick, ${jCrX}+gban, -gban, lock, unlock, mode, up, down, op, deop, voice, devoice, kick, +ban, -ban, bans, rb, invite"} elseif {$htext == "master"} {puthelp "NOTICE $nick :\00302~mop, mdeop, v*, dv*, +gban, -gban, lock, unlock, mode, up, down, op, deop, voice, devoice, kick, +ban, -ban, bans, rb, invite"} elseif {$htext == "op"} {puthelp "NOTICE $nick :\00302~lock, unlock, mode, up, down, op, deop, voice, devoice, kick, +ban, -ban, bans, rb, invite"} else {puthelp "NOTICE $nick :\00307\037***\017\00304\u2620\017 \[\00303\002\u275d\00302\u2c7c\u2090\u0064\u1d64\u0067\u2090\u1d63\u2099\u1d62\00304\037\u262a\037\00302\u1d63\u2091\u2090\u209c\u1d62\u2134\u2099\00303\u275e\017\] \00304\u2620\017\00307\037***"puthelp "NOTICE $nick :\[\002\00303\u275d\00302\u2c7c\00304\037\u262a\00303\037\u275e\017\] \00302/msg $botnick cmdhelp \002<owner/master/op>"  }}proc pub_cmdhelp {nick host hand chan text} {global jCrX botnickset htext [lindex $text 0]if {$htext == "partyline"} {puthelp "NOTICE $nick :\00302${jCrX}reload, ${jCrX}save, ${jCrX}backup, ${jCrX}chandle +ignore, ${jCrX}-ignore, ${jCrX}ignorelist, ${jCrX}+user, ${jCrX}-user, ${jCrX}+host, ${jCrX}-host, ${jCrX}chattr, ${jCrX}info, ${jCrX}userinfo, ${jCrX}userlist, ${jCrX}chanlist"} elseif {$htext == "owner"} {puthelp "NOTICE $nick :\00302${jCrX}join, ${jCrX}part, ${jCrX}cycle, ${jCrX}mop, ${jCrX}mdeop, ${jCrX}v*, ${jCrX}dv*, ${jCrX}mkick, ${jCrX}+gban, ${jCrX}-gban, ${jCrX}lock, ${jCrX}unlock, ${jCrX}mode, ${jCrX}up, ${jCrX}down, ${jCrX}op, ${jCrX}deop, ${jCrX}voice, ${jCrX}devoice, ${jCrX}kick, ${jCrX}+ban, ${jCrX}-ban, ${jCrX}bans, ${jCrX}rb, ${jCrX}invite"} elseif {$htext == "master"} {puthelp "NOTICE $nick :\00302${jCrX}mop, ${jCrX}mdeop, ${jCrX}v*, ${jCrX}dv*, ${jCrX}+gban, ${jCrX}-gban, ${jCrX}lock, ${jCrX}unlock, ${jCrX}mode, ${jCrX}up, ${jCrX}down, ${jCrX}op, ${jCrX}deop, ${jCrX}voice, ${jCrX}devoice, ${jCrX}kick, ${jCrX}+ban, ${jCrX}-ban, ${jCrX}bans, ${jCrX}rb, ${jCrX}invite"} elseif {$htext == "op"} {puthelp "NOTICE $nick :\00302${jCrX}lock, ${jCrX}unlock, ${jCrX}mode, ${jCrX}up, ${jCrX}down, ${jCrX}op, ${jCrX}deop, ${jCrX}voice, ${jCrX}devoice, ${jCrX}kick, ${jCrX}+ban, ${jCrX}-ban, ${jCrX}bans, ${jCrX}rb, ${jCrX}invite"} else {puthelp "NOTICE $nick :\00307\037***\017\00304\u2620\017 \[\00303\002\u275d\00302\u2c7c\u2090\u0064\u1d64\u0067\u2090\u1d63\u2099\u1d62\00304\037\u262a\037\00302\u1d63\u2091\u2090\u209c\u1d62\u2134\u2099\00303\u275e\017\] \00304\u2620\017\00307\037***"puthelp "NOTICE $nick :\[\002\00303\u275d\00302\u2c7c\00304\037\u262a\00303\037\u275e\017\] \00302/msg $botnick cmdhelp \002<owner/master/op>"  }}##########End Help###########putlog "***Commands & Control, Channel Control. Loaded."# End of - Commands & Control, Channel Control. (cmd_chan.tcl)