Собственно программа должна менять содержимое строчек - но НЕ работает
В чем дело ?

TITLE HELLO

.MODEL SMALL

.STACK 64

.DATA
STR1 DB 'InterTech'
STR2 DB 9 DUP ('*'), '$'

.CODE
MAIN PROC FAR

MOV ax,@data
MOV ds,ax
MOV es,ax

MOV cx,09

A20:

LEA SI,STR1
LEA DI,STR2

MOV al,[SI]
MOV [DI],al

INC SI
INC DI
DEC CX

JNZ A20

MOV AH,09H
LEA DX,STR2
INT 21H
mov AX,4c00h
int 21h
MAIN ENDP
END MAIN

дак, постоянно не надо в регистры SI, DI эффективный адрес загружать


эквивалентно

Dilon
Так а как иначе будет происходить обмен строками ?

CCCP адреса нужнго загрузить один раз, ведь в SI и DI указатели на первый элемент строки, а затем, увеличивая их мы проходим по всей строке, а у тебя SI и DI постоянно заменяются адресами первого элемента, вот поэтому и не работает, попробуй скомпилить мой пример.

Dilon
Господи ну я и ступил ....

Люди, может и тупой вопрос, но как считать серийные номера с видеокарты , звуковухи и сетевухи (можно и не на ассемблере!) ?

При компиляции выдаётся 3 ошибки:
unknown character
unknown character
unexpected end of file encountered
Я не вижу ни одной, может кто-н. подскажет в чём тут дело?

data segment
max db 255
len db 0
str db 256 dup(?)
db ?
ent db 13,10,'$'
data ends

stk segment stack
db 30 dup(?)
top db ?
stk ends

cseg segment
assume cs:cseg,ds:data,ss:stk,es:cseg
begin:
jmp beg
conv proc
lea di,str
mov bl,len
mov bh,0
add bx,di
dec bx
cikl:
cmp di,bx
jnb konec
mov al,[di]
mov ah,[bx]
mov [di],ah
mov [bx],al
inc di
dec bx
jmp cikl
konec:
ret
conv endp

viv proc
lea dx,ent
mov ah,9
int 21h
lea di,str
mov cl,len
mov ah,2
pr:
mov dl,[di]
int 21h
inc di
dec cl
jnz pr
ret
viv endp

beg:
mov ax,data
mov ds,ax
mov ax,stk
mov ss,ax
mov sp,offset ss:top
lea dx,max
mov ah,0ah
int 21h
cmp len,0
jz exit
call conv
call viv
exit:
mov ah,4ch
int 21h
cseg ends
end begin:abuse:

data segment
max db 255
len db 0
str1 db 256 dup(?)
db ?
ent db 13,10,'$'
data ends

stk segment stack
db 30 dup(?)
top db ?
stk ends

cseg segment
assume cs:cseg,ds:data,ss:stk,es:cseg
begin:
jmp beg
conv proc
lea di,str1
mov bl,len
mov bh,0
add bx,di
dec bx
cikl:
cmp di,bx
jnb konec
mov al,[di]
mov ah,[bx]
mov [di],ah
mov [bx],al
inc di
dec bx
jmp cikl
konec:
ret
conv endp

viv proc
lea dx,ent
mov ah,9
int 21h
lea di,str1
mov cl,len
mov ah,2
pr:
mov dl,[di]
int 21h
inc di
dec cl
jnz pr
ret
viv endp

beg:
mov ax,data
mov ds,ax
mov ax,stk
mov ss,ax
mov sp,offset ss:top
lea dx,max
mov ah,0ah
int 21h
cmp len,0
jz exit
call conv
call viv
exit:
mov ah,4ch
int 21h
cseg ends
end begin
==========
Канает? У меня -да.

То же самое выдаёт.

народ, ну тэг code для кого сделан? Читать невозможно

Добавлено спустя 13 минут, 44 секунды:
с какими ключами линкуешь? версия ассемблера?

с этим bat все работает в TASM 4.1

Tasm 5.0

#tim$ сначала идут ключи, а потом - объектный файл

Все равно не работает

Кто - нибудь знает как организовать сортировку (например пузырём) на ассемблере?
Я всего две недели на нём пишу(пытаюсь писать), в книгах нигде не встречал ничего про это. И вообще это возможно?

написать-то возможно, но только пузырь на чем не пиши - толку мало будет, сам алгоритм крайне малоэффективен.
а более сложный алгоритм реализовывать на асме полностью - имхо того не стоит. я бы порекомендовал, если нужна скорость - с+асм-вставки, если универсальность - с++ с шаблонами.

Добавлено спустя 6 минут, 18 секунд:
кстати, темплейт для quicksort в STL имеется

.model small
.data
x db 0
.code
public sort
sort proc near
pop ax
pop bx
pop ds
pop cx
push ax
dec cx
mov si,1
m3:
mov al, [bx[si]]
mov x,al
push si
m2:
mov al, [bx[si-1]]
cmp x,al
jg m1
mov al,[bx[si-1]]
mov [bx[si]],al
dec si
cmp si,0
je m1
jmp m2
m1: mov al,x
mov [bx[si]],al
pop si
inc si
loop m3
ret
sort endp
end

в самом деле, зачем там и самое главное чем ассемблировал? а то непонятно, тут до кучи всяких ассемблеров и у каждого своя мнемоника, так что пока не скажешь чем ассемблишь, ничем помочь не могу. да, кстати, укажи на каких строках выдаются ошибки.

fractal: Я сейчас как раз работаю над этой проблемой, как закончу, сообщу.

#tim$ ты в .com линкуешь? - так низзя, для кома специальный код нужен (односегментный для начала)
убери /t

Fractal
у видео- и звуковой карты нет серийных номеров
сетевая карта в этом отношении гораздо более перспективна - считывайте mac-адрес - он изначально уникален (но при наличии желания и его изменить не составляет большого труда)