Escena 1
   actions for fotograma 1
      Respuesta = "Vencer al enemigo mediante acciones, el enemigo tiene 11 HP. Se recomienda la serie... ";
      // Situación inicial:
      // HP inicial del enemigo:
      EnBaseHP = 11;
      trace ("EnBaseHP: "+EnBaseHP);
      // Guardar situación y cómo se produjo:
      // Esta variable es el principio del nombre de los datos (en este caso S11):
      SitID = "S"+EnBaseHP;
      trace ("SitID: "+SitID);
      // Esta variable marca qué acción se realizó en la situación anterior (en este caso ninguna):
      set (SitID+"ActionAnterior", "Ninguna");
      trace (SitID+"ActionAnterior: "+eval(SitID+"ActionAnterior"));
      // En este caso la variable es S11Action="Ninguna".
      // Acción que será usada 1ero:
      Action = 1;
      trace ("Action: "+Action);
      // Variables sobre situaciones anotadas:
      // Total de situaciones anotadas:
      As = 0;
      trace ("Situaciones anotadas: "+As);
      // Situación anotada que será investigada 1ero:
      A = 0;
      trace ("Situación anotada a investigar cuando se comience a investigar las anotadas: "+A);
   actions for fotograma 2
      // Reset de la situación. Aplicación de la acción:
      EnHP = EnBaseHP-Action;
      trace ("Reset de la situación, aplicación de la acción, la situación ahora es:");
      trace ("EnHP: "+EnHP);
      // ¿Se logró el objetivo?
      if (EnHP<=0) {
         // Sí, iniciar muestra de serie de acciones que la causan:
         Serie = Action;
         trace ("Solución hallada, iniciando proceso para mostrar respuesta.");
         gotoAndPlay (5);
      } else {
         // No se logró el objetivo.
         trace ("No se logró el objetivo.");
         // ¿La situación producida está anotada?
         if (eval("S"+EnHP+"ActionAnterior") == undefined) {
            trace ("La situación producida no está anotada.");
            // La situación no está anotada, anotarla y cómo se logró:
            SitID = "S"+EnHP;
            set (SitID+"EnHPAnterior", EnBaseHP);
            set (SitID+"ActionAnterior", Action);
            trace ("Nueva situación anotada: "+SitID);
            trace ("Su antecedente fue ("+SitID+"EnHPAnterior): "+EnBaseHP);
            trace ("y la acción fue ("+SitID+"ActionAnterior): "+Action);
            // También se agrega como situación a investigar y se anota en qué consiste:
            As = As+1;
            SitID = "A"+As;
            set (SitID+"EnHP", EnHP);
            trace ("Situaciones anotadas: "+As);
            trace ("La última consiste en (EnHP): "+eval(SitID+"EnHP"));
         } else {
            trace ("La situación producida ya está anotada.");
         }
      }
   actions for fotograma 3
      // La situación existe. ¿Modificar acción es posible?
      if (Action<2) {
         // Sí, modificarla:
         trace ("Es posible modificar acción.");
         Action = Action+1;
         trace ("Action fue modificada, es: "+Action);
         gotoAndPlay (2);
      } else {
         // No es posible modificar la acción.
         trace ("No es posible modificar la acción.");
         if (A<As) {
            // Aún hay situaciones anotadas sin investigar, investigar una (probablemente lo ideal sería investigar la más diferente a las investigadas, pero me es difícil programar eso):
            trace ("Aún hay situaciones anotadas sin investigar.");
            A = A+1;
            EnBaseHP = eval("A"+A+"EnHP");
            trace ("Se investigará la situación anotada nro: "+A);
            trace ("Consiste en EnBaseHP: "+EnBaseHP);
            Action = 1;
            trace ("Reset de la acción a usar, es: "+Action);
            gotoAndPlay (2);
         } else {
            // No hay situaciones anotadas sin investigar.
            Respuesta = "No es posible lograr el objetivo.";
            trace ("No hay situaciones anotadas sin investigar ni es posible lograr el objetivo.");
            stop ();
         }
      }
   actions for fotograma 5
      // Obtener acción anterior:
      ActionAnterior = eval("S"+EnBaseHP+"ActionAnterior");
      trace ("La acción anterior fue: "+ActionAnterior);
      // ¿Hubo?
      if (ActionAnterior != "Ninguna") {
         // Sí, agregarla en la lista:
         Serie = ActionAnterior+" "+Serie;
         trace ("Acción agregada en la serie.");
         // Averiguar cual fue la situación anterior:
         EnBaseHP = eval("S"+EnBaseHP+"EnHPAnterior");
         trace ("Se realizó en la situación: S"+EnBaseHP);
         // Repetir este frame.
         gotoAndPlay (4);
      } else {
         // No hubo una acción anterior, mostrar la serie:
         Respuesta = Respuesta+Serie;
         stop ();
      }
 

