Assembler - Рисование эллипса

[dessaber]

Здравствуйте, дорогие люди. Дали задание - нарисовать эллипс. Придумал я рисовать так - вспомнил уравнение эллипса; возьму Y, к примеру, за -B; Х - за -A; буду наращивать Х до тех пор, пока ((X^2)/(A^2))+((Y^2)/B^2)) не равно 1; как только равно - нарисовал четыре точки: (Х, Y), (-X,Y), (-X,-Y), (X,-Y); скинул Х, нарастил Y и т.д. Вот до куда дошел:

.model  small
.stack  100h
.data
message1 db  0ah,0dh,'Enter A :  $'       
message2 db  0ah,0dh,'Enter B :  $'
message3 db  0ah,0dh,'Press <R> to repeat...$'
x db 0
y db 0
a db 0
b db 0
form db 0            ;((x^2)/(a^2))+((y^2)/(b^2))
.code
mov     ax,@data
mov     ds,ax
xor     ax,ax                    
;----------------------A-INPUTIN-------------------------
mov ah,9                               ;function for a string inputin
mov dx, offset message1                ;sendin the string to dx
int 21h                                ;callin an interception
mov ah, 1                              ;function for a symbol inputin
int 21h  
sub al,30h        
mov a,al
;---------------------B-INPUTIN--------------------------
xor al,al
mov ah,9                               
mov dx, offset message2                 
int 21h                                   
mov ah, 1        
int 21h       
sub al,30h   
mov b,al
;---------------------------------------------------------------
mov cl,a                               ;sendin A to CL
mov x,cl                               ;sendin CL to X
neg x                                  ;makin X equal to -A
xor cl,cl

mov cl,b                     
mov y,cl
neg y                                  ;makin Y equal to -B
xor cl,cl
computin:			
mov al,x                               ;sendin X to AL
mul x                                  ;makin AХ equal to X^2
div a



xor ax,ax
mov ax,4c00h
int 21h
END

После ввода числа B окошко закрывается сразу. По регистрам прогнал - divide by zero. По переменным прогнал - вроде все на месте,у А конкретное значение, ну нуль. В чем косяк?



___________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE] (это кнопочка с решёточкой #)
Не забывайте об этом!
Модератор.

[Serge_Bliznykov]

По регистрам прогнал - divide by zero. По переменным прогнал - вроде все на месте,у А конкретное значение, ну нуль.

в A конкретное значение, равное нулю?! o_O !
Напомните мне, пожалуйста, 2/0 - что должно вернуть (какое КОНКРЕТНОЕ число) ?!

p.s. делить на ноль НЕЛЬЗЯ.
Точнее можно, но получается бесконечность.
Которую трудно выразить конечным числом.

[dessaber]

ну нуль

пардон, очепятка. Не нуль. Конкретное значение, которое ввел тобиш.