Obsługa myszy w asemblerze

W tej części dowiemy się, jak dodać w naszych programach obsługę myszy.
Do naszych celów potrzebne nam będą załadowane sterowniki myszy w pamięci oraz przerwanie int 33h.

Zapoznajmy się z kilkoma podstawowymi funkcjami tegoż przerwania (patrzymy oczywiście w listę przerwań Ralfa Brown'a - RBIL):


(przeskocz opis funkcji int 33h)
	INT 33 - MS MOUSE - RESET DRIVER AND READ STATUS
	        AX = 0000h
	Return: AX = status
            		0000h hardware/driver not installed
            		FFFFh hardware/driver installed
        	BX = number of buttons
            		0000h other than two
            		0002h two buttons (many drivers)
            		0003h Mouse Systems/Logitech three-button mouse
            		FFFFh two buttons

	INT 33 - MS MOUSE v1.0+ - SHOW MOUSE CURSOR
	        AX = 0001h

	INT 33 - MS MOUSE v1.0+ - HIDE MOUSE CURSOR
	        AX = 0002h

	INT 33 - MS MOUSE v1.0+ - POSITION MOUSE CURSOR
	        AX = 0004h
	        CX = column
	        DX = row

	INT 33 - MS MOUSE v1.0+ - RETURN BUTTON RELEASE DATA
	        AX = 0006h
	        BX = button number (see #03169)
	Return: AX = button states (see #03168)
	        BX = number of times specified button has been released since
	        	 last call
	        CX = column at time specified button was last released
	        DX = row at time specified button was last released

	(Table 03169)
	Values for mouse button number:
 	0000h  left
 	0001h  right
 	0002h  middle

Tyle powinno nam wystarczyć. Są też funkcje, które na przykład definiują zasięg poziomy i pionowy kursora (można ustawić tak, że kursor będzie się mógł poruszać tylko w wyznaczonym oknie), ale tymi nie będziemy się zajmować.

Na dobry początek resetujemy sterownik i sprawdzamy, czy w ogóle jest jakaś mysz zainstalowana (jeszcze wcześniej można byłoby sprawdzić, czy sam sterownik nie jest procedurą, która nic nie robi, ale pominę to). Kod jest wyjątkowo krótki:

	xor	ax, ax
	int	33h			; sprawdzamy, czy jest mysz
	or	ax, ax
	jz	brak_myszy

Jak było widać wcześniej, pokazanie kursora nie jest trudne i sprowadza się do:

	mov	ax, 1
	int	33h			; pokaż kursor

Do szczęścia brakuje nam już tylko sprawdzenie, czy i gdzie naciśnięto jakiś przycisk. Do tego posłuży nam funkcja numer 6. Wystarczy w BX podać interesujący nas przycisk, a w CX i DX powinniśmy otrzymać współrzędne (dobrze jest przed rozpoczęciem pracy wywołać raz tę funkcję dla wszystkich przycisków, aby wyzerować liczniki naciśnięć). Przykład:

	mov	ax, 6
	xor	bx, bx
	int	33h
	or	bx, bx
	jz	nie_wcisnieto_lewego

	mov	[kolumna], cx
	mov	[wiersz], dx

Nie ma w tym dużo wysiłku, na szczęście. Wszystko za nas robi sterownik, a my tylko potem sprawdzamy rejestry.
Dlatego też od razu przejdę do finału tego artykułu i zaprezentuję program, w którym zawarłem wszystko to, o czym mówiłem. Zadaniem programu jest nic innego, jak tylko wyświetlenie odpowiedniego napisu, gdy użytkownik naciśnie jakiś klawisz myszki (naciśnięcie czegoś na klawiaturze spowoduje wyjście z programu). Napis zostanie wyświetlony w miejscu, gdzie naciśnięto przycisk.

Oto kod:


(przeskocz kod programu)
; Program wyświetlający napis w miejscu, gdzie został naciśnięty
; klawisz myszki.
;
; POD WINDOWS URUCHAMIAĆ W TRYBIE PEŁNOEKRANOWYM
;
;
; Autor: Bogdan D.
; kontakt: bogdandr (at) op (dot) pl
;
; nasm -O999 -o mysz.com -f bin mysz.asm


org 100h

	xor	ax, ax			; AX = 0
	int	33h			; sprawdzamy, czy jest mysz
	or	ax, ax
	jnz	mysz_ok

	mov	dx, nie_ma_myszy
	mov	ah, 9
	int	21h

	mov	ax, 4c01h		; zwracamy kod błędu=1
	int	21h


mysz_ok:
	mov	ax, 3
	int	10h			; czyścimy ekran

	mov	ax, 1
	int	33h			; pokazujemy kursor myszki

					; zerujemy liczniki naciśnięć:
	mov	ax, 6
	xor	bx, bx			; lewy przycisk
	int	33h

	mov	ax, 6
	mov	bx, 1			; prawy przycisk
	int	33h

petla:
	mov	ah, 1
	int	16h		; czy naciśnięto klawisz na klawiaturze?
	jnz	koniec		; jeśli tak, to wychodzimy z programu

	mov	ax, 6
	xor	bx, bx			; sprawdzamy lewy przycisk
	int	33h

	or	bx, bx		; jeśli naciśnięto, to idziemy coś wyświetlić
	jnz	pokaz_l

	mov	ax, 6
	mov	bx, 1			; sprawdzamy prawy przycisk
	int	33h

	or	bx, bx		; jeśli naciśnięto, to idziemy coś wyświetlić
	jnz	pokaz_p

	jmp	short petla

pokaz_l:
				; wiemy, ze CX=kolumna, DX=wiersz, gdzie
				;naciśnięto klawisz, ale to są numery pikseli
				; Aby otrzymać kolumnę i wiersz, dzielimy je
				; przez 8 (bo jest 8 pikseli/znak):
	shr	dx, 3
	shr	cx, 3

	mov	ah, 2			; funkcja ustawiania kursora
	mov	dh, dl			; DH = wiersz
	mov	dl, cl			; DL = kolumna
	int	10h			; ustaw nasz kursor tam

	mov	dx, lewy_p
	mov	ah, 9
	int	21h

	jmp	short petla

pokaz_p:
				; wiemy, ze CX=kolumna, DX=wiersz, gdzie
				;naciśnięto klawisz, ale to są numery pikseli
				; Aby otrzymać kolumnę i wiersz, dzielimy je
				; przez 8 (bo jest 8 pikseli/znak):
	shr	dx, 3
	shr	cx, 3

	mov	ah, 2			; funkcja ustawiania kursora
	mov	dh, dl			; DH = wiersz
	mov	dl, cl			; DL = kolumna
	int	10h			; ustaw nasz kursor tam

	mov	dx, prawy_p
	mov	ah, 9
	int	21h

	jmp	short petla


koniec:
	mov	ax, 4c00h
	int	21h

nie_ma_myszy	db	"Sterowniki myszy nie sa zainstalowane.$"
lewy_p		db	"Lewy$"
prawy_p		db	"Prawy$"

Jak widać, korzystanie z myszy niekoniecznie musi być tak trudne, jak to się mogło wydawać. Po bardziej zaawansowane funkcje radzę sięgnąć do RBIL, gdzie zawsze znajdziecie więcej informacji o danym przerwaniu niż w moim kursie, który skupia się przecież na przedstawianiu algorytmów a nie na zapamiętywaniu każdego szczególiku.

Miłego eksperymentowania.



Spis treści off-line (klawisz dostępu 1)
Spis treści on-line (klawisz dostępu 2)
Ułatwienia dla niepełnosprawnych (klawisz dostępu 0)