CALL VTANS (5)
	CALL VTESC (5,2)
	CALL VTHGT (5,1,6)
	CALL VTDTX (5,13,6,13,'*** WARNING ***')
	CALL VTDTX (5,13,7,13,'*** WARNING ***')
	CALL VTDTX (5,1,12,20,'ANY FURTHER ATTEMPTED USE OF THIS TERMINAL')
	CALL VTDTX (5,1,13,20,'WILL RESULT IS A LONG AND         DEATH!')
	CALL VTDTX (5,15,13,46,'PAINFUL')
	CALL VTWDT (5,20,1)
	CALL VTDTX (5,11,20,14,'THIS MEANS YOU')
	CALL VTCMV (5,23,1)
	CALL EXIT
	END