** Paweł Konas, Paweł Płazieński, zestaw IREK **\\ \\
**Konstrukcja:**\\
Korzystaliśmy ze skonstruowanego już robota Tribot (zestaw IREK). Z tego też względu nie zamieszczamy jego zdjęć.
**Program:** \\
Początkowo postanowiliśmy zaimplementować program "Co przybyło?". Był on realizowany w ten sposób: robot obracał się o 360 stopni i co 45 stopni badał odległość czujnikiem ultradźwiękowym, którą nasŧępnie dodawał na listę. W kolejnej części - po dodaniu przedmiotu - miał przeprowadzać tą czynność ponownie, by ostatecznie porównać obie listy.
Pojawił się jednak problem (opisany w kolejnej części), który zmusił nas do porzucenia tego programu i zajęcia się innym - "Śledzenie linii".
Program "Śledzenie linii" udało się nam zrealizować (choć nie bez komplikacji, patrz -> Problemy). Działał on następująco:
Robot ustawiony na planszy dostarczanej przez Lego (w jej wnętrzu) jedzie przed siebie dopóki nie natrafi na czarne podłoże (użyta funkcja wait_till). Wówczas kontynuuje jazdę przed siebie ale tym razem dopóki podłoże jest czarne. Gdy przestanie być to skręca o 20 stopni w prawo i kontynuuje jazdę dopóki znów nie będzie białe podłoże (w przeciwnym wypadku znów obróci się o 20 stopni itd.). Program kończył się po naciśnięciu czujnika dotyku. Poniżej zamieszczamy listing programu:
:- consult('plnxt/plnxt.pl').
is_touched :-
nxt_touch(Value),
Value = 1.
is_loud :-
nxt_sound(Value),
Value > 50.
is_white :-
nxt_light(Value,force),
write('Light: '), write(Value), nl,
Value > 45.
follow_the_white_rabbit :-
nxt_stop,
nxt_go(100),
wait_till(not(is_white)),
follow_line.
follow_line :-
nxt_stop,
nxt_go(100),
wait_till(is_white),
turn_right.
turn_right :-
nxt_stop,
nxt_rotate(200,20,force),
follow_line.
start :-
nxt_light_LED(activate),
trigger_create(_,is_touched,[quit]),
follow_the_white_rabbit.
quit :-
trigger_killall,
nxt_stop.
**Problemy:** \\
- Pierwszy problem pojawił się przy próbie stworzenia programu "Co przybyło?". Dla poniższego kodu: \\
bug_1(A) :-
A >= 45,
NewA is A - 45,
nxt_rotate(400,45),
nxt_ultrasonic(Value),
bug_1(NewA).
start :-
bug_1(360).
Pojawiał się błąd:
?- nxt_open.
Yes
?- start.
ERROR: Arithmetic: `angle/1' is not a function
Exception: (27) _L19345 is angle(89)//256 ? creep
Exception: (23) nxt_actions_serial:nxt_actions_motor_move('C', 400, [motoron, brake, regulated], sync, 100, running, angle(89)) ? creep
Exception: (21) nxt_sensomoto:nxt_motor_sync('C', 'B', 400, 100, angle(angle(89))) ? creep
Exception: (18) nxt_movement:nxt_turn(400, 89, force) ? creep
\\
- Zbliżony błąd wystąpił w przypadku drugiego programu (udało się go pozbyć modyfikując kod po postaci załączonej do sprawozdania). Pojawiał się on prawdopodobnie przy próbach korzystania z czujnika światła. Był on postaci:
ERROR: Arithmetic: `force/0' is not a function
Exception: (20) _L6877 is force//256 ? creep
Exception: (16) nxt_actions_serial:nxt_actions_motor_move('C', 100, [motoron, brake, regulated], sync, 0, running, force) ? creep
Exception: (14) nxt_sensomoto:nxt_motor_sync('C', 'B', 100, 0, angle(force)) ? creep
?
\\
- Oprócz tego problem pojawiał się przy próbie nawiązywania (kończenia) połączenia z robotem przy pomocy nxt_open, nxt_close. Dokładniej mówiąc gdy aktualnie działający program wyrzucał wyjątek trzeba było restartować powłokę SWIPL by móc wgrać nowy program. \\
- Parę razy musieliśmy też restartować robota by wgrać nowy program bo poprzednia wersja uporczywie rezydowała w jego pamięci.
**Propozycje zmian w Wiki/laboratoriach:** \\
- Można by stworzyć jakieś dodatkowe plansze dla NXT oprócz tej dostarczanej przez Lego (np. labirynt etc.) \\
- Przydałby się predykat do ciągłego obracania się robota (aż do wyzwolenia trigera) \\
**Plik z programem:**\\
{{:pl:mindstorms:studenci:przedmioty:jsi:jsi2008:program211.pl|Plik pl z programem}}