Help with pascal please!

[kinobestew123]

Ok, very old language I know but I am just playing around, if anyone can help I will be very grateful.

Ok, I want to repeat something over and over on the screen until the user presses a key on the keyboard. I understand that usually you would use the lines:

Repeat
...
Until Keypressed;

But the problem is, I want to store what key they actually press. How do I do this?

Thanks

Stewart.

 

[|Ric|]

VERY long time since I did this.

What you can do is but an IF statement at the end of the repeat loop.
(Pseudo code)

myChar = 0
REPEAT
...
IF keypressed THEN
    READKEY(myChar)
UNTIL myChar != 0

I think that will translate into something useful for you. But I haven't done it in such a long time