Задание№2-1 — различия между версиями

Материал из roboforum.ru Wiki
Перейти к: навигация, поиск
Строка 19: Строка 19:
 
       Led_r1 = 0
 
       Led_r1 = 0
 
End If
 
End If
 +
</source>
 +
 +
3. Добавляем еще одну процедурку (пока пусту)
 +
<source lang="vb">
 +
Запоминаем_команды:
 +
  If Led_r1 = 1 Then Print "Memmory command"
 +
Return
 
</source>
 
</source>

Версия 17:12, 6 апреля 2008

Учим МиниБот переходить в режим запоминания комманд заодно и поморгаем светодиодом

1. Говорим МиниБоту что оказывается у него еще и светодиоды есть ;-) <source lang="vb"> Config Pinc.4 = Output : Led_r1 Alias Portc.4 Config Pinc.5 = Output : Led_g1 Alias Portc.5 Config Pinc.6 = Output : Led_r2 Alias Portc.6 Config Pinc.7 = Output : Led_g2 Alias Portc.7 </source>

2. Выбираем волшебную кнопочку на пульте для перевода МиниБота в режим запоминания команд. Мне например приглянулась кнопочка <. Ёё скан код 21. Соответсвенно для выхода из этого режима (чтоб не заморачиваться с кодом,что у нас кнопок что ли мало?) назначаем другую волшебную кнопочку > ёё сканкод соответственно 22. Для симметрии, типа чтоб по феншую всё было в шоколаде.

Теперь собсвенно описываем эти волшебные кнопочки. <source lang="vb"> If Command = 21 Then 'Кнопка < - переход в режим запоминания комманд

     Led_r1 = 1

Elseif Command = 22 Then 'Кнопка > - выхода из режим запоминания комманд

     Led_r1 = 0

End If </source>

3. Добавляем еще одну процедурку (пока пусту) <source lang="vb"> Запоминаем_команды:

  If Led_r1 = 1 Then Print "Memmory command"

Return </source>