.TITLE  CONTFG

	.MCALL	.SDATC,.PRINT,.MRKT,.QSET,.SPND

START::	.PRINT	#MSG			
	.QSET	#QUEUE,#100.		
	.MRKT	#AREA,#TIME,#MKTC,#1	
	.SPND				


MKTC:	CMP	MSGCNT,#90.		
	BGT	MKTC1			
	.SDATC	#AREA,#BUFFER,#30.,#SDATC 
	INC	MSGCNT			
MKTC1:	.MRKT	#AREA,#TIME,#MKTC,#1	
	RETURN				


SDATC:	DEC	MSGCNT			
	RETURN				

	.NLIST BEX

MSG:	.ASCII /нямнбмюъ опнцпюллю CONTFG/<15><12>
	.ASCII /оняшкюер йюфдше 5 яейсмд яннаыемхе/<15><12>
	.ASCII /тнмнбни опнцпюлле CONTBG./<15><12>
	.ASCII /тнмнбюъ опнцпюллю оевюрюер опхмърне/<15><12>
	.ASCIZ /яннаыемхе мю реплхмюке/
	.EVEN

MSGCNT:	.WORD	0			

TIME:	.WORD	0			
	.WORD	50.*5			

AREA:	.BLKW 6				

BUFFER:	.ASCIZ <15><12>/-пюанрюер нямнбмюъ опнцпюллю-/
	.EVEN

QUEUE:	.BLKW	100.*7		

	.END	START