Touch Example (cont.)
0059
74 OE
je
s ho rt BUTTON REPORT
005B
EB 23
Jmp
s ho rt EXIT_TOUCH
0050
B4 02
POS_REPORT:
mo",
ah,02H
;Move the cursor to the recieved posit 10n
005F
8A Fl
mo",
d h ,c 1
;using the standard IBM BIOS int 10.
0061
8A 03
mo",
dl,bl
0063
B7 00
mo"
bh,O
0065
CO 10
in t
10H
0067
EB 17
~:~
t
s ho r t EXIT TOUCH
;That finishes that ISR.
0069
F6 C3 80
BUTTON_REPORT:
bl,MAKE BRtAK BIT
;See if this is a t ouc h a r a release.
OOSC
74 OA
j
Z
short BUTTON PUSH
006E
B5 OE
mo"
ch,OEH
:On a re le'as e make the cursor back 1nto
0070
B1 OF
mo"
cl.OFH
,a line.
0072
B4 01
mo"
ah,l
0074
CD 10
in t
10H
0076
EB 08
jmp
I ho rt EXIT TOUCH
;That finishes a releale ISR.
0078
B5 00
BUTTON_PUSH:
mo",
ch,O
;Make the curlor into a bo)( on t ouc h.
007A
B1 OF
mo"
cl,Ofh
007C
B4 01
mali
ah,1
007E
CD 10
int
10H
0080
61
EXIT_TOUCH:
papa
;Restore all the
sr:?~:~erl.
0081
B4 00
mo"
ah,RS SUCCESSFUL
;Set the return
0083
CF
iret
;Return from the ISR
0084
TOUCH HANDLER
andp
~
0084
TOUCH:=RESTORE
p roc
0084
B4 04
mo"
ah,F 10 CONTROL
;Stop accepting calli
0086
BO OC
mov
al,SF' E'VENT OFF
Iylcall V_LTOUCH
-
0088
BD 00C6
mo",
~~'~N~~~UCH
0088
CD 6F
i
nt
0080
B4 04
mo"
ah,F 10 CONTROL
;Reltore the old event handler
OOaF
BO 08
mo"
al,SF'
C~EATE
EVENT
0091
8B 1E 0000
mo"
b.,word ptr SAVE_CS
0095
8E C3
mo"
as,b)(
0097
80 36 0002
lea
li,word ptr SAVE_ IP
009B
8B 16 0004
mo"
d)(,word ptr SAVE_OS
lYle all V_LTOUCH
009F
BD OOCS
mo"
~~~~R~~~UCH
00A2
CD 6F
int
00A4
C3
re t
00A5
TOUCH RESTORE
endp
OOA5
COOE_SEG
ends
end
BEGIN
Input System and HP-HIL 93
Need help?
Do you have a question about the Vectra and is the answer not in the manual?