!Sample program to demonstrate the use of NOTIFY.SBR
!Courtesy:	Stoner & Wilson, CSE
!		300 S. Jefferson, Suite 304
!		Springfield, Mo.  65806
!		(417) 865-2798

map1	trmnam,s,6
map1	msg,s,80

input "Enter terminal name :";trmnam
input line "Msg:";msg
if len(trmnam) = 0 &
	xcall notify,msg &
else &
	xcall notify,trmnam,msg

end

! Note: NOTIFY.SBR does not support the switches which are included
!       with the .LIT version. To clear the status line, you need to 
!       send a message of 80 spaces or set up a basic routine as follows:
!       
!       print tab(-1,54);space(80)             -- AMUS Staff