Управление манипулятором «мышь» - изменение формы курсора в зависимости от кординат

MyMouseHandler  proc
        push    ax
        push    bx
        push    cx
        push    dx
        push    si
        push    di
        push    es
 
        ;загрузка в ax текущего номера курсора
        mov     ax,     seg MouseCurrentCursor
        mov     es,     ax
        mov     si,     offset MouseCurrentCursor
        mov     ax,     es:[si]
 
        ;выяснение, в каком регионе находится курсор
        shr     cx,     1       ;для графического видеорежима 13h нужно разделить на 2 координату X курсора
        cmp     cx,     0
        jb      @@SecondRegion
        cmp     cx,     100
        ja      @@SecondRegion
        cmp     dx,     0
        jb      @@SecondRegion
        cmp     dx,     100
        ja      @@SecondRegion  
 
@@FirstRegion:
        ;для первого региона:
        ;если текущий курсор равен курсору для первого региона, то выйти
        ;иначе установить требуемый курсор и выйти
        cmp     ax,     0001h
        je      @@Exit
        call    MouseCursorCross
        mov     MouseCurrentCursor,     0001h
        jmp     @@Exit
 
@@SecondRegion:
        ;для второго региона:
        ;если текущий курсор равен курсору для второго региона, то выйти
        ;иначе установить требуемый курсор и выйти
        cmp     ax,     0002h
        je      @@Exit
        call    MouseCursorRectangle
        mov     MouseCurrentCursor,     0002h
        jmp     @@Exit
 
@@ThirdRegion:
        ;для третьего региона:
        ;если текущий курсор равен курсору для третьего региона, то выйти
        ;иначе установить требуемый курсор и выйти
        cmp     ax,     0003h
        je      @@Exit
        call    MouseCursorArrow
        mov     MouseCurrentCursor,     0003h
        jmp     @@Exit 
 
@@Exit:
        pop     es
        pop     di
        pop     si
        pop     dx
        pop     cx
        pop     bx
        pop     ax
        retf
MyMouseHandler  endp