OTEST START
    PUSH 0,GR1
    PUSH 0,GR2
    LAD GR1,OBUF
    LD GR2,LEN
    SVC 2
    LAD GR1,=#A
    LAD GR2,1
    SVC 2
    POP GR2
    POP GR1
	RET
	 ; Memory
OBUF DC 'abcd'
LEN DC 4
	END