Мазмуну:
Video: BAAAA ---- БОТ: 3 кадам (Сүрөттөр менен)
2024 Автор: John Day | [email protected]. Акыркы өзгөртүү: 2024-01-30 10:42
Салам! Бул иштөөчү бамперлери бар бое ботко окшош, жарым пайдалуу, сөзсүз сүйкүмдүү койлорду жасоо боюнча көрсөтмө. Бул көрсөтмө сизге бамперлерди жасоо процессинде иштейт, сизге бардык кодду жана бардык сонун эстетиканын кыскача витринасын берет!
1 -кадам: Код
Ошентип, код чындыгында жөнөкөй жана чынын айтсам, аны толугу менен түшүнүү жана түшүнүү үчүн 2 сааттан ашык убакыт кетпейт. Бирок! Кодду көрүп, көчүрүп, аны негизги штамп редакторунун программасына чаптагысы келгендер үчүн мына
Код:
'*********************************************** *********************** 'Аты -жөнү: Лука ДеФилиппис
'Title - BoeBump.bs2
Дата - 28 -ноябрь, 2017 -жыл
Бое Ботту тоскоолдуктан алыстатуу үчүн 'Бир нерсе чыкканда команданы иштетүүчү физикалык бамперлерди түзүңүз'.
'{$ STAMP BS2}' {$ PBASIC 2.5}
**** БУЛ ЖОГОРКУ МУНУ ЖАСАГАНДАР ЖӨНҮНДӨ ЖАНА МААЛЫМДАРГА БЕРИЛГЕН ЖӨНҮНДӨГҮ МААЛЫМАТ *******
'************************************************************************
Баштоо токтотууну баштапкы абалга келтирүү коду
'Бул код ботту токтотууга же кайра баштоону баштоого мажбур кылат = программаны жүктөөдө боттун коду иштебей тургандыгын текшерүү үчүн жакшы
'************************************************************************
temp VAR Byte 'убактылуу дүкөнү RunStatus DATA $ 00' өзгөрмөсү ROMдо сакталат
READ RunStatus, temp 'ROM temp = ~ temp'тен өзгөрмөсүн ОКУҢУЗ 0 0 1 ЖЕ 1 TO 0 WRITE RunStatus, temp' ROM TO WOM IF IF if (temp> 0) THEN END 'Текшерип көрүңүз, эгер мааниси 1 'Андай болсо программаны АЯКТА
'************************************************************************
'Pins Setup
'************************************************************************
LMotor PIN 13 RMotor PIN 12
'************************************************************************
'Туруктуу орнотуулар
'************************************************************************
LStop CON 750 RStop CON 750
'************************************************************************
'Variables
'************************************************************************
X VAR Word
'************************************************************************
'Негизги программа
'************************************************************************
КЫЛ
HIGH 1 'Катоддорду күйгүзүү
Жогорку 2
Жогорку 3
Жогорку 9
Жогорку 10
Жогорку 11
Мүчүлүштүктөрдү жоюу? IN14,? IN4, CR
ЭГЕР (IN14 = 1) ЖАНА (IN4 = 1) АНДА 'Бамперлерде эч кандай байланыш жок, Sub Forward
DEBUG "Алга", CR'дин мүчүлүштүктөрү кандай кыймыл буйругу пайда болгонун көрүү үчүн
ТӨМӨН 1
LOW 2 'Катоддорду күйгүзүңүз жана кызыл жана көк түстө жаркыраңыз
ТӨМӨН 9
ТӨМӨН 10
GOSUB Алга
ELSEIF (IN14 = 0) ЖАНА (IN4 = 0) АНДА 'бамперлер менен байланыш, экөө теңBump = артка карай алдыга оңго
Мүчүлүштүктөр "BothBump", CR
LOW 1 'жашыл эки жарыктын узак тыныгуусу
ТӨМӨН 3
ТӨМӨН 9
ТӨМӨН 11
GOSUB BothBump
ELSEIF (IN14 = 0) ЖАНА (IN4 = 1) АНДАН КИЙИН 'бампер менен байланыш, BumpRight суб = артка карай алдыга оңго
Мүчүлүштүктөр "BumpRight", CR
LOW 9 'оң жарыгы көккө, солго жашыл болуп калат
ТӨМӨН 11
ПАУЗА 200
GOSUB BumpRight
ELSEIF (IN14 = 1) ЖАНА (IN4 = 0) АНДА 'оң бампер менен байланыш, sub BumpLeft = кайра өйдө карай алдыга
Мүчүлүштүктөр "BumpLeft", CR
LOW 1 'сол жарык көккө, оң жашыл болот
ТӨМӨН 3
ПАУЗА 200
GOSUB BumpLeft
ENDIF
LOOP
END процедурасы кокусунан иштелип чыкканга чейин токтотуу
'************************************************************************
'Sub Prosedurlar
'************************************************************************
Алга: 25 см алдыга
"FREQOUT 6, 200, 1600" кошумча жана кошумча жазуулары үчүн кошумча сирена жыштыктары, бул ботту жайлатат жана абдан тынч
'FREQOUT 6, 100, 800
ҮЧҮН X = 1ден 500гө чейин
PULSOUT RMotor, 700
PULSOUT LMotor, 850
КИЙИНКИ
ПАУЗА 20
КАЙТУУ
'****************************************************
'Код эки бамперге тийгенде артка бурулуп, бурулушу керек
'****************************************************
BothBump: 'РЕВЕРС 20см
ҮЧҮН X = 1ден 150гө чейин
PULSOUT RMotor, 850
PULSOUT LMotor, 650
КИЙИНКИ
ПАУЗА 200
ҮЧҮН X = 1ден 200гө чейин Солго 60 градуска буруңуз
PULSOUT RMotor, 650
PULSOUT LMotor, 760
КИЙИНКИ
ПАУЗА 20
КАЙТУУ
'****************************************************
'Оң бампер басылганда кодду артка жана солго буруңуз
'****************************************************
BumpLeft: 'РЕВЕРС 20см
ҮЧҮН X = 1ден 150гө чейин
PULSOUT RMotor, 850
PULSOUT LMotor, 650
КИЙИНКИ
ПАУЗА 200
ҮЧҮН X = 1ден 200гө чейин 45 градуска оңго буруңуз
PULSOUT RMotor, 740
PULSOUT LMotor, 850
КИЙИНКИ
ПАУЗА 20
КАЙТУУ
'****************************************************
'Оң бампер басылганда кодду артка жана солго буруңуз
'****************************************************
BumpRight: 'РЕВЕРС 20 см
ҮЧҮН X = 1ден 150гө чейин
PULSOUT RMotor, 850
PULSOUT LMotor, 650
КИЙИНКИ
ПАУЗА 200
ҮЧҮН X = 1ден 200гө чейин Солго 60 градуска буруңуз
PULSOUT RMotor, 650
PULSOUT LMotor, 760
КИЙИНКИ
ПАУЗА 20
КАЙТУУ
'********************************************************
Кошумча процедуралардын аягы
'********************************************************
Коддогу комментарийлер сизге баары кантип иштээри жана эмне үчүн кээ бир коддор бар экени жөнүндө түшүнүк бериши керек, бирок бул жерде кыскача түшүндүрмө бар
Макул, бул коддун иштөө жолу мындай. Бот баскычтар сыяктуу иштеген бамперлердин кириштерин текшерүүчү цикл кодун иштетет. Ошентип, аныктоо болбогондо (1, 1), алдыга коюунун процедурасы иштейт жана бот алдыга жылат. Ушул эле идея бамперди аныктоо солго да, оңго да, же жокпу менен иштейт
Катоддор бампердин киришине негизделген жарыкты көрсөтүү үчүн жогорку жана төмөнкү буйруктарды колдонушат. Эч кандай аныктоо болбогондо, алар көк түстө жана кызыл түстө милиционер машинасы сыяктуу жаркырап турушу керек жана эгерде бамперде кандайдыр бир аныктоо болсо, алар тиешелүү сол же оң жарык бамперин жашылга бурушу керек. Кошумча процедуралар ботко артка жылып, тийип жаткан тоскоолдукту болтурбоо үчүн соккунун негизинде оңго же солго бурулушун айтат. Бул лабиринтте өзгөчө жакшы иштейт, анткени бурулуш өтө кичине болгондуктан, бот өтө көп бурулуп, лабиринттен чыгып кетүүдөн сак болот
Алдыга жылдыруу учурунда үндү өткөрүүгө уруксат берүү үчүн frequout буйругу алдыга суб процедурага тиркелет. Берилген жыштыктар милиционердин сиренасына окшош болушу керек, ошону менен полиция чырактарынын эстетикасын кошот
Чын эле ушундай! Түшүнүү үчүн өтө жинди эч нерсе жок, бул пайдалуу жана жөнөкөй болду деп үмүттөнөм
2 -кадам: Курулуш
Эмне керек болот:
6 1k каршылыгы
2 10k каршылыгы
23 3 түстүү катоддор
1 динамик (милдеттүү эмес)
кичинекей өлчөмдөгү конденсатор (ошондой эле милдеттүү эмес (спикер үчүн!))
Зымдардын көптүгү
2 пияз таякчасы
Алюминий фольга
Картондун кичинекей бөлүктөрү
Hot Glue
Тасма
Bampers
Макул, бамперлерден баштайлы! Аларды жасоо үчүн алюминий фольганы, картонду, зымды жана ысык клейди тактага жабыш үчүн колдонуу керек.
1. Окшош өлчөмдөгү 2 картон тик бурчтукту кесип алып, экиге бүктөңүз
2. 2 бөлүктү ошол эле попсикул таякчасына ысык клей, анан картондун бөлүктөрүнүн экинчи тарабын башка бөлүкчө таякчасына ысык клей.
3. Эми сиз алюминий фольганы ар бир картон кесимине 2 сыйымдуу чоң чарчы кылып бүктөшүңүз керек, фольга кесимдерин степлер же башка өткөргүч аркылуу картонго бекиңиз. Мен степлерди колдондум.
4. Эми ар бир картон кесимине 2 зым тиркеп, алюминий фольгага так коопсуз байланышка ээ экенине ынануу маанилүү
Алар биринчи сүрөттө окшош болушу керек
5. Акырында азыр 4 зымды тактага бекитиш керек. Муну 2ге Vss жана бирөөнү 6 -катардагы каалаган жерге жана 14 -катардагы каалаган жерге туташтыруу менен кылыңыз.
Бамперлерди ботко тиркөө үчүн, муну көптөгөн жолдор менен жасаса болот, мен муну боттордун алдыңкы жагына чаптап, таякты ошол лентага жабыштыруу менен жасайм.
Жана бул бамперлерди чогултуу менен! Эми аларды иш жүзүндө колдонуу маселеси турат!
Бардык нерсенин зымдары
Эми бул кийинки бөлүктү түшүндүрүү бир аз татаалыраак, бирок мен массалык визуалдык жардамдын жардамы менен аракет кылам. Шилтеме сүрөтү 3, 4, 5, жөн эле компоненттерди көрүп тургандай туташтырыңыз.
Ошентип, сиз тактанын оң жагына катоддорду киргизип, 6 1k каршылыгыңызды жок кыла турган ар бир катодго 3 1k каршылыгын ээрчигиси келет.
Бул бүткөндөн кийин, сиз ар бир катоддун 2 -пинине жерге же vssге зым салгыңыз келет, эң узун зым.
Бул катоддорду бүтүрөт, андыктан кийинки жасай турган нерсе - 10k резисторлоруңузду vddден 2 бампер зымын тактага койгон жерлериңизге туташтыруу.
Андан кийин зымды колдонуп, оң бампер үчүн 6 -пинди эң туура 10k каршылыкка жана бампер зымына туташтырыңыз.
Өткөн кадамды сол эң 10к резистор үчүн жасаңыз.
Бул кийинки кадам спикер үчүн милдеттүү эмес жана бул кичинекей конденсаторду 7 пинге жана тактага туташтыруу.
Сиз андан кийин динамиктин терс учун конденсаторго жана акыры оң жагын VSSке туташтыргыңыз келет.
Бул зымдарды бүтүрүп, көбүрөөк жардам алуу үчүн 3, 4, 5 -сүрөткө шилтеме кылыңыз!
3-кадам: BAAAAAA ------ Функция
Милициянын жарыгы жана кошумча полициянын сиренасы бар. Сиздин BoeBot кой сыяктуу кийинип, башкалардын падышасы болот!
Аталыштагы сүрөттө көрүнүп тургандай, мен өзүмдү окшош кылдым!
Муну кылуу абдан жөнөкөй, сизге керектүү нерселердин бардыгы:
Пуфтар
Маскировка тасмасы
1. Жөнөкөй лента катмарларын коюп, алардын баары жабышчаактык менен байланышканын текшериңиз
2. жабышчаак бөлүгүнө катмар шарлар.
3. Бул ботко түктүү пальтону бекиткениңизде, муну көптөгөн жолдор менен жасасаңыз болот
Түктүн учтарына инверттелген лента кошуп, скотчту ботко аркан сыяктуу ороп коюңуз
ЖЕ боттун түбүн скотч менен желимдин бош учтарын боттун түбүндөгү тасмага ысык клей менен жабыңыз.
Мен бир нерсе туура эмес болуп калса, доскага тезирээк жана оңой жетүү үчүн биринчи вариантты кылдым!
Жана бул! Эми Boe Bot укмуштуудай өзгөчөлүктөрү менен шаардагы эң жакшы круиз болот деп үмүттөнөбүз.