TODOPIC

Microcontroladores PIC => Lenguaje Basic para microcontroladores PIC => Mensaje iniciado por: morfeus en 19 de Agosto de 2005, 17:10:00

Título: Excelente!
Publicado por: morfeus en 19 de Agosto de 2005, 17:10:00
Primero que todo un saludo a todos los que integran este foro, he adquirido el PICBASIC PRO y me encuentro con esta magnifica página, aunque estoy comenzando a programar en PICBASIC tengo muchos deseos de aprender y por supuesto de colaborar con temas interesantes al foro.

De antemano les doy las gracias a cada integrante por la ayuda que en un momento dado me puedan dar.


Nuevamente gracias


Saludos

Morfeus
Título: RE: Excelente!
Publicado por: RGL en 06 de Septiembre de 2005, 14:19:00
Bienvenido,

estás en tu casa

Saludos,
Ricky
Título: RE: Excelente!
Publicado por: LordLafebre en 07 de Septiembre de 2005, 00:13:00
Hola:

Me uno a la Bienvenida de Ricky...

Todas las sugerencias y comentarios son bienvenidas.....
Título: RE: Excelente!
Publicado por: ruben_burrito en 08 de Septiembre de 2005, 17:22:00
apoyo la postura de los demas y hay que hechar ganas al asunto

saludosSonrisa Gigante
Título: RE: Excelente!
Publicado por: morfeus en 10 de Septiembre de 2005, 16:21:00
Hola a todos,

Pues que bueno que pensemos de esta manera.

Tengo una inquietud, quiero contar por ejemplo 15 pulsos en RB0 y una vez contados se encienda un led en RB7, alquien me puede dar una idea o algun codigo de ejemplo.

morfeus
Título: RE: Excelente!
Publicado por: olotill en 10 de Septiembre de 2005, 18:33:00
Hola..

Este ejemplo es sencillo, lo unico que tendrias que hacer es hacer un lazo for para las repeticiones y una vez terminado enciendes el led, y si deseas despues de un tiemop lo apagas, aca un codigo rapido y sencillo:


cont var byte
led var portb.7
pulsos var portb.0

inicio:
   for cont=1 to 15         ;este es el número de pulsos que quieras dar
         high pulsos
         pause 500            ;este es el tiempo que quieres tener el pulso en alto 0.5 s
         low pulsos
         pause 500            ;este es el tiempo que quieres tener el pulso en bajo 0.5 s
  next
  pause 200                   ;tiempo de espera antes de encender el led 0.2 s
  high led                       ;enciende el led
goto inicio
End

Listo con este programa te contara los quince pulsos y te enciende el led pero este se queda encendido, para apagarlo despues de un tiempo solo tendrías que poner un pause del tiempo que desees tenerlo prendido y luego lop apadas con low...




cont var byte
led var portb.7
pulsos var portb.0

inicio:
   for cont=1 to 15         ;este es el número de pulsos que quieras dar
         high pulsos
         pause 500            ;este es el tiempo que quieres tener el pulso en alto 0.5 s
         low pulsos
         pause 500            ;este es el tiempo que quieres tener el pulso en bajo 0.5 s
  next
  pause 200                   ;tiempo de espera antes de encender el led 0.2 s
  high led                       ;enciende el led
  pause 1000                 ;espera 1 segundo antes de apagarse
  low led
goto inicio
End


Listo eso es todo, espero haberte ayudado yo tambien ando aprendiendo bien este soft en basic, que es bastante sencillo, aunque manejo mucho mas el BASCOM AVR para Atmel, que tambien va muy bien...

Bueno saludos desde EcuadorRebotado
Título: RE: Excelente!
Publicado por: morfeus en 11 de Septiembre de 2005, 19:51:00
Muchas gracias ollotil por tu respuesta, voy a hacer los ensayos.

morfeus
Título: RE: Excelente!
Publicado por: morfeus en 11 de Septiembre de 2005, 19:55:00
Hola olotill,

De que manera puedo almacenar el conteo en la eeprom del pic, esto con el fin de que si se desconecta "recuerde" el conteo y una vez finalizado encianda el led.

Gracias
Título: RE: Excelente!
Publicado por: LordLafebre en 11 de Septiembre de 2005, 20:32:00
Hola:

Puedes escribir en la eeprom con WRITE Address,Value, y leer con
READ Address,Var
Título: RE: Excelente!
Publicado por: LordLafebre en 11 de Septiembre de 2005, 21:05:00
Hola:

ya te puse un ejemplo en el otro post revisalo y me cuentas...