M0100:
MOV SI,005D
MOV AL,[SI]
CMP AL,20
JZ 0114
JMP 017F
M010B:
MOV DX,0164
MOV AH,09
INT 21
JMP 011B
M0114:
MOV DX,0133
MOV AH,09
INT 21
M011B:
MOV AX,4C00
INT 21
INT 20
RET ;122
JMP 0168
RET ;125
M0120 DB '12345678.DWG',0
M0133 DB 0D,0A,'TRY VIEWSNAP 24404C00
DB 0D,0A,'TO VIEW 24404C00.DWG',0D,0A,'$'
M0164 DB 0D,0A.'FILE OPENING ERROR $
M017F:
MOV DI,0126
MOV AL,[SI]
M0184:
MOVSB
MOV AL,[SI]
CMP AL,20
JNZ 0184
NOP
MOV CX,0000
MOV CX,0000
NOP
MOV AX,000E
INT 10
MOV DX,0126
MOV AX,3D00
INT 21
JNB 01A6
JMP 010B
NOP
M01A6:
MOV [0160],AX
MOV CX,0276
M01AC:
MOV DX,00C8
M01AF:
PUSH DX
PUSH CX
CALL 01D8 ;1B1
POP CX
POP DX
MOV AH,0C
INT 10
DEC DX
JNZ 01AF
LOOP 01AC
MOV BX,[0160]
MOV AH,3E
INT 21
M01C7:
MOV AH,01
INT 16
JZ 01C7
MOV AX,4C00
INT 21
INT 20
RET ;1D4
RET
RET
RET
M01D8:
MOV BX,[0160]
MOV DX,0082
NOP
MOV CX,0001
MOV AH,3F
INT 21
MOV AL,[0082]
RET ;1EA
Would you like to order my
'Machine Code Training For The IBM-PC Using Debug.Exe'
which contains a complete desciption, with comments,
of all updated Chess COM programs and other COM programs.
Contact [email protected] at Xlibris.com.
(refer your order to BID 38633)