pascal: proppa maffs

[link0007]

Hey, hier ben ik weer met een probleem ^_^
Ik ben nu bezig met een Pong! spel, en heb nu dus de besturing goed gekregen. maar nu moet ik de bal laten bewegen, en stuiteren!

Ik had al een manier bedacht: ik maak een formule ( y=ax+b ) waarin ik de richtingscoëfficiënt kan invoeren -die bepaald het stuiteren- en misschien nog variabele b, als dat nodig is. Maar deze formule blijkt dus niet te werken... ik had namelijk een loop gemaakt, waar 'ie eerst x:=x+5; doet, en zodra 'ie de rand van het venster raakt, gaat hij de andere kant op (x:=x-5); en berekent 'ie de y-coördinaat iedere stap (met een a van 1, welke verandert bij stuiteren)

dit werkte dus niet... kan iemand mij helpen met een goede stuiter-loop te maken? Mijn wiskunde is -jammer genoeg- redelijk mager

alvast bedankt

[whoami]

Hoi, ik wil je toch nog eens dringend adviseren om de PRG Quickstart te lezen. Het is niet de bedoeling om hier script-requests te plaatsen (want dat is dit topic imho wel).
We willen je best helpen, maar niet op deze manier. Heb je zelf je code al eens proberen te debuggen ? Wat is niet werken , etc....

Pas je topicstart eens even aan adhv die Quickstart.

(en verzin ook eens even een betere topictitel)

[ Voor 14% gewijzigd door whoami op 14-10-2006 19:49 ]

[link0007]

een betere topictitel? Ooit gehoort van AliG?
maar laat maar zitten... ik heb een deel al zelf uitgevogeld, al werkt het nog steeds zwaar ondermaats...
Kijk maar eens:

code:

begin
     d:=x; {een manier om de vorige x-coordinaat te krijgen, maar is eigenlijk overbodig nu ik zo kijk ^_^)
     if aimx=true then begin
       x:=x+1;
     end;
     if aimx=false then begin
       x:=x-1;
     end;
     if aimy=false then begin {nieuwe y-coördinaat bepalen}
         y:=y-c;
     end;
     if aimy=true then begin {nieuwe y-coördinaat bepalen}
          y:=y+c;
     end;
     clearviewport;
     circle(x,y,20);
     if x>200 then {grenzen aanleggen}
     begin
          aimx:=false;
     end;
     if x<20 then
     begin
          aimx:=true;
     end;
     if y>200 then
     begin
          aimy:=false;
     end;
     if y<20 then
     begin
          aimy:=true;
     end;
end;

Toch bedankt, en ik let er de volgende keer wel op dat ik een overduidelijke titel heb

[whoami]

Ali G my ass, dit is hier PRG, en niet TMF.

deze kan dus even goed dicht.