Ассемблер и Cи

[upset]

Всем привет!
У меня возникли возникли сложности с объединением модулей, написанных на си и асме. Задание следующее: реализовать основной алгоритм обработки как процедуру на языке ассемблера, ввод-вывод данных и вызов процедуры в си как головную программу.

В целом, алгоритм представляется мне так: написать 2 документа с кодом, компилятором си создать 1.obj, tasm-ом - 2.obj и объединить их через tlink в 3.exe.

Теперь хронология событий:

1. Система у меня 64-х битная, пришлось спецом для ассемблера ставить dosbox

2. Сначала я объединяла обжекты от vs2010 и tasm. Ошибка:
fatal: bad object file record in vs_test.obj near module file offset 0x00000704
Возникло предположение, что студия компилит 32 бита, а тасм 16.

3. Раздобыла тасм32 и тлинк32, соответственно.
Команда: TLINK32.exe test.obj vs_test.obj
Ошибка: fatal: 16 bit segments not supported in module test.asm.
Команда: TLINK32.exe vs_test.obj test.obj
fatal: bad file 'vs_test.obj' near file offset 0

WTF??

(Не знаю, какой из обжектов ставить первым, в любом случае в первом варианте от перемены слагаемых ничего не менялось)

Я в отчаянье!! Что же делать? Почему это 32-х битный тасмовский обжект не поддерживает 16-битные сегменты? Или они настолько не дружат с visual studio 2010(она же не делает 64 бита, да)?
Есть борланд билдер как альтернатива студии, но я не знаю ни библиотек, ни синтаксиса и как-то совсем и не хочется узнавать.

Пожалуйста, помогите. Как правильно сделать .exe?

[alexcoder]

Вы пытаетесь скрестить кита со слоном. Мало того, что тасм компилирует 16-разрядный кол, а VS 32-разрядный, так еще их obj файлы имеют несовместимый друг с другом формат. Общего там только расширение!
Варианта 2:
1 ассемблерную часть компилировать в МАСМ32
2 делать в тасм(без 32) + borland c++

[upset]

объединяю борланд и тасм(не 32):

fatal: 32-bit record encountered in module c:\Program Files (x86)\Borland\CBuilder\Progects\uni t1.cpp

с тасм32:

fatal: 16 bit segments not supported in module test.asm

это Borland c++ builder 6.0.
попробовала еще borland compiler 5.5,но там при вызове через командную строку bcc.exe говорит, что ему не хватает path

в masm32 и masm611 не работает link. Никаких сообщений об ошибках, просто не реагирует на вызов и всё

[Goodwin98]

Так запросто меняете компиляторы, операционки. Вообще очень странно, что у вас нет ошибок на уровне компиляции, я уж молчу про выполнение....
Может на чем-то остановитесь одном, дос или винда ?

[apofioz]

Читаю книгу Голубь.Н.Г Искусство программирования на ассемблере.djvu
Никак не могу создать ни одного проекта.) Установил в virtualBox Windows XP на неё tasm, masm borland 5.02 C++. В borlfnd создаю проект на С++ компилирую, .obj создаётся tasm запускаю создаю файл .obj создаётся, но не линкуется. fatal: 32-bit record encountered in module .cpp, не знаю что делать....

#include<iomanip.h>
#include<stdlib.h>
#include<time.h>

const int N = 3000;
int A[N];
int n;

long S;

extern "C"
{
	void SummA(void);
}

void inputN(const int N, int& n)
{
	do
	{
		cout << "\n??? n[1.."<< N <<"]=========>";
		cin >> n;
		cout << "inputN: n = " << n << endl;
	}while(n < 1 || n > N);
}

void inputA(int A[], int n)
{
	randomize();
	int j = 1;
	long temp;
	for(int i = 0; i < n; ++i)
		if(n < 10)
		{
			cout << "??? A[" << i << "]========>";
			cin >> temp;
			A[i] = (int)temp;
			if(A[i] != tmp)
				--i;
		}
		else 
		{
			j = -j;
			A[i] = j*(int)random(30000);
		}
}

void outputA(const int A[], int n)
{
	cout << "\n====================================================\n"
		 << " Array:\n";
		 
	for(int i = 0; i < n; ++i)
		cout << setw(8) << A[i];
	cout << endl;
}

double summaP(const int A[], int n)
{
	double sum = 0.0;
	for(int i = 0; i < n; ++i)
		sum += (double)A[i];
	return sum;
}

int main()
{
	for(;;)
	{
		inputN(N, n);
		inputA(A, n);
		outputA(A, n);
		cout << "\nThe sum of all elements of a Array\n";
		cout << "C++: " << summaP(A, n) << endl;
		SummaA();
		cout << "ASM: " << S;
		cout << "\nExit Ctrl-C";
	}
}

[apofioz]

.model lareg, C 
LOCALS   @@

.CODE 
Extrn C A:Word, n:Word, S:Word 

PUBLIC C SummaA 

;Синонимы 
a    EQU  A[BX]
s0   EQU WORD PTR S 
s2   EQU WORD PTR S + 2 

SummaA Proc  C far 
	xor bx, bx 
	xor si, si
	xor di, di 
	mov cx, n 
	jcxz  @@4 
@@1: 
	mov ax, a 
	CWD 
	add si, ax 
	adc di,dx 
	inc bx 
	inc bx 
	LOOP @@1 
	
@@4:
	mov s0, si 
	mov s2, di 
	
SummaA Endp
	End

[waleri]

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

void SummA(void);

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

PUBLIC C SummaA

Никакой разницы не видите?

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

.model lareg, C

А это точно "lareg"? А может "large"?

[apofioz]

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

А это точно "lareg"? А может "large"?

Конечно, я исправил эти ошибки. Толку то, ошибка выскакивает, нужно сказать, что файл .exe всё же создаётся, через раз, но после ввода последнего значения, вылетает сообщение, что что-то пошло не так и предложение отправить отчёт об ошибке в Microsoft. Значит завершается с ошибкой.

[waleri]

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

Конечно, я исправил эти ошибки

Исправляйте дальше - как, по-вашему, надо выходить из подпрограммы?

[apofioz]

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

Исправляйте дальше - как, по-вашему, надо выходить из подпрограммы?

Завершать функцию нужно по ret или, возможно, по ren n.