[Inny] Platforma robota sterowana przez bluetooth - V2
Autor Wiadomość
Kaytec 




Posty: 196
Pomógł: 9 razy
Otrzymał 49 piw(a)
Skąd: Olsztyn
Wysłany: 05 Lut 10 12:50   [Inny] Platforma robota sterowana przez bluetooth - V2



Witam, przedstawiam wam zmodyfikowaną wersję platformy. Poprzednią znajdziecie klikając tutaj .

Zmiany w stosunku do pierwszej wersji:

Nazwa: T102 - bez zmian

Dodano:


- Lcd 2x16
- Słuchawkę bluetooth (Nokia BH-101)
- Czujnik refleksyjny (Baumer Electric)
- Źródło światła (lampa 5 LED)
- Kontrolki stanu dekodera (4 Led czerwone, 1 Led niebieska)
- Włączniki (2sztuki - elektronika, silniki)
- Obudowa
- Mocowanie krótkofalówki

Zmieniono:
- Rozmieszczenie elementów
- Program












Co do sterowanie przez bluetooth odbywa się ono za pomocą standardowego dźwięku klawiatury w nokii 5530. Ze słuchawki bluetooth wyprowadzono dwa przewody od głośnika w niej zawartego. Służą one do podłączenia do nadajnika dalekiego zasięgu lub bezpośrednio do robota. Zasięg bluetooth to około 10-15 metrów. Krótkofalówki 5km.

Koszt takiego sterowanie przez bluetooth wynosi około 30zł. Słuchawka 20pln, dekoder z procesorem 10pln. Dużo taniej niż specjalistyczne odbiorniki bluetooth, które nie są łatwe w oprogramowaniu.



Standardowo poniżej program. Schemat tak jak w programie i poprzedniej wersji.

Kod:
$regfile = "Attiny2313.dat"
$crystal = 8000000                                          'określenie uC

Config Lcdpin = Pin , Db4 = Portb.5 , Db5 = Portb.6 , Db6 = Portd.0 , Db7 = Portb.7 , E = Portd.1 , Rs = Porta.0
Config Lcd = 16 * 2

 Deflcdchar 0 , 12 , 4 , 4 , 6 , 12 , 4 , 14 , 32           ' Określenie litery Ł



Config Portb.4 = Input
Config Portb.3 = Input
Config Portb.2 = Input
Config Portb.1 = Input
Config Portb.0 = Input
Config Portd.6 = Input
Config Portd.2 = Output
Config Portd.3 = Output
Config Portd.4 = Output
Config Portd.5 = Output
Config Porta.1 = Output
Config Porta.0 = Output



Motor_lp Alias Portd.2                                      'Określenie portów sterujących silnikami przez mostek
Motor_lt Alias Portd.3
Motor_pp Alias Portd.4
Motor_pt Alias Portd.5
                                                           'Określenie portów wejściowych (dekoder)
Sygnal Alias Pinb.3
A Alias Pinb.2
B Alias Pinb.1
C Alias Pinb.0
D Alias Pind.6
Podloga Alias Pinb.4

Pina.1 = 1

          'Polecenia

          Cursor Off

Cls                                                         ' Komunikat początkowy
  Lcd "Gotowy do pracy"


                                                             'Pętla główna


Do

If Podloga = 0 Then
      Gosub Przepasc

  Elseif Sygnal = 1 And A = 0 And B = 0 And C = 1 And D = 0 Then
      Gosub Prosto

     Elseif Sygnal = 1 And A = 0 And B = 1 And C = 1 And D = 0 Then
      Gosub Prawo


    Elseif Sygnal = 1 And A = 0 And B = 1 And C = 0 And D = 0 Then
      Gosub Lewo



    Elseif Sygnal = 1 And A = 1 And B = 0 And C = 0 And D = 0 Then
      Gosub Tyl



      Elseif Sygnal = 0 Then
      Gosub Stopp


      Elseif Sygnal = 1 And A = 1 And B = 0 And C = 1 And D = 1 Then
      Gosub Latarka

            Elseif Sygnal = 1 And A = 1 And B = 1 And C = 0 And D = 0 Then
      Gosub Latarkaoff








   End If
Loop


Prosto:                                                     'Tryby pracy silników dla poszczególnych ruchów i wyświetlane komunikaty

Motor_lt = 1
Motor_pt = 0
Motor_pp = 1
Motor_lp = 0

Cls

Lcd "Do przodu      2"
Lowerline
Lcd ""



Return

