1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:

player[1].move_speed := 1;
for i := 1 to ColiBoxesCount do
begin
coli_box[i].temp := 0;
 if (player[1].coli_px[7] + player[1].posx > coli_box[i].posX) and (player[1].coli_px[7] + player[1].posx < coli_box[i].posX + coli_box[i].width) then
  if (player[1].coli_py[7] + player[1].posY + player[1].move_speed > coli_box[i].posY) and (player[1].coli_py[7] + player[1].posY < coli_box[i].posY + coli_box[i].height) then
  begin
  coli_box[i].temp := 1; //bei kolision müsste die figur ja stehen bleiben... tu t sie aber net:(
  end else
  begin
  player[1].posY:=player[1].posY + 1;//hier fält sie mit tempo 1 ;) 
  end;
end;					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:

player[1].can_jump:= false;
_Y_coli:=false;
for i := 1 to HowMuchColiBoxes do
begin
coli_box[i].temp := 0;

  if (player[1].coli_px[7] + player[1].posx > coli_box[i].posX) and (player[1].coli_px[7] + player[1].posx < coli_box[i].posX + coli_box[i].width) then
  if (player[1].coli_py[7] + player[1].posY + player[1].move_speed_max > coli_box[i].posY) and (player[1].coli_py[7] + player[1].posY < coli_box[i].posY + coli_box[i].height) then
  begin
  _Y_coli:=true;
  player[1].can_jump:= true;
  player[1].move_speed:=0;
  coli_box[i].temp := 1;
  end;
end;