RT-11 и аргументы командной строки

[Patron]

как можно передать и получить строку символов программе в RT-11

Есть два способа.

1. Первый способ универсальный ( работает во всех версиях RT-11 )

;
;  Echo
;
.MCall	.GtLin, .Print, .Exit

.Asect
	.=44
	.Word 400

	.=400
START:	
	.GtLin	#StrBuf
	.Print	#StrBuf
	.Exit

StrBuf:	.BlkB	120.

.End	START
;

2. Второй способ работает только в RT-11 V05.00 и старше, но даёт больше возможностей:

;
.MCall	.GtLin, .Print, .Exit

START:
	Mov	#510, R0
	Mov	(R0)+, R1
	BEq	1$
	Dec	R1
	BEq	1$

	.Print	#Args
	.Print	#512	

	.GtLin	#BUFF
	.Exit
1$:
	.Print	#NoArgs
	.Exit

NoArgs:	.ASCIZ	\No Args..\
Args:	.ASCII	\Args: \<200>
	.Even
BUFF = .

.End	START
;