Robotica, pequeño tutorial+construccion y desarrollo de minirobot

que función cumple el otro integrado los jumper que están en la placa

con respecto ala configuración es la se toma del pic
ah esto que quiere decir CMCON = 7 ' desactivo el convertidor AD del puerto A
 
Última edición:
bueno, para despejar algunas dudas, subo este diagrama del conexionado del bot. con esto creo que ya se entiende para que esta el 40106 y los jumpers. ah, CMCON = 7 ' desactivo el convertidor AD del puerto A, es porque el puerto A de este pic, tiene comparadores que deben desactivarse para usarlos como entradas digitales.
saludosss, pronto subire mas practicas, no desesperen :D

instructivo.JPG
 
Última edición:
exelente el trabajo d@rio , la verdad tambien lo estoy armando .
si no es mucho pedir podrias por favor poner un ejemplo de como hacerlo un sigue lineas.
otra vez gracias :aplauso:
 
amigo me podría mandar la configuración del cable que se conecta al pc del computador del jdm, ah y como esta eso por allá

saludos

Ok, segun tengo entendido, en uno de los rar que subi, esta el detalle, pero por si acaso no esta, aqui lo subo de nuevo... lamento mucho no poder subir mas info, estoy muy atareado en mi taller... apenas tenga tiempo subo un sigue lineas que ya estoy practicando :)
saludosss.
 

Adjuntos

  • Detalle.JPG
    Detalle.JPG
    60.4 KB · Visitas: 376
Última edición:
los engranajes son reciclados de los mecanismos que vienen con los laser o picup de las lectoras de cd que me quedan en el taller y las ruedas, son de una impresora hp vieja que desarme :D
 
Exelente guía, solo darte las gracias por ese gran trabajo, y por la molestia de hacer esta guía tan completa.
Se ve que eres muy ingenioso, piezas reciclasdas y todo.

Voy a constrir un auto muy similar al tuyo, esta info me sera muy util.
 
tengo un gran problema no me reconoce el dispositivo ni con el winpic800 y menos con el icprog el de este es el mismo proble que hay error 0000h he buscado en los foros y es un problema que abunda intente quemar el led inicia su secuencia pero no sale nada
 
Última edición:
hola diodito.
fijate en las conecciones, podria ser el cable serie o la coneccion desde el jdm al robot. ¿y probaste programar el pic puesto directamente en el jdm? otra cosa, ¿podrias describir los pasos que haces para programar el pic?
saludosss
 
bueno, despues de tanto tiempo, aca les dejo otro ejemplito de bumpers infrarrojos. con este, pude lograr que mi robot entre y salga de un pequeño laberinto improvisado con un par de cosas como radios, cajas y lectoras de dvd rom. tambien dejo unos videos de su funcionamiento. en este caso, les dejo solo el codigo pbp para oligarlos a aprender a compilar jeje :D para los que pidieron un siguelineas, aca tambien dejo un ejemplo en pbp para que experimenten. yo todavia no lo probe, asi que si funciona, me avisan. ah, les cuento que el oscilador con 555 tiene su pin 4 colocado al positivo, por eso, el programa tiene una pequeña diferencia con los otros.
amigo diodito: ¿que pudiste lograr? saludosss

bumper.

Código:
'configuracion de fuses
@ DEVICE MCLR_OFF, INTRC_OSC, WDT_OFF, LVP_OFF, BOD_OFF, PWRT_ON, PROTECT_OFF
 
CMCON = 7                     ' desactivo el convertidor AD del puerto A
TrisA=%11111111               'todo el port A como entrada
TrisB=%00000000               'todo el port B como salida
PORTA = %11111111             'todo el port A en 1
PORTB = %00000000             'todo el port B en 0
ojoder var bit                'variable para guardar el valor de porta.0
ojoizq var bit 
portb = %00000000               'variable para guardar el valor de porta.1
pause 5000                    'espero 5 segundos para empezar
 inicio:
 portb = %00001001            'oscilador encendido motores apagados
 ojoder = porta.0             'ojoder toma el valor de porta.0
 ojoizq = porta.1             'ojoizq toma el valor de porta.1
 IF ojoizq = 1 and ojoder = 0 THEN izq   'si la variable ojoizq es = a 1 gira a la izquierda
 if ojoder = 1 and ojoizq = 0then der   'si la variable ojoder es = a 1 gira a la derecha
 goto inicio
 
