CHECK2	input.x68	/^CHECK2  	CMPI.B  #'A',(A0)               Is Char > A ?$/;"	l
DUMMY	input.x68	/^DUMMY	  DS.B    1$/;"	d
F_NAME	input.x68	/^F_NAME  DS.B    80$/;"	d
INITIAL	input.x68	/^INITIAL 	MOVEA.L #F_NAME,A1              Move the first char to A1$/;"	l
PRNSURNAME	input.x68	/^PRNSURNAME	MOVEA.L #S_NAME,A1              Pointer to start of prompt text$/;"	l
PROMPT1	input.x68	/^PROMPT1 DC.B    'Please enter your firstname (Max 80): '$/;"	d
PROMPT2	input.x68	/^PROMPT2 DC.B    'Please enter your surname   (Max 80): '$/;"	d
PRTSTR	input.x68	/^PRTSTR  	EQU     1                       Print string Function$/;"	d
QUIT	input.x68	/^QUIT    	STOP    #$2700                  Stop the prorgam$/;"	l
READSTR	input.x68	/^READSTR 	EQU     2                       Read string function$/;"	d
RETURNFALSE	input.x68	/^RETURNFALSE MOVE.B  #0,D5			  Moves a zero to D5 to make CAPS false$/;"	l
RETURNTRUE	input.x68	/^RETURNTRUE  MOVE.B  #1,D5			  Moves a one to D5 to make CAPS ture$/;"	l
START	input.x68	/^START   	MOVEA.L #PROMPT1,A1             Pointer to start of prompt text$/;"	l
SURNAME	input.x68	/^SURNAME 	MOVEA.L #PROMPT2,A1             Pointer to start of prompt text$/;"	l
S_NAME	input.x68	/^S_NAME  DS.B    80$/;"	d
