home *** CD-ROM | disk | FTP | other *** search
/ One Click 21 (Special) / OC021.iso / Juegos / anik.swf / scripts / frame_35 / DoAction.as
Encoding:
Text File  |  2005-11-18  |  1.3 KB  |  55 lines
  1. h = 12;
  2. while(h < 100)
  3. {
  4.    j2 = h % 10;
  5.    if(Number(j2) != 1 or Number(j2) != 0)
  6.    {
  7.       h1 = h - 1;
  8.       h2 = h + 1;
  9.       center = _root.colo[h];
  10.       left = _root.colo[h1];
  11.       right = _root.colo[h2];
  12.       if(Number(center) < 7 and Number(center) == Number(left) and Number(center) == Number(right))
  13.       {
  14.          _root.killer[h] = 1;
  15.          _root.killer[h1] = 1;
  16.          _root.killer[h2] = 1;
  17.          ┬º/:ddweb┬º++;
  18.       }
  19.       h1 = h - 10;
  20.       h2 = h + 10;
  21.       center = _root.colo[h];
  22.       left = _root.colo[h1];
  23.       right = _root.colo[h2];
  24.       if(Number(center) < 7 and Number(center) == Number(left) and Number(center) == Number(right))
  25.       {
  26.          _root.killer[h] = 1;
  27.          _root.killer[h1] = 1;
  28.          _root.killer[h2] = 1;
  29.          ┬º/:ddweb┬º++;
  30.       }
  31.    }
  32.    h++;
  33. }
  34. h = 102;
  35. while(h < 110)
  36. {
  37.    j2 = h % 10;
  38.    if(Number(j2) != 1 or Number(j2) != 0)
  39.    {
  40.       h1 = h - 1;
  41.       h2 = h + 1;
  42.       center = _root.colo[h];
  43.       left = _root.colo[h1];
  44.       right = _root.colo[h2];
  45.       if(Number(center) < 7 and Number(center) == Number(left) and Number(center) == Number(right))
  46.       {
  47.          _root.killer[h] = 1;
  48.          _root.killer[h1] = 1;
  49.          _root.killer[h2] = 1;
  50.          ┬º/:ddweb┬º++;
  51.       }
  52.    }
  53.    h++;
  54. }
  55.