ورود

View Full Version : دریافت رشته ای 500 بایتی



AliReza Vafakhah
سه شنبه 24 دی 1387, 15:04 عصر
سلام دوستان

این اولین و آخرین سوال من در مورد اسمبلی است (چون من اسمبلی کار نمی کنم.)

دوستان من می خوام با دو متغیر db یک رشته 500 تایی بگیرم (250 برای یکی از متغیر ها و 250 تا دیگر برای متغیر بعد )

حالا من این کد رو نوشتم اما جواب نمیده

لطفا کمک کنید



.model small
.data
;definde varaibel
maxlen db 255
actlen db ?
str1 db 255 dup(?)
str2 db 255 dup(?)
msg1 db "Enter String 0 to 255$"
msg2 db "Enter String 255 to 500$"
.code

Main proc

mov ax,@data
mov ds,ax

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

call setenter;Goto next line

mov ah,10
mov dx,offset maxlen
int 21h

mov bl,actlen
mov bh,0
mov str1[bx],"$"

call setenter;Goto next line

mov ah,9
mov dx,offset msg2
int 21h

call setenter;Goto next line

mov maxlen,255

mov ah,10
mov dx,offset maxlen
int 21h

mov bl,actlen
mov bh,0
mov str2[bx],"$"

call setenter;Goto next line

mov ah,9
mov dx,offset str1
int 21h

;call setenter;Goto next line

;mov ah,9
; mov dx,offset str2
;int 21h

mov ah,4ch
int 21h

main endp

SetEnter proc

push ax
push dx

mov ah,2
mov dl,10
int 21h
mov ah,2
mov dl,13
int 21h

pop dx
pop ax
ret

SetEnter endp
End Main

Open-Source
شنبه 28 دی 1387, 11:53 صبح
ای بابا.!!!
چقدر انجمن اسمبلی تنبل شدند؟؟؟؟!!!!!
30-40 تا مشاهده از این پست حتی بدون یک جواب؟؟؟؟!!!!!!

ای که دستت میرسد کاری بکن ____ پیش از آن کز تو نیاید هیچ کار

Open-Source
شنبه 28 دی 1387, 11:56 صبح
این برنامه کاراکتر کاراکتر از صفحه کلید خوانده بعد چاپ میکند(در یک متغییر هم میریزد)
شرط توقف هم ورود enter است.(حد اکثر 500 کاراکتر).

.model small

.data
str1 db 500 dup(?)

.code
start:

mov ax,@data
mov ds,ax


;------------------- Get 500 Character & Put to Str1
mov si,0

mov cx,500
up1:

mov ah,0
int 16h

mov dl,al
mov ah,2
int 21h

mov str1[si],al
inc si

cmp al,13
je extup1

loop up1

ent:
mov ah,2
mov dl,7 ;beep
int 21h

mov ah,0
int 16h

cmp al,13
jne ent

mov str1[si],'$'

extup1:
mov dl,10
mov ah,2
int 21h

dec si
mov str1[si],'$'

mov ah,9
mov dx,offset str1
int 21h

;----------------------------------
mov ah,0
int 16h

mov ah,4ch
int 21h

end start

AliReza Vafakhah
شنبه 28 دی 1387, 17:25 عصر
باز هم تو رفیق به داد ما رسیدی .

Open-Source
شنبه 28 دی 1387, 19:06 عصر
باز هم تو رفیق به داد ما رسیدی .

قابلی نداشت.:خجالت: ما نوکر هر چی با مرام هست هستیم:چشمک:

راستی فردا امتحان صفر میشم.
هیچی یادم نیست.

شاید پروژه رو هم از توبگیرم.:لبخندساده: