home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CP/M
/
CPM_CDROM.iso
/
mbug
/
mbug107.arc
/
REFERENC.LBR
/
DUPCHECK.REF
< prev
next >
Wrap
Text File
|
1979-12-31
|
384b
|
15 lines
* DATE 04/27/85 07:32
* dupcheck.ref
SAVE TO temp
RELE ALL
GO TOP
STOR t TO more
DO WHIL more .AND. (.NOT. EOF)
STOR !($(title1,1,12)) TO oldname
SKIP
IF oldname = !($(title1,1,12)) .AND. (.NOT. EOF)
DO duprec.ref
ENDI
ENDD
REST FROM temp