SECTION "code",CODE

        xref    _ReqToolsBase

        xdef    @rtScreenModeRequestA

@rtScreenModeRequestA:
        movem.l rl,-(a7)
        move.l  _ReqToolsBase(a4),a6
        move.l  a1,a3
        move.l  a0,a1
        move.l  d0,a0
        jsr     -144(a6)
        movem.l (a7)+,rl
        rts

rl      reg     A3/A6
   END