[TDO2000]

NPC Code:

---

if(weaponfired && playermp >=10){

  if(playerdir==0 || playerdir==2){

    playermp-=10;

    this.dir=playerdir;

    this.distance=0;

    this.startxy={playerx+vecx(this.dir)*2,playery+vec  y(this.dir)*2};

    timeout=.05;

  }

}



if(timeout){

  if(this.distance < 20){

    this.distance++;

    putexplosion2 2,1,this.startxy[0],this.startxy[1];

    this.startxy[0]+=vecx(this.dir);

    this.startxy[1]+=vecy(this.dir);

    timeout=.05;

  }

}

---

not tested, but it should work...