START LD GR1,A RET A DC 1 END