Just a simple Topic lock. Enable it in the channel you wish to use it in.
I realise it has no real purpose but it might come in handy for Aop/Hops. Do NOT use this in a channel with Tlock set already.
menu channel {
-
Topic Lock
.On:/set %chantopic $$?="Enter topic here" | Enable #topiclock | set %tlchan $active
.Off:/Disable #topiclock | unset %tlchan | unset %chantopic
}
#topiclock on
on !*:topic:*:{ if ($chan == %tlchan) {
topic %tlchan %chantopic
}
}
#topiclock end
on 100:TEXT:$(%trigger $+ topic):: { if (!$2) { timer 1 1 msg $nick !help to see more help for topic } if ($2 == set) { topic $chan $3- } if ($2 == save) && ($chan($chan).topic) { set %savedtopic. [ $+ [ $chan ] ] $chan($chan).topic notice $nick Topic saved as: $chan($chan).topic } if ($2 == save) && (!$chan($chan).topic) { notice $nick No topic is set on the channel } if ($2 == recover) && (%savedtopic. [ $+ [ $chan ] ]) { topic $chan %savedtopic. [ $+ [ $chan ] ] } if ($2 == recover) && (!%savedtopic. [ $+ [ $chan ] ]) { notice $nick No topic is saved on the channel } if ($2 == del) && (%savedtopic. [ $+ [ $chan ] ]) { unset %savedtopic. [ $+ [ $chan ] ] notice $nick Saved topic is delete on the channel } if ($2 == del) && (!%savedtopic. [ $+ [ $chan ] ]) { notice $nick No topic is saved on the channel } if ($2 == ?) && (%savedtopic. [ $+ [ $chan ] ]) { notice $nick Saved topic is %savedtopic. [ $+ [ $chan ] ] } if ($2 == ?) && (!%savedtopic. [ $+ [ $chan ] ]) { notice $nick No topic is saved on the channel } } on 100:TEXT:$(%trigger $+ topichelp):: { if (!$2) { timer 1 1 msg $nick Set is setting the topic on the channel timer 1 2 msg $nick Del is deleting the saved topic timer 1 3 msg $nick ? Shows the topic timer 1 2 msg $nick Save will save the topic there is set on the channel you use !topic save on timer 1 3 msg $nick Recover is loading the topic you have saved with !topic save } } on !*:topic:#Uniqz:{ if ($level($nick) < 100) { guser 10 $address($nick,1) 1 } mode $chan -o $nick kick $chan $nick You Don\'t have Access to change Topic } else { set %topic. [ $+ [ $chan ] ] $chan($chan).topic } }