@DEF DSK: DSK:,<DECUS.20-0137>
@LOA COLCHI.FOR,APLIB/LIB
@SAVE COLCHI
@SET FILE PROTECTION COLCHI.EXE 771010
;(PUT ON SYS:COLCHI.EXE)