برنامه دریافت رشته و نمایش بزرگترین و کوچکترین کد اسکی - تالار گفتمان آذر فروم





دعوت به همکاری با آذر فروم

 

برنامه دریافت رشته و نمایش بزرگترین و کوچکترین کد اسکی
زمان کنونی: 17-09-1395،01:22 ق.ظ
کاربران در حال بازدید این موضوع: 1 مهمان
نویسنده: Friga
آخرین ارسال: Friga
پاسخ: 1
بازدید: 241

 
 
رتبه موضوع:
  • 0 رای - 0 میانگین
  • 1
  • 2
  • 3
  • 4
  • 5

موضوع: برنامه دریافت رشته و نمایش بزرگترین و کوچکترین کد اسکی
ارسال: #1
برنامه دریافت رشته و نمایش بزرگترین و کوچکترین کد اسکی
پست‌ها: 11,943
تاریخ عضویت: 20 اردیبهشت 1390
اعتبار: 288
حالت من: Shad
این برنامه یک رشته را دریافت کرده و کاراکتر بزرگترین کد اسکی و کوچکترین کد اسکی را نمایش میدهد
;-*-*-*-*-*-*-*-*-*-* STACK SEGMENT *-*-*-*-*-*-*-*-*-*-*-*-*

stacksg segment para stack 'stack'
dw 32 dup('?')
stacksg ends

;-*-*-*-*-*-*-*-*-*-* DATA SEGMENT *-*-*-*-*-*-*-*-*-*-*-*-*

datasg segment para 'data'
msg1 db "Enter a string : ",'$'
msg2 db "Maximum of aski code : ",'$'
msg3 db "Minimum of aski code : ",'$'
msg4 db "Made by REZA AKHLAGHY & MOHAMMAD SHERAFAT",'$'
msg5 db "_+_+_+_+_+_+_This program found max & min Asci code of character _+_+_+_+_+_+_",'$'
strlist label byte
max db 10
len db ?
input_string db 10 dup(' ')
maximum db ?
minimum db ?
datasg ends

;-*-*-*-*-*-*-*-*-*-* CODE SEGMENT *-*-*-*-*-*-*-*-*-*-*-*-*

codesg segment para 'code'
main proc far
assume cs:codesg,ds:datasg,es:codesg
mov ax,datasg
mov ds,ax

;-*-*-*-*-*-*-*-*-*-* Clear Screen *-*-*-*-*-*-*-*-*-*-*-*-*

mov ah, 6h
mov al, 25 ;number of rows
mov ch, 0
mov cl, 0
mov dh, 24 ;row
mov dl, 79 ;column
mov bh, 15 ;attribute
int 10h
;-*-*-*-*-*-*-*-*-*-* cursor move *-*-*-*-*-*-*-*-*-*-*-*-*

mov ah, 2h ;request set cursor
mov dh, 3 ;row
mov dl, 1 ;column
mov bh, 0 ;page number
int 10h
;-*-*-*-*-*-*-*-*-*-* print msg5 *-*-*-*-*-*-*-*-*-*-*-*-*

lea dx,msg5
mov al,0
mov ah,09h
int 21h


;-*-*-*-*-*-*-*-*-*-* cursor move *-*-*-*-*-*-*-*-*-*-*-*-*

mov ah, 2h ;request set cursor
mov dh, 7 ;row
mov dl, 18 ;column
mov bh, 0 ;page number
int 10h
;-*-*-*-*-*-*-*-*-*-* print msg4 *-*-*-*-*-*-*-*-*-*-*-*-*

lea dx,msg4
mov al,0
mov bh,14h
mov ah,09h
int 21h


;-*-*-*-*-*-*-*-*-*-* cursor move *-*-*-*-*-*-*-*-*-*-*-*-*

mov ah, 2h ;request set cursor
mov dh, 10 ;row
mov dl, 30 ;column
mov bh, 0 ;page number
int 10h

;-*-*-*-*-*-*-*-*-*-* print message1 *-*-*-*-*-*-*-*-*-*-*-*-*

lea dx, msg1
mov ah, 9h
int 21h

;-*-*-*-*-*-*-*-*-*-* read string *-*-*-*-*-*-*-*-*-*-*-*-*

mov ah, 0ah
lea dx, strlist
int 21h

;-*-*-*-*-*-*-*-*-*-* Main Opration *-*-*-*-*-*-*-*-*-*-*-*-*

