BEGINNING_OF_PROGRAM

DEFINE_NEW_INSTRUCTION TURNRIGHT AS
  	{TURNLEFT;TURNLEFT;TURNLEFT;}
define_new_instruction misteriosa as
{
   IF FACING_WEST THEN
          {
             move;
             turnright;
             IF facing_north THEN
                  move;
             turnleft;
              turnleft;
           }
     ELSE
          {
             MOVE;
             TURNLEFT;
             MOVE;
             TURNLEFT;
               TURNLEFT;
          }
}
BEGINNING_OF_EXECUTION
TURNOFF;
END_OF_EXECUTION
END_OF_PROGRAM