Bot color changer
Platform: mIRC
Published Jun 20, 2011
Updated Jan 18, 2012
A simple bot color changer to use type
!color 0 - 15
you will need to put $read(color.txt, s, $chan) after each msg $chan
on *:LOAD: {
echo -s 3you have just loaded toclafane's color changer
echo -s 3to use type !color 0 - 15
}
On $*:Text:/^(!theme|!color)/Si:#:{
if ($nick($chan,$nick,@&~)) {
if ($2 == $null) {
msg $chan $read(color.txt, s, $chan) $+ Please use: !theme [color] E.g !theme 3
msg $chan $read(color.txt, s, $chan) $+ My color themes are: ( $+ 0 0 1 1 2 2 3 3 4 4 5 5 6 6 7 7 8 8 9 9 10 10 11 11 12 12 13 13 14 14 15 15 $read(color.txt, s, $chan) $+ )
msg $chan $read(color.txt, s, $chan) $+ To reset $me $+ 's color theme for $chan use: !theme 0
}
else {
write -ds $chan color.txt
write color.txt $chan $+ $2-
msg $chan $read(color.txt, s, $chan) $+ $+ $nick $+ , your new color theme will look like this in $chan
}
}
else msg $chan $read(color.txt, s, $chan) $+ Sorry $nick $+ , you cannot use this command.
}