[tpascal 7] pauzering repeat-loop door readkey?

[link0007]

Hallo,

Ik ben de laatste tijd bezig met Turbo Pascal 7, en heb nu echt een probleem waar ik niet uit kom:

Ik heb een grote repeat-until loop om mijn programma heenstaan, welke dus door hoort te gaan tot readkey '~' aangeeft. Heel leuk in theorie, minder leuk zoals het nu gaat:

Ik heb op het eind een input-blok welke voor 'w' en 's' kijkt:

code:

if keypressed=true then
begin
     if readkey='~' then
     begin
          ender:=true; {de loop gaat door tot ender true is}
     end
     else
          if readkey='w' then
          begin 
                 y1:=y1-5; {omhoog}
          end
          else
                if readkey='s' then
                begin
                       y1:=y1+5; {omlaag}
                 end;
end;

maar volgens mij veroorzaakt dat stukje het volgende probleem:
in dit 'spel' bestuur jij een paddle, en stuitert er een bal door de kamer. zolang je geen toets indrukt is alles prima, maar zodra je begint met toetsen indrukken, staat alles eerst helemaal stil, en de volgende input laat alles weer normaal lopen. waarom dit gebeurt weet ik niet, en ik heb het in de afgelopen 3/4uur niet kunnen oplossen.

weet iemand misschien wat het probleem kan veroorzaken?

btw: als iemand een groter deel van de code nodig heeft, vraag het ff, dan post ik het wel... Maar ik neem aan dat dit deel genoeg is

[RobIII]

Euh, readkey wacht toch totdat er een toets is ingedrukt? Lijkt me Is gewoon gedocumenteerd...
Verder had je hier toch al een topic over lopen, of niet?

Wat mij betreft mag je daar dan mooi in verder

Verder wil ik je aansporen wat meer moeite zelf te doen als je probleem + (een stukje) code hier te dumpen; we zijn geen afhaalbalie voor kant-en-klare oplossingen.

[ Voor 74% gewijzigd door RobIII op 16-10-2006 20:43 ]