home *** CD-ROM | disk | FTP | other *** search
/ 600 Games / 600games.iso / Puzzle / towerblaster.swf / scripts / DefineSprite_318 / frame_24 / DoAction.as
Encoding:
Text File  |  2007-03-12  |  1.8 KB  |  89 lines
  1. openSlot = 0;
  2. x = 1;
  3. while(10 >= x)
  4. {
  5.    if(x * spred - spred < eval("_root.cB" + x + ".rValue") and x * spred >= eval("_root.cB" + x + ".rValue"))
  6.    {
  7.       set("lock" + x,1);
  8.    }
  9.    else
  10.    {
  11.       set("lock" + x,0);
  12.    }
  13.    if(x * spred - spred < discardB.rValue and x * spred >= discardB.rValue)
  14.    {
  15.       openSlot = x;
  16.    }
  17.    x++;
  18. }
  19. a = 1;
  20. huntfor1 = "";
  21. huntfor2 = "";
  22. if(lock1 + lock2 + lock3 + lock4 + lock5 + lock6 + lock7 + lock8 + lock9 + lock10 >= 11)
  23. {
  24.    almostDone = 1;
  25.    x = 1;
  26.    while(10 >= x)
  27.    {
  28.       if(eval("lock" + x) == 0)
  29.       {
  30.          set("huntfor" + a,x);
  31.          a += 1;
  32.       }
  33.       x++;
  34.    }
  35. }
  36. else
  37. {
  38.    almostDone = 0;
  39. }
  40. if(random(100) + 1 >= 80)
  41. {
  42.    openSlot = random(10) + 1;
  43. }
  44. if(openSlot != 0)
  45. {
  46.    pick = 1;
  47.    tempValue = discardB.rValue;
  48.    gotoAndStop(53);
  49. }
  50. else
  51. {
  52.    set("/:drawBlockcount",eval("/:drawBlockcount") + 1);
  53.    chanceB.rValue = eval("/:drawBlock" + eval("/:drawBlockcount"));
  54.    set("/:drawBlockMax",eval("/:drawBlockMax") + 1);
  55.    set("/:drawBlock" + eval("/:drawBlockMax"),discardB.rValue);
  56.    openSlot = 0;
  57.    x = 1;
  58.    while(10 >= x)
  59.    {
  60.       if(x * spred - spred < chanceB.rValue and x * spred >= chanceB.rValue)
  61.       {
  62.          openSlot = x;
  63.       }
  64.       x++;
  65.    }
  66.    if(eval("lock" + openSlot) == 1)
  67.    {
  68.       if(eval("_root.cB" + openSlot + ".rValue") < chanceB.rValue and openSlot < 10)
  69.       {
  70.          openSlot += 1;
  71.       }
  72.       else if(chanceB.rValue < eval("_root.cB" + openSlot + ".rValue") and 1 < openSlot)
  73.       {
  74.          openSlot -= 1;
  75.       }
  76.    }
  77.    if(openSlot == 0)
  78.    {
  79.       openSlot = 1;
  80.    }
  81.    else if(openSlot == 11)
  82.    {
  83.       openSlot = 10;
  84.    }
  85.    pick = 2;
  86.    tempValue = chanceB.rValue;
  87.    gotoAndStop(54);
  88. }
  89.