SANS CONTACT

Lorsque l'on approche la main ou un autre objet le robot recule sinon il avance. On peut aussi agir sur la direction en présentant l'objet sur le capteur de droite ou de gauche.

Le code en Pygmy Forth est le suivant :
( applications )
( sans contact )
: NOCONTACT ( - - )
BEGIN ( commence la boucle )
MOTORAV SURFC ( SURFC capteur de surface central )
0= NOT IF MOTORAR ( si SURFC n'est pas égal à zéro il recule )
ELSE MOTORAV ( sinon il avance )
THEN ( fin de branchement conditionnel )
SURFGL 0= NOT IF TURND MOTORAR ( si le capteur gauche n'est pas égal à zéro il recule à gauche )
THEN ( fin de branchement conditionnel )
SURFDW 0= NOT IF TURNG MOTORAR ( si le capteur droit n'est pas égal à zéro il recule à droite )
THEN ( fin de branchement conditionnel )
AGAIN ( la boucle recommence )
; ( fin du code )
: J NOCONTACT ;