und abnehmen: du machst
Delphi-Quellcode:
if keydown(watweissich)
then
Begin
gegner.image:=ohneball;
for i:=1 to x1-x2 do
begin
ball.x:=ball.x- (x1-x2);
ball.y:=ball.y- (y1-y2) div (x1-x2);//dann bewegts sich gleichmässig
end;
spieler.image:=mitball;
end;
also so in etwa..is teilweise nur symbolisch
gibt noch ungelöste frage, aber so isses doc vom grundsatz schon ma ganz gut
auch so sachen obs nicht ball.x:=ballx.x
+ sein muss, ausprobieren