SECTION "code",CODE

        xref    _ReqToolsBase

        xdef    @rtSetReqPosition

@rtSetReqPosition:
        movem.l rl,-(a7)
        move.l  _ReqToolsBase(a4),a6
        move.l  d1,a2
        jsr     -126(a6)
        movem.l (a7)+,rl
        rts

rl      reg     A2/A6
   END