BGRedrawThread:

        mcall   40,010000b


BGRTmessages:
        mcall   10
        sub     eax,5
        jz      BGRTRedrawIcons

        jmp     BGRTmessages

BGRTRedrawIcons:
        mcall   48,5
        mov     dx,ax
        shr     eax,16
        sub     dx,ax
        mov     [ScreenX],dx
        mov     ax,bx
        shr     ebx,16
        sub     ax,bx
        mov     [ScreenY],ax

        mov     ecx,[MaxNumIcon]
        test    ecx,ecx
        jz      .NoDraw
        xor     ebx,ebx
    @@: push    ecx
        cmp     [IconNoDraw],ebx
        je      .nd
        stdcall DrawIcon,ebx,0
      .nd:
        inc     ebx
        pop     ecx
        loop    @b
   .NoDraw:
        jmp     BGRTmessages