iniciar-programa
define-nueva-instruccion  orienta como  inicio
mientras no-orientado-al-sur hacer inicio
gira-izquierda;
fin;
 mientras frente-libre hacer
avanza;
repetir 3 veces
gira-izquierda;
mientras frente-libre hacer
avanza;
fin;
define-nueva-instruccion  linea1 como inicio
repetir 3 veces
gira-izquierda;
deja-zumbador;
mientras frente-libre hacer inicio
repetir 3 veces
gira-izquierda;
avanza;
gira-izquierda;
avanza;
deja-zumbador;
fin;
fin;
define-nueva-instruccion  linea2 como inicio
gira-izquierda;
mientras frente-libre hacer
avanza;
gira-izquierda;
deja-zumbador;
mientras frente-libre hacer inicio
avanza;
gira-izquierda;
avanza;
si no-junto-a-zumbador entonces inicio
deja-zumbador;
fin;
repetir 3 veces
gira-izquierda;
fin;
fin;
define-nueva-instruccion  linea3(n) como inicio
repetir 2 veces
 gira-izquierda;

repetir n veces
 avanza;
  repetir 3 veces
  gira-izquierda;
  deja-zumbador;

mientras frente-libre hacer inicio
avanza;
si no-junto-a-zumbador entonces inicio
deja-zumbador;
fin;
fin;
repetir 3 veces
gira-izquierda;
mientras frente-libre hacer
avanza;
repetir 3 veces
gira-izquierda;
repetir n veces
 avanza;
  repetir 3 veces
  gira-izquierda;
  deja-zumbador;
  mientras frente-libre hacer inicio
avanza;
si no-junto-a-zumbador entonces inicio
deja-zumbador;
fin;
fin;

  apagate;

fin;



define-nueva-instruccion  contar-y-linea3(n) como inicio
mientras  frente-libre hacer  inicio
  avanza;
   si frente-libre entonces inicio
    avanza;
     contar-y-linea3(sucede(n));
fin;
     fin;

linea3(n);
  fin;



    inicia-ejecucion

       orienta;
         linea1;
          linea2;
          repetir 2 veces
gira-izquierda;
          contar-y-linea3(0);


        
    termina-ejecucion
finalizar-programa
