hasch and getch program

[slimshadyy]

What is it you are trying to achieve?

create a program which starts with a blank output window. check whether a key has been pressed, and if the D key (or d key) has been pressed, draw a graphic of some kind (oval, square, maple leaf) in a random position on the screen. if the D (or d) key is pressed again, clear the screeen and draw the image again in another random position. if X or x is pressed, exit the program.


What is the problem you are having?

i cannot get the program to exit when you press 'x' or 'X'


Describe what you have tried to solve this problem

i tried placing an exit statement, but i dont think its in the right spot.


Post any relevant code (You may choose to attach the file instead of posting the code if it is too long)

var input : string (1) := ' '
var x, y : int
x := 50
y := 50
loop
if hasch then
getch (input)
put "The key you entered was ", input
delay (500)
if input = 'd' or input = 'D' then
drawfillmapleleaf (x, y, 200, 200, 31)
randint (x, 1, maxx)
randint (y, 1, maxy)
drawfillmapleleaf (x, y, 200, 200, 12)
exit when input = 'x' or input = 'X'
end if
end if
end loop
put "Goodbye"

Turing:

Please specify what version of Turing you are using
4.11

[TW iz Rippin]

Simple... your exit when statement is in the wrong location.

[slimshadyy]

does it go after the loop?

[Raknarg]

look at where it's placed.

Try running this:

var ch : string (1)
loop
getch (ch)
if ch = "f" then
if ch = "q" then
put "hi"
end if
end if
end loop

Will this program ever put "hi"? This is essentially what your program is doing right now.

[TW iz Rippin]

Well, if you put the exit when statement just before the end loop it will work, basically, it is not reaching your statement.

[Raknarg]

yeah, except I'd rather he figure that out

[TW iz Rippin]

I know but he should have got it after my post lol

[Raknarg]

Your point?

[slimshadyy]

lool, btw i'm a girl.

[Raknarg]

Well I'm not about to call you an it

[slimshadyy]

lool true truee.