100 /	DATA CONSIDERATIONS:
 110 
 120 /	X, Y VALUES RANGE FROM -2048 THROUGH 2047 UNLESS '/1' IS INVOKED WHICH CHANGES
 130 /	THE VALUES TO 4010-COMPATIBLE (MODEL-DEPENDANT).
 140 
 150 /	STRING CHARACTERS INCLUDE THE SPECIAL CASES:
 160 
 170 /	^<NOT ^>	CHANGE CASE.  THE  CHARACTER  FOLLOWING  THE ^ IS TAKEN IN THE
 180 /			NEW CASE.  DEFAULT CASE IS LOWER.
 190 
 200 /	^^		OUTPUT A SINGLE ^.  THE CASE IS NOT CHANGED.
 210 
 220 /	"		STRING DELIMITER;  MUST BE PRESENT ON THE STRING  ARGUMENT  TO
 230 /			INDICATE  THE  PRESENCE  OF  A  STRING.  ALSO REQUIRED AS  THE
 240 /			TRAILING DELIMITER.
 250 
 260 /	""		WHEN IMBEDDED WITHIN THE STRING CAUSES OUTPUT OF A SINGLE ".
 270 
 280 /	?		NOT ALLOWED (RESTRICTION OF FOCAL).
 290 
 300 /	X, Y  DETERMINE  THE  COORDINATE  FOR THE LOWER-LEFT PIXEL OF THE CELL FOR THE
 310 /	FIRST CHARACTER IN THE STRING.
 320 
 330 /	SIZE AND ROTATION  PARAMETERS  CONFORM TO HDS VALUES.  IF THE SIZE IS GIVEN AS
 340 /	NEGATIVE, THE ABSOLUTE VALUE  IS  USED;    THE  CHARACTER  STRING WILL THEN BE
 350 /	OUTPUT WITH SLANTED CHARACTERS.   IF  THE  ROTATION  ARGUMENT  IS OMITTED, THE
 360 /	DEFAULT OF HORIZONTAL OUTPUT (0 DEGREES ROTATION) WILL BE USED.
 370 	EJECT
 380 /	CHARACTER SIZES.
 390 
 400 /	CHARACTER SIZE IS DETERMINED BY THE SIZE PARAMETER AS FOLLOWS:
 410 
 420 /	ABSOLUTE VALUE		CHARACTER SIZE
 430 
 440 /	0			SMALLEST
 450 /	1			VERY SMALL
 460 /	2			SMALL
 470 /	3			STANDARD
 480 /	4			DOUBLE
 490 /	5			TRIPLE
 500 /	6			QUADRUPLE
 510 /	7			STANDARD
 520 
 530 /	THE SIGN OF THE SIZE  PARAMETER  DETERMINES  IF THE CHARACTERS WILL BE PLOTTED
 540 /	NORMAL OR SLANTED (PLUS=NORMAL, MINUS=SLANTED TO THE RIGHT).  FOR THE PURPOSES
 550 /	OF THE CHARACTER SIZE, THE ARGUMENT IS TAKEN MOD 8.
 560 
 570 /	CHARACTER ROTATION.
 580 
 590 /	CHARACTER ROTATION IS DETERMINED BY THE ROTATION PARAMETER AS FOLLOWS:
 600 
 610 /	VALUE			ORIENTATION
 620 
 630 /	0			ROTATED 270 DEGREES
 640 /	1			HORIZONTAL (ROTATED 0 DEGREES)
 650 /	2			ROTATED 90 DEGREES
 660 /	3			ROTATED 180 DEGREES
 670 
 680 /	STARTING CONSIDERATIONS.
 690 
 700 /	INVOKING FOCAL WITH THE '/X' SWITCH WILL NOT  INITIALIZE  THE  TERMINAL.  THIS
 710 /	ASSUMES THE TERMINAL IS ALREADY IN GRAPHICS MODE FROM A PRIOR RUN.
 720 	EJECT
 730 /	ASSEMBLY PARAMETERS.
 740 
 750 /	SET ONE OF THE FOLLOWING HARDWARE PARAMETERS BY REMOVING THE "/":
 760 
 770 /	SET THE DISPLAY FIELD:
 780 
 790 /	DFIELD=	20			/DISPLAY FIELD
 800 
 810 /	SET THE TERMINAL LINE I/O DEVICE.
 820 
 830 /	LINE=	03			/USE DEVICE 03/04 I/O TO TERMINAL
 840 /	LINE=	40			/USE DEVICE 46/47 I/O TO TERMINAL
 850 /	LINE=	46			/USE DEVICE 46/47 I/O TO TERMINAL
 860 
 870 /	DEFAULT PARAMETERS.
 880 
 890 	DEFLENG=4			/DEFAULT DIGIT STRING LENGTH
 900 	DEFROTA=1			/DEFAULT ROTATE VALUE
 910 	DEFSIZE=3			/DEFAULT CHARACTER SIZE
 920 
 930 /	CONDITIONAL ASSEMBLY PARAMETERS.
 940 
 950 	IFNDEF	DFIELD	<DFIELD=20>	/USE FIELD TWO FOR DISPLAY CODE
 960 	IFNDEF	LINE	<LINE=	46>	/USE DEVICE 46/47 I/O TO TO TERMINAL
 970 
 980 /	REMOTE LINE IOT DEFINITIONS.
 990 
1000 /	RECEIVE DEFINITIONS.
1010 
1020 	RKIEIOT=LINE^10+6005		/LOAD INTERRUPT ENABLE PER AC[11]
1030 	RKRBIOT=LINE^10+6006		/READ REMOTE, CLEAR FLAG
1040 	RKSFIOT=LINE^10+6001		/SKIP ON REMOTE INPUT FLAG
1050 
1060 /	TRANSMIT DEFINITIONS.
1070 
1080 	RTLSIOT=LINE+1^10+6006		/TRANSMIT CHARACTER, CLEAR FLAG
1090 	RTSFIOT=LINE+1^10+6001		/SKIP ON TRANSMIT FLAG
1100 	EJECT