this:

        var %wild.color = $r(1,4)
        if (%wild.color == 1) {
          msg %unochan co r
        }
        if (%wild.color == 2) {
          msg %unochan co y
        }
        if (%wild.color == 3) {
          msg %unochan co g
        }
        if (%wild.color == 4) {
          msg %unochan co b
        }
        goto END
      }

is the exact same thing as this:

        msg %unochan co %wild.color = $mid(rygb,$r(1,4),1)
        goto END
      }