Изменение курсора TASM

[shilovec5377]

Помогите плиз изменить курсор на смайлик или человечка или на что - нибудь. Вот код:

.model small
.stack 256
.data
stat db ?
col dw ?
row dw ?
color db 1
flag db 0
rezult db '000$'
mult10 db 10
mes_er db 'мышь не установлена',13,10,'$'
mes  db 'пpогpамма завеpшена',13,10,'$'
mask_m dw 16 dup(0ffffh)
    dw 8000h,0c000h,0a000h,9000h
    dw 0a800h,0b400h,0ba00h,0bd00h
    dw 0be80h,0bf40h,0bfa0h,0bfd0h
    dw 0bfe0h,0ae00h,0a300h,0e300h
.code
cursor_on proc near
   mov ax,01
   int 33h
   ret
cursor_on endp
cursor_off proc near
   mov ax,2
   int 33h
   ret
cursor_off endp
mouse_stat proc near
   mov ax,3
   int 33h
   ret
mouse_stat endp
pixel 	proc near
   	call cursor_off
	mov ah,0Ch
	mov al,color
	mov bh,0
   	int 10h
   	call cursor_on
   	ret
pixel 	endp
speed proc near
   mov ax,000fh
   mov cx,64
   mov dx,64
   int 33h
   mov ax,0013h
   mov dx,64
   int 33h
   ret
speed endp
text_curc proc near
	mov	ax,000AH
	mov	bx,01
	int	33h
	ret
text_curc endp

write	proc near
	mov bx,3
cicle:
	idiv mult10
	add ah,30h
	mov [si+bx-1],ah
	mov ah,0
	dec bx
	jnz cicle
	mov ah,09
	mov dx,offset rezult
	int 21h
	ret
write	endp
go: mov ax,@data
   mov ds,ax
   mov ax,0
   int 33h
   cmp ax,0
   jne ner
   jmp er
ner:
   mov ax,10h
   int 10h
   mov ax,9
   xor bx,bx
   xor cx,cx
   push ds
   pop es
   lea dx,mask_m
   int 33h
   call speed
   call cursor_on
   call mouse_stat
   mov col,cx
   mov row,dx
next:
	mov ah,02
	mov bh,00
	mov dx,00
	int 10h
	mov ax,col
	lea si,rezult
	call write
	mov ah,02
	mov bh,0
	mov dx,0005h
	int 10h
	mov ax,row
	call write
	mov dx,row
	mov cx,col
	mov ah,1
	int 16h
	jz nosym	
	mov ah,0
	int 16h
	cmp al,27
	je ex
nosym:
   mov flag,0
   call mouse_stat
   mov stat,bl
   cmp col,cx
   je rov_lab
   mov col, cx
   mov flag ,1
rov_lab:
   cmp row,dx
   je pix
   mov row ,dx
   mov flag,1
pix:
   mov bl,stat
   and bl,2
   cmp bl,2
   je nextc
    mov bl,stat
    and bl,1
    cmp bl,1
    jne next
    cmp flag,0
    je next
    call pixel
    jmp next
ex:
   call cursor_off
   lea dx,mes
    jmp exit
nextc:
	inc color
	jmp next
er:
   lea dx,mes_er
exit:
   mov ax,3
   int 10h
   mov ah,9
   int 21h
   mov ax,4c00h
 
int 21h
End go

Помогите или подскажите где это можно изменить.

[JTG]

mask_m dw 16 dup(0ffffh)
    dw 0000000000000000b
    dw 0100010000000000b
    dw 0010100000000000b
    dw 0001000000000000b
    dw 0010100000000000b
    dw 0100010000000000b
    dw 0000000000000000b
    dw 0000000000000000b
    dw 0011101110111000b
    dw 0000000000000000b
    dw 0000000000000000b
    dw 0000000001100000b
    dw 0000000100010000b
    dw 0000000100110000b
    dw 0000000101010000b
    dw 0000000110010000b

Идея ясна?

[shilovec5377]

спасибо большое, а как чтобы рисовало только три любых цвета при нажатии мыши.

[shilovec5377]

а как нарисовать смайлик? подскажите плиз.