Тема: Bluetooth
Показать сообщение отдельно
  #13  
Старый 03.09.2010, 22:42
Аватар для mak-karpov
mak-karpov mak-karpov вне форума
Активный
 
Регистрация: 18.09.2008
Сообщения: 235
Версия Delphi: 2010 и 7
Репутация: 1242
По умолчанию

Цитата:
--- А на звук (речь) он тоже реагирует ?
Т.е., можно его "тренировать" на речь ?
Неа, для звука/речи есть другой сенсор, но он в стандартном комплекте уже не поставляется.
А сонар - только расстояние до объекта

Цитата:
А как именно "выглядит" его программирование.

Ну например программа:
Код:
task main() // Главный поток
{
byte i; // Байтовая переменная i
TextOut(1,0,"Hello, world", DRAW_OPT_CLEAR); // Выводим текст "Hello world" в координатах (1;0)
OnFwd(OUT_AB, 50); // Включаем моторы A и B на половину мощности,
// справедливости ради нужно сказать, что можно заставить мотор повернуться, допустим на 240 град,
// надо RotateMotor(port, power, angle)
SetSensorTouch(IN_1); // Говорим, что к порту 1 подцеплена кнопка
while (!SENSOR_1); // Пока кнопка не нажата
Off(OUT_AB); // Отключить моторы A и B
GraphicOut(0,0,"test.ric",1); // Выводим картинку "test.ric" в координатах (0;0) и очисткой экрана
PlayFile("! Attention.rso"); // Играем звук "! Attention.rso"
while (!ButtonPressed(BTNCENTER,true)); // Ждем нажатия на оранжевую кнопку на роботе
for (i=0;i<20;i++) { // Думаю пояснять не надо
  TextOut(0,0,StrCat("Time: ", NumToStr(20-i)),1); // Выводим 20, 19, 18...
  Wait(1000); // Ждать секунду
}
PlayTone(3000, 100); // Звук 3 Кгц в течении 0,1 сек
Wait(3000); // Ждать три секунды
PowerDown(); // Просто так.
}
Компилятор этого языка здесь http://bricxcc.sourceforge.net

И насчет "недоязыка":
На диске есть такой вот "графический язык":
http://img823.imageshack.us/img823/7373/skrink.png
__________________
Кнопка "+" - весы в правом верхнем углу сообщения...
Ответить с цитированием