der:
PORTB = %00001010 'giro a la derecha 
pause 50          'espero 50 milisegundos
ojoizq = porta.1  'ojoizq toma el valor de porta.1
IF ojoizq = 1 THEN der 'si ojoizq es igual a 1 salta a der
ojoder = porta.0          'ojoder toma el valor de porta.0
IF ojoder = 0 THEN inicio 'si la variable ojoder es = a 0 vuelve a inicio
 goto der                 ' ir a der
 
izq:
PORTB = %00000101   'giro a la izquierda 
pause 50            'espero 50 milisegundos
ojoder = porta.0    'ojoder toma el valor de porta.0
IF ojoder = 1 THEN izq 'si ojoder es igual a 1 salta a izq
ojoizq = porta.1          'ojoizq toma el valor de porta.1
IF ojoizq = 0 THEN inicio 'si la variable ojizq es = a 0 vuelve a inicio
goto izq                  'ir a izq

sigue linea blanca sobre fondo negro

Código:
 'configuracion de fuses
@ DEVICE MCLR_OFF, INTRC_OSC, WDT_OFF, LVP_OFF, BOD_OFF, PWRT_ON, PROTECT_OFF
 
CMCON = 7                     ' desactivo el convertidor AD del puerto A
TrisA=%11111111               'todo el port A como entrada
TrisB=%00000000               'todo el port B como salida
PORTA = %11111100             'todo el port A en 1
PORTB = %00000000             'todo el port B en 0
ojoizq var bit
ojoder var bit
 inicio:
 portb = %00001001            'motores On
 ojoder = porta.0             'ojoder toma el valor de porta.0
 ojoizq = porta.1             'ojoizq toma el valor de porta.1
 IF ojoizq = 1 THEN der   'si la variable ojoizq es = a 1 gira a la izquierda
 if ojoder = 1 then izq   'si la variable ojoder es = a 1 gira a la derecha
 goto inicio
 
der:
PORTB = %00011010         'giro a la derecha y mantengo el 555 encendido
pause 10
ojoder = porta.0          'ojoder toma el valor de porta.0
IF ojoder = 0 THEN inicio 'si la variable ojoder es = a 0 vuelve a inicio
 goto der                 ' ir a der
 
izq:
PORTB = %00010101         'giro a la izquierda y mantengo el 555 encendido
pause 10
ojoizq = porta.1          'ojoizq toma el valor de porta.1
IF ojoizq = 0 THEN inicio 'si la variable ojoder es = a 0 vuelve a inicio
goto izq                  'ir a izq

vista aerea.

camara on board.
 
Última edición:
Has pensado qué tan factible podría ser que la cámara sea inalámbrica ?

(Por supuesto, yo complicándote la vida :D)

jeje... eso hace desde que era un chiquitin que lo vengo pensando. de hecho, tengo una webcam y 2 microcamaras de vigilancia pero lamentablemente, no he podido conseguir un buen transmisor para estas ultimas. todos los que hay en la web, tienen algun detalle para considerar... es por eso que pensaba comprar un kit de vigilancia inalambrico jeje... pero por ahora no puedo.
sera para mas adelante... por cierto... que tan factible podria ser conectar una webcam a un pic con entrada usb???
saludosss
 
Me refiero a los problemas que se presentan para implementar todo desde "cero":
1.- la frecuencia de muestreo necesaria para capturar video (>10 cuadros /seg.),
2.- el recorrido de los pixeles,
3.- el envío por RF, el alcance, la detección, etc.

Si compramos todo hecho no vale !
Para eso pensemos en adaptar un celular directamente.
 
Última edición:
Atrás
Arriba