scripts/isCollisionCharacterTop.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.

The script isCollisionCharacterTop, 19 lines of GML.

/*0: Number of pixels above the collision rectangle to check for a collisionwith the character.1: Id to use instead of the characters. Optional. Used e.g. when we need to check for a particular character.*///the solid must be hitting the character's bottom side, so...oGame.collisionTempId=idw=argument1if(argument1==0 or argument1==noone)  w=oCharacterwith w{  calculateCollisionBounds()  //if there is a collision with tempId on the character's bottom side  if collision_line(round(lb),round(bb+argument0-1),round(rb-1),round(bb+argument0-1),oGame.collisionTempId,1,1)>0    return 1}return 0