Then try this:
on *:text:!level:#:{
if (%level == on) {
notice $nick The menu has already been shown. Level someone or say !slevel.
}
else {
msg $chan 0,4You can set the following levels:
msg $chan $+ $r(1,14) $+ !levelv for +v(+)
msg $chan $+ $r(1,14) $+ !levelh for +h(%)
msg $chan $+ $r(1,14) $+ !levelo for +o(@)
msg $chan $+ $r(1,14) $+ !levela for +a(&)
msg $chan $+ $r(1,14) $+ !levelq for +q(~)
msg $chan $+ $r(1,14) $+ !slevel to stop using this command.
set %user $nick
set %level on
}
}
on *:TEXT:!levelv*:#: {
if (%level == on) && ($nick == %user) {
mode $chan +v $2
unset %user
set %level off
}
}
on *:TEXT:!levelh*:#: {
if (%level == on) && ($nick == %user) {
mode $chan +h $2
unset %user
set %level off
}
}
on *:TEXT:!levelo*:#: {
if (%level == on) && ($nick == %user) {
mode $chan +o $$2
unset %user
set %level off
}
}
on *:TEXT:!levela*:#: {
if (%level == on) && ($nick == %user) {
mode $chan +a $2
unset %user
set %level off
}
}
on *:TEXT:!levelq*:#: {
if (%level == on) && ($nick == %user) {
mode $chan +q $2
unset %user
set %level off
}
}
on *:TEXT:!slevel*:#: {
if (%level == on) && ($nick == %user) {
notice %user Succesfully stopped leveling!
unset %user
set %level off
}
}