Daira NPC and EWeapon Scripts for 2.55

npc script DairaNPC
{
    void run()
    {

        //Original Tile
        int OTile = this->OriginalTile;

        //Movement Variables
        float counter = -1;
        int step = this->Step;
        int rate = this->Rate;
        int homing = this->Homing;
        int hunger = this->Hunger;

        //Weapon Variables
        eweapon wpn;
        int damage = this->WeaponDamage;
        int attackTimer;
        int attackWait; //Time between swings.
        bool throw = (this->Attributes[0]&1);
        //bool shielded = this->Attributes[0]&4;
        int wSprite = this->WeaponSprite; //Ghost_GetAttribute(ghost,1,-1);

        //Behavior
        while(this->isValid())
        {

            //Attacking
            if(Distance(Link->X, Link->Y, this->X, this->Y) < 80 && attackTimer==0) //Attacks when close to Link.
            {
                attackWait--;
                if(attackWait<=0)
                {
                    attackTimer = 21;
                    attackWait = 60;
                }
            }

            if(attackTimer>0) //Attacking?
            {
                if(this->OriginalTile == OTile)
                {
                    wpn=Screen->CreateEWeapon(EW_BEAM);
                    wpn->Dir = Ghost_Dir;
                    wpn->Step= 200;
                    wpn->UseSprite(wSprite);
                    wpn->Damage=damage;
                    wpn->Angular=false;
                    wpn->Script = 1; //daira axe
                    wpn->CSet = this->CSet;
                }
                else if(!wpn->isValid())
                {
                    this->OriginalTile = OTile;
                    Waitframe();
                    attackTimer = 0;
                    continue;
                }
                this->OriginalTile = OTile + 20*Div(28-attackTimer, 7);
                wpn->Tile = this->OriginalTile+this->Dir+16;
                wpn->X = this->X;
                wpn->Y = this->Y;
                wpn->DeadState = WDS_ALIVE;
                if(attackTimer>14)
                {
                    if((this->Dir == DIR_UP || this->Dir == DIR_DOWN))
                        wpn->Y -= 16;
                    else wpn->X -= InFrontX(this->Dir, 0);
                }
                else if(attackTimer>7)
                {
                    if(this->Dir == DIR_UP || this->Dir == DIR_DOWN)
                    {
                        if(this->Dir == DIR_UP )
                            wpn->Y -= 16;
                    }
                    else
                    {
                        wpn->X += InFrontX(this->Dir, 0);
                    }
                }
                else
                {
                    wpn->X += InFrontX(this->Dir,0);
                    wpn->Y += InFrontY(this->Dir,0);
                }
                //the weapon hit boxes are small.
                SetWpnHitOffsets(wpn, Div(28-attackTimer, 7), this->Dir);
                attackTimer--;
            }
            else if(wpn->isValid())
            {
                this->OriginalTile = OTile;
                if(throw)
                {
                    wpn=Screen->CreateEWeapon(EW_BEAM);
                    wpn->Dir = Ghost_Dir;
                    wpn->Step= 200;
                    wpn->UseSprite(wSprite);
                    wpn->Damage=damage;
                    wpn->Angular=false;
                    wpn->Script = 1; //daira axe

                    this->OriginalTile = this->OriginalTile + 80 + (this->Dir*4);
                }
            }
            if(this->HP <= 0)
            {
                wpn->DeadState = WDS_DEAD;
                Quit();
            }
            Waitframe();
        }
    }
    void SetWpnHitOffsets(eweapon wpn, int frame, int dir)
    {
        //Set Default Collision Properties
        wpn->CollDetection = true;
        wpn->HitXOffset = 0;
        wpn->HitYOffset = 0;
        wpn->HitWidth = 16;
        wpn->HitHeight = 16;

        //Modify it based off attack frame.
        if(frame == 1)
        {
            if(dir == DIR_UP || dir == DIR_DOWN)
            {
                wpn->CollDetection = false;
                return;
            }
            else
                wpn->HitWidth = 8;
            if(dir == DIR_RIGHT)
                wpn->HitXOffset = 8;
        }
        else if(frame == 2)
        {
            if(dir == DIR_UP || dir==DIR_DOWN)
            {
                wpn->HitHeight = 8;
                return;
            }
            else
                wpn->HitWidth = 8;
            if(dir == DIR_LEFT)
            wpn->HitXOffset = 8;
        }
        else if(frame == 3)
        {
            wpn->HitXOffset = Cond(dir==DIR_LEFT, 8, 0);
            wpn->HitYOffset = Cond(dir==DIR_UP, 8, 0);
            wpn->HitWidth = Cond(dir==DIR_LEFT||dir==DIR_RIGHT, 8, 16);
            wpn->HitHeight = Cond(dir==DIR_UP||dir==DIR_DOWN, 8, 16);
        }
        else //Out of range.
        {
            wpn->DeadState = WDS_DEAD;
            return;
        }
    }
}

eweapon script dairaaxe
{
    void run()
    {
        this->X = Clamp(this->X, 1, 255);
        this->Y = Clamp(this->Y, 1, 175);
        int timer = 22;
        while(this->isValid())
        {
            this->X = Clamp(this->X, 1, 255);
            this->Y = Clamp(this->Y, 1, 175);
            --timer;
            if ( timer < 1 ) { Remove(this); Quit(); }
            Waitframe();
        }
    }
}