equal
deleted
inserted
replaced
408 exit(dmg) |
408 exit(dmg) |
409 end |
409 end |
410 end; |
410 end; |
411 exit(0) |
411 exit(0) |
412 end; |
412 end; |
413 if (y > cWaterLine) or (x > leftX) or (x < rightX) then exit(-1) |
413 if (y > cWaterLine) or (x > rightX) or (x < leftX) then exit(-1) |
414 end |
414 end |
415 end; |
415 end; |
416 |
416 |
417 function TraceShoveFall(var x, y: Real; dX, dY: Real; Target: TTarget): LongInt; |
417 function TraceShoveFall(var x, y: Real; dX, dY: Real; Target: TTarget): LongInt; |
418 var dmg: LongInt; |
418 var dmg: LongInt; |
461 exit(dmg) |
461 exit(dmg) |
462 end |
462 end |
463 end; |
463 end; |
464 exit(0) |
464 exit(0) |
465 end; |
465 end; |
466 if (y > cWaterLine) or (x > leftX) or (x < rightX) then |
466 if (y > cWaterLine) or (x > rightX) or (x < leftX) then |
467 // returning -1 for drowning so it can be considered in the Rate routine |
467 // returning -1 for drowning so it can be considered in the Rate routine |
468 exit(-1) |
468 exit(-1) |
469 end; |
469 end; |
470 end; |
470 end; |
471 |
471 |