Sida 1 av 4

Robot, Servo o ir

Postat: 23 januari 2005, 15:13:49
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

Postat: 23 januari 2005, 15:14:46
av strombom
Vad har du för typ av ir-mottagare ?

/Johan

Postat: 23 januari 2005, 15:25:34
av Jine
75-303-89

Postat: 23 januari 2005, 15:30:44
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

Postat: 23 januari 2005, 15:32:32
av Jine
Hmm mer som hinderdetekterin då men ja..nåra tips på kod?

Postat: 23 januari 2005, 15:34:40
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

Postat: 23 januari 2005, 15:41:50
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

Postat: 23 januari 2005, 15:43:38
av strombom
Jag är inte heller så haj på pbasic, har du ingen referensmanual?

/Johan

Postat: 23 januari 2005, 15:45:55
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/

Postat: 23 januari 2005, 15:54:37
av $tiff
Min projektrapport kanske kan ge lite tips.

Postat: 23 januari 2005, 16:00:30
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 :)

Postat: 23 januari 2005, 16:05:56
av strombom
Ja koden ser bra ut, men innan du testar den tycker jag att du ska verifiera sensorerna med en multimeter.

/Johan

Postat: 23 januari 2005, 16:07:30
av strombom
Hur ska du pulsa ut ir-ljuset med 38kHz ? Mjukvara eller hårdvara?

/Johan

Postat: 23 januari 2005, 16:16:56
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?

Postat: 23 januari 2005, 16:40:13
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