多模块连接错误 can't find xxx.obj 新手入门 请指教!
估计错误是在两个所有模块几乎都要用到的参数 BUFFER 和 ASCNUM 上,但加上public 声明 和extern 等还是会出显现无法打开 xxx.obj的问题,请大侠指教
模块一
TITLE PROGRAM
PAGE 60,132
EXTRN CLEAR:FAR
EXTRN CURSOR:FAR
EXTRN GETDATA:FAR
EXTRN CONVERT:FAR
EXTRN DIS:FAR
PUBLIC BUFFER , ASCNUM
.MODEL SMALL
.STACK 64
;-------------------------------
.DATA
BUFFER DB 30,?,30 DUP(?)
ORG 30H
ASCNUM DB CR,LF,5 DUP(?) , '$'
CR EQU 0DH
LF EQU 0AH
;-------------------------------
.CODE
MAIN PROC FAR
MOV AX,@DATA
MOV DS,AX
CALL CLEAR
CALL CURSOR
CALL GETDATA
CALL CONVERT
CALL DIS
MOV AH,4CH
INT 21H
MAIN ENDP
END MAIN
模块2
TITLE MEINE_DIS
PAGE 60 , 132
EXTRN BUFFER:BYTE
EXTRN ASCNUM:BYTE
PUBLIC DIS
.MODEL SMALL
.CODE
DIS PROC FAR
MOV AH , 09
MOV DX , OFFSET ASCNUM
INT 21H
RET
DIS ENDP
END
模块3
TITLE MEINE_CONVERT
PAGE 60 , 132
EXTRN BUFFER:BYTE
EXTRN ASCNUM:BYTE
PUBLIC CONVERT
.MODEL SMALL
.CODE
CONVERT PROC FAR
MOV BX , OFFSET BUFFER
MOV CL , [BX] + 1
SUB CH , CH
MOV DI , CX
AND DL , 00H
MOV BYTE PTR[BX + DI] + 2 , 20H
AGAIN: MOV AL , [BX] + 2
DEC CL
CMP AL , 61H
JB NEXT
CMP AL , 7AH
JA NEXT
AND AL , 11011111B
NEXT:
SUB AL , 40H
ADD DL , AL
INC BX
CMP CL , 00H
JB HEX
CMP CL , 00H
JA AGAIN
HEX : MOV CX , 10
MOV SI , OFFSET ASCNUM
ADD SI , 5
DEC SI
SUB AX , AX
MOV AX , DX
BACK : SUB DX , DX
DIV CX
OR DL , 30H
MOV [SI] , DL
DEC SI
CMP AX , 0
JA BACK
RET
CONVERT ENDP
END
模块4
;--------------------------------
TITLE MEINE_CURSOR
PAGE 60 , 132
EXTRN BUFFER:BYTE
EXTRN ASCNUM:BYTE
PUBLIC CURSOR
.MODEL SMALL
.CODE
CURSOR PROC FAR
MOV AH , 02
MOV BH , 00
MOV DL , 01
MOV DH , 03
INT 10H
RET
CURSOR ENDP
END
模块5
;--------------------------------
;....
TITLE MEINE_CLEAR
PAGE 60 , 132
EXTRN BUFFER:BYTE
EXTRN ASCNUM:BYTE
PUBLIC CLEAR
.MODEL SMALL
.CODE
CLEAR PROC FAR
MOV AX , 0600H
MOV BH , 07
MOV CX , 0000
MOV DX , 184FH
INT 10H
RET
CLEAR ENDP
END
模块6
TITLE MEINE_GETDATA
PAGE 60 , 132
EXTRN BUFFER:BYTE
EXTRN ASCNUM:BYTE
PUBLIC GETDATA
.MODEL SMALL
.CODE
GETDATA PROC
MOV AH , 0AH
MOV DX , OFFSET BUFFER
INT 21H
RET
GETDATA ENDP
END