Home > Software engineering >  I need to show 3 digit answer Using tasm/tlink/dosbox in notepad
I need to show 3 digit answer Using tasm/tlink/dosbox in notepad

Time:05-29

How can i show the 3 digit answer?

Note: I have Base 3 needed in addend and augend same as the answer need is base 3 how can i show ? I'am using notepad then tasm add.asm / tlink add / add. to execute the program. I'am new in dosbox so just want to learn how to show 3 digit answer in base 3.

My Code in notepad :

.model small
.stack 100h
.data
    
    Spc     db 0dh,0ah, " $"                                                ;New Line
    ErAd31  db 0dh,0ah, "Input only number to proceed [00-22 only]. $"      ;Error Input Addition Addend and Augend
    ErAd32  db 0dh,0ah, "Input only [Y/y] Add Again [N/n] No. $"            ;Error Input Add Again
    
    ;Bases Calculation in Calculator
    BsA31   db 0dh,0ah, "   Base 03 Addition "                          ;Addition Base 03
            db 0dh,0ah, " "
            db 0dh,0ah, "Addend[00-22]:  $"
    BsA32   db 0dh,0ah, "Augend[00-22]:  $"
    
    SumA    db 0dh,0ah, "   Sum is    :  $"                             ;Sum
    AgA     db 0dh,0ah,0dh,0ah, "Add Again[Y/N]? : $"                   ;Sum Again
    
    ;Calculation Logic
    Dg11    db 0
    Dg12    db 0
    NoAd1   db 0
    NoAd2   db 0
    SumAd   db 0
    
.code
main proc
    
    mov ax,@data                    ;initialize ds
    mov ds,ax
    
    AdBs3:
        mov ah,09h
        lea dx, Spc
        int 21h
        
        lea dx, BsA31               ;Addend
        int 21h
        mov ah,01h
        int 21h                     ;1st Digit
        
        cmp al,29h
        jle ErrAd31
        cmp al,33h
        jge ErrAd31
        
        sub al,30h
        mov Dg11,al
        
        mov ah,01h
        int 21h                     ;2nd Digit
        
        cmp al,29h
        jle ErrAd31
        cmp al,33h
        jge ErrAd31
        
        sub al,30h
        mov Dg12,al
        
        mov al, Dg11
        mov bl,10h
        mul bl
        
        mov NoAd1,al
        mov al,Dg12
        add NoAd1,al
        jmp AdBs32
    
    ErrAd31:
        mov ah,09h
        lea dx, Spc
        int 21h
        
        lea dx, ErAd31
        int 21h
        
        jmp AdAgain
        
    Ad1:
        cmp al, 59h or 79h
        je AdBs3
        
    AdBs32:
        
        mov ah,09h
        lea dx, BsA32               ;Augend
        int 21h
        mov ah,01h
        int 21h                     ;1st Digit
        
        cmp al,29h
        jle ErrAd31
        cmp al,33h
        jge ErrAd31
        
        sub al,30h
        mov Dg11,al
        
        mov ah,01h
        int 21h                     ;2nd Digit
        
        cmp al,29h
        jle ErrAd31
        cmp al,33h
        jge ErrAd31
        
        sub al,30h
        mov Dg12,al
        
        mov al, Dg11
        mov bl,10h
        mul bl
        
        mov NoAd2,al
        mov al,Dg12
        add NoAd2,al
        
        ;Addition
        mov bl, NoAd1
        add bl, NoAd2
        mov cx,bx
        add cx,3210h
        
        mov ah,09h
        lea dx, SumA
        int 21h
        mov ah,02h
        mov dl,ch
        int 21h
        mov dl,cl
        int 21h
        
        jmp AdAgain
    
    AdAgain:
        mov ah,09h
        lea dx, Spc
        int 21h
        
        lea dx, AgA
        int 21h
        mov ah,01h
        int 21h
        
        cmp al, 59h or 79h
        je Ad1
        cmp al, 4Eh or 6Eh
        je AdOut
        
    AdOut:
        mov ah,4Ch                      ;end here
        int 21h
    
main endp
end main

Needed Output:

Base 03 Addition

Addend[00-22]: 22
Augend[00-22]: 22
    Sum is   :121

Add Again[Y/N]? : N

CodePudding user response:

cmp al, 29h       <================
jle ErrAd31
cmp al, 33h
jge ErrAd31

and

mov al, Dg11
mov bl, 10h       <================
mul bl

and

mov bl, NoAd1
add bl, NoAd2
mov cx, bx
add cx, 3210h     <================

You seem to have trouble with the hexadecimal number system!

  • To check the validity of the inputted digit, you should compare with 2Fh instead of 29h. You're forgetting that hex also uses A, B, C, D, E, and F as digits. The ASCII code directly below "0" is 2Fh (because the ASCII code of "0" is 30h).

  • To convert your base-3 input, the multiplication should use 3, not 10h which is in effect equal to 16.

  • I have no idea about what you think this add cx, 3210h could be doing.


how to show 3 digit answer in base 3.

Displaying a number in base 3 is no different from displaying a number in base 10. I copied next snippet of code from my answer at Displaying numbers with DOS. I changed mov bx, 10 into mov bx, 3 et voilà...

    mov     al, NoAd1
    add     al, NoAd2
    mov     ah, 0
    ; Your number is in AX
    mov     bx, 3          ; CONST
    xor     cx, cx         ; Reset counter
.a: xor     dx, dx         ; Setup for division DX:AX / BX
    div     bx             ; -> AX is Quotient, Remainder DX=[0,2]
    push    dx             ; (1) Save remainder for now
    inc     cx             ; One more digit
    test    ax, ax         ; Is quotient zero?
    jnz     .a             ; No, use as next dividend
.b: pop     dx             ; (1)
    add     dl, "0"        ; Turn into character [0,2] -> ["0","2"]
    mov     ah, 02h        ; DOS.DisplayCharacter
    int     21h

AdAgain:

It's cumbersome how you repeat or exit the program

  mov ah,01h
  int 21h
  cmp al, 59h or 79h
  je Ad1
  cmp al, 4Eh or 6Eh
  je AdOut  
AdOut:
  • This use of or does not offer a choice between UCase and LCase.
  • Jumping to the top with a conditional jump forced you to introduce an intermediate label because the target was too far away.
  • If the user presses none of the mentioned keys, you exit the program anyway. Then why bother to compare with "N" or "n"?

Better use:

AdAgain:
    mov ah, 09h
    lea dx, Spc
    int 21h
    lea dx, AgA    ; "Continue?"
    int 21h

.z: mov ah, 01h
    int 21h
    or  al, 32     ; Make LCase
    cmp al, "n"    ; 6Eh
    je  AdOut
    cmp al, "y"    ; 79h
    jne .z         ; (*)
    jmp AdBs3      ; (**)
        
AdOut:

(*) The user must respond with "N", "n", "Y", or "y", else the question gets repeated.
(**) This jmp can jump all the way to the top. You no longer need the intermediate label Ad1.

  • Related