objects/oDamsel/collision_oWhipPre.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.

oDamsel's collision oWhipPre event, 23 lines of GML.

if (other.type == "Machete" and hit == 0){     hp -= other.damage;     hit = 10;     playSound(global.sndHit);     playSound(global.sndDamsel);     if (bloodLeft > 0)     {        scrCreateBlood(x+sprite_width/2, y+sprite_height/2, 1);        if (hp < 0) bloodLeft -= 1;     }}else if (status != THROWN and (status < EXIT or status == SLAVE or status == KISS) and hit == 0){    yVel = -2;    hit = 10;    playSound(global.sndHit);    playSound(global.sndDamsel);    if (forSale)    {        scrShopkeeperAnger(3);    }}