nProcs

nProc lineOfPoints(long x,y,xx,yy){

    long 	max=abs(x-xx),\
    tmp=abs(y-yy)
    case tmp>max : max=tmp
    long data=dim(16+max*8)
    linedda(x,y,xx,yy,procaddr(lineOfPoints.lineDDAProc),data)
    mov eax,data
    mov ebx,[eax]
    inc ebx
    mov [eax],ebx
    imul ebx,8
    add eax,ebx
    mov [eax],xx
    add eax,4
    mov [eax],yy
    return data

}

nProc lineOfPoints.lineDDAProc(long x,y,data){

    push ebx
    push ecx
    mov eax,data
    mov ebx,[eax]
    inc ebx
    mov [eax],ebx
    imul ebx,8
    add eax,ebx
    mov [eax],x
    add eax,4
    mov [eax],y
    pop ecx
    pop a>

}