имеется код assemler'a подготовленный к использованию c паскалем:

.model small, pascal
.data
extrn str1:byte, str2:byte, n:byte
extrn dest:byte, str1s:word
.code
public posstr
posstr proc far
 xor cx, cx
 mov si,0
 mov di,0
 mov cl, n
 
next_c1:
 
 mov al,str1[si]
 mov dest[di], al
 inc si
 inc di
 mov bx,0
 cmp cx, si
 jne next3
 jmp next_c2
 
next_c2:
 
 mov dl, str2[bx]
 mov dest[di], dl
 inc di
 inc bx
 cmp dl,'$'
 jne next_c2
 dec di
 
next3:
 
 cmp si, str1s
 jne next_c1
 
lea dx,str1s
ret
posstr endp
end

Необходим ввод данных через паскаль, вычисления в assembler и вывод результата в паскале:

{$L lab6}
uses crt;
var str1,str2,n,z,dest:string;
    str1s:integer;
procedure Posstr;Far;External;
begin
 clrscr;
 writeln('-=Obrabotka strok=-');
 writeln('I-stroka:',str1);
 writeln('II-stroka:',str2);
 writeln('S kakogo el. delete:',n);
 dest:=length(str1)+length(str2);
 str1s:=length(str1);
 posstr;
 writeln('Rezultat:');
 z:=posstr;
 writeln(z);
 readkey;
 end.

Вот тут пару набросков, не получается особо, помогите спасибо за ранее

ну и? компилиш в 2 obj а потом линкуеш, в чем собственно проблема то?

Хоть уже и сутки прошли...
Тип переменной dest - строка, а здесь

функции возвращают число - результат ошибка при компиляции "несовпадение типов".
Тоже самое и строкой ниже.