lea bx,input_string
mov cl,0
mov al,[bx];MAXIMUM
mov ah,[bx];MINIMUM
start_of_loop:
cmp cl,len
je end_of_program
cmp [bx],ah
jg next_case
mov ah,[bx]
next_case:
cmp [bx],al
jl next_index
mov al,[bx]
next_index:
inc cl
inc bx
mov maximum,al
mov minimum,ah
jmp start_of_loop
end_of_program:

;-*-*-*-*-*-*-*-*-*-* Clear Screen *-*-*-*-*-*-*-*-*-*-*-*-*

mov ax,0600h
mov bh,15
mov cx,0000
mov dx,184fh
int 10h

;-*-*-*-*-*-*-*-*-*-* mov curcer *-*-*-*-*-*-*-*-*-*-*-*-*

mov ah,2h
mov dh,10
mov dl,30
mov bh,0
int 10h

;-*-*-*-*-*-*-*-*-*-* print msg2 *-*-*-*-*-*-*-*-*-*-*-*-*

lea dx,msg2
mov al,0
mov ah,09h
int 21h

;-*-*-*-*-*-*-*-*-*-* print MAXIMUM *-*-*-*-*-*-*-*-*-*-*-*-*

mov dl,maximum
mov ah,2h
int 21h

;-*-*-*-*-*-*-*-*-*-* move curcer *-*-*-*-*-*-*-*-*-*-*-*-*

mov ah,2h
mov dh,11
mov dl,30
mov bh,0
int 10h

;-*-*-*-*-*-*-*-*-*-* print msg3 *-*-*-*-*-*-*-*-*-*-*-*-*

lea dx,msg3
mov al,0
mov ah,09h
int 21h

;-*-*-*-*-*-*-*-*-*-* print MINIMUM *-*-*-*-*-*-*-*-*-*-*-*-*

mov dl,minimum
mov ah,2h
int 21h

;-*-*-*-*-*-*-*-*-*-* cursor move *-*-*-*-*-*-*-*-*-*-*-*-*

mov ah, 2h ;request set cursor
mov dh, 20 ;row
mov dl, 18 ;column
mov bh, 0 ;page number
int 10h
;-*-*-*-*-*-*-*-*-*-* print msg4 *-*-*-*-*-*-*-*-*-*-*-*-*

lea dx,msg4
mov al,0
mov bh,14h
mov ah,09h
int 21h

;-*-*-*-*-*-*-*-*-*-* cursor move *-*-*-*-*-*-*-*-*-*-*-*-*

mov ah, 2h ;request set cursor
mov dh, 25 ;row
mov dl, 30 ;column
mov bh, 0 ;page number
int 10h
;-*-*-*-*-*-*-*-*-*-* close program *-*-*-*-*-*-*-*-*-*-*-*-*

mov ax,4c00h
int 21h

main endp
codesg ends
end main
















دورمچم به جای ساعت یکنوار مشکی بستم
تا همه بفهمن من از همه هر چه زمانو متعلق به زمان است بیزارم
من هم روزی قلبی داشتم
که توسط مردمانی ازمیان شما شکست و شکست تا سنگی شد
واکنون روزگاریست که شیطان فریاد میزند..
انسان پیدا کنید سجده خواهم کرد...


=====ஜ۩۞۩ஜ=====

21-04-1391 12:56 ق.ظ
 


[-]
پاسخ سریع
پیام
پاسخ خود را برای این پیام در اینجا بنویسید.


کد تصویری
royalfuns
(غیر حساس به بزرگی و کوچکی حروف)
لطفاً کد نشان داده شده در تصویر را وارد نمایید. این اقدام جهت جلوگیری از ارسال‌های خودکار ضروری می‌باشد.

موضوعات مشابه ...
موضوع: نویسنده پاسخ: بازدید: آخرین ارسال
8 نحوه ساخت فايل Exe از برنامه اسمبلي بوسيله Masm Friga 0 327 18-05-1391 12:15 ق.ظ
آخرین ارسال: Friga
  آموزش زبان برنامه نويسي Assembly Friga 0 227 21-04-1391 01:03 ق.ظ
آخرین ارسال: Friga
  برنامه دریافت یک رشته و محاسبه کدهای فرد و زوج Friga 0 208 21-04-1391 12:58 ق.ظ
آخرین ارسال: Friga
  برنامه هایی با اسمبلی Friga 1 355 21-04-1391 12:54 ق.ظ
آخرین ارسال: Friga

پرش به انجمن:


کاربران در حال بازدید این موضوع: 1 مهمان