[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
Форум » Мастерская » Я начинающий » Общие вопросы начинающих (Задаём вопросы)
Общие вопросы начинающих
KrishДата: Вторник, 14.06.2011, 23:04 | Сообщение # 136
Группа: Пользователи
Сообщений: 184
Репутация: 2
Статус: Offline
Space, хочется сделать некую программу с применением АЦП и LCD.
Когда человек проходит Шарп видит этого человека и выписывает на LCD текст, типо "Подходите" и т.д.
Расстояние записано в программе, и к определенному расстоянию определенный текст!
Это возможно?
помоги.


LacOS

Сообщение отредактировал Krish - Вторник, 14.06.2011, 23:32
SpaceДата: Вторник, 14.06.2011, 23:50 | Сообщение # 137
Администратор
Язык программированя: BascomAVR
Группа: Администраторы
Сообщений: 327
Репутация: 8
Статус: Offline
Quote (Krish)
Space, хочется сделать некую программу с применением АЦП и LCD.
Когда человек проходит Шарп видит этого человека и выписывает на LCD текст, типо "Подходите" и т.д.
Расстояние записано в программе, и к определенному расстоянию определенный текст!
Это возможно?
помоги.

Шарп может определять лишь некий предмет, находящийся у него на прямой видимости на некотором расстояние(зависит от модели шарпа). Определить. что именно человек подошёл он не может, но то что к нему что-то приближается вполне.

здесь статья и прога как работать с шарпом и измерять расстояние. Вперёд, разбирайся. А то всё помоги да помоги
dry


KrishДата: Среда, 15.06.2011, 11:38 | Сообщение # 138
Группа: Пользователи
Сообщений: 184
Репутация: 2
Статус: Offline
Space, хорошо, посмотрю, если что спрошу smile3
Слушай, а можно сделать робота, чтобы он управлялся rc5 и одновременно объежал препятствия с шарпиком(чтобы не врезался)?

Добавлено (15.06.2011, 11:38)
---------------------------------------------
Никто не знает, как подключить магнитный датчик ?!
http://robotshop.su/e-store/catalog/202/820/
А то валяется.
Хоть принцип скажите я поменяю программу АЦП под датчик)


LacOS
nightmareДата: Среда, 15.06.2011, 15:13 | Сообщение # 139
Язык программированя: C,C#
Группа: Проверенные
Сообщений: 133
Репутация: 3
Статус: Offline
Это геркон походу раз цифровой датчик.
Kогда магнит подносишь - контакты замыкаются.
-> -> -> http://ru.wikipedia.org/wiki/%D0%93%D0%B5%D1%80%D0%BA%D0%BE%D0%BD


russian-robots@conference.jabber.ru - jabber чат для робототехников

Сообщение отредактировал nightmare - Среда, 15.06.2011, 15:24
DimsanДата: Среда, 15.06.2011, 15:39 | Сообщение # 140
Язык программированя: Си, Делфи
Группа: Модераторы
Сообщений: 65
Репутация: 1
Статус: Offline
Krish, ты бы сначала с программированием разобрался. А то всё усложняешь себе задачу и усложняешь.
KrishДата: Суббота, 18.06.2011, 13:19 | Сообщение # 141
Группа: Пользователи
Сообщений: 184
Репутация: 2
Статус: Offline
Space, А вот при подчете символов для значения:
For A=1 To 999
Нужно считать пробелы?
Можно вложить в число А не единицу а отрицательное число, Например:
For A=-50 To 10

Добавлено (16.06.2011, 11:21)
---------------------------------------------
Space, смотри, вот программа:

Code

'*******************************************************************************

$regfile = "m16def.dat"                    'используем мк ATmega16
$crystal = 16000000                    'частота кварцевого резонатора 16MHz
$lib "lcd4.lbx"                    'используем 4-х битное подключение дисплея с помощью альтернативной библиотеки

'*************************** Порт A ********************************************

' Поключили дальномер, порт A1, настройки АДС ниже

