Robot, Servo o ir

Robot, CNC, Pneumatik, Hydraulik, mm
Användarvisningsbild
Jine
Inlägg: 1795
Blev medlem: 21 juli 2004, 20:25:56
Skype: Jim.Nelin
Ort: Trångsund, Stockholm
Kontakt:

Robot, Servo o ir

Inlägg av Jine »

Sitter just nu med min lilla robot famnen o klurar på hur FAEN man ska koppla så den väjar för hinder..

Den är konstruerad med 2 st servo (servo_l och servo_r)
den styrs av en Pic6f877a+20mhz kristall


För det första.. Hur kopplar irmottagarna in? outpinnen till valfri i/o lr? och sedan 5v in +gnd?

För det andra hur skriver man i picbasic för att den ska detektera saker?

Dvs pulsa ut till IR ledsen och ta emot med mottagaren?

Väldigt tacksam i förskott!

Mvh Jim
Användarvisningsbild
strombom
Inlägg: 3305
Blev medlem: 27 maj 2003, 10:50:20
Ort: Västra Götaland
Kontakt:

Inlägg av strombom »

Vad har du för typ av ir-mottagare ?

/Johan
Användarvisningsbild
Jine
Inlägg: 1795
Blev medlem: 21 juli 2004, 20:25:56
Skype: Jim.Nelin
Ort: Trångsund, Stockholm
Kontakt:

Inlägg av Jine »

75-303-89
Användarvisningsbild
strombom
Inlägg: 3305
Blev medlem: 27 maj 2003, 10:50:20
Ort: Västra Götaland
Kontakt:

Inlägg av strombom »

Har du tänkt att ha en sån som avståndsmätare? Det blir nog svårt men det "går" väl...

I varje fall, en sån sensor kopplar man in på GND, VCC och utgången kopplas helt enkelt till en vanlig ingång på PIC:en

Bild

/Johan
Senast redigerad av strombom 23 januari 2005, 15:34:27, redigerad totalt 2 gånger.
Användarvisningsbild
Jine
Inlägg: 1795
Blev medlem: 21 juli 2004, 20:25:56
Skype: Jim.Nelin
Ort: Trångsund, Stockholm
Kontakt:

Inlägg av Jine »

Hmm mer som hinderdetekterin då men ja..nåra tips på kod?
Användarvisningsbild
strombom
Inlägg: 3305
Blev medlem: 27 maj 2003, 10:50:20
Ort: Västra Götaland
Kontakt:

Inlägg av strombom »

du kanske borde använda en sån här istället: http://www.swcab.nu/cgi-bin/store/comme ... uct=sensor

tips på kod för din ir-detektor:
vänta på att sensoringången blir en nolla ...

/Johan
Användarvisningsbild
Jine
Inlägg: 1795
Blev medlem: 21 juli 2004, 20:25:56
Skype: Jim.Nelin
Ort: Trångsund, Stockholm
Kontakt:

Inlägg av Jine »

hmm ok.. typ

if sensor_l = 0 then goto moveright

moveright:
koden för höger servo

? lr?

Är inte så hajj på pbasic
Användarvisningsbild
strombom
Inlägg: 3305
Blev medlem: 27 maj 2003, 10:50:20
Ort: Västra Götaland
Kontakt:

Inlägg av strombom »

Jag är inte heller så haj på pbasic, har du ingen referensmanual?

/Johan
Användarvisningsbild
Jine
Inlägg: 1795
Blev medlem: 21 juli 2004, 20:25:56
Skype: Jim.Nelin
Ort: Trångsund, Stockholm
Kontakt:

Inlägg av Jine »

nää tyvär.. :S men men ja grejjar nog de :P får köra hälften brunnet hälften vunnet ;)


edit.. HIHI :D http://www.microengineeringlabs.com/res ... pbpmanual/
Användarvisningsbild
$tiff
Inlägg: 4941
Blev medlem: 31 maj 2003, 19:47:52
Ort: Göteborg
Kontakt:

Inlägg av $tiff »

Min projektrapport kanske kan ge lite tips.
Användarvisningsbild
Jine
Inlägg: 1795
Blev medlem: 21 juli 2004, 20:25:56
Skype: Jim.Nelin
Ort: Trångsund, Stockholm
Kontakt:

Inlägg av Jine »

Stiff, tror jag kan den utantill :P Men har kodat lite.. ska testa snart..

Nån som tror detta kan fugera?

Kod: Markera allt

'-----------------------------------------------------------------' 
'   Servo Kontroller (C) Copyright Jim Nelin                      ' 
'   Alla rättigheter reserverade                                  ' 
'   Date: 2005-01-23                                              ' 
'-----------------------------------------------------------------' 
Input PORTB.4
Input PORTB.5


L_Servo       VAR   PORTB.0
R_Servo      VAR    PORTB.1                      
L_Irmottagare      VAR    PORTB.4
R_Irmottagare      VAR    PORTB.5
'-----------------------------------------------------------------' 
'-----------------------------------------------------------------' 

main: 
IF L_Irmottagare Then moveright
IF R_Irmottagare Then moveleft
GoTo main

moveright:
Pause 20 
High R_Servo 
Pause 1 
Low R_Servo
Pause 20 
GoTo main

moveleft:
Pause 20 
High L_Servo 
Pause 1 
Low L_Servo
Pause 20 
GoTo main 
Dax o leta motstånd till irdioderna :)
Användarvisningsbild
strombom
Inlägg: 3305
Blev medlem: 27 maj 2003, 10:50:20
Ort: Västra Götaland
Kontakt:

Inlägg av strombom »

Ja koden ser bra ut, men innan du testar den tycker jag att du ska verifiera sensorerna med en multimeter.

/Johan
Användarvisningsbild
strombom
Inlägg: 3305
Blev medlem: 27 maj 2003, 10:50:20
Ort: Västra Götaland
Kontakt:

Inlägg av strombom »

Hur ska du pulsa ut ir-ljuset med 38kHz ? Mjukvara eller hårdvara?

/Johan
Användarvisningsbild
Jine
Inlägg: 1795
Blev medlem: 21 juli 2004, 20:25:56
Skype: Jim.Nelin
Ort: Trångsund, Stockholm
Kontakt:

Inlägg av Jine »

Vadå verifiera? kolla att dom fugerar?

ang ir ljuset.. har hört nånstans att det inte går o gå så lågt som 38khz med en 20mhz kristall så ja tänkte köra med en liten oberoende pic16f84a eftesom ja har oändligt av dom :)

Förresten.. vart osäker nu.. hur skapar man pulser med "exakt" 38khz?
Användarvisningsbild
strombom
Inlägg: 3305
Blev medlem: 27 maj 2003, 10:50:20
Ort: Västra Götaland
Kontakt:

Inlägg av strombom »

Klart det går att få så låga frekvenser med en 20MHz kristall.

Verifiera, ja jag menar att du borde kolla hur den beter sig, annars är det så lätt att man inte får igång den och bara blir irriterad. :)

/Johan
Skriv svar