PDA

View Full Version : اصلاح کد



kiuhnmgtrdcv
دوشنبه 24 فروردین 1388, 13:20 عصر
سلام
من میخوام یه رشته را از ورودی بخونم ولی نمیدونم چرا این کده مشکل داره لطفا راهنماییم کنید


stck segment stack
db 32 dup ("stack")
stck ends

datasg segment para 'data'
msg db "enter the char1","$"
msg2 db "enter the char2","$"

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

datasg ends

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


;read using 0A21
mov ah,0Ah
lea dx,strlist
int 21h

;print recieved chars
; lea dx,buffer ;print
; mov ah,9h
; int 21h

mov ax,4c00h
int 21h

main endp
ends
end main

Open-Source
سه شنبه 25 فروردین 1388, 09:00 صبح
;
;Get a String and Print
;
.model small

.data
maxlen db 30
actlen db ?
string db 30 dup(?)

.code
start:

mov ax,@data
mov ds,ax

;-------- Get String
mov ah,10
mov dx,offset maxlen
int 21h
;-------------------

;--------- Add '$' to End of String
mov bl,actlen
mov bh,0
mov string[bx],'$'
;----------------------

;-----------Print Enter
mov ah,2
mov dl,10
int 21h

mov ah,2
mov dl,13
int 21h
;----------------------

;--------- Print String
mov ah,9
mov dx,offset string
int 21h
;-----------------------

;-------------Press char to Exit('getch' in c++)
mov ah,0
int 16h
;----------------------

mov ah,4ch
int 21h


end start


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