Lewo:
Motor_lt = 1
Motor_pt = 1
Motor_pp = 0
Motor_lp = 0

Cls
Lcd "W lewo         4"
Lowerline
Lcd ""


Return
Prawo:
Motor_lt = 0
Motor_pt = 0
Motor_pp = 1
Motor_lp = 1

Cls
Lcd "W prawo        6"
Lowerline
Lcd ""


Return
Stopp:
Motor_lt = 0
Motor_pt = 0
Motor_pp = 0
Motor_lp = 0
Return

Tyl:

Motor_lt = 0
Motor_pt = 1
Motor_pp = 0
Motor_lp = 1

Cls
Lcd "Do Ty"
Lcd Chr(0)
Lcd "u        8"
Lowerline
Lcd ""
Return

Latarka:                                                    'Podprogramy latarki
Cls
Lcd "   Swiat"
Lcd Chr(0)
Lcd "o"
Lowerline
Lcd "   w"
Lcd Chr(0)
Lcd "aczone"
Porta.1 = 0

Return

Latarkaoff:
Cls
Lcd "    Swiat"
Lcd Chr(0)
Lcd "o"
Lowerline
Lcd "   wy"
Lcd Chr(0)
Lcd "aczone"
Porta.1 = 1
Return
                                                                                    'podprogram wykrycia braku podłoża

Przepasc:

Cls
Lcd "    NIE JADE!"
Lowerline
Lcd "   Za wysoko!"

 Motor_lt = 0
Motor_pt = 1                                                'zatrzymanie i cofanie
Motor_pp = 0
Motor_lp = 1

Wait 1

Motor_lt = 0
Motor_pt = 0
Motor_pp = 0
Motor_lp = 0

Waitms 500

Return


Pozdrawiam.

IMG_4b6b5919b5ac54136.jpg
Plik ściągnięto 361 raz(y) 552,47 KB


Come with me if you want to live.
Postaw piwo autorowi tego posta
 
 
 
Więcej szczegółów
Wystawiono 9 piw(a):
qamil888, Mihau, KD93, mario166, Nawyk, feriar, deft, Gnat_89, lapfactor
sobal44 




Posty: 120
Pomógł: 4 razy
Otrzymał 13 piw(a)
Skąd: Gostyń
Programuję w:
C

Wysłany: 05 Lut 10 06:33   

Bardzo ładna konstrukcja :) , pełen szacun.

Postaw piwo autorowi tego posta
 
 
 
Mihau 




Posty: 676
Pomógł: 13 razy
Otrzymał 37 piw(a)
Skąd: Łódź
Programuję w:
C++

Wysłany: 05 Lut 10 08:46   

Hehe, nareszcie bluetooth dla zielonych!
Pozdr.


Na biurku:
1. LFr --> programowanie, ostatnie luty
2. Czujnik RGB --> koncepcja, projekt
Postaw piwo autorowi tego posta
 
 
 
KD93 



Posty: 645
Pomógł: 18 razy
Otrzymał 48 piw(a)
Skąd: Siemianowice Śląskie
Programuję w:
BASCOM

Wysłany: 05 Lut 10 12:17   

Twój T102 jest super :) Jeszcze chwytaka mu brakuje. Ale mam dwa pytania:

-czy nie lepiej byłby położyć krótkofalówkę "na płasko"?
-dlaczego Twój robot nie radzi sobie z taką wysokością, jaka jest na filmiku ("Nie jadę! Za wysoko")? Przecież jest na gąsienicach, nie powinien się "zawiesić".


Moje roboty:
"Prototyp nr.1" , "Urwis"
"Bajtel 2"
Postaw piwo autorowi tego posta
 
 
 
swierkdeck 




Posty: 116
Pomógł: 2 razy
Otrzymał 7 piw(a)
Skąd: Warszawa
Programuję w:
asm,c,bas

Wysłany: 05 Lut 10 12:49   

-Czy nazwa T102 ma jakiekolwiek powiązanie z Rudym 102? :-D

Postaw piwo autorowi tego posta
 
 
 
mario166 



Posty: 6
Skąd: Rzeszów
Wysłany: 05 Lut 10 02:15   

Bardzo pomysłowy projekt. Super.
Sterowanie ile może mieć "kanałów"? Rozumiesz o co mi chodzi, bo z tego co ja policzyłem to 12 bo masz 12 klawiszy w telefonie chyba ze można nie tylko za pomoca klawiszy generowac sygnał.

Postaw piwo autorowi tego posta
 
 
profesorek 



