How long? Too many years, that's how long.
I have a suggestion for this code. On line 60, you check to see if the user if pressing a key (as a means of escape). Then, if they are pressing a key with an ASCII value greater than 127, it ends. That leaves the user with a lo-res screen in the middle of a "wipe". Shouldn't you rewrite it like this?thumbtacks wrote:
30 FOR C=1 TO 10000
50 ON A GOSUB 100,150,200,250
60 IF PEEK (-16384)>127 THEN END
70 NEXT C
60 IF PEEK (-16384)>127 THEN TEXT: HOME: END
The same thing should probably be added to line 80.