Драйвер для мышки для любого разрешения

  

    Драйвер для мышки для любого разрешения (спасибо Сергею Смирнову). Ни для кого не секрет, старый дрова которые можно найти в интернете рассчитаны на разрешение 256х192. Под ts-config их необходимо допиливать. Допилятор ниже. 

driver:
    ld a,(lastv);    опрашиваем координату X
    ld e,a
    ld bc,#fbdf
    in a,(c)
    ld (lastv),a
    sub e
    ld e,a
    add a,a
    sbc a,a
    ld d,a
    ld hl,(mcoordx)
    add hl,de
    ld (mcoordx),hl

    ld a,(lastv2);    опрашиваем координату Y
    ld e,a
    ld bc,#ffdf
    in a,(c)
    ld (lastv2),a
    sub e
    ld e,a
    add a,a
    sbc a,a
    ld d,a
    ld hl,(mcoordy)
    add hl,de
    ld (mcoordy),hl
    ret

lastv        db 0

lastv2      db 0

mcoordx dw 0

mcoordy dw 0
    

В mcoordx, mcoordy получаем значение на экране от #0 до #ffff, ну и в этих координатах печатаем наш курсор.