iniciar-programa
define-nueva-instruccion turnright como inicio
repetir 3 veces gira-izquierda;
fin;
define-nueva-instruccion halfturn como inicio
gira-izquierda;
gira-izquierda;
fin;
define-nueva-instruccion backmove como inicio
halfturn;
avanza;
fin;
define-nueva-instruccion leftmove como inicio
gira-izquierda;
avanza;
fin;
define-nueva-instruccion caminaAPared como inicio
mientras frente-libre hacer
avanza;
fin;
define-nueva-instruccion colocaMonton como inicio
mientras algun-zumbador-en-la-mochila hacer
deja-zumbador;
fin;
define-nueva-instruccion cuentaHombres como inicio
mientras junto-a-zumbador hacer inicio
gira-izquierda;
mientras junto-a-zumbador hacer inicio
coge-zumbador;
si no-junto-a-zumbador entonces
deja-zumbador;
avanza;
fin;
halfturn;
caminaAPared;
backmove;
turnright;
avanza;
fin;
halfturn;
caminaAPared;
leftmove;
leftmove;
colocaMonton;
fin;
define-nueva-instruccion cuentaMujeres como inicio
mientras junto-a-zumbador hacer inicio
gira-izquierda;
mientras junto-a-zumbador hacer inicio
coge-zumbador;
avanza;
fin;
halfturn;
caminaAPared;
backmove;
turnright;
avanza;
fin;
halfturn;
caminaAPared;
gira-izquierda;
avanza;
colocaMonton;
fin;
define-nueva-instruccion resta como inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
leftmove;
coge-zumbador;
backmove;
gira-izquierda;
resta;
deja-zumbador;
fin;
fin;
    inicia-ejecucion
        avanza;
        turnright;
        cuentaHombres;
        leftmove;
        leftmove;
        halfturn;
        cuentaMujeres;
        leftmove;
        gira-izquierda;
        resta;
        apagate;
    termina-ejecucion
finalizar-programa







