Spis treści

Skład zespołu:

Budowa robota

Połączenie i pierwsze testy

Program

:- consult('plnxt.pl').
 
start :-
	nxt_open,
	trigger_create(_,check_line,[nxt_stop,rotate],inf),
 nxt_go(200, force).
 
check_line :-
	nxt_light(Level, force),
	Level < 80.
 
rotate :-
 Angle is 90+ random(90),
 nxt_rotate(360,Angle).
 
:- start.
:- consult('plnxt.pl').
 
start :-
 nxt_open,
 trigger_create(_,check_distance,[nxt_stop,obroc],inf),
 nxt_go(200, force).
 
check_distance :-
 nxt_ultrasonic(Level,force),
 Level < 50.
 
rotate :-
 Angle is 90+ random(90),
 nxt_rotate(360,Angle).
 
:- start.

Uwagi