This is called regex overkill. You only have to use one $regex with $regml(1) to reference to the match for the calling return. You can get rid of the repetitions by using the grouping method. Your first two regex events can be combined into one as such:
on $*:text:/^[@!.](con)?(grat)?(z|s|gratulations)\s(\b[1-9][0-9]?)\b/Si:#:{
if $lvls($3) {
msg $chan 11,1 ^9/4¤9\4¤9/4¤9\4¤11^ 9CONGRATULATIONS 11 on 4 $2 13 $v1 8 $nick 11^9/4¤9\4¤9/4¤9\4¤11^
}
}
You don't have to repeat $lvls($3) again by using $v1.