ASSEMBLY KODU

Slm arkadaşlar bana acil assemblyle yazılmış hesap makinesi kodu lazım.Yardımcı olursanız sevinirim

Ne için lazım bu kodlar sana her şeyi hazır var elimde.

banada lazım kardeş [Misafirler Kayıt Olmadan Link Göremezler Lütfen Kayıt İçin Tıklayın ! ] a atabilirsin,ilgilenirsen sana çok duacı olurum kolay gelsin.

Hesap Makinasi

Kod:

---


DOSSEG
        .MODEL SMALL
        .STACK 100H
        org 100h
.Data


baslangic db 13,10, "HESAP MAKINASI",0
sayi1          dw ?
sayi2          dw ?
op          dw ?
Addi          db 13,10, " 1-Toplama",0       
Subtrk          db 13,10, " 2-Cikarma",0
Multl          db 13,10, " 3-Carpma",0
Divd          db 13,10, " 4-Bölme",0       
Be          db 13,10, " 5-Exit",0
erg          db ?       



include macros.mac
jumps

        .CODE
       



Start:        mov ax,@Data        ;
        mov ds,ax
       
       




        writeS baslangic
        nl
        nl
        nl
       
        mov ah,01h
        int 21h
       
        nl
       
        print "Ilk Sayiyi Giriniz:"
       

        readZ ax
       
       
        print "Ikinci Sayiyi Giriniz:"

        readZ cx


       
        print "Hangi islemi yapmak istiyorsunuz?"
        writeS addi
        writes subtrk
        writes multl
        writes divd
        writes be
        nl
        nl
        print "Islem :"


        readZ op                ;
        cmp op, 1                ;
        je Addit                ;

        cmp op, 2                ;
        je Subt                        ;


       
        cmp op, 3                ;
        je Multip                ;

       
        cmp op, 4                ;
        je Divid                ;

        cmp op, 5                ;
        je quit                ;
       
               
Addit:

        add ax,cx
       
        ;mov bx,ax
        jno sonuc
        jmp overflow

       

Subt:
        sub ax,cx
       
        ;mov bx,ax
        jno sonuc
        jmp Overflow
       
Multip:
       
        mov sayi1,ax
        mov sayi2,cx
       
        mov ax,sayi1
        mov bx,sayi2
       
        mul bx
       
       
       
       
        jno sonuc
        jmp overflow
Divid:
        mov sayi1,ax
        mov sayi2,cx
       
        mov ax,sayi1
        mov cx,sayi2
       
        div cx
        mov ax,cx
       
       
        jno sonuc
        jmp overflow

sonuc:

        print "Sonuc: "
        writeZ ax
        jmp quit

Overflow:

        print "Overflow...!"
        jmp Start
quit:       

                       
        mov        ax,4c00h               
        int        21h
        end        Start

---

İnternetten EMU8086 daki örnekler ( Example ) içinde var tavsiye ederim