galex1981 » 15 мар 2009, 23:27
$eepromhex$eepromhex
$eeprom
Data &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H06 , &H5F , &H06 , &H00
$data
Ven-Tures » 14 май 2009, 20:32
galex1981 » 14 май 2009, 20:37
Ven-Tures » 14 май 2009, 20:39
galex1981 » 14 май 2009, 20:40
Ven-Tures » 14 май 2009, 20:41
galex1981 » 14 май 2009, 20:43
Ven-Tures » 14 май 2009, 20:44
$prog &HFF , &HE4 , &HD9 , &H00 'óêàçûâàåì êàêèå ôóñèáèòû íàäî ïðîøèòü
$regfile = "m32def.dat" ' ôàéë ñïåöèôèêàöèè Ìåãè32
$crystal = 8000000 ' óêàçûâàåì íà êàêîé ÷àñòîòå áóäåì ðàáîòàòü
'----------------------------------------------------------------------------
Config Timer1 = Pwm , Pwm = 8 , Prescale = 1 , Compare A Pwm = Clear Down , Compare B Pwm = Clear Down
Config Pinc.2 = Output : Drl Alias Portc.2 'íîãó ñêîíôèãóðèðîâàëè êàê âûõîä è îáîçâàëè Drl
Config Pinc.3 = Output : Drr Alias Portc.3 'íîãó ñêîíôèãóðèðîâàëè êàê âûõîä è îáîçâàëè Drr
Config Pind.4 = Output 'íîãó ØÈÌà ëåâîãî äâèæêà ñêîíôèãóðèðîâàëè êàê âûõîä
Config Pind.5 = Output 'íîãó ØÈÌà ïðàâîãî äâèæêà ñêîíôèãóðèðîâàëè êàê âûõîä
'----------------------------------------------------------------------------
Dim Speed As Byte
Speed = 70
Do
Drl = 0 'íàïðàâëåíèå äâèæåíèÿ ëåâîãî äâèæêà, â íàøåì ñëó÷àå ýòî ïðÿìî
Drr = 0 'íàïðàâëåíèå äâèæåíèÿ ïðàâîãî äâèæêà, â íàøåì ñëó÷àå ýòî ïðÿìî
Pwm1b = Speed : Pwm1a = Speed
Loop EdGull » 14 май 2009, 20:47
MiBBiM » 14 май 2009, 20:50
Speed = 200
Ven-Tures » 14 май 2009, 20:52
EdGull » 14 май 2009, 20:52
Вернуться в МиниБот — национальный класс роботов
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 0