Comenzando con Mikrobasic

[LordLafebre]

Hola:

Si mal no recuerdo la libreria para los LCD nokia eran solo para pics de la serie 18F, ademas son para pines especificos, si soporta mas pics, tienes que ver la libreria porque creo que se utilizan pines del puerto C............. y en efecto, acabo de ver la libreria y confirmar lo que digo:

'  PORTC,0   -  CS   - Chip Enable
'  PORTC,1   -  RES  - Reset Input
'  PORTC,4   -  SCLK - Serial Clock Input
'  PORTC,5   -  DC   - Data / Command
'  PORTC,6   -  SDA  - Serial Data Input

[dogflu66]

Hola amigos.

Estoy probando LCD8_CONFIG, me compila, pero no funciona el LCD
el mismo programa pero usando LCD_CONFIG, si me funciona

Código: Visual Basic

1. 'Programa de prueba para usar un
2. 'LCD 2x16 caracteres, con 8 bit de datos
3.  
4. '**** Configuracion del LCD para mi antiguo basic y hard
5. 'Define LCD_BITS = 8
6. 'Define LCD_DREG = PORTB
7. 'Define LCD_DBIT = 0
8. 'Define LCD_RSREG = PORTC
9. 'Define LCD_RSBIT = 0
10. 'Define LCD_EREG = PORTC
11. 'Define LCD_EBIT = 4
12. 'Define LCD_RWREG = PORTC
13. 'Define LCD_RWBIT = 1
14.  
15. '**** Programa MKB
16. program LCD_8Bit
17.  
18. trisa=0
19. trisb=0
20. trisc=0
21.  
22. main:
23.      '****** Esto funciona *******
24.     porta.0=0
25.      delay_ms(1000)
26.      porta.0=1
27.      delay_ms(1000)
28.  
29.      '****** Esto no funciona ******
30.     lcd8_config(portc, portb, 0, 1, 4, 7, 6, 5, 4, 3, 2, 1, 0)
31.      lcd8_out(1, 1, "Hello")
32. goto main
33. end.

[navaismo]

Pues estuve probando y tampoco nada paso hice otro y tampoco se vio, estuve leyendo y la ayuda dice esto que creo es donde esta el problema

"Initializes LCD at Control port (ctrlport) and Data port (dataport) with pin settings you specify.

Parameters RS, EN, WR need to be in range 0–7;

Parameters D7 .. D0 need to be a combination of values 0–7 (e.g. 3,6,5,0,7,2,1,4)." oseacreo que combinamos mal las cosas.

[LordLafebre]

Hola:

No creo que sea eso, estube probando yo tambien y el problemas es que ni siquiera compila el mismo ejemplo de la ayuda.  Compilando ese mismo ejemplo tal cual esta en la ayuda da error. 

[navaismo]

mmmm ya decia yo este MKB hace muchos panchos, pues las que he hecho compilan pero no se ven, lo bueno es que la de 4 bits si se ve y nos ahorramos mas pines

[dogflu66]

Parece que es otro fallejo del MKB.
Pero recuerda que el LCD con bus de datos de 4 Pin va mas lento.

[paco1980]

hola a todos, soy nuevo en este foro y me gustaría pediros ayuda.
tengo problemas al montar un 7447, bueno, en realidad es un 74LS47, pero supongo que es lo mismo.He visto el esquema que hay por aqui, pero no consigo hacerlo funcionar.
Es el mismo montaje que tiene puesto lordlafebre con el pic y los displays de 7-segmentos, pero con ese conexionado no consigo que funcione.
¿me podeis dar alguna idea de lo que puede estar fallando?. Muchas gracias.

[LordLafebre]

Hola:

No recuerdo si era de anodo o de catodo comun el display que utilice, revisa en el ejemplo de que tipo se esta utilizando, puede que estes utilizando el display de otro tipo.

[LordLafebre]

Hola:

Una cosa mas, me gustaria que pongas el enlace al esquema que estas montando, si son los de proteus, recuerda que en él no aparecen los pines de VCC y GND de los circuitos integrados, asi que ten en cuenta conectar el pin 7 del 7447 a Gnd y el 14 a VCC.

[Trust]

Hola, saludos a todos los usuarios, me he acabado de registrar en este gran foro que acumula cantidad de sabiduria.

