Контроллер НМЛ СМ5300.01

[Patron]

Вот так может выглядеть программка, читающая блок с ленты в буфер по адресу 020000:

	TPS =: 176730
	TPD =: 176732

	Buffer =: 20000

	Mov	#Buffer, R1
	Clr	R0

	BiT	#40, @#TPS
	BNE	1$
	Reset
1$:
	Mov	#33407, @#TPD
	Mov	#1, @#TPS
2$:
	Cmp	#54, @#TPS
	BNE	2$
	Mov	#2, @#TPD
	Tst	@#TPD
	Mov	#1, @#TPS
4$:
	BiT	#40, @#TPS
	BNE	3$
	BiT	#10, @#TPS
	BEq	4$
	MovB	@#TPD, (R1)+
	Inc	R0
	Br	4$
3$:
	BiT	#10, @#TPS
	BEq	5$
	MovB	@#TPD, (R1)+
	Inc	R0
5$:
	Halt

После завершения - R0 содержит число байт, записанных в память, начиная с адреса 020000 .