AutoCad - Lisp que numera con letras

Buenas,
Modificando la genial Lisp numera21, he creado una que numera con letras. Pero tengo un problema, el 0.

Osea, numera con letras no contemplamos los 0 ( 10, 20, 1007, etc) y como funciona cambiando a base 27 y luego sustituyendo cada dígito por las letras del abecedario, la A debe ser el 1 la B El 2.... Y el ¿0?

Entonces escribe: A B C...... W X Y Z A0 AA AB AC.... ZZZ A000 A00A.....

Hola a todos otra vez.

ya he solucionado el inconveniente de los 0.

con el siguiente codigo, le digo que si el numero es multiplo de 27, de 27^2 o de 27^3, (los posibles numeros con 0) pase al siguiente sin 0


Básicamente es como decirle," si tienes un 0 en las unidades, suma 1; si tienes un 0 en las "decenas" ( o como se llamen en base 27) suma 27 y si tienes un 0 en las "centenas" ( igual, no son centenas pero ya me entendéis) suma 27*27)

un poco básico todo, pero funciona muy bien y con esto ya puedo numerar usando letras hasta mas de 30.000 que en letras solo ocupa 4 digitos (33023=ARHB).

Buena Juanma. Esta centencia que agregaste. Se carga remplazando el renglon 5?

Lo siento, no entiendo bien tu pregunta. Aunque ese codigo que subí es solo la parte que "elimina los 0 " Para que detras de la Z salga AA y no A0 o 0A.

Aclarame cual es tu pregunta y estaré encantado de ayudarte

Puedes compartir la rutina modificada?, será de mucha utilidad.
Gracias.

Buenos días, aquí os dejo la rutina, espero que os sea de utilidad.

• numeraLETRAS3.zip(1,7 KB)