 | La procedura
è parzialmente scritta in linguaggio
Assembly. E' probabile che il lettore, in questo momento, non sia in possesso delle
conoscenze di base della programmazione a basso
livello, per cui questa pagina pụ risultare
incomprensibile; desidero fornirtela comunque, come stimolo per approfondire questa potente tecnica di programmazione
(vedi Sezione
Tutorial Assembly).
 | La procedura
fissa la posizione del Cursore del Mouse
con l’aiuto della Funzione 04H
della libreria
INT 33H, caricata in memoria dal
driver del Mouse direttamente da Windows o manualmente dal prompt
del Dos [consulta
la Scheda dedicata al Mouse nella Sezione
Dentro il Computer]. |
|
Codice Sorgente |
|
 |
 |
 |
PROCEDURE SetMouse
(pixel:boolean;
colonna,riga:word);
BEGIN
IF pixel THEN
asm
PUSH
AX
PUSH DX
PUSH CX
MOV CX,colonna
MOV DX,riga
MOV AX,0004H
INT 33H
POP CX
POP DX
POP AX
end
ELSE
asm
PUSH
AX
PUSH DX
PUSH CX
MOV CX,colonna
DEC CX
SAL CX,1
SAL CX,1
SAL CX,1
MOV DX,riga
DEC DX
SAL DX,1
SAL DX,1
SAL DX,1
MOV AX,0004H
INT 33H
POP CX
POP DX
POP AX
end;
END;
|
|
