home *** CD-ROM | disk | FTP | other *** search
- /******************************************************************
- Error Messeges
- ******************************************************************/
- Messeges.mform:
- parse arg n,A B . , mess1, name
-
- if name = "" then name = " "
-
-
- messlist = "MANUAL PATHERR EXERR MAKERR FILERR NUNERR ACSERR EMPTYERR NOEMPTYERR"
-
-
- mess.1 = "For further information please"
- cmess.1 = "consult your MacroForm manual."
-
- mess.2 = "Destination does not exists!"
- cmess.2 = "Choose a different "||name||" path."
-
- mess.3 = "You can only perform this operation"
- cmess.3 = "with curves in the back layer!"
-
- mess.4 = "Could not create the "||name||" directory!"
- cmess.4 = "Specify a valid directory name."
-
- mess.5 = name||" is not a directory!"
- cmess.5 = "Specify a valid directory name."
-
- mess.6 = "You MUST specify a "name" directory!"
- cmess.6 = "Specify a valid directory name."
-
- mess.7 = "Sorry...can't perform the '"||name||"' operation!"
- cmess.7 = "There is no empty layer or 'Auto Curve Set' is turned off."
-
- mess.8 = "This layer is empty! There is no data on"
- cmess.8 = "which to perform the '"||name||"' operation."
-
- mess.9 = "Sorry...can't perform the '"||name||"' operation!"
- cmess.9 = "'"||name||"' MUST have an empty layer for scratch work."
-
-
-
-
- t = Find(messlist,mess1)
-
- return notify(n,A||mess.t,B||cmess.t)
-
-