'*************************** Порт В ********************************************

Config Pind.2 = Output : Led1 Alias Portd.2                 'ногу сконфигурировали как выход и обозвали Led1
Config Pind.3 = Output : Led2 Alias Portd.3                 'ногу сконфигурировали как выход и обозвали Led2
Config Lcdpin = Pin , Rs = Portb.0 , E = Portb.2 , Db4 = Portb.4 , Db5 = Portb.5 , Db6 = Portb.6 , Db7 = Portb.7
Config Lcd = 16 * 2                    'используем дисплей на 2 строчки по 16 знакомест в каждой
Cls                    'команда очистки дисплея

'*****************************Настройка ADC*************************************

Config Adc = Single , Prescaler = Auto , Reference = Internal

'*******************************************************************************

Enable Interrupts                    ' разрешаем прерывания

'************************Переменные и константы*********************************

Dim Speed As Integer , Sharp As Integer
Dim Vout As Word

'*****************************Основной цикл*************************************
Speed = 255
1:
Do

Gosub Вперёд                    ' Если сигнала от ик-датчика(Sharp) не поступает, значит двигаемся всё время прямо

'************************Основные программы движения****************************

Вперёд:
Lcd "Hi"                    'выводим надпись
Lowerline                    ' переходим на нижнюю строчку
Lcd "Hi!!!"                    'выводим надпись

  Назад:
  Lcd "Hiasg"                    'выводим надпись
Lowerline                    ' переходим на нижнюю строчку
Lcd "Hias!!!"                    'выводим надпись

  Разворот_вправо:
  Lcd "Hiasd"                    'выводим надпись
Lowerline                    ' переходим на нижнюю строчку
Lcd "gasdf!!!"                    'выводим надпись

'***********************************Sharp***************************************

   Sharp_left:

   Start Adc : Vout = Getadc(0)                    'Sharp connected for example to PA=0(ADC0)
  Stop Adc
  If Vout > 310 Then : Sharp = 1 : Else : Sharp = 0 : End If
  If Sharp = 1 Then : Led2 = 1
     Gosub Разворот_вправо : Waitms 500 : Led2 = 0 : Gosub Разворот_вправо : End If

  Return

Sharp_stop:

  Start Adc : Vout = Getadc(0)                    'Sharp connected for example to PA=0(ADC0)
  Stop Adc
  If Vout > 350 Then : Sharp = 1 : Else : Sharp = 0 : End If
If Sharp = 1 Then : Led1 = 1
     Gosub Назад : Waitms 500 : Led1 = 0 : Gosub Назад : End If

  Return

  Sharp_go:

  Start Adc : Vout = Getadc(0)                    'Sharp connected for example to PA=0(ADC0)
  Stop Adc
  If Vout > 430 Then : Sharp = 1 : Else : Sharp = 0 : End If
If Sharp = 1 Then : Led1 = 1
     Gosub Вперёд : Waitms 500 : Led2 = 0 : Gosub Вперёд : End If

  Return
  End


Вбей его пожалуйста к себе в Бейсик, посмотри у тебя компилируется, если нет, то проверь пожалуйста программу cray
Её функцию такая: она на определенном расстоянии предмета от Шарпика высвечивает на LCD текст, типо: привет, или подходи сюда.
Посмотри что не так в ней, я просто не вижу ошибок

Добавлено (18.06.2011, 13:19)
---------------------------------------------
Как прошить SMD МК?
На схемке нету ISP, есть переходники какие нибудь?


LacOS

Сообщение отредактировал Krish - Четверг, 16.06.2011, 10:50
SpaceДата: Суббота, 18.06.2011, 14:04 | Сообщение # 142
Администратор
Язык программированя: BascomAVR
Группа: Администраторы
Сообщений: 327
Репутация: 8
Статус: Offline
Quote (Krish)
Как прошить SMD МК?

если отдельно от схемы, то смотри видео от 6 минуты начиная

