.model tiny
.data
cmask db 0fh,0fh,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,
00,00,00,00,00,00,
00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00
,00,00,00,00,00
.code
org 100h
start:
mov ax,13h;13h 320x200 256
int 10h
push 0a000h
pop es
call refresh
xor si,si
mov cx,5
ccycle:
push cx
mov ax,320
dec cx
mul cx
mov si,ax
mov cx,0ffh
cycle:
mov es:[si],cl
inc si
loop cycle
pop cx
loop ccycle
;Мышь:
xor ax,ax
int 33h
push ds ;ES:DX -
pop es ;адрес маски
mov dx,offset cmask;(или я не прав?)
mov ax,09h
int 33h
mov ax,01h
int 33h
;мышь загружена
xor ax,ax
int 16h
pop dx
mov ax,03h
int 10h
mov ax,4ch
int 21h
ret
refresh proc;Обновление экрана
mov ax,0f0fh
xor di,di
mov cx,64000
rep stosw
ret
refresh endp
pointprc proc;Процедура рисованя точки
push si
mov ax,320
mul si
mov si,ax
add si,bx
mov byte ptr es:[si],31h
pop si
ret
pointprc endp
end start
Сообщение отредактировано: volvo -