MZ is back!

This commit is contained in:
Mark Zbikowski
2024-04-25 21:24:10 +01:00
parent 8ee9712c74
commit 656c98b804
1259 changed files with 519749 additions and 4 deletions

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
View 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


View File

@@ -0,0 +1,4 @@
FIND+
FINDMES
FIND.EXE;


View 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

View 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


View 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;