DarkLib

anim { "enemy.anm"; }

sub PAT_LaserShots(xoff yoff shottype angle length startangleoff angleoffadd count timeper delay)
{
    var xx yy cx cy sang;
    %xx = %xoff;
    %yy = %yoff;
    circleXY(%cx, %cy, %angle, %length);
    %cx;
    float($count);
    dividef();
    movef(%cx);
    %cy;
    float($count);
    dividef();
    movef(%cy);
    %sang = %startangleoff;
    %sang += %angle;
    wait($delay);
    loop $count laserLoop
        %xx += %cx;
        %yy += %cy;
        shotSetOffset($shottype, %xx, %yy);
        shotSetAngle($shottype, %sang);
        shotFire($shottype);
        %sang += %angleoffadd;
        wait($timeper);
        ins_0();
    endloop laserLoop
    shotSetOffset($shottype, 0.0f, 0.0f);
    return3();
}

sub FX_ShadowEffect()
{
    var A;
    setAnm(2);
    loop -1 shadowLoop
        doEffect(2, 16);
        wait(8);
        ins_0();
    endloop shadowLoop
    return3();
}