Muchas gracias Quakes, me sirvió perfecto el código

Y gracias a Hamas por el del 4030A.

Son los mejores.