BEGINNING-OF-PROGRAM
define-new-instruction turnright as
begin
turnleft;
turnleft;
turnleft
end;
define-new-instruction step as
begin
turnleft;
move;
turnright;
move
end;
BEGINNING-OF-EXECUTION
step;
step;
step;
step;
step;
turnoff
END-OF-EXECUTION
END-OF-PROGRAM