Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Центр помощи > [ASM]Работа с массивами и действия с его элементам

Автор: Razmus 27.12.2007, 02:59

Уважаемые посетители форума!!! У меня просьба ко всем, я на асемблере пишу плохо(а точьнее почьти никак), помогите написать порограмки. Очень прошу!
Определяет сумму негативных элементов с парными индексами в пределах каждой строки и столбика
Получилось написать для позитивных элементов с парными индексами, но правда в одномерном масиве с двухмерными у меня проблема

Код


Код:
.386
.model flat, stdcall
option casemap :none
include masm32.inc
includelib masm32.lib
include user32.inc
includelib user32.lib
includelib kernel32.lib
include C:\MASM32\MACROS\strings.mac 
.data
x    dw 1,2,3,-4,-5,6,0,7,8,0,5,8,3
length_x= ($-x)/2        
.data?
Buffer    db 256 dup (?) 
.code
start:
    lea ebx,x            
    xor ax,ax        
    xor dx,dx        
    xor esi,esi        
    mov ecx,length_x        
m1:
    test esi,1    
    jnz m2        
    cmp word ptr [ebx+esi*2],0     
    jle m2        
    add ax, word ptr [ebx+esi*2]    
    adc dx,0                        
m2:    inc esi        
    loop m1        
    push dx
    push ax
    pop ebx        
    invoke CharToOem,\
        $CTA0("Сума позитивных с парными индексами: "),\
        ADDR Buffer
    invoke StdOut, ADDR Buffer
    invoke dwtoa,ebx, ADDR Buffer
    invoke StdOut,ADDR Buffer
    invoke StdIn,ADDR Buffer, LENGTHOF Buffer    
    ret
end start

Поиск в ряде самого длинного предложения
эта программа для подсчета количества слов может ее можно както модифицировать.

Код


Код:
.386
.model flat, stdcall
option casemap :none
.data        
Str 1db “ASM LOST. NTL NBA”, 0
.code
start:
lea edi,str1
mov ebx,edi            
mov ecx,-1
xor al,al
repne scasb
sub edi,ebx
de cedi
mov esi,edi
lea edi,str1
mov ecx,esi
xor ebx,ebx
mov al,” “
@@: repne scasb
Inc ebx
Jmp @B
Dec ebx
ret
end start

Определяет среднее арифметическое негативных элементов массива
тут совсем темный лес так как нада двухмерный массив.
Заранее спасибо!!!