1.汇编语言 实现形颜色变换
2.手机什么系统兼容好!
汇编语言 实现形颜色变换
DATAS SEGMENT
COLOR DW
BKCOLOR DW
X DW ,si指标源码
Y DW ,
RADIUS DW
DATAS ENDS
STACKS SEGMENT
DW DUP(0)
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
MOV AX,DATAS
MOV DS,AX
MOV AX,0AH
MOV ES,AX
MOV AX,H
INT H ;设置**图形模式
MOV AL,2
CALL SET_WRITE_MODE ;将写模式设为写模式2
again:
MOV AX,BKCOLOR
CALL CLEAR ;将背景清成白色
MOV AX,WORD PTR [X]
PUSH AX
MOV AX,WORD PTR [Y]
PUSH AX
MOV AX,WORD PTR [RADIUS]
PUSH AX
CALL CIRCLE
MOV AH,0
INT H
cmp al,0dh ;回车退出
jz exit
cmp ah,2eh;Key 'C or c'
jnz skip
inc color
skip:
jmp again
quit:
mov ah,4ch
int h
exit:
MOV AX,4CH
INT H
;