Он имел в виду, что в компе отсувствует такой разъем
Электронные устройства
Сообщений 151 страница 180 из 408
Поделиться1522009-05-12 13:51:59
Вот к стате подводник уже готов к поиску, щели позаливал водостойким силиконом. Выведена только кнопка включения прибора, все остальные кнопки внутри корпуса из герконов, срабатывают от магнитов
Отредактировано Петрон (2009-05-12 13:53:45)
Поделиться1532009-05-12 19:06:11
На руль нужно 3переменных резистора!2 кнопки!!! 1 разем !!!! И главное желание!!!
кнопки без фиксации!!!
Отредактировано SHMITZ (2009-05-12 19:06:50)
Поделиться1542009-05-12 22:22:14
Блин, у меня такого разъема тоже нет... У Лехи есть.
Хотя должны продаваться, через пси вход.
Поделиться1552009-05-12 22:52:16
К примеру вот такое гонево можно взять http://hotline.ua/tx/c-media_cmi_87384ch , тут есть геймпорт.
Поделиться1562009-05-13 17:47:30
Пси-вход - это круто! :stupor:
Поделиться1572009-08-10 19:36:01
Собрал очередной металлодетектор Chance (Шанс), инфа здесь http://www.fandy.front.ru/Chance.htm
Отредактировано Петрон (2009-08-10 19:36:21)
Поделиться1582009-08-16 12:13:44
Устройство в корпусе
Поделиться1592009-08-16 12:16:56
Зарядное устройство на микросхеме МАХ713 в корпусе
Поделиться1602009-08-17 00:00:56
Вентилятор с психофона снял?
Поделиться1612009-08-17 22:01:22
На психофоне небыло вентиляторов
Поделиться1622009-08-18 16:56:00
Значит раньше снял) Их там две штуки было.
Поделиться1632009-08-18 21:35:00
Там ниодного небыло, вранье
Отредактировано Петрон (2009-09-05 22:08:12)
Поделиться1642009-08-22 18:38:47
Один маленький (как тут - на 12 Вольт), а другой - большой, он еще воздух в динамик нагнетал, что еще к радиоточке подключался)
...или то маленький туда дул.. Не важно, но он там когда-то был..
Поделиться1652009-08-27 01:32:57
Приставка к робоконтроллеру, инфа здесь http://robozone.su/2009/08/14/yeksperim … c40-s.html
Поделиться1662009-09-05 22:22:41
Типа робот, едущий по черной линии. Задние габариты включаются при поворотах и стопе, нижняя подсветка ведет аналогично. Тачка постоянно вылетала с трассы, машина не успевала поворачивать вовремя, даже при пятом испытании накрылся датчик линии, но несмотря на кучу помех, машина однажды доехала до финиша. Трасса представляла собой 1\4 круга, длинной 2м. Ксей, подгони мне танк для опытов, или что похожее, в двумя двигателями.
Поделиться1672009-09-05 22:25:10
Скидую для наглядности код програмы на Бэйсике
$regfile = "m16def.dat" 'используем Mega16
$crystal = 16000000 'частота кварцевого резонатора 16mHz
Config Pind.0 = Input
Config Pind.1 = Input
Config Pind.2 = Input
Config Pind.3 = Input
Config Portd.4 = Output
Config Portd.5 = Output
Config Portd.6 = Output
Config Portd.7 = Output
Pind.0 = 0
Pind.1 = 0
Pind.2 = 1
Pind.3 = 1
Pind.4 = 0
Pind.5 = 0
Pind.6 = 0
Pind.7 = 0
Config Porta.0 = Output
Config Porta.1 = Output
Config Porta.2 = Output
Config Porta.3 = Output
Config Porta.4 = Output
Config Porta.5 = Output
Config Porta.6 = Output
Config Porta.7 = Output
Porta.0 = 0
Porta.1 = 0
Porta.2 = 0
Porta.3 = 0
Porta.4 = 0
Porta.5 = 0
Porta.6 = 0
Porta.7 = 0
Dim Effect As Byte
Dim Temp As Byte
Temp = 255
'инициализация светодиодов
Porta = 15 '@@@@'
Waitms Temp
Porta = 0 'OOOO'
Waitms Temp
'начало цикла 'опрос кнопок и присвоение переменной Effect соответствующего значения
Do
If Pind.2 = 0 Then Effect = 1
If Pind.3 = 0 Then Effect = 2
If Pind.2 = 0 And Pind.3 = 0 Then Effect = 3
If Pind.2 = 1 And Pind.3 = 1 Then Effect = 4
If Effect = 1 Then 'Вперед влево
Portd.4 = 1
Portd.5 = 1
Portd.6 = 0
Portd.7 = 1
Porta.0 = 1
Porta.1 = 1
Porta.2 = 1
Porta.3 = 0
Porta.4 = 1
Porta.5 = 0
Porta.6 = 1
Porta.7 = 0
End If
If Effect = 2 Then 'Вперед вправо
Portd.4 = 1
Portd.5 = 1
Portd.6 = 0
Portd.7 = 0
Porta.0 = 1
Porta.1 = 1
Porta.2 = 0
Porta.3 = 1
Porta.4 = 0
Porta.5 = 1
Porta.6 = 0
Porta.7 = 1
End If
If Effect = 3 Then 'Стоп
Portd.4 = 0
Portd.5 = 0
Portd.6 = 0
Portd.7 = 0
Porta.0 = 1
Porta.1 = 1
Porta.2 = 1
Porta.3 = 1
Porta.4 = 1
Porta.5 = 1
Porta.6 = 1
Porta.7 = 1
End If
If Effect = 4 Then 'Вперед
Portd.4 = 0
Portd.5 = 1
Portd.6 = 0
Portd.7 = 0
Porta.0 = 1
Porta.1 = 1
Porta.2 = 1
Porta.3 = 1
Porta.4 = 0
Porta.5 = 0
Porta.6 = 0
Porta.7 = 0
End If
Loop
Отредактировано Петрон (2009-09-05 22:25:56)
Поделиться1682009-09-06 16:58:22
Это можно.
Поделиться1692009-09-10 20:25:01
Конструкция из ходовой части Главрыбы, Главрыбе зачет
Поделиться1702009-09-10 20:46:24
Как фурычит? Сколько батарей заряжаешь?
Я уже так давно не видел его в движении...
Поделиться1712009-09-10 20:51:27
Ели чего, давай размеры, я крышку сделаю)
Кста, можно еще одну базу прикупить, и сделать самоходный металлоискатель)
Поделиться1722009-09-10 21:46:12
Крышка пока ненужна, в ближайшее время соберу пару штук датчиков припятсвия, там уже рaбота робота будет поинтересней, вот ссылка на видео http://fileshare.in.ua/2229845
Отредактировано Петрон (2009-09-10 21:49:36)
Поделиться1732009-09-10 22:17:31
Код на танк:
$regfile = "m16def.dat" 'используем Mega16
$crystal = 16000000 'частота кварцевого резонатора 16mHz
Config Pind.2 = Input
Config Pind.3 = Input
Config Portd.4 = Output
Config Portd.5 = Output
Config Portd.6 = Output
Config Portd.7 = Output
Pind.2 = 1
Pind.3 = 1
Pind.4 = 0
Pind.5 = 0
Pind.6 = 0
Pind.7 = 0
Dim Effect As Byte
Dim Temp As Byte
Temp = 255
Do
If Pind.2 = 0 Then Effect = 1
If Pind.3 = 0 Then Effect = 2
If Pind.2 = 0 And Pind.3 = 0 Then Effect = 3
If Pind.2 = 1 And Pind.3 = 1 Then Effect = 4
If Effect = 1 Then 'Вперед влево
Portd.4 = 0
Portd.5 = 1
Portd.6 = 0
Portd.7 = 0
End If
If Effect = 2 Then 'Вперед вправо
Portd.4 = 1
Portd.5 = 0
Portd.6 = 0
Portd.7 = 0
End If
If Effect = 3 Then 'Стоп
Portd.4 = 0
Portd.5 = 0
Portd.6 = 0
Portd.7 = 0
End If
If Effect = 4 Then 'Вперед
Portd.4 = 1
Portd.5 = 1
Portd.6 = 0
Portd.7 = 0
End If
Loop
Поделиться1742009-09-11 10:29:30
А каким образом ты привязываешь код к системе.. хм.. точнее, как система разбирает команды кода? или это все берет на себя программатор?
Поделиться1752009-09-11 19:42:13
микроконтроллер, скорее МАД. Просто на выходе контроллера аналоговый сигнал (токи), которые и управляют обычным моторчиком.
Поделиться1762009-09-11 20:23:30
Если АЦП есть, но мне вот кажется, что имеется нечто триггероподобное, открывающее транзистор, и включает мотор...
Правильный ответ даст Петрон после рекламной паузы
Поделиться1772009-09-11 20:28:35
Рекламная пауза!!
Поделиться1782009-09-11 21:10:00
Как я сегодня убедился дома у Петрона, все гораздо проще, чем я предполагал... почти как всегда)
Поделиться1792009-09-11 21:15:39
Все начинается так: в начале пишется код на х языке, потом компилятор (специальная программа, в моем случае Bascom AVR) проверяет наличие ошибок в коде. Если ошибок нет, то програму можно компилировать (переводить написанную програму в шеснадцатиричный код, понятный микрокантроллеру) код в HEX файл, который через другую програму записуется на микрокантроллер (соединение между компом и микрокантроллером осуществляется с помощью програматора).
В даном случае могу представить работу таким образом: есть микросхема (она же драйвер двигателей, на схеме выглядит как микросхема усилителя, с кучай торчащих с низу ножей, и с железной стенкой для радиатора), которая осуществляет управление двигателе. Управляется эта микросхема следующим образом: есть четыре контакта (00|00), два на управление одним двигетелем, два для управления другоим двигателем. Если подать по логической одинице на каждый вход (10|10), то двигателя будут вращатся в одну сторону, если же подать на оставшиеся входы по одинице (11|11), то двигатели будут вращатся в другую сторону. Все типа транзисторы, с кучей прочего дерьма, скрыты в корпусе микросхемы драйвера двигателей. Осуществить управление двигателей с помощю микрокантроллера очень легко
Поделиться1802009-09-11 21:29:53
Но на двигатель идут не дискретные сигналы, как я понял?