Eot?

eot?

Stands for end of text. Reports true if the cursor (insertion point), in the current text box, is at the end of the text. See bottom.

Example:

text1,

bottom

show eot?

true

The following procedures can be used to number the lines in a text box. Eot? is generally used to stop a procedure that processes information in a text box using cursor (insertion point) commands like cd, eol, etc.

to numberlines

top

countup 1

end

to countup :n

if eot? [stop]

insert :n

insert char 32

sol cd

countup :n + 1

end