objects/oArrowTrapTest/collision_oEnemy.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.
oArrowTrapTest's collision oEnemy event, 26 lines of GML.
if (trapID == 0){ instance_destroy();}else if (abs(other.xVel) > 0 or abs(other.yVel) > 0){ with trapID { if (fired == 0) { if (facing == 0) { arrow = instance_create(x-2, y+4, oArrow); arrow.xVel = -8; } else { arrow = instance_create(x+18, y+4, oArrow); arrow.xVel = 8; } fired += 1; playSound(global.sndArrowTrap); } } instance_destroy();}