ZoriaRPG

blockbomb 2.55 item script

May 29th, 2019
148
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. item script blockbomb
  2. {
  3.     void run()
  4.     {
  5.         while(1)
  6.         {
  7.             for ( int q = Screen->NumEWeapons(); q > 0; --q )
  8.             {
  9.                 eweapon e = Screen->LoadEWeapon(q);
  10.                 if ( e->ID == EW_BOMBBLAST || e->ID == EW_SBOMBBLAST )
  11.                 {
  12.                     switch(Link->Dir)
  13.                     {
  14.                         case DIR_UP:
  15.                         {
  16.                             if ( e->Y < Link->Y+8 ) e->HitYOffset = -32768; break;
  17.                         }
  18.                         case DIR_DOWN:
  19.                         {
  20.                             if ( e->Y > Link->Y+8 ) e->HitYOffset = -32768; break;
  21.                         }
  22.                         case DIR_LEFT:
  23.                         {
  24.                             if ( e->X < Link->X+8 ) e->HitYOffset = -32768; break;
  25.                         }
  26.                         case DIR_RIGHT:
  27.                         {
  28.                             if ( e->X > Link->X+8 ) e->HitYOffset = -32768; break;
  29.                         }
  30.                     }
  31.                 }
  32.             }
  33.             for ( int q = Screen->NumLWeapons(); q > 0; --q )
  34.             {
  35.                 lweapon e = Screen->LoadLWeapon(q);
  36.                 if ( e->ID == LW_BOMBBLAST || e->ID == LW_SBOMBBLAST )
  37.                 {
  38.                     switch(Link->Dir)
  39.                     {
  40.                         case DIR_UP:
  41.                         {
  42.                             if ( e->Y < Link->Y+8 ) e->HitYOffset = -32768; break;
  43.                         }
  44.                         case DIR_DOWN:
  45.                         {
  46.                             if ( e->Y > Link->Y+8 ) e->HitYOffset = -32768; break;
  47.                         }
  48.                         case DIR_LEFT:
  49.                         {
  50.                             if ( e->X < Link->X+8 ) e->HitYOffset = -32768; break;
  51.                         }
  52.                         case DIR_RIGHT:
  53.                         {
  54.                             if ( e->X > Link->X+8 ) e->HitYOffset = -32768; break;
  55.                         }
  56.                     }
  57.                 }
  58.             }
  59.         }
  60.     }
  61. }
RAW Paste Data