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 Louie.Pace@Xlibris.com at Xlibris.com.
(refer your order to BID 38633)