Posty: 85
Pomógł: 1 raz
Otrzymał 4 piw(a)
Skąd: pcb
Ostrzeżeń:
 3/3/4
Wysłany: 05 Lut 10 02:26   

Czy mógłby pan zamieścić schemat i w jaki sposób jest to sterowanie zrobione? Jak można to zrobić na słuchawce?

__________
Komentarz dodany przez: Sabre
Profesorek przestań wszystkim na Pan pisać! To jest forum, to jest moje ostatnie słowne ostrzeżenie dla ciebie. Jeśli jeszcze raz zobaczę "pan" w twoim poście dostaniesz 3 ostrzeżenie.


Jeśli Byłem pomocny postaw Piwo.
Zapraszam na moją stronę i Forum http://www.diymajsterkowanie.republika.pl
Postaw piwo autorowi tego posta
 
 
Nawyk 
AiR PW




Posty: 852
Pomógł: 40 razy
Otrzymał 162 piw(a)
Skąd: Warszawa
Programuję w:
C, BASIC

Wysłany: 05 Lut 10 03:17   

Zastanawia mnie jeden drobiazg -
Cytat:

Lcd " Swiat"
Lcd Chr(0)
Lcd "o"

To pierdoła, ale można to zapisać po prostu
Cytat:
Lcd " Swiat";Chr(0);"o"

czy nawet
Cytat:
Lcd spc(4);"Swiat";Chr(0);"o"

Ostatnio sporo dłubałem w lcd, dlatego zwróciłem uwagę;) No chyba, że tak miało być ;)
Szacun i piwo za konstrukcję!


Bocznica
Ostatnio zmieniony przez Nawyk 05 Lut 10 03:18, w całości zmieniany 1 raz  
Postaw piwo autorowi tego posta
 
 
Kaytec 




Posty: 196
Pomógł: 9 razy
Otrzymał 49 piw(a)
Skąd: Olsztyn
Wysłany: 05 Lut 10 04:44   

@Nawyk - efekt jest taki sam
@profesorek - Link do schematu Jest w pierwszym zdaniu!
@mario166 - tak jak wyżej, wszystko jest opisane w poprzedniej prezentacji bez sensu kopiować jeszcze raz to samo.

@KD93 - W poprzedniej wersji leżała na płasko, i narzekali że lepiej pionowo bo antena przystosowana do pionowej pracy. Jest pionowo narzekają że nie wjedzie pod łóżko ;) .

Co do wysokości czujnik ma regulowaną optykę, to jest już nieosiągalny pułap - grozi dachowaniem, urwaniem czegoś itp. A po to jest czujnik żeby chronić konstrukcję która pokazuje tylko możliwości sterowania. Dzięki czujnikowi mogę też nazywać projekt robotem zdalnie sterowanym - pomimo że ktoś nim kieruje, sam może anulować działanie jeżeli grozi to jego uszkodzeniem - w tym przypadku wjechaniem w przepaść (czujnik projektowany z myślą o jeździe na blacie stołu itp).

@mario166 - używając telefonu jako generatora 12 kanałów typu 1/0, używając generatora napisanego we Flashu znaków jest 16 (dodane ABCD)


Come with me if you want to live.
Postaw piwo autorowi tego posta
 
 
 
feriar 




Posty: 232
Pomógł: 2 razy
Otrzymał 8 piw(a)
Skąd: z facktory
Programuję w:
Basic

Wysłany: 05 Lut 10 07:33   

