Trailing-Edge
-
PDP-10 Archives
-
cuspmar86binsrc_2of2_bb-fp63a-sb
-
10,7/makvfu/macros.unv
There are 12 other files named macros.unv in the archive. Click here to see a list.
x
,R @P G`@ I6M {pV
IFB <C| >,<MINVER=0>
IF|@NB <C>,<IFL <"C|`"- "A">,<PRINTX D}EFTTL ERROR !>
} IFG <"C"-"Z"}@>,<PRINTX DEFTTL }`ERROR !>
MI~NVER="C"-100
~ >
IFE <E~@>,<
LALL
TI~`TLE A VERSION BC(D)
XALL>
IFN <E>,<
@LALL
TITLE A` VERSION BC(D)-E>
LALL
; MAJOR VERSION @NUMBER = B
; M`INOR VERSION NUMBER = C
; EDIT NUMBER =@ D
; GROUP NUM`BER = E
; WRITTEN BY F
;WHEN M0DIFY@ING THIS PROGRAM,` PLEASE CONFORM TO THE FOLLOWING R ULES:
; 1.MAJO@R AND MINOR VERSI`ON NUMBERS SHOULD BE CHANGED BY
; DIGITAL EMPLOY@EES ONLY.
; 2.MI`NOR VERSION NUMBERS ARE BLANK IF N OT USED
; 3.MINO@R VERSION NUMBERS` ARE A-Z IF USED.
; 4.EDIT NUMBER S ARE INCREASED B@Y 1 FOR EACH SEPE`RATE EDIT
; THEY ARE NEVER RESE T.
; 5.THE GROUP@ NUMBER ASSIGNMEN`TS ARE AS FOLLOWS:
; 0 = DIGITAL PROGRAM AUTHOR
@; 1 = DIGITAL SU`PPORT PERSONNEL
; 2-4 = DIGITAL CUSTOMER PERSONNE @L
; 5-7 = CUSTO `MER' USERS (IE, C
USTOMER'S CUSTOME
RS)
LOC 137
@ BYTE(3)E(9)B(6
`)MINVER(18)D
RELOC
XALL
RyuS.WELLSL@ [^Mw @i@
TWOSEG pA
RELOC 0
RE
LOC A
DEFINE
0GOLOW
<
IFGE <
P.-A>,<RELOC>
>
p
DEFINE GOHIGH
<
IFL <.-A>,<RELOC>
>
A>,<R|X400000`@ `D@ `H@ `L@ `P@ `T@ `X@ aJMm
OUTSTR [ASCIZ/A
/]
bD@ bH@ bL@ hD@ hH@ hL@ hP@ S@P >}{woP