[Actioscript] No entiendo mi código, ayuda.

[Tachikomaia]

Código (actionscript) [Seleccionar] Expandir

Escena 1
   actions for fotograma 1
      // SitIni.
      Base.S = 5;
      // CandIni.
      Actual.C = -1;
      // Vars de Unsolved sits.
      Actual.U = 0;
      Actual.Us = 0;
      // Save iniSit y preparar comprobación.
      S = 5;
      C = "Ninguno";
      Loading.S = -1;
      Loading.C = -1;
      Loading.Cargas = 0;
      Loading.ArchID = "S"+S+".txt";
      fscommand ("save", Loading.ArchID);
   actions for fotograma 3
      Loading.Comps = 0;
      Loading.Cargas = Loading.Cargas+1;
      loadVariables (Loading.ArchID, "Loading");
   actions for fotograma 5
      Loading.Comps = Loading.Comps+1;
      Loading.Verif = 1;
      if (Loading.S != S) {
         Loading.Verif = 0;
      } else if (Loading.C != C) {
         Loading.Verif = 0;
      }
      if (Loading.Verif == 0) {
         if (Loading.Comps == 10) {
            if (Loading.Cargas == 3) {
               fscommand ("save", "30 fallas en savecheck de "+Loading.ArchID);
               fscommand ("quit");
            } else {
               // reload.
               gotoAndPlay (3);
            }
         } else {
            // retry.
            gotoAndPlay (4);
         }
      }
   actions for fotograma 6
      // Reset Sit. Aplic.
      Actual.S = Base.S+Actual.C;
      // ¿Sol?
      if (10<Actual.S) {
         // Sol; begin loads to show list
         List = Actual.C;
         gotoAndPlay (26);
      } else {
         // ¿Sit exist?
         Loading.Cargas = 0;
         Loading.S = -10;
         Loading.C = -10;
         Loading.ArchID = "S"+Actual.S+".txt";
      }
   actions for fotograma 7
      Loading.Comps = 0;
      Loading.Cargas = Loading.Cargas+1;
      loadVariables (Loading.ArchID, "Loading");
   actions for fotograma 9
      Loading.Comps = Loading.Comps+1;
      Loading.Verif = 1;
      if (Loading.S == -10) {
         Loading.Verif = 0;
      } else if (Loading.C == -10) {
         Loading.Verif = 0;
      }
      if (Loading.Verif == 0) {
         if (Loading.Comps == 10) {
            if (Loading.Cargas == 3) {
               // La Sit parece no existir, crearla.
               S = Base.S;
               C = Actual.C;
               Loading.Cargas = 0;
               Loading.ArchID = "S"+Actual.S+".txt";
               gotoAndPlay (15);
            } else {
               // reload.
               gotoAndPlay (7);
            }
         } else {
            // retry.
            gotoAndPlay (8);
         }
      }
   actions for fotograma 10
      // La sit existe. ¿Candmod is pos?
      if (Actual.C<1) {
         // Candmod.
         Actual.C = Actual.C+2;
         // Reset sit, then Aplic.
         gotoAndPlay (6);
      } else {
         // Load UnsSit.
         Actual.U = Actual.U+1;
         Loading.Cargas = 0;
         Base.S = -10;
         Loading.ArchID = "U"+Actual.U+".txt";
      }
   actions for fotograma 11
      Loading.Comps = 0;
      Loading.Cargas = Loading.Cargas+1;
      loadVariables (Loading.ArchID, "Base");
   actions for fotograma 13
      if (Base.S == -10) {
         Loading.Comps = Loading.Comps+1;
         if (Loading.Comps == 10) {
            if (Loading.Cargas == 3) {
               fscommand ("save", "30 fallas en loading "+Loading.ArchID);
               fscommand ("quit");
            } else {
               // reload.
               gotoAndPlay (11);
            }
         } else {
            // retry.
            gotoAndPlay (12);
         }
      }
   actions for fotograma 14
      Base.S = Number(Base.S);
      // Reset Cand. Aplic.
      Actual.C = -1;
      gotoAndPlay (6);
   actions for fotograma 15
      // Creando Sit.
      fscommand ("save", Loading.ArchID);
   actions for fotograma 17
      Loading.Comps = 0;
      Loading.Cargas = Loading.Cargas+1;
      loadVariables (Loading.ArchID, "Loading");
   actions for fotograma 19
      Loading.Comps = Loading.Comps+1;
      Loading.Verif = 1;
      if (Loading.S != S) {
         Loading.Verif = 0;
      } else if (Loading.C != C) {
         Loading.Verif = 0;
      }
      if (Loading.Verif == 0) {
         if (Loading.Comps == 10) {
            if (Loading.Cargas == 3) {
               fscommand ("save", "30 fallas en savecheck de "+Loading.ArchID);
               fscommand ("quit");
            } else {
               // reload.
               gotoAndPlay (17);
            }
         } else {
            // retry.
            gotoAndPlay (18);
         }
      }
   actions for fotograma 20
      // Save UnsSit.
      delete C;
      S = Actual.S;
      Actual.Us = Actual.Us+1;
      Loading.S = -10;
      Loading.Cargas = 0;
      Loading.ArchID = "U"+Actual.Us+".txt";
      fscommand ("save", Loading.ArchID);
   actions for fotograma 22
      Loading.Comps = 0;
      Loading.Cargas = Loading.Cargas+1;
      loadVariables (Loading.ArchID, "Loading");
   actions for fotograma 24
      if (Loading.S == -10) {
         Loading.Comps = Loading.Comps+1;
         if (Loading.Comps == 10) {
            if (Loading.Cargas == 3) {
               fscommand ("save", "30 fallas en savecheck de "+Loading.ArchID);
               fscommand ("quit");
            } else {
               // reload.
               gotoAndPlay (22);
            }
         } else {
            // retry.
            gotoAndPlay (23);
         }
      }
   actions for fotograma 25
      // ¿Candmod is pos?
      gotoAndPlay (10);
   actions for fotograma 26
      S = Base.S;
      Loading.Cargas = 0;
      Base.S = -1;
      Base.C = -10;
      Loading.ArchID = "S"+S+".txt";
   actions for fotograma 27
      Loading.Comps = 0;
      Loading.Cargas = Loading.Cargas+1;
      loadVariables (Loading.ArchID, "Base");
   actions for fotograma 29
      Loading.Comps = Loading.Comps+1;
      Loading.Verif = 1;
      if (Base.S == -1) {
         Loading.Verif = 0;
      } else if (Base.C == -10) {
         Loading.Verif = 0;
      }
      if (Loading.Verif == 0) {
         if (Loading.Comps == 10) {
            if (Loading.Cargas == 3) {
               fscommand ("save", "30 fallas en loading "+Loading.ArchID);
               fscommand ("quit");
            } else {
               // reload.
               gotoAndPlay (27);
            }
         } else {
            // retry.
            gotoAndPlay (28);
         }
      }
   actions for fotograma 30
      if (Base.C != "Ninguno") {
         List = Base.C+" "+List;
         gotoAndPlay (26);
      } else {
         stop ();
      } La idea es comparable a un objeto que se mueve de a 1 casillero en el eje de las X, hasta que gracias a las acciones adecuadas quede más allá del punto 10.

Funciona, pero si no puedo entenderlo difícil que pueda agregarle cosas más complejas, no tiene sentido.

Pueden hacerme preguntas; las adecuadas resolverán mis dudas se supone...

Gracias.

Por ejemplo: ¿Por qué uso Actual.C en vez de C?

MOD: Titulo modificado. Agregadas etiquetas GeSHi.

[Tachikomaia]

Logré esto, aunque debo llegar a más