Rocket 204 - Examples Using LEECHO and CEECHO

16 Rocket Model 204 Terminal User’s Guide
Echoing examples
END
CASH ON HAND
Example 4
Terminal echo and procedure echo: LECHO = 5
INCLUDE 0
INCLUDE 0
BEGIN
PRINT ‘CASH ON HAND’
END
CASH ON HAND
Examples using LEECHO and CEECHO
The next two examples illustrate how LEECHO and CEECHO can be used to
control echoing of lines that include ERASE or FLUSH characters.
Example 1
No line-edit echo: LEECHO = 0
V ERASE, FLUSH
ERASE @ X’7C’ ERASE-CHARACTER SYMBOL
FLUSH # X’7B’ ERASE-LINE SYMBOL
BEGIN
PRINT ‘CSL@@@CASH’
TODAT#END
CASH
Example 2
Terminal line-edit echo: LEECHO = 1
BEGIN
PRINT ‘CSL@@@CASH’
PRINT ‘CASH’
TODAT#END
END
CASH
Echoing also can be controlled for lines in which dummy string substitutes have
been entered. In the echoed line, the substituted character string is displayed