Escena 1
   actions for fotograma 1
      // Situación inicial.
      BaseEnHP = 10;
      // Guardar Situación inicial.
      SitID = "S"+BaseEnHP;
      set (SitID+"EnHP", BaseEnHP);
      set (SitID+"Action", "Ninguno");
      Action = 1;
      // Variables de Unsolved situaciones.
      U = 0;
      Us = 0;
   actions for fotograma 2
      // Reset Situación. Aplicación.
      EnHP = BaseEnHP-Action;
      // ¿Sol?
      if (EnHP<=0) {
         // Solución; iniciar mostrar lista.
         List = Action;
         gotoAndPlay (4);
         // Sino ¿la situación está anotada?
      } else if (eval("S"+EnHP+"EnHP") == undefined) {
         // No. Anotarla.
         SitID = "S"+EnHP;
         set (SitID+"EnHP", BaseEnHP);
         set (SitID+"Action", Action);
         Us = Us+1;
         SitID = "U"+Us;
         set (SitID+"EnHP", EnHP);
      }
   actions for fotograma 3
      // La situación existe. ¿Modificar candidato es posible?
      if (Action<2) {
         // Modificación de candidato.
         Action = Action+1;
         gotoAndPlay (2);
      } else if (U<Us) {
         // Usar Unsolveds.
         U = U+1;
         BaseEnHP = eval("U"+U+"EnHP");
         Action = 1;
         gotoAndPlay (2);
      } else {
         // No hay Solución.
         List = "No hay sol";
         stop ();
      }
   actions for fotograma 5
      SitID = eval("S"+BaseEnHP+"Action");
      BaseEnHP = eval("S"+BaseEnHP+"EnHP");
      if (SitID != "Ninguno") {
         List = SitID+" "+List;
         gotoAndPlay (4);
      } else {
         stop ();
      }

Escena 1
   actions for fotograma 1
      Respuesta = "Vencer al enemigo mediante acciones, el enemigo tiene 11 HP. Se recomienda la serie... ";
      // Situación inicial:
      // HP inicial del enemigo:
      EnBaseHP = 11;
      trace ("EnBaseHP: "+EnBaseHP);
      // Guardar situación y cómo se produjo:
      // Esta variable es el principio del nombre de los datos, en este caso S11:
      SitID = "S"+EnBaseHP;
      trace ("SitID: "+SitID);
      // Esta variable marca qué acción se realizó en la situación anterior, en este caso ninguna:
      set (SitID+"ActionAnterior", "Ninguna");
      trace (SitID+"ActionAnterior: "+eval(SitID+"ActionAnterior"));
      // En este caso la variable es S11Action="Ninguna".
      // Acción que será usada 1ero:
      Action = 1;
      trace ("Action: "+Action);
      // Variables sobre situaciones anotadas:
      // Total de situaciones anotadas:
      As = 0;
      trace ("Situaciones anotadas: "+As);
      // Situación anotada que será investigada 1ero:
      A = 0;
      trace ("Situación anotada a investigar cuando se comience a investigar las anotadas: "+A);
   actions for fotograma 2
      // Reset de la situación. Aplicación de la acción:
      EnHP = EnBaseHP-Action;
      trace ("Reset de la situación, aplicación de la acción, la situación ahora es:");
      trace ("EnHP: "+EnHP);
      // ¿Se logró el objetivo?
      if (EnHP<=0) {
         // Sí, iniciar muestra de serie de acciones que la causan:
         Serie = Action;
         trace ("Solución hallada, iniciando proceso para mostrar respuesta.");
         gotoAndPlay (4);
      } else {
         // No se logró el objetivo.
         trace ("No se logró el objetivo.");
         // ¿La situación producida está anotada?
         if (eval("S"+EnHP+"EnHPAnterior") == undefined) {
            trace ("La situación producida no está anotada.");
            // La situación no está anotada, anotarla y cómo se logró:
            SitID = "S"+EnHP;
            set (SitID+"EnHPAnterior", EnBaseHP);
            set (SitID+"ActionAnterior", Action);
            trace ("Nueva situación anotada: "+SitID);
            trace ("Su antecedente fue ("+SitID+"EnHPAnterior): "+EnBaseHP);
            trace ("y la acción fue ("+SitID+"ActionAnterior): "+Action);
            // También se agrega como situación a investigar y se anota en qué consiste:
            As = As+1;
            SitID = "A"+As;
            set (SitID+"EnHP", EnHP);
            trace ("Situaciones anotadas: "+As);
            trace ("La última consiste en (EnHP): "+eval(SitID+"EnHP"));
         } else {
            trace ("La situación producida ya está anotada.");
         }
      }
   actions for fotograma 3
      // La situación existe. ¿Modificar acción es posible?
      if (Action<2) {
         // Sí, modificarla:
         trace ("Es posible modificar acción.");
         Action = Action+1;
         trace ("Action fue modificada, es: "+Action);
         gotoAndPlay (2);
      } else {
         // No es posible modificar la acción.
         trace ("No es posible modificar la acción.");
         if (A<As) {
            // Aún hay situaciones anotadas sin investigar, investigar una (probablemente lo ideal sería investigar la más diferente a las investigadas, pero me es difícil programar eso):
            trace ("Aún hay situaciones anotadas sin investigar.");
            A = A+1;
            EnBaseHP = eval("A"+A+"EnHP");
            trace ("Se investigará la situación anotada nro: "+A);
            trace ("Consiste en EnBaseHP: "+EnBaseHP);
            Action = 1;
            trace ("Reset de la acción a usar, es: "+Action);
            gotoAndPlay (2);
         } else {
            // No hay situaciones anotadas sin investigar.
            Respuesta = "No es posible lograr el objetivo.";
            trace ("No hay situaciones anotadas sin investigar ni es posible lograr el objetivo.");
            stop ();
         }
      }
   actions for fotograma 5
      // Obtener acción anterior:
      ActionAnterior = eval("S"+EnBaseHP+"ActionAnterior");
      trace ("La acción anterior fue: "+ActionAnterior);
      // ¿Hubo?
      if (ActionAnterior != "Ninguna") {
         // Sí, agregarla en la lista:
         Serie = ActionAnterior+" "+Serie;
         trace ("Acción agregada en la serie.");
         // Averiguar cual fue la situación anterior:
         EnBaseHP = eval("S"+EnBaseHP+"EnHPAnterior");
         trace ("Se realizó en la situación: S"+EnBaseHP);
         // Repetir este frame.
         gotoAndPlay (4);
      } else {
         // No hubo una acción anterior, mostrar la serie:
         Respuesta = Respuesta+Serie;
         stop ();
      }