связь с и ассемблера

[andrew_ryaba]

Подскажите, пожалуйста, почему не выводит результат?
AsmMainN.asm

.286
.MODEL Small

_DATA segment public 'DATA'
	E dw 1,0,2,-5,10,23,0,31,19,-10,12,-1,3,4,0,0,18,14,1,10,12,-5,-7,-50,10,13,18,10,-6,15  ;Массив чисел
	n dw 30			;Размерность массива
	sred dw ?		;Среднее значение
	zero dw ?		;Количество нулей
	stroka db 140 dup(?)		;Строка для вывода массива на экран
_DATA ends

Stack_ SEGMENT Stack	;Стековый сегмент
	dw 100 dup(?)
Stack_ ends

_TEXT segment public 'CODE'
	Extrn _rabota : near
Assume CS:_TEXT, DS:_DATA, SS:Stack_
Main proc far
	push ds			;Операции, необходимые для последующего
	mov ax,0		;Возврата в операционную систему
	push ax
	mov ax,_DATA	;Устанавливаем, что Data у нас является сегментом данных
	mov ds,ax
	mov zero,0		;Обнуляем знаения
	mov sred,0
	push offset E	;Загружаем передаваемые параметры в стек
	push offset sred
	push offset zero
	push n
	
	call _rabota	;Вызов внешней процедуры
	add sp,8		;Поправка стека
	
	mov cx,n		;Действия для вывода чисел на консоль
	mov si,offset E
	mov di,offset stroka
OutConsole:
	mov ax,[si]		;Преобразуем числа из массива
    call word_to_sdec_str
	mov [di],' '
	inc di
	add si,2
	loop OutConsole
	
	mov [di],10		;Преобразуем полученные значения
	inc di
	mov ax,zero
	call word_to_sdec_str
	mov [di],10
	inc di
	mov ax,sred
	call word_to_sdec_str
	
	mov [di],'$'	;Всё в одной строке, признак конца строки
	
	mov di,offset stroka
	call print_str	;Вывод на экран
	ret
Main endp

word_to_udec_str proc near
    xor cx,cx               ;Обнуление CX
    mov bx,10               ;В BX делитель (10 для десятичной системы)
 
wtuds_lp1:                  ;Цикл получения остатков от деления
    xor dx,dx               ;Обнуление старшей части двойного слова
    div bx                  ;Деление AX=(DX:AX)/BX, остаток в DX
    add dl,'0'              ;Преобразование остатка в код символа
    push dx                 ;Сохранение в стеке
    inc cx                  ;Увеличение счетчика символов
    test ax,ax              ;Проверка AX
    jnz wtuds_lp1           ;Переход к началу цикла, если частное не 0.
 
wtuds_lp2:                  ;Цикл извлечения символов из стека
    pop dx                  ;Восстановление символа из стека
    mov [di],dl             ;Сохранение символа в буфере
    inc di                  ;Инкремент адреса буфера
    loop wtuds_lp2          ;Команда цикла
 
    ret
word_to_udec_str endp

;Процедура преобразования слова в строку
; АХ - словл
; DI - адрес строки	
word_to_sdec_str proc near
    push ax
	push cx
    push dx
    push bx
    test ax,ax              ;Проверка знака AX
    jns wtsds_no_sign       ;Если >= 0, преобразуем как беззнаковое
    mov [di],'-'       		;Добавление знака в начало строки
    inc di                  ;Инкремент DI
    neg ax                  ;Изменение знака значения AX
wtsds_no_sign:
    call word_to_udec_str   ;Преобразование беззнакового значения
	pop bx
    pop dx
    pop cx
    pop ax
    ret
word_to_sdec_str endp	

;Процедура вывода строки на консоль
; DI - адрес строки
print_str proc near			
    push ax
    mov ah,9                ;Функция DOS 09h - вывод строки
    xchg dx,di              ;Обмен значениями DX и DI
    int 21h                 ;Обращение к функции DOS
    xchg dx,di              ;Обмен значениями DX и DI
    pop ax
    ret
print_str endp

_TEXT ends
End Main

rabotac.cpp:

#include <stdio.h>;
#include<conio.h>;
extern "C" void rabota(int n, int *zero, int *sred, int E[]) {

	int min = 999, minNum = 0, cols = 0;
	int i;
	for (i = 0; i < n; i++)  //Поиск минимального
		if (E[i] < min) {
			min = E[i];
			minNum = i;
		}
	
	for (i = 0; i < minNum; i++) //Подсчет нулей
		if (E[i] == 0)
			*zero = *zero+1;
			//*zero++;
	
	for (i = minNum + 1; i < n; i++) //Поиск среднего положительного после минимального
		if (E[i] > 0) {
			*sred += E[i];
			cols++;
		}
	*sred /= cols;
	return;
}

Связываю с помощью команды
bcc -I..\include -L..\lib -eAsmAndC.exe AsmMainN.asm -v rabotac.cpp
Не выводится результат после запуска в консоли AsmAndC.exe

[p51x]

а запускаете вы это где? в досбоксе?

[andrew_ryaba]

да, запускаю в досбоксе

[Stilet]

А он вообще что нибудь выводит? Ты не пробовал отлаживать Turbo Debugger-ом экзешник??

[andrew_ryaba]

Вообще ничего не выводится

[Stilet]

И с Турбодебугером ты отладку не делал?

[andrew_ryaba]

Сообщение от Stilet

И с Турбодебугером ты отладку не делал?

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

[Stilet]

Боюсь, что без отладки много тебе не сделать...