 | 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
funzione assume la posizione del Mouse
con l’aiuto della Funzione 03H
della libreria
INT 33H, caricata in memoria dal
driver del Mouse direttamente da Windows o manualmente dal prompt
del Dos
[per saperne di più consulta la
Scheda
dedicata al Mouse nella Sezione
Dentro il Computer]. |
|
Codice Sorgente |
|
 |
 |
 |
FUNCTION RigMou(pixel:boolean): word;
VAR depo:word;
BEGIN
IF pixel THEN
asm
PUSH AX
PUSH DX
MOV AX,0003H
INT 33H
MOV depo,DX
POP DX
POP AX
end
ELSE
asm
PUSH AX
PUSH DX
MOV AX,0003H
INT 33H
SAR DX,1
SAR DX,1
SAR DX,1
INC DX
MOV depo,DX
POP DX
POP AX
end;
RigMou:=depo;
END;
|
|
