چند تا سوال از اسمبلي دارم

سلام خدمت برنامه نويسان عزيز يك دانشجوي رشته كامپيوتر چند تا سوال به من داد با كلي عجز ناله گفت كه براش جواب اين سوالها رو پيدا كنم من كه برنامه نويسي بلد نيستم گفتم از شما دوستان درخواست كنم با اين كارتون لطف بزرگي در حق من مي كنيد سوال زياده ولي من فقط دو تا از سوالها رو با پاسخ مي خوام :10:

1- برنامه اي بنويسيد كه مقدار 65535 را در ثبات ax قرار داده، آنقدر از آن كم كند تا به صفر برسد.

2- برنامه اي بنيسيد كه رشته اي را از ورودي خوانده طول آن را محاسبه كند و در خروجي نشان دهد.

3- زير برنامه اي بنويسيد كه مينيمم دو پارامتر به اندازه يك كلمه را پيدا نمايد و توسط ثبات ax برگرداند.

جواب 1-3 رو من اینطوری نوشتم و جواب 2 رو هم حسش و ندارم بنویسم اسبملی برای یه ورودی خروجی گرفتن پدر ادم و در میاره

کد:

---

Initialize        macro
assume        ss:stacksg,ds:datasg,cs:codesg
push        ds
mov                ax,0
push        ax
mov                ax,datasg
mov                ds,ax
EndM
CLR        macro
mov                ah,00
mov                al,03
int        10h
EndM
Cursor        macro
mov                ah,2h
mov                dh,3
mov                dl,2
mov                bh,0
int        10h
EndM


stacksg        segment        stack        'stack'
                db        32        dup(' ')
stacksg        ends

datasg        segment        para        'data'

datasg        ends

codesg        segment        para        'code'
main        proc        far
Initialize
CLR
Cursor

;*******Process**********

mov                ax,65535
label1:
cmp                ax,0
jz                label2
sub                ax,1
jmp        label1

Label2:               


        Ret
main EndP                               
codesg        ends
end        main

---

کد:

---

Initialize        macro
assume        ss:stacksg,ds:datasg,cs:codesg
push        ds
mov                ax,0
push        ax
mov                ax,datasg
mov                ds,ax
EndM
CLR        macro
mov                ah,00
mov                al,03
int        10h
EndM
Cursor        macro
mov                ah,2h
mov                dh,3
mov                dl,2
mov                bh,0
int        10h
EndM


stacksg        segment        stack        'stack'
                db        32        dup(' ')
stacksg        ends

datasg        segment        para        'data'
x                dw        ?
y                dw        ?

strlist        label byte
max                db        20
len                db        ?
buffer        db        20        dup(' ')
dollar        db        '$'
 

datasg        ends

codesg        segment        para        'code'
main        proc        far
Initialize
CLR
Cursor

;*******Process**********

mov                bx,x
cmp                bx,y
ja        p1
mov                ax,x
jmp        p2
p1:
mov                ax,y
p2:

        Ret
main EndP                               
codesg        ends
end        main

---

سلام. من یه برنامه به زبان اسمبلی میخوام.چی کار باید بکنم؟ خیلی هم فوریه!