Strona Główna
FAQFAQ  SzukajSzukaj MapaMapa  UżytkownicyUżytkownicy RegulaminRegulamin  GrupyGrupy
RejestracjaRejestracja  ZalogujZaloguj
Warto zobaczyć: Konstrukcje Wiadomości Artykuły


Przyszłość jest w naszych rękach...
...bo przyszłość to robotyka.


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




Posty: 179
Pomógł: 9 razy
Piwa: 43/4
Skąd: Olsztyn
Wysłany: 05 Lut 10 12:50   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 145 raz(y) 552,47 KB


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




Posty: 80
Pomógł: 3 razy
Piwa: 7/5
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: 595
Pomógł: 11 razy
Piwa: 31/57
Skąd: Łódź
Programuję w:
C++

Wysłany: 05 Lut 10 08:46   

Hehe, nareszcie bluetooth dla zielonych!
Pozdr.


Bo w tym prawda jest kochani, że nasz świat tworzymy sami.

-------------
Na biurku:
1. LFr --> projekt, pierwsze płytki
2. Czujnik RGB --> koncepcja, projekt
Postaw piwo autorowi tego posta
 
 
 
KD93 



Posty: 268
Pomógł: 11 razy
Piwa: 29/19
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"
Postaw piwo autorowi tego posta
 
 
 
swierkdeck 




Posty: 64
Pomógł: 2 razy
Piwa: 4/4
Skąd: Warszawa
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: 4
Postawił 4 piw(a)
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
Piwa: 4/14
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: 652
Pomógł: 26 razy
Piwa: 96/64
Skąd: Warszawa
Programuję w:
BASCOM, C

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ę!


Gość, jeśli okazałem się pomocny - podziękuj mi klikając piwo pod moim postem ;)
Aktualnie pracuję nad:
>Barracuda LFr
>ZPM1 (platforma oparta o procesor Intel P Centrino) - szczegóły lada miesiąc
>Praca inżynierska
Ostatnio zmieniony przez Nawyk 05 Lut 10 03:18, w całości zmieniany 1 raz  
Postaw piwo autorowi tego posta
 
 
Kaytec 




Posty: 179
Pomógł: 9 razy
Piwa: 43/4
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: 92
Pomógł: 1 raz
Piwa: 2/15
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 :(


moje boty to:
zeler v2.0
[IR]Car
W budowie:
-pojazd na bluetooth
ukończone 6%
Postaw piwo autorowi tego posta
 
 
 
BoBBy 




Posty: 428
Pomógł: 16 razy
Piwa: 29/8
Skąd: Katowice
Programuję w:
Bascom / C


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: 179
Pomógł: 9 razy
Piwa: 43/4
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.baumerelect...%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: 428
Pomógł: 16 razy
Piwa: 29/8
Skąd: Katowice
Programuję w:
Bascom / C


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: 179
Pomógł: 9 razy
Piwa: 43/4
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: 92
Pomógł: 1 raz
Piwa: 2/15
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.


moje boty to:
zeler v2.0
[IR]Car
W budowie:
-pojazd na bluetooth
ukończone 6%
Postaw piwo autorowi tego posta
 
 
 
andrzej31-91



Posty: 2
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
 
 
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