home *** CD-ROM | disk | FTP | other *** search
/ 600 Games / 600games.iso / Aventura / the_lost_vikings.swf / scripts / DefineSprite_472_BarrierClass / frame_1 / DoAction.as
Encoding:
Text File  |  2007-03-20  |  1.4 KB  |  62 lines
  1. function Barrier_Collide0(target)
  2. {
  3.    if(target.Obj_Flags & 0x40)
  4.    {
  5.       return 0;
  6.    }
  7.    if(target.CX2 < this.CX1 || target.CX1 > this.CX2 || target.CY2 < this.CY1 || target.CY1 > this.CY2)
  8.    {
  9.       return 0;
  10.    }
  11.    if(!(target.Obj_Flags & 0x40))
  12.    {
  13.       target.Obj_Flags |= 64;
  14.       target.setHndlr(1,0);
  15.       target.gotoAndPlay("Runner_Shocked");
  16.    }
  17.    return 1;
  18. }
  19. function Barrier_Collide()
  20. {
  21.    Barrier_Collide0(_root.Runner);
  22.    Barrier_Collide0(_root.Shield);
  23.    Barrier_Collide0(_root.Fighter);
  24. }
  25. function Barrier_Loop()
  26. {
  27.    this.Obj_Climb = this.Obj_Climb + 1;
  28.    if(this.Obj_Climb & 3)
  29.    {
  30.       if(!(this.Obj_Flags & 0x40))
  31.       {
  32.          this.cacheCX();
  33.          Barrier_Collide();
  34.       }
  35.    }
  36. }
  37. this.setHndlr(1,this.Barrier_Loop);
  38. this.gotoAndPlay("Barrier_Loop");
  39. _root.KEY_LT = 37;
  40. _root.KEY_RT = 39;
  41. _root.KEY_UP = 38;
  42. _root.KEY_DN = 40;
  43. _root.KEY_A = 65;
  44. _root.KEY_B = 83;
  45. _root.KEY_LB = 81;
  46. _root.KEY_RB = 87;
  47. _root.KEY_CHEAT = 17;
  48. _root.Obj_Flags_ALWAYSRUN = 384;
  49. _root.Obj_Flags_BACKGROUND = 256;
  50. _root.Obj_Flags_MICKEY = 128;
  51. _root.Obj_Flags_DEAD = 64;
  52. _root.Obj_Flags_SPECIAL = 32;
  53. _root.Obj_Flags_KILL = 16;
  54. _root.Obj_Flags_KEYBD = 8;
  55. _root.Obj_Flags_GONE = 4;
  56. _root.Obj_Flags_ATTACK = 2;
  57. _root.Obj_Flags_CLIMBING = 1;
  58. this.Obj_X1 = -4;
  59. this.Obj_X2 = 4;
  60. this.Obj_Y1 = -48;
  61. this.Obj_Y2 = 0;
  62.