Przykładowe program w Bascom'ie

[Treker (Damian Szymański)]

Witam

Na razie tylko jeden przykładowy program, następne będą pojawiać się z czasem.

Przy okazji, gdyby ktoś chciał nam pomóc i mógłby napisać jakiś przykładowy program (Bascom lub C) proszę o kontakt do mnie na PW.

REM Jazda po zaprogramowanej trasie

$regfile = "2313def.dat" 'określenie uc 
$crystal = 8000000  'okreslenie kwarcu

Config Portb = &B11111111 'wszytskie jako wyjścia 
Portb = &B11111111 'wszędzie stan spoczynkowy 1 
Config Portd = &B111111 'wszystkie jako wyjścia 
Portd = &B1111111 'wszędzie stan spoczynkowy 1 


Do 'petla nie skończona 
Portb.0 = 1 
Portb.1 = 0 'silnik lewy ON w przód 
Portb.2 = 1 
Portb.3 = 0 'silnik prawy ON w przód 

Waitms 2000 'jedź przez 2 sec 

Portb.0 = 0 
Portb.1 = 1 'silnik lewy ON w Tył 
Portb.2 = 1 
Portb.3 = 0 'silnik prawy ON w przód 

Waitms 1000 'obracaj przez 1sec 

Portb.0 = 0 
Portb.1 = 1 'silnik lewy ON w tył 
Portb.2 = 0 
Portb.3 = 1 'silnik prawy ON w tył 

Waitms 2000 'jedź w tył przez 2sec 

Portb.0 = 1 
Portb.1 = 1 'silniki off 
Portb.2 = 1 
Portb.3 = 1 

waitms 2000 

Loop 

End

[waldek96]

A jeśli są 2 koła to tak???:

REM Jazda po zaprogramowanej trasie

$regfile = "2313def.dat" 'określenie uc
$crystal = 8000000  'okreslenie kwarcu

Config Portb = &B11111111 'wszytskie jako wyjścia
Portb = &B11111111 'wszędzie stan spoczynkowy 1
Config Portd = &B111111 'wszystkie jako wyjścia
Portd = &B1111111 'wszędzie stan spoczynkowy 1


Do 'petla nie skończona

Portb.1 = 0 ' ON w przód
Portb.2 = 0 ' ON w przód

Waitms 2000 'jedź przez 2 sec


Portb.1 = 1 'ON w Tył
Portb.2 = 0 'ON w przód

Waitms 1000 'obracaj przez 1sec


Portb.1 = 1 ' ON w tył
Portb.2 = 1 ' ON w tył

Waitms 2000 'jedź w tył przez 2sec

Portb.1 = 1 'silniki off
Portb.2 = 1


waitms 2000

Loop

End

[mskojon]

Tamten program też jest pod dwa silniki, tylko pod mostek L293D, jeśli sterujesz tranzystorami to program będzie wyglądał mniej więcej tak, ale na dwóch tranzystorach robot nie pojedzie do tyłu.

[rezolut]

Nawet nie będzie wyglądał mniej więcej tak.

Waldek96, włącz myślenie i analizę tego co piszesz, bo

Portb.1 = 1 ' ON w tył

Portb.2 = 1 ' ON w tył

Waitms 2000 'jedź w tył przez 2sec

Portb.1 = 1 'silniki off

Portb.2 = 1

podając te same dane na wyjścia oczekujesz 2 różnych zachowań.

[waldek96]

To jak będzie wyglądał schemat do pierwszego kodu?

[mskojon]

L293D (standardowo, enable do plusa) i Attiny2313, wejścia L293D podłączone do PB 0-3.

[waldek96]

Yyy ... niezabardzo rozumiem możesz to narysować.

[mskojon]

Nie. Na forum jest na tyle dużo opisów i schematów, że bez problemu zrobisz to sam.

[waldek96]

OK sprubuję tylko powiedz mi co to jest PB 0-3.

[rasta]

http://www.atmel.com/dyn/resources/prod_documents/DOC2543.PDF strona 2

lub 1 link z google: http://www.google.pl/search?hl=pl&safe=off&client=firefox-a&rls=org.mozilla%3Apl%3Aofficial&hs=jHL&q=Attiny2313+pb0&btnG=Szukaj&lr=

[olimek]

waldek96, PB 0-3 to porty mikrokontrolera tj. PB0, PB1, PB2, PB3