1
<HTML><HEAD><TITLE>Answer to Exercise 91</TITLE></HEAD>
2
<BODY BGCOLOR="#FFFFFF">
3
<TABLE><TR><TD Valign="top"><IMG SRC="../icons/exercise.gif" ALT="??"><TD bgcolor="#FAA89B"><B>ANSWER TO EXERCISE 91</B><TR><TD><TD>
6
Note that we wait for a space character
7
(32) or either kind of new-line which typical ASCII keyboards produce
8
(10 or 13), just to be on the safe side:
11
@erase_window -1; print "^^^^^^^^^^^^^";
12
i = 0->33; if (i==0) i=80; i=(i-50)/2;
13
style bold; font off; spaces(i);
15
style roman; print "^^"; spaces(i);
16
print " [Please press SPACE to begin.]^";
18
box "And make your chronicle as rich with praise"
19
"As is the ooze and bottom of the sea"
20
"With sunken wreck and sumless treasures."
22
"-- William Shakespeare, ~Henry V~ I. ii. 163";
23
do { @read_char 1 0 0 i; } until (i==32 or 10 or 13);
29
<HR>Back to <A HREF="../section33.html#ex91">the exercise in section 33</A><HR>
30
<SMALL><I>Mechanically translated to HTML from third edition as revised 16 May 1997. Copyright © Graham Nelson 1993, 1994, 1995, 1996, 1997: all rights reserved.</I></SMALL></BODY></HTML>