mouse.asm

在图形模式下显示鼠标

.model small
.data
  oldaddr dd ?
  oldcx dw ?
  olddx dw ?
  mode  db ?
.stack 256
.code
draw proc far uses ax bx
   push cx
   xor cx,cx
   xor bh,bh
   mov ah,0ch
xline:
   int 10h
   inc cx
   cmp cx,320
   jl  xline
   pop cx
   push dx
   xor dx,dx
yline:
   int 10h
   inc dx
   cmp dx,200
   jl  yline
   pop dx
   ret
draw endp
dint proc far uses ax
     mov ax,2h
     int 33h
     xchg cx,oldcx
     xchg dx,olddx
     mov al,00h
     call draw
     mov cx,oldcx
     mov dx,olddx
     mov al,01h
     call draw
     mov ax,1h
     int 33h
     ret
dint endp
     .startup
     mov ah,0fh
     int 10h
     mov mode,al
     mov ah,0
     mov al,13h
     int 10h
     mov ax,0
     int 33h
     mov ax,1
     int 33h
     
     mov ax,cs
     mov es,ax
     lea dx,dint
     mov ax,14h
     mov cx,1
     int 33h
     mov word ptr oldaddr,dx
     mov word ptr oldaddr+2,es
     .repeat
       mov ax,03h
       int 33h
     .until bx==2
     mov dx,word ptr oldaddr
     mov es,word ptr oldaddr+2
     mov cx,1
     mov ax,0ch
     int 33h
     mov al,mode
     mov ah,0h
     int 10h
     .exit 0
     end