Concurso de programación: números romanos

[Tisco]

Es una pena que el concurso sea en CCS, si no participaría.  

Suerte a tod@s!

[Nocturno]

Pásame tu función en C y yo la adapto a CCS si fuera necesario.

Aquí está ya tu participación, Picuino

[Picuino]

Gracias Nocturno.

[Suky]

Y si cambian el macro a:

Código: C

1. #byte TXSTA=0xFAC
2. #bit TRMT=TXSTA.1
3. #byte TXREG=0xFAD
4. #define PUTCH(c)  { while(TRMT==0); TXREG=c;}

 

También se le podria agregar en el macro una linea como set_timer1(0) 

Saludos!

[Nocturno]

También probé eso, Suky, pero se queda enganchado. En cuanto pueda lo monto físicamente, porque estoy casi seguro que va a ser un problema de la simulación.

Lo del set_timer batiría todos los records  ... y justo después sería descalificado

[Nocturno]

Actualizo. He probado el código de Picuino también con MPLAB SIM, del cual me fío bastante más que de Proteus, y también se queda enganchado en el mismo punto.

Intentando ver cómo funciona el putc(), este es el código ASM que genera. No entiendo ASM, pero no veo ninguna escritura en el registro TXREG (0xFAD) en todo ese trozo de código, así que no sé cómo furula, pero creo que ahí está la clave.

Código: ASM

1. 0122    9C94     BCF 0xf94, 0x6, ACCESS
2.   0124    9C8B     BCF 0xf8b, 0x6, ACCESS
3.   0126    0E08     MOVLW 0x8
4.   0128    6E01     MOVWF 0x1, ACCESS
5.   012A    D000     BRA 0x12c
6.   012C    0000     NOP
7.   012E    8E01     BSF 0x1, 0x7, ACCESS
8.   0130    D00E     BRA 0x14e
9.   0132    9E01     BCF 0x1, 0x7, ACCESS
10.   0134    3244     RRCF 0x44, F, ACCESS
11.   0136    B0D8     BTFSC 0xfd8, 0, ACCESS
12.   0138    8C8B     BSF 0xf8b, 0x6, ACCESS
13.   013A    A0D8     BTFSS 0xfd8, 0, ACCESS
14.   013C    9C8B     BCF 0xf8b, 0x6, ACCESS
15.   013E    8C01     BSF 0x1, 0x6, ACCESS
16.   0140    D006     BRA 0x14e
17.   0142    9C01     BCF 0x1, 0x6, ACCESS
18.   0144    2E01     DECFSZ 0x1, F, ACCESS
19.   0146    D7F6     BRA 0x134
20.   0148    D000     BRA 0x14a
21.   014A    0000     NOP
22.   014C    8C8B     BSF 0xf8b, 0x6, ACCESS
23.   014E    0E3F     MOVLW 0x3f
24.   0150    6EE9     MOVWF 0xfe9, ACCESS
25.   0152    2EE9     DECFSZ 0xfe9, F, ACCESS
26.   0154    D7FE     BRA 0x152
27.   0156    0000     NOP
28.   0158    BE01     BTFSC 0x1, 0x7, ACCESS
29.   015A    D7EB     BRA 0x132
30.   015C    BC01     BTFSC 0x1, 0x6, ACCESS
31.   015E    D7F1     BRA 0x142
32.   0160    0012     RETURN 0

[gab163]

Bueno revisando logre conseguir esto espero este bueno te mando el código al correo.



Nocturno, por ahí envié uno con un error pero lo corregir y lo volví a mandar saludos.

[Picuino]

Actualizo. He probado el código de Picuino también con MPLAB SIM, del cual me fío bastante más que de Proteus, y también se queda enganchado en el mismo punto.

Intentando ver cómo funciona el putc(), este es el código ASM que genera. No entiendo ASM, pero no veo ninguna escritura en el registro TXREG (0xFAD) en todo ese trozo de código, así que no sé cómo furula, pero creo que ahí está la clave.

Código: ASM

1. 0122    9C94     BCF 0xf94, 0x6, ACCESS
2.  0124    9C8B     BCF 0xf8b, 0x6, ACCESS
3.  0126    0E08     MOVLW 0x8
4.  0128    6E01     MOVWF 0x1, ACCESS
5.  012A    D000     BRA 0x12c
6.  012C    0000     NOP
7.  012E    8E01     BSF 0x1, 0x7, ACCESS
8.  0130    D00E     BRA 0x14e
9.  0132    9E01     BCF 0x1, 0x7, ACCESS
10.  0134    3244     RRCF 0x44, F, ACCESS
11.  0136    B0D8     BTFSC 0xfd8, 0, ACCESS
12.  0138    8C8B     BSF 0xf8b, 0x6, ACCESS
13.  013A    A0D8     BTFSS 0xfd8, 0, ACCESS
14.  013C    9C8B     BCF 0xf8b, 0x6, ACCESS
15.  013E    8C01     BSF 0x1, 0x6, ACCESS
16.  0140    D006     BRA 0x14e
17.  0142    9C01     BCF 0x1, 0x6, ACCESS
18.  0144    2E01     DECFSZ 0x1, F, ACCESS
19.  0146    D7F6     BRA 0x134
20.  0148    D000     BRA 0x14a
21.  014A    0000     NOP
22.  014C    8C8B     BSF 0xf8b, 0x6, ACCESS
23.  014E    0E3F     MOVLW 0x3f
24.  0150    6EE9     MOVWF 0xfe9, ACCESS
25.  0152    2EE9     DECFSZ 0xfe9, F, ACCESS
26.  0154    D7FE     BRA 0x152
27.  0156    0000     NOP
28.  0158    BE01     BTFSC 0x1, 0x7, ACCESS
29.  015A    D7EB     BRA 0x132
30.  015C    BC01     BTFSC 0x1, 0x6, ACCESS
31.  015E    D7F1     BRA 0x142
32.  0160    0012     RETURN 0

Ese código implementa directamente la escritura de los bits en la salida TX (LATCbits.LATC6 = F8B.6), sin utilizar la USART. A los 8 bits del caracter le añade un bit a cero de comienzo y un bit a uno de finalización.
El problema de esta rutina es que el micro no puede hacer nada mientras se transmite el caracter.

Saludos.

[Nocturno]

Pues entonces ya está todo claro: CCS estaba emulando el puerto serie en vez de utilizar la USART.
Ya lo he resuelto en el programa base y mira cómo queda tu resultado ahora:
http://www.micropic.es/mpforo/index.php?topic=1475.msg7114#msg7114

[Picuino]

Guau
Ahora si que va rápido.

Al final te vas a llevar tú el premio, Nocturno  

Saludos.

[Nocturno]

De momento te gano 

Tengo una rutina que ahorra unos ciclos respecto a la tuya, a pesar de utilizar printf en lugar del txreg.

[Picuino]

Creo que el punto a mejorar en mi programa es comenzar cuanto antes a transmitir el primer caracter, pero no se me ocurre cómo hacerlo.
Quizás con una división de Número y luego utilizar un array con las letras correspondientes...

Por ahora lo dejo como está.

Saludos.

[BrunoF]

Se me ocurren cosas muy locas. Voy a ver si salgo con alguna de ellas.

Saludos!

[Nocturno]

Este es tu resultado, Bruno

http://www.micropic.es/mpforo/index.php?topic=1475.msg7120#msg7120

[BrunoF]

Buuu! Exijo un recuento de ticks! Me ha dado mucho menos en mis pruebas!