objects/oArrowTrapLeft/step.gml

From spelunky.gmk, Spelunky Classic 1.1's source, © 2008, 2009 Derek Yu and Mossmouth, LLC, shown whole under the Spelunky User License v1.1b. Extracted by spelunky.ai's tools, an unofficial fan project, one file per script or event; the // ==== lines are the extractor's, naming each action of the event. Some scripts are others' work that Derek Yu credits in the source's readme.txt: Martin Piecyk's platform engine, ChevyRay's view scaling scripts and tsg1zzn's Super Sound System.

oArrowTrapLeft's step event, 44 lines of GML.

firing = false;if (fired == 0){    /*    if (collision_line(x+8, y+8, (x+8)-xAct, y+8, oItem, 0, 0))    {        obj = collision_line(x+8, y+8, (x+8)-xAct, y+8, oItem, 0, 0);        if (abs(obj.xVel) > 0 or abs(obj.yVel) > 0) firing = true;        if (obj.type == "Rope") firing = true;    }        if (collision_line(x+8, y+8, (x+8)-xAct, y+8, oTreasure, 0, 0))    {        obj = collision_line(x+8, y+8, (x+8)-xAct, y+8, oTreasure, 0, 0);        if (abs(obj.xVel) > 0 or abs(obj.yVel) > 0) firing = true;    }        if (collision_line(x+8, y+8, (x+8)-xAct, y+8, oEnemy, 0, 0))    {        obj = collision_line(x+8, y+8, (x+8)-xAct, y+8, oEnemy, 0, 0);        if (abs(obj.xVel) > 0 or abs(obj.yVel) > 0) firing = true;    }        if (collision_line(x+8, y+8, (x+8)-xAct, y+8, oMoveableSolid, 0, 0))    {        obj = collision_line(x+8, y+8, (x+8)-xAct, y+8, oMoveableSolid, 0, 0);        if (abs(obj.xVel) > 0 or abs(obj.yVel) > 0) firing = true;    }        if (collision_line(x+8, y+8, (x+8)-xAct, y+8, oPlayer1, 0, 0))    {        obj = collision_line(x+8, y+8, (x+8)-xAct, y+8, oPlayer1, 0, 0);        if (abs(obj.xVel) > 0 or abs(obj.yVel) > 0) firing = true;    }        if (firing)    {        arrow = instance_create(x-2, y+4, oArrow);        arrow.xVel = -8;        fired += 1;        playSound(global.sndArrowTrap);    }    */}