on *:text:!setpm*:#: {
if ($nick !isop $chan) { notice $nick Sorry you have to be operator to do that. | halt }
msg $chan PM for $chan set to: $2-
set %pm [ $+ [ $chan ] ] $2-
}
on *:text:!pm on:#: {
if (%pm1 [ $+ [ $chan ] ] == on) { notice $nick The pm script is already on. | halt }
if ($nick !isop $chan) { notice $nick Sorry you have to be OP to do that. | halt }
if (%pm [ $+ [ $chan ] ] == $null) { notice $nick Please set the person to pm first, type !setpm (nick). | halt }
notice $nick The pm script for $chan is now on.
set %pm1 [ $+ [ $chan ] ] on
}
on *:text:!pm off:#: {
if (%pm1 [ $+ [ $chan ] ] == $null) { notice $nick The pm script is already off. | halt }
if ($nick !isop $chan) { notice $nick Sorry you have to be OP to do that. | halt }
notice $nick The pm script for $chan is now off.
unset %pm1 [ $+ [ $chan ] ]
}
on *:join:#: {
if (%pm1 [ $+ [ $chan ] ] == on) {
if ($readini(autovoice.ini,n,$chan,$address($nick,2))) {
mode $chan +v $nick
halt
}
else timer 1 2 notice $nick Please PM %pm [ $+ [ $chan ] ] for voice in $chan $+ .
}
}
on *:text:!autovoice*:#: {
if ($2- == $null) { notice $nick Wrong command, to autovoice a nick please type !av (nick) to autovoice every one please use !autuvoice (on/off). | halt }
if ($2- == on) {
if (%autovoice [ $+ [ $chan ] ] == on) { notice $nick The autovoice for [ $+ $chan $+ ] is already on. | halt }
set %autovoice [ $+ [ $chan ] ] on
msg $chan The autovoice for [ $+ $chan $+ ] is now on.
}
if ($2- == off) {
if (%autovoice [ $+ [ $chan ] ] == $null) { notice $nick The autovoice for [ $+ $chan $+ ] is already off. | halt }
unset %autovoice [ $+ [ $chan ] ]
msg $chan The autovoice for [ $+ $chan $+ ] is now off.
}
}
on *:join:#: {
if (%autovoice [ $+ [ $chan ] ] == on) {
mode $chan +v $nick
}
}
on *:text:!av*:#: {
if ($nick isop $chan || $nick ishop $chan) {
if ($readini(autovoice.ini,$chan,n,$address($2,2))) { notice $nick $+ $2 is already on the autovoice list. | halt }
mode $chan +v $2
writeini -n autovoice.ini $chan $address($2,2) autovoice
msg $chan $+ $2 added to the auto voice list.
}
}
on *:text:!deav*:#: {
if ($nick isop $chan) {
mode $chan -v $2
writeini autovoice.ini -ds $chan $address($2,2) autovoice
msg $chan $+ $2 deleted from the auto voice list.
}
}
on *:text:!pm:#: {
notice $nick The pm is set to %pm [ $+ [ $chan ] ]
}
on *:text:!pm*:#: {
if ($2 == $null) { halt }
notice $2 Please pm %pm [ $+ [ $chan ] ] in game for auto voice in $chan $+ .
}
on *:text:@pm:#: {
msg $chan Please pm %pm [ $+ [ $chan ] ] in game for auto voice in $chan $+ .
}