.TITLE	CSI
	.MCALL	.CSISPC,.GTLIN,.EXIT,.PRINT,.CSIGEN
	.ENABL	LC
START:	.GTLIN	#BUFFER,#PROMPT
	.PRINT	#BUFFER
	.CSISPC	#OUTSPC,#DEFEXT,#BUFFER
	MOV	@#USERSP,SP
	.CSISPC	#OUTSPC,#DEFEXT,#0,#BUFFER
	.PRINT	#BUFFER
	MOV	@#USERSP,SP
	.CSIGEN	#DEVSPC,#DEFEXT,#0,#BUFFER
	.PRINT	#BUFFER
	MOV	@#USERSP,SP
	.GTLIN	#BUFFER,#PROMPT
	.CSIGEN	#DEVSPC,#DEFEXT,#BUFFER
	MOV	@#USERSP,SP
	.EXIT
 
BUFFER:	.BLKB	82.
DEFEXT:	.RAD50	/TXTOP1OP2OP3/
OUTSPC:	.BLKW	39.
PROMPT:	.ASCII	"Command line: "<200>
	.EVEN
DEVSPC:
 
	.END	START