mirror of
https://github.com/microsoft/MS-DOS.git
synced 2026-01-25 21:02:55 +00:00
MZ is back!
This commit is contained in:
1664
v4.0/src/CMD/FIND/FIND.ASM
Normal file
1664
v4.0/src/CMD/FIND/FIND.ASM
Normal file
File diff suppressed because it is too large
Load Diff
100
v4.0/src/CMD/FIND/FIND.INC
Normal file
100
v4.0/src/CMD/FIND/FIND.INC
Normal file
@@ -0,0 +1,100 @@
|
||||
;;
|
||||
;; Long Conditional Jump Macros
|
||||
;;
|
||||
lja macro Farlabel
|
||||
local Nearlabel
|
||||
jna Nearlabel
|
||||
jmp Farlabel
|
||||
Nearlabel:
|
||||
endm
|
||||
ljae macro Farlabel
|
||||
local Nearlabel
|
||||
jnae Nearlabel
|
||||
jmp Farlabel
|
||||
Nearlabel:
|
||||
endm
|
||||
ljb macro Farlabel
|
||||
local Nearlabel
|
||||
jnb Nearlabel
|
||||
jmp Farlabel
|
||||
Nearlabel:
|
||||
endm
|
||||
ljc macro Farlabel
|
||||
local Nearlabel
|
||||
jnc Nearlabel
|
||||
jmp Farlabel
|
||||
Nearlabel:
|
||||
endm
|
||||
ljbe macro Farlabel
|
||||
local Nearlabel
|
||||
jnbe Nearlabel
|
||||
jmp Farlabel
|
||||
Nearlabel:
|
||||
endm
|
||||
lje macro Farlabel
|
||||
local Nearlabel
|
||||
jne Nearlabel
|
||||
jmp Farlabel
|
||||
Nearlabel:
|
||||
endm
|
||||
ljz macro Farlabel
|
||||
local Nearlabel
|
||||
jnz Nearlabel
|
||||
jmp Farlabel
|
||||
Nearlabel:
|
||||
endm
|
||||
ljg macro Farlabel
|
||||
local Nearlabel
|
||||
jng Nearlabel
|
||||
jmp Farlabel
|
||||
Nearlabel:
|
||||
endm
|
||||
ljge macro Farlabel
|
||||
local Nearlabel
|
||||
jnge Nearlabel
|
||||
jmp Farlabel
|
||||
Nearlabel:
|
||||
endm
|
||||
ljl macro Farlabel
|
||||
local Nearlabel
|
||||
jnl Nearlabel
|
||||
jmp Farlabel
|
||||
Nearlabel:
|
||||
endm
|
||||
ljle macro Farlabel
|
||||
local Nearlabel
|
||||
jnle Nearlabel
|
||||
jmp Farlabel
|
||||
Nearlabel:
|
||||
endm
|
||||
ljnc macro Farlabel
|
||||
local Nearlabel
|
||||
jc Nearlabel
|
||||
jmp Farlabel
|
||||
Nearlabel:
|
||||
endm
|
||||
ljne macro Farlabel
|
||||
local Nearlabel
|
||||
je Nearlabel
|
||||
jmp Farlabel
|
||||
Nearlabel:
|
||||
endm
|
||||
ljnz macro Farlabel
|
||||
local Nearlabel
|
||||
jz Nearlabel
|
||||
jmp Farlabel
|
||||
Nearlabel:
|
||||
endm
|
||||
ljno macro Farlabel
|
||||
local Nearlabel
|
||||
jo Nearlabel
|
||||
jmp Farlabel
|
||||
Nearlabel:
|
||||
endm
|
||||
ljo macro Farlabel
|
||||
local Nearlabel
|
||||
jno Nearlabel
|
||||
jmp Farlabel
|
||||
Nearlabel:
|
||||
endm
|
||||
|
||||
4
v4.0/src/CMD/FIND/FIND.LNK
Normal file
4
v4.0/src/CMD/FIND/FIND.LNK
Normal file
@@ -0,0 +1,4 @@
|
||||
FIND+
|
||||
FINDMES
|
||||
FIND.EXE;
|
||||
|
||||
12
v4.0/src/CMD/FIND/FIND.SKL
Normal file
12
v4.0/src/CMD/FIND/FIND.SKL
Normal file
@@ -0,0 +1,12 @@
|
||||
:util FIND
|
||||
|
||||
:class 1 ;Extended errors ;AN005;
|
||||
|
||||
:class 2 ;Parser errors ;AN005;
|
||||
|
||||
:class A ;Utility specific errors ;AN005;
|
||||
:use 1 COMMON1 ;AN005; ;"Incorrect DOS version"
|
||||
:use 2 EXTEND8 ;AN005; ;"Insufficient memory"
|
||||
:def 4 "FIND: " ;AN005;
|
||||
|
||||
:end
|
||||
19
v4.0/src/CMD/FIND/FINDMES.ASM
Normal file
19
v4.0/src/CMD/FIND/FINDMES.ASM
Normal file
@@ -0,0 +1,19 @@
|
||||
title FIND Messages
|
||||
|
||||
Message macro sym,text
|
||||
public sym,sym&_len
|
||||
sym db text
|
||||
sym&_len db $-sym
|
||||
endm
|
||||
|
||||
CR equ 0dh ;A Carriage Return
|
||||
LF equ 0ah ;A Line Feed
|
||||
|
||||
code segment public
|
||||
|
||||
PUBLIC heading
|
||||
message heading,<CR,LF,"---------- ">
|
||||
|
||||
code ends
|
||||
end
|
||||
|
||||
34
v4.0/src/CMD/FIND/MAKEFILE
Normal file
34
v4.0/src/CMD/FIND/MAKEFILE
Normal file
@@ -0,0 +1,34 @@
|
||||
#************************** makefile for cmd\... ***************************
|
||||
|
||||
msg =..\..\messages
|
||||
dos =..\..\dos
|
||||
inc =..\..\inc
|
||||
hinc =..\..\h
|
||||
|
||||
#
|
||||
####################### dependencies begin here. #########################
|
||||
#
|
||||
|
||||
all: find.exe
|
||||
|
||||
find.ctl: find.skl \
|
||||
$(msg)\$(COUNTRY).msg \
|
||||
makefile
|
||||
|
||||
find.obj: find.asm \
|
||||
makefile \
|
||||
find.ctl \
|
||||
find.cla \
|
||||
find.cl1 \
|
||||
find.cl2 \
|
||||
find.inc \
|
||||
$(inc)\parse.asm \
|
||||
$(inc)\psdata.inc \
|
||||
$(inc)\syscall.inc \
|
||||
$(inc)\msgserv.asm \
|
||||
$(inc)\sysmsg.inc
|
||||
|
||||
findmes.obj: findmes.asm
|
||||
|
||||
find.exe: find.obj findmes.obj
|
||||
link find+findmes,find.exe/ex;
|
||||
Reference in New Issue
Block a user