Estoy mirando ejemplos sencillos de encender un led y ya se encender/apagar a la velocidad que yo quiero. Ahora me interesa mucho saber como hacer para que un led se encienda poco a poco creo que se hace mediante pwm.

Pues he probado el ejemplo que sale en el Mikrobasic que se puede encontrar buscando en la ayuda: "pwm", salen 2 resultados pues el segundo explica como encender poco a poco un led utilizando un pic18F452. Yo tengo 2 pics 16F628 y 1 pic16F876 que es el que estoy usando ahora porque tiene puerto C.

Código: [Seleccionar]


program Pwm_Test
dim j as byte

main:
  j = 0
  PORTC = $FF           ' Initialize PORTC
  Pwm_Init(5000)        ' Initialize PWM module, freq = 5kHz.
  Pwm_Start             ' Start PWM

  while true
    for i = 0 to 20
      Delay_us(500)
    Inc(j)
    Pwm_Change_Duty(j)  ' Change duty ratio
  wend
end.



He montado bien el circuito pero en vez de usar el PIC18F452 he usado el PIC16F876, he cambiado los pines para adaptar el circuito al pic16F876, tambien he puesto he puesto bien en el MKB el tipo de pic y el reloj, me compila bien, tengo bien configurado el Winpic800 y me graba bien el pic porque tambien he probado otras cosas  como encender/apagar led y esta comprobado que me lo ha grabado bien.

Espero una ayudita de este maravilloso foro.

Saludos.

[paco1980]

mis displays son de catodo comun. sc56-11ewa.
he visto que el 7447 tiene las salidas negadas. Pero aparte de eso, conectando solo el 7447 no consigo obtener mas de 0,5voltios en ninguna de sus salidas.
¿como se configuran LT, BI, RBI?
¿Son compatibles los displays?
a ver si se te ocurre que puedo estar haciendo mal.
"cosas de principiantes".
Gracias y un saludo.

NOTA: vcc y gnd estan el los pines 16 y 8 respectivamente.

[LordLafebre]

Hola:

Pues el 7447 es para displays de anodo comun, pero si estas conectando bien todo, deberias ver al reves los valores, es decir si el uno ves el segmento b y c encendido cuando esta bien, con ese debes ver solo apagado el segmento b y c. 

[LordLafebre]

Hola:

mira, te pongo por aqui un ejemplo:

Código: FreeBasic

1. 'Giovanni Lafebre
2. 'Cuenca - Ecuador
3.  
4. pos var byte
5. Seg var word
6.  
7. TRISB=%00000000
8. PORTB=0
9. TRISA.0=%1
10. seg=1000
11.  
12. loop:
13.     for pos=0 to 9
14.         PORTB=pos
15.         pause seg
16.     next pos
17.     seg=seg-100
18.     if seg<100 then
19.         seg=1000
20.     endif
21.     goto loop
22. end

Y por favor, para no mezclar los temas, si te surge otra duda, no lo hagas en este tema que trata sobre Mikrobasic, sino hazlo en donde viste el diagrama que me decias que estabas montando, esto para mantener el orden por favor. 

[paco1980]

Gracias lord por todo, ya se solucionó cambiando el display por uno de anodo común.
Con uno de cátodo común no se puede ver nada, debido a que el 7447 está preparado para lógica negada, y por lo tanto, la señal que saca por los pines a nivel alto no es suficiente para prender un display.

Un saludo.

[Flugplatz]

..... He montado bien el circuito pero en vez de usar el PIC18F452 he usado el PIC16F876, he cambiado los pines para adaptar el circuito al pic16F876, tambien he puesto he puesto bien en el MKB el tipo de pic y el reloj, me compila bien, tengo bien configurado el Winpic800 y me graba bien el pic porque tambien he probado otras cosas  como encender/apagar led y esta comprobado que me lo ha grabado bien.

Espero una ayudita de este maravilloso foro.

Saludos.

Esperas una ayudita ahora, o en el futuro ... perdona, pero al final, no entiendo si te ha funcionado o no. El 16f876 te vale perfectamente. La serie 16f87x tienen dos módulos CCP, y por lo tanto dos salidas , C1 y C2. Lo único que tienes que tener en cuenta es que la frecuencia que pones en el Pwm_Init,  esté entre los rangos permitidos para el cristal del circuito ... en el apartado PWM del datasheet te viene la fórmula para comprobarlo.