Мой проэкт "tails"
В качестве платформы - Редуктор тамия, гусеницы тамия, профиль для гипсокартона.
Драивер двигателей - L298
Мозги - Контроллер МТ-8
Пока-что ничего не умеет но будет развиваться, как только закончим ремонт в комнате=)
roboforum.ruТехнический форум по робототехнике. |
|
|
Судя по последним проектам, нас ожидает вторжение буржуйской бронетехники в лице Тамиевской гусеничной платформы.
MegaBIZON писал(а):хы ))
а чё планируется?
D1mcon писал(а):Какое падение напряжения получилось на L298?
D1mcon писал(а):
Судя по последним проектам, нас ожидает вторжение буржуйской бронетехники в лице Тамиевской гусеничной платформы.
pashteet писал(а):ТС, прикольно получилось, компактненько
Skyline писал(а):А название как правильно переводится, что-то с хвостом связанно?
Skyline писал(а):А название как правильно переводится, что-то с хвостом связанно?
Doktor писал(а):Да это имя лисёнка друга соника из приставочной игры Соник. А хвост по тому что в игре лис мог летать как на вертолёте с помошью хвоста.
D1mcon писал(а):Какое падение напряжения получилось на L298?
эм......а можно языком чайника?) [
D1mcon писал(а):Если не трудно проверь, а то по ДШ там может быть падение в 4,9в при токе в 2А.
$regfile = "m8def.dat" ' файл спецификации ATmega8
$crystal = 12000000 'показываем что кварц у нас на 12mHz
'---------Настройка таймеров-------------
Config Timer1 = Pwm , Pwm = 8 , Prescale = 1 , Compare A Pwm = Clear Down , Compare B Pwm = Clear Down ' таймер для ШИМ двигателей
'--------Описание портов-----------------
Config Pinb.2 = Output : Dr1 Alias Portb.2
Config Pinb.3 = Output : Dr2 Alias Portb.3
Config Pinb.4 = Output : Dr3 Alias Portb.4
Config Pinb.5 = Output : Dr4 Alias Portb.5
'----------Описанние переменных----------
Dim Speed As Integer
'----------------------------------------
Do
Speed = 255
Gosub Вперёд
Waitms 2000 '2 секунды едем вперед
Gosub Стоп
Waitms 1000 '1 секунду стоим на месте
Gosub Назад
Waitms 2000 '2 секунды едем назад
Gosub Стоп
Waitms 1000 '1 секунду стоим на месте
Gosub Влево
Waitms 2000 '2 секунды поворачиваем влево
Gosub Стоп
Waitms 1000 '1 секунду стоим на месте
Gosub Вправо
Waitms 2000 '2 секунды поворачиваем вправо
Gosub Стоп
Waitms 1000 '1 секунду стоим на месте
Loop
'************************Основные программы движения****************************
Стоп: ' стоим на месте
Dr1 = 0 : Dr2 = 0 : Dr3 = 0 : Dr4 = 0 : Pwm1a = 0 : Pwm1b = 0
Return
Вперёд: ' едим вперёд
Dr1 = 0 : Dr2 = 1 : Dr3 = 1 : Dr4 = 0 : Pwm1a = 0 : Pwm1b = 0
Return
Вправо: ' поварачиваем вправо
Dr1 = 1 : Dr2 = 0 : Dr3 = 1 : Dr4 = 0 : Pwm1a = 0 : Pwm1b = Speed
Return
Влево: ' поворачиваем влево
Dr1 = 0 : Dr2 = 1 : Dr3 = 0 : Dr4 = 1 : Pwm1a = Speed : Pwm1b = 0
Return
Назад: ' едим назад
Dr1 = 1 : Dr2 = 0 : Dr3 = 0 : Dr4 = 1 : Pwm1a = Speed : Pwm1b = Speed
Return
End
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 27