SUBROUTINE NODSPL(LOG)
	DATA T1,T2,T3,T4,T5,T6/5H(1X21,5HH    ,5H    1,5H   2 ,
	15H  3  ,5H 4)  /
	DATA S1,S2,S3,S4,S5,S6/5H(1X21,5HH    ,5H5   6,5H   7 ,
	15H  8  ,5H 9)  /
	CALL TEXT(10,50,5,2,T1)
	CALL TEXT(15,10,5,2,S1)
	IF(LOG.EQ.0)CALL TEXT(10,15,0,0,T1)
	RETURN
	END