Cоставить программу для вычисления суммы

[grongost]

Составить программу для вычисления суммы:
for I:=1 to N do S:=S+2^i*x
Подпрограмму разместить во внешнем файле. Параметры (x, n) в подпрограмму передать через стек. Результат возвратить в регистре ax. В основной программе организовать вызов подпрограммы для следующего набора исходных данных:
x=10; n=8

main

.model small
.stack 100h
extrn Sum: proc
.data
x dw 2
n dw 2
y dw ?
.code
begin:
mov ax,@data
mov ds,ax
push x
push n
call sum
mov y,ax
mov ah,4ch
int 21h
end begin

sum

.model small
.code
begin:
Sum proc
Public Sum
push bp
mov ax,2
mov bx,2
mov cx,8
for:
imul bx
loop for
ret
Sum endp
end begin


1. не получается передать параметры в подпрограмму через стек и результат возратить в регистр ах.
2. не получается возвести в степень.

[grongost]

main.asm

.model small    
.stack 100h
extrn summa:proc
.data
x dw 2
n dw 2
y dw ?
.Code
 begin: mov ax,@Data  
          mov ds,ax
                push x
                push n
                call summa
                mov y,ax
          mov ah,4ch 
          int 21h      
end begin

sum.asm

.model small    
.code
begin:
summa proc
public summa
push bp
mov bp,sp       
xor ax,ax
mov bx,[bp+6]   ;bx:=x
mov cx,[bp+4]   ;cx:=N
for:add bx,bx
    add ax,bx
loop for 
pop bp  
ret 4
summa endp
end begin

1.не получается считывать информацию с внешнего файла(sum.asm)
2.как можно организовать решение если x dw 2, -2, 10
n dw 2, 3, 10