Graph Dos Box
Graph Dos Box
Graph Dos Box
asm;
.MODEL small
.STACK 256
.DATA
.CODE
jmp start
begin:
mov ah,00
mov al,mode
int 10h
drawcircle:
mov al,colour
mov ah,0ch
inc y_value
condition1:
cmp decision,0
ja condition2
mov cx, y_value
mov ax, 2
imul cx
add cx, 1
inc cx
add decision, cx
mov bx, y_value
mov dx, x_value
cmp bx, dx
ja readkey
jmp drawcircle
condition2:
dec x_value
mov cx, y_value
sub cx, x_value
mov ax, 2
imul cx
inc cx
add decision, cx
mov bx, y_value
mov dx, x_value
cmp bx, dx
ja readkey
jmp drawcircle
readkey:
mov ah,00
int 16h ;wait for keypress
endd:
mov ah,00 ;again subfunc 0
mov al,03 ;text mode 3
int 10h ;call int
mov ah,04ch
mov al,00 ;end program normally
int 21h
END begin