home *** CD-ROM | disk | FTP | other *** search
/ 600 Games / 600games.iso / Classicos / MiniclipsTetris.swf / scripts / DefineSprite_185 / frame_11 / DoAction.as
Encoding:
Text File  |  2005-08-04  |  941 b   |  68 lines
  1. if(dir eq "r")
  2. {
  3.    if(right >= col)
  4.    {
  5.       col++;
  6.    }
  7.    else
  8.    {
  9.       col = right;
  10.       right--;
  11.       dir = "d";
  12.    }
  13. }
  14. else if(dir eq "d")
  15. {
  16.    if(bottom >= row)
  17.    {
  18.       row++;
  19.    }
  20.    else
  21.    {
  22.       row = bottom;
  23.       bottom--;
  24.       dir = "l";
  25.    }
  26. }
  27. else if(dir eq "l")
  28. {
  29.    if(col >= left)
  30.    {
  31.       col--;
  32.    }
  33.    else
  34.    {
  35.       col = left;
  36.       left++;
  37.       dir = "u";
  38.    }
  39. }
  40. else if(dir eq "u")
  41. {
  42.    if(top < row)
  43.    {
  44.       row--;
  45.    }
  46.    else
  47.    {
  48.       row = top + 1;
  49.       top++;
  50.       dir = "r";
  51.    }
  52. }
  53. if(eval("_parent.Box" + col + "_" + row)._currentframe != brickType)
  54. {
  55.    eval("_parent.Box" + col + "_" + row).gotoAndStop(brickType);
  56.    eval("_parent.Box" + col + "_" + row).filled = false;
  57.    count++;
  58. }
  59. if(total < count)
  60. {
  61.    if(!screenFilled)
  62.    {
  63.       _parent.showTitle();
  64.    }
  65.    gotoAndStop(1);
  66. }
  67. gotoAndPlay(_currentframe - 1);
  68.