[asm] Суммирование отрицательных членов массива

[Serg79]

Anarky, Ты покажи что у Тебя получилось то. Все таки все старались Тебе помочь и хочется конечный результат увидеть.

[Anarky]

вставил условие для сложения отрицательных:

Код:

model small
stack 256
.data
kolvo  dw 8
mas  dw -3, -2, -1, 0, 1, 2, 3, 4
.code
start:
    push [offset kolvo]
    push [offset mas]
    call sum
    add sp, 4
    ret

sum:
    push bp
    mov bp, sp
    mov cx, [bp + 4] ; загружаем количество параметров
    mov si, [bp + 6] ; загружаем указатель на данные
    xor ax, ax ; инициализация суммы
  sum_1:
    add ax, [si]
    cmp ax,0
    jb sob
    jge sled
sob:
    mov bx,ax
    add si,2
   loop sum_1
sled:
    add si,2
    loop sum_1
     pop bp
    ret
end sum
mov ax,4c00h
int 21h
end next 

программа работает, но попадает не на те значения, чет со смещением неправильно
CX при первом проходе устанавливается в FFFF

[RXL]

Anarky, полный бред...

Код:

; ...........
  sum_1:
    add ax, [si]
    cmp ax,0
    jb sob
    jge sled
sob:
    mov bx,ax
    add si,2
   loop sum_1
sled:
; ...........

; тоже бред.
mov ax,4c00h
int 21h
end next 

Занимаешься бездумным копипастом...

[Anarky]

проверил: бред

[RXL]

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

[Anarky]

а я могу так написать?

Код:

.......
sum_1:
 cmp [si],0
 jb a
 jge b
a:
 mov ax,[si]
 add si,2
loop sum_1
b:
add si,2
loop sum_1
...........
 

или тоже бред?

[RXL]

К сожалению тоже бред...
Одна правильная мысля там есть, но остальное......

[Anarky]

Код:

..........
mov ax,[si]
sum_1:
 cmp ax,0
 jb a
 jge b
a:
 mov bx,ax
 add si,2
loop sum_1
b:
add si,2
loop sum_1
.........

так?

Кажется, что нет...

[RXL]

Anarky, хватит гадать - все равно не угадаешь - комбинаций до хрена!

[Anarky]

RXL, что-то мне кажется, что так правильно:

Код:

sum:
    push bp
    mov bp, sp
    mov cx, [bp + 6] ;!!!!!! загружаем количество параметров
    mov si, [bp + 4] ;!!!!!! загружаем указатель на данные
    xor ax, ax ; инициализация суммы

[RXL]

Ну да. Я это сам написал
А дальше?

[Anarky]

Код:

.......
sum_1:
mov ax,[si]
cmp ax,0
 jb a
 jge b
a:
 add bx,[si]
 add si,2
loop sum_1
b:
add si,2
loop sum_1
.........

только перед этим еще bx обнулим...

[RXL]

Anarky, хорошо, это работает. Только наворочено очень. Лучше так:

Код:

sum:
    push bp
    mov bp, sp
    mov cx, [bp + 4] ; загружаем количество параметров
    mov si, [bp + 6] ; загружаем указатель на данные
    xor dx, dx ; как второй аккумулятор лучше использовать DX
sum_1:
    mov ax, [si]
    test ax, ax ; не сравниваем, а просто проверяем свойства
    jns sum_2 ; если положительное значение, пропускаем суммирование
    add dx, ax
sum_2:
    add si,2
    loop sum_1
    mov ax, dx ; возвращаемое значение должно быть в AX
    pop bp
    ret

[Anarky]

Я правильно понял, что если AX положительное, то установится флаг SF=0
тогда выполнится jns sum_2?

[RXL]

Anarky, совершенно верно.

[Anarky]

Код:

model small
stack 256
.data
argc  dw 8
args  dw -3, -2, -1, 0, 1, 2, 3, 4

.code
start:
    push [offset args]
    push [offset argc]
    call sum
    add sp, 4
    ret

sum:
    push bp
    mov bp, sp
    mov cx, [bp + 4] 
    mov si, [bp + 6] 
    xor dx, dx 
sum_1:
    mov ax, [si]
    test ax, ax 
    jns sum_2 
    add dx, ax
    add si,2
    loop sum_1
sum_2:
    add si,2
    loop sum_1
    mov ax, dx 
    pop bp
    ret
 end start
 

все равно не работает подскажите где я промахиваюсь...

[RXL]

Anarky, мне надоел твой бред. Я тебе привел образцы работающего кода - можно сказать, полностью написал за тебя.
А будешь создавать темы с бредовыми названиями и содержимом - они могут оказаться сразу в мусорке или, в лучшем случае, в разделе для не умеющих спрашивать и прочих ленивцев, что не лучше мусорки - там еще и посмеются.

[Anarky]

Чем тебе вопросы и названия не нравятся??? Сказал на форуме спроси, я спросил... Ты напоминаешь инструктора по вождению, который ворчит из-за того что человек сел за руль первый раз!Такого не было, чтоб человек сел и сразу поехал!  Мне код не нужен, просто хочу разобраться как и почему он работает или не работает! За то, что помогаешь большое спасибо!!! А про ленивца зря... Я эту программку могу взять у одногруппников и тупо сдать преподу... Решать тебе помогать или нет...

[RXL]

Anarky, я тебе привел весь код, да еще и с комментариями. Попробуй в нем разобраться. Игра угадайка нам совершенна не интересна. И кстати - желания научиться совсем-совсем не видно: сколько раз мы тебя поправляли и давали примеры с описаниями, сколько раз я говорил тебе посмотреть в справочник, но ты каждый раз собираешь что-то страшное (и явно копипастом) и нате вам - объясняйте, что я тут понаписал. Это не обучение - это больше на троллизм похоже.

[Anarky]

RXL, когда не знаешь в чем ошибка: в справочник смотреть бесполезно... в AX попадает фигня какая-то, а не то что мне нужно, соответственно дальше все не правильно...

[RXL]

Распиши все на бумаге - что происходит с каждой командой. Комп тебе сейчас совсем не нужен - нужно просто понимание процесса. Почитай еще раз описание системной архитектуры процессора.

[Dimka]

когда не знаешь в чем ошибка: в справочник смотреть бесполезно... в AX попадает фигня какая-то, а не то что мне нужно, соответственно дальше все не правильно...

Да, думать надо головой, а не справочником. Но твой метод тыка (как в анекдоте "некогда думать, прыгать надо") и правда утомляет. Поскольку в процессоре нет никакой мистики, то фигня в AX - это прямое следствие работы предыдущих команд, работающих с этим регистром, либо же отсутствие его инициализации в самом начале. Вот возьми и проверь, на каком шаге в регистре появляется фигня. А потом смотри по справочнику ту инструкцию, которая эту фигню туда записала, и проверяй, правильно ли ты этой инструкцией воспользовался.