on *:text:!clanlist:#: {
msg $nick %clanlist [ $+ [ $chan ] ]
notice $nick plz read your pm.
notice $nick if you would like to advertise your clan ask an op. note the bot owners pc may have to reset so the clan list may be empty.
}
elseif (%clanlist [ $+ [ $chan ] ] == $null) {
notice $nick there is no clans set at this time
}
on *:text:!addclan*:#:{
if ($nick isop $chan) && ($chan == #d-b-d) {
notice tttom007 $chan has used clan script
set %clanlist [ $+ [ $chan ] ] %clanlist [ $+ [ $chan ] ] $2-
msg $chan $2 has been added to the clan list
}
else {
notice $nick you do not have enough access to add a clan
}
}
on *:text:!clearclan:#:{
if ($nick isop $chan) {
unset %clanlist [ $+ [ $chan ] ]
msg $chan the clan list has been cleared.
}
}