You may prefer to work out what each line does on your own— three cheers if you do. But if you want a little guidance, here is a brief program overview, followed by a line-by-line description of the main portion of the program.

STATEMENT breaks down into several large blocks of routines and data:
LinesRoutine

100-150

Defines characters and does housekeeping

160-390

Prints the statement form

500-660

The box subroutine

700-770

The logo subroutine

800

The STRING$ subroutine

900-1010

Data for line graphics

1100-1170

Data for the STRATA SOFTWARE letters

1200-1250

Data for the logo

1300-1370

Data for the box routine
Line 170 prints STRATA SOFTWARE using Master Select to define the mode.Lines 180 and 190 set vertical and horizontal tab stops.Line 200 stores the tab command in H$ and prints STATEMENT in Expanded print.Line 210 prints the second and third lines of the logo.

Lines 220-250print more of the logo and the address in various mode combinations.

Line 260 sets new horizontal tab stops.

Line 270 sets some variables for the box subroutine at 500. That routine prints the box in the upper-right comer of the sheet.

Line 280 does a vertical tab, then prints a string of 21 underline characters (ASCII 95) via subroutine 800.

Line 290 prints the Subscript AMOUNT REMITTED. Line 300 sets new horizontal tab stops.

Line 310 tabs vertically twice, then prints a Superscript message. Line 320 cancels Scripts and prints 80 hyphens with subroutine 800. Line 330 calls the box routine.

Line 340 sets new horizontal tabs. Line 350 calls the box routine. Line 360 ses new horizontal tabs.

Line 370 prints STRATA SOFTWARE in a different print mode. Line 380 thanks us in Italic characters.

Line 390 resets all modes and ends the program.

237