You can get away with commenting the second WAIT statement in QB but not QB64...by (Login qb432l)
If you run the program in QB64, the first WAIT statement alone doesn't pause the rotation long enough to allow you to see the square -- the screen is just black. If you comment out the first WAIT statement and leave the second one, you can now see the square, but it rotates much too quickly.
As for freezing the image as it rotates, put this before the WAIT statements (it's the DRAW statement following the WAITs that erases the square):
k$ = INPUT$(1): IF k$ = CHR$(27) THEN EXIT DO
...and make the LOOP statement blank. That way you can press a key rapidly to rotate the square, and Escape to end the program. With the INKEY$ line in the LOOP statement, the loop will terminate if any key is pressed.
Incidentally, one of the advantages of QB64 is that you can copy and paste code directly into the IDE and run it. Saves a lot of time, not to mention, cuts down on the number of one-time use programs. Of course, if you like a program, you can always save it.
Return to Index