! DVC.TP 77.01.19 DEVICE COMPARE !
!
MUNG Interface :
.MUNG DVC,$1$<$2$,$3$,$4$;
Where $1$ is the output file, $2$ is the input file (program list to be
compared), $3$ is device 1, $4$ is device 2
If the Mung line is terminated with a semicolon, console control
returns to TECO Command mode, instead of OS/8 Keyboard Monitor.
e.g. :
.MUNG DVC,T.BI<DSK.DI,DSK:,R2:

The input file is a list of the programs to be compared, the first 2 lines of
the input file are considered a header and ignored.  (The input file commonly
is an output file from DIRECT.)
Submit the job with /Q/U (or (QU)).

	Q Register use:
$1 device 1
$2 device 2
$T filename to be compared
D  dot (buffer position pointer)
Z  Z (end of buffer) saver

MUNG INTERFACE !
J HXT IEW S< -D @I@ER@ S, -C @I@@ 0XF0K DS: 0X1 C0K S 0X2  ZJ -1A-^^;UY MF

HK I$JOB DEVICE COMPARE - CALLED WITH :   GT
I
.DATE
$MSG DEVICE 1 IS  G1 I
$MSG DEVICE 2 IS  G2 I

.R OCOMP

 HP HK

Y J 2K D
< 0UD ZJ .UZ 100< QDJ L 0A-13"E OEND ' .UD 0A-^^<"E OEMPTY ' 9C 0XT QZJ
I* G1 GT I, G2 GT I  (DH)

QZJ .,ZP .,ZK
!EMPTY! > B,QDK A >
!END! HK I
$END JOB DEVICE COMPARE

P QY"N EX ' EC