Wyszła Ci dobra "aktualizacja" pierwszej wersji i az to dam ci piwko ;D.
Mógłbyś wtajemniczyć co to za czujnik sprzodu [ najlepiej pełna nazwa;) ] ? szukałem w tekście ale nic nieznalazłem :(


życie jest proste, podejmuj decyzje i nie oglądaj się!
Postaw piwo autorowi tego posta
 
 
 
BoBBy 




Posty: 907
Pomógł: 38 razy
Otrzymał 63 piw(a)
Skąd: Katowice
Programuję w:
Basc/arduC

Wysłany: 05 Lut 10 08:50   

Czy dobrze rozumuję, że mógłbyś usunąć całkowicie krótkofalówki i sterować tylko przez bt? Rozumiem, że krótkofalówki są tylko po to, żeby zwiększyć zasięg, tak? I też jestem ciekawy co to za czujnik jest, jakie parametry i takie rzeczy.

Postaw piwo autorowi tego posta
 
 
Kaytec 




Posty: 196
Pomógł: 9 razy
Otrzymał 49 piw(a)
Skąd: Olsztyn
Wysłany: 05 Lut 10 09:08   

Tak dokładnie, krótkofalówki są tylko przedłużeniem marnego zasięgu BT (10-15 metrów), w pokoju można z nich całkowicie zrezygnować.

Informacje o czujniku:



http://sensor.baumerelectric.com/productnavigator/scripts/product.php?pid=FHDK_10P1101_KS35&cat=CONFOptoelektronische_Sensoren&psg=&language=en&r=1&ptk=&country=US&header=United+States+%2F+Baumer+Ltd.


Come with me if you want to live.
Ostatnio zmieniony przez Kaytec 05 Lut 10 09:09, w całości zmieniany 1 raz  
Postaw piwo autorowi tego posta
 
 
 
BoBBy 




Posty: 907
Pomógł: 38 razy
Otrzymał 63 piw(a)
Skąd: Katowice
Programuję w:
Basc/arduC

Wysłany: 05 Lut 10 09:37   

Mógłbyś powiedzieć dlaczego zdecydowałeś się na takie niecodzienne cudo? Nie jakiś sharp albo co :-P

Ostatnio zmieniony przez BoBBy 05 Lut 10 09:37, w całości zmieniany 1 raz  
Postaw piwo autorowi tego posta
 
 
Kaytec 




Posty: 196
Pomógł: 9 razy
Otrzymał 49 piw(a)
Skąd: Olsztyn
Wysłany: 05 Lut 10 09:51   

Mam dwa szarpy i wciąż nie mogę znaleźć dla nich zastosowania. Bez sensu było by je używać do czegoś gdzie potrzeba tylko zera i jedynki i ewentualnie jednorazowej regulacji progu działania (optyczna). Baumer był tańszy a w zasadzie dostałem za darmo jako uszkodzony - wciągnęło go w maszynę i urwało kabel aż po same ścieżki - dlatego na zdjęciach ma ślady taśmy izolacyjnej :) .

Prawdę mówiąc robot ten jest efektem pracy "tego co mam pod ręką i się wala jak wiatr po gaciach w warsztacie". Ledy pochodzą z jakiejś rozwalonej lampki rowerowej, lcd bóg wie skąd, drobnice miałem, a serwa z poprzedniego projektu.

Pozdrawiam.


Come with me if you want to live.
Postaw piwo autorowi tego posta
 
 
 
feriar 




Posty: 232
Pomógł: 2 razy
Otrzymał 8 piw(a)
Skąd: z facktory
Programuję w:
Basic

Wysłany: 06 Lut 10 10:21   

jak patrzyłem na dobrze znanym serwisie aukcyjnym to ten czujnik kosztuje ok. 80zł a dokładniej jego nazwa to BAUMER ELECTRIC FEDM08P1001/S35L.


życie jest proste, podejmuj decyzje i nie oglądaj się!
Postaw piwo autorowi tego posta
 
 
 
andrzej31-91



Posty: 8
Otrzymał 2 piw(a)
Skąd: tarnowskie góry
Wysłany: 08 Lut 10 03:38   

Witam w jaki sposób został podłączony LCD do układu ?? Czy mógłbym podłączyć go do tego pierwszeko projekty zmieniając tylko trochę program??

Postaw piwo autorowi tego posta
 
 
Jagodziana 



Posty: 91
Otrzymał 1 piw(a)
Skąd: Wiry / k. Poznania
Programuję w:
C,C++

Wysłany: 17 Mar 10 07:55   

A ja mam takie pytanie: na Diodzie parę razy czytałem, że zastosowanie gąsienic z łańcucha rowerowego nie jest dobre, bo sie piach dostaje i takie tam. A jak to jest u Ciebie ? Trochę ten pojazd już jeździ więc jak to wygląda po teście długotrwałym ?


Aktualnie - "Krasula" wersja alpha
http://www.dioda.com.pl/forum/topics53/linefollower-krasula-vt3419.htm?highlight=krasula
Części - 80 %
Samoistne rozwalenie i zaczęcie od nowa - 60%
Programowanie - 0% bo jeszcze nie ma czego
Postaw piwo autorowi tego posta
 
 
 
Wyświetl posty z ostatnich:   
Odpowiedz do tematu
Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Nie możesz załączać plików na tym forum
Możesz ściągać załączniki na tym forum
Wersja do druku

Skocz do:  

Tagi tematu: bluetooth, platforma, przez, robota, sterowana, v2


Powered by phpBB modified by Przemo © 2003 phpBB Group
Linki: instalki nero