а так вообще так же как и в дип корпусах


KrishДата: Суббота, 18.06.2011, 17:48 | Сообщение # 143
Группа: Пользователи
Сообщений: 184
Репутация: 2
Статус: Offline
Станцию UART пройдена))

Добавлено (18.06.2011, 17:48)
---------------------------------------------
Доделал уникальный контроллер, допаял MRC40, сделал ДД, как у SkyLine. Вообще отлично, завтра еду на рынок покупать стойки для контроллера и аккумуляторы.
Space, Спасибо за видео!
Вот в чём вопрос, у меня стоит твой стабилизатор - http://enore.ucoz.ru/publ....-1-0-31
Какой для него лучше купить аккумулятор ? 9В LiPo > 1А? а то я просто не знаю как выбирать питание...

Прикрепления: 2569806.jpg (10.8 Kb)


LacOS
SpaceДата: Суббота, 18.06.2011, 23:10 | Сообщение # 144
Администратор
Язык программированя: BascomAVR
Группа: Администраторы
Сообщений: 327
Репутация: 8
Статус: Offline
да любой бири. Главное чтоб напряжение аккум давал не менее 6 вольт
лучше выбирай что-нибудь из Li-ion аккумуляторов(зарядку для них купить не забудь)


KrishДата: Воскресенье, 19.06.2011, 13:16 | Сообщение # 145
Группа: Пользователи
Сообщений: 184
Репутация: 2
Статус: Offline
Quote (Space)
да любой бири. Главное чтоб напряжение аккум давал не менее 6 вольт лучше выбирай что-нибудь из Li-ion аккумуляторов(зарядку для них купить не забудь)

Спасибо. Зарядку я сам соберу.

Добавлено (19.06.2011, 13:16)
---------------------------------------------
Блин люди, скажите как прошить фьюз в avrstudio 4 для atmega168, просто в вкладке с фьюзами нету внешнего кварца никакого! что делать?((


LacOS
nightmareДата: Воскресенье, 19.06.2011, 14:49 | Сообщение # 146
Язык программированя: C,C#
Группа: Проверенные
Сообщений: 133
Репутация: 3
Статус: Offline
Надо глаза промыть, есть он там и причем так и написано: External crystall osc.

russian-robots@conference.jabber.ru - jabber чат для робототехников
KrishДата: Воскресенье, 19.06.2011, 15:39 | Сообщение # 147
Группа: Пользователи
Сообщений: 184
Репутация: 2
Статус: Offline
Quote (nightmare)
Надо глаза промыть, есть он там и причем так и написано: External crystall osc.

Как бы там написано Ext. crystal osc. 8.0 Mhz - это же 8 Mhz больше нет!


LacOS
nightmareДата: Воскресенье, 19.06.2011, 16:45 | Сообщение # 148
Язык программированя: C,C#
Группа: Проверенные
Сообщений: 133
Репутация: 3
Статус: Offline
8 и тире - 8 и выше.

russian-robots@conference.jabber.ru - jabber чат для робототехников
KrishДата: Вторник, 21.06.2011, 17:16 | Сообщение # 149
Группа: Пользователи
Сообщений: 184
Репутация: 2
Статус: Offline
кто знает, что означает в бейсике такая запись:
Code

Portb = &B00001111
Waitms 100

Добавлено (21.06.2011, 17:16)
---------------------------------------------
Это запись типо как в си?
portb0 вход
portb1 вход
portb2 вход
portb3 вход
portb4 выход
portb5 выход
portb6 выход
portb7 выход


LacOS
DimsanДата: Вторник, 21.06.2011, 17:28 | Сообщение # 150
Язык программированя: Си, Делфи
Группа: Модераторы
Сообщений: 65
Репутация: 1
Статус: Offline
Кажется да, только нумерация идёт с конца.
Т.е. 7 6 5 4 3 2 1 0
Форум » Мастерская » Я начинающий » Общие вопросы начинающих (Задаём вопросы)
Поиск: