way too much redundancy within the snippet....
you can set the color var like
set %bomb.color $gettok(Red|Blue|Yellow|Green|Pink,$r(1,5),124)
then do the defused part something like this
on $*:TEXT:/^(Red|Blue|Yellow|Green|Pink)$/iS:#:{
if ($nick = %bomb.nick) {
$iif($regml(1) = %bomb.color,.msg # Congrats $&
$+(%bomb.nick,$chr(44)) you defused the bomb!,kick # %bomb.nick 4~~~~14BOOOOOOOM 4~~~~)
.timerbomb off
unset %bomb.*
}
}