hedgewars/uCollisions.pas
branchexperimental3D
changeset 4004 b1c2c2f6fc5e
parent 3697 d5b30d6373fc
child 4357 a1fcfc341a52
equal deleted inserted replaced
3698:793386610068 4004:b1c2c2f6fc5e
   385 
   385 
   386     // edge-crawl
   386     // edge-crawl
   387     for i:= 0 to 8 do
   387     for i:= 0 to 8 do
   388         begin
   388         begin
   389         // using mx,my as temporary value buffer here
   389         // using mx,my as temporary value buffer here
   390         
   390 
   391         jfr:= 8+li+1;
   391         jfr:= 8+li+1;
   392         jto:= 8+li-1;
   392         jto:= 8+li-1;
   393 
   393 
   394         for j:= jfr downto jto do
   394         for j:= jfr downto jto do
   395             begin
   395             begin