Hey
Ok so I think I have managed to do what you have asked for and I have added a play feature to show you the current ban list. It uses the /play command so it will not have your bot kicked for flooding.
First of all in your mIRC directory folder create a new folder called QuoteScript and then upload the script to your mIRC. This will then place all ban lists and Quotes for review in the folder called QuoteScript (will keep your mIRC tidy).
Remember to change the NICKNAME to your IRC nickname.
Commands are:
!banuser nickname - Bans a nickname
!delban nickname - Removes ban for the nickname
!showbans - Will show all names in the ban list (This will only show to you and no-one else.
!addquote quote - Adds quote to review file.
on *:Text:*!banuser*:#: {
if ($1 == !banuser) && ($nick == NICKNAME) {
if ($2 == $null) { .notice $nick Command incomplete. Syntax: %c $+ !banuser <nick> | halt }
if ($2 !== $null) {
if ($2 == $me) { .notice $nick I will not add myself. | halt }
if ($readini(QuoteScript\Banned.ini, $2, Level) !== $null) { .notice $nick $2 is already in the quotes ban list. | halt }
else {
.writeini -n QuoteScript\Banned.ini $2 Level Banned
.write QuoteScript\BanList.txt $2
.notice $nick You have banned $2 from adding quotes
}
}
}
}
on *:text:*!delban*:#: {
if ($1 == !delban) && ($nick == NICKNAME) {
if ($2 == $null) { .notice $nick Command incomplete. Syntax: %c $+ delban <nick>. | halt }
if ($2 !== $null) {
if ($2 == $me) { .notice $nick I'm not listed on that list :). | halt }
if ($readini(QuoteScript\Banned.ini, $2,Level) == $null) { .notice $nick $2 doesn't appear to be on the ban list. | halt }
else {
.remini QuoteScript\Banned.ini $2
.write -dl,$2 QuoteScript\BanList.txt
.notice $nick $2 has been removed from my quotes ban list.
}
}
}
}
on *:text:*!showbans*:#: {
if ($1 == !showbans) && ($nick == NICKNAME) {
if ($1 == $null) { .notice $nick Command incomplete. Syntax: %c $+ !showbans | halt }
if ($exists(QuoteScript\BanList.txt) == $false) { .notice $nick Sorry but there are no banned names to show. | halt }
else {
.notice $nick The following people have been banned from adding quotes.
.play -n $nick QuoteScript\Banned.txt
}
}
}
on *:TEXT:!addquote*:#:{
if ($readini(QuoteScript\Banned.ini, $nick, Level) !== $null) { .notice $nick Sorry you can not add a quote as you have been banned. }
else {
.write QuoteScript\QuotesReview.txt $nick : $2- } { msg $chan Your quote has been added for review }
}