Something

on *:TEXT:!addcred*:#vhosts: {
  if (%vri. [ $+ [ $nick ] ] > 1) && ($2 isnum) && (%v. [ $+ [ $3 ] ] ) || (%vri. [ $+ [ $nick ] ] >= 2) && ($2 isnum) && (%v. [ $+ [ $3 ] ] == 0) {
    inc %v. [ $+ [ $3 ] ] $2
    msg $chan 3Credits increased by $2 for $3 $+ .
    halt
  }
  if ($2 >= 10000) && (%vri. [ $+ [ $nick ] ] > 1) && ($2 isnum) && (%v. [ $+ [ $3 ] ] ) || ($2 >= 10000) && (%vri. [ $+ [ $nick ] ] >= 2) && ($2 isnum) && (%v. [ $+ [ $3 ] ] == 0) ) {
    msg $chan 3Credit exceeded 10000 limit, setting new credit type.
    msg $chan 3Credit status set to "unlimited " for $3
    set %v. [ $+ [ $3 ] ] Unlimited
    halt
  }
  if (%vri. [ $+ [ $nick ] ] <= 2) {
    msg $chan 3You do not have the required level to add credit!
    halt
  }
  else {
    msg $chan 3Invalid format.
  }
}