DELETE MAP.OBJ;*
MAC MAP
DELETE MAP.TSK;*
LINK/MU/OPT MAP,USRLIB/LIB
LIBR=SYSRES:RO
STACK=100
TASK=$$$MAP
UIC=[1,1]
/
!MAP IS DONE