home *** CD-ROM | disk | FTP | other *** search
/ DTP Toolbox / DTPToolbox.iso / goodies / adpro_files / operators / max_dynamic_range_ < prev    next >
Encoding:
Text File  |  1996-04-24  |  603 b   |  29 lines
  1. /* $VER: Max_Dynamic_Range_ 1.04 (23.4.95)© Felix C. Coronado
  2. */
  3. ADDRESS "ADPro"
  4. OPTIONS RESULTS
  5. NL='0A'x
  6. IMAGE_TYPE
  7. IF ADPro_Result='BITPLANE' THEN DO
  8.  ADPRO_TO_FRONT
  9.  OKAY1 "Oops!"||NL||,
  10.        "There is no 8 or 24 bit" ||NL||,
  11.        "data to operate upon." ||NL||,
  12.        "Try loading"||NL||,
  13.        "data from disk."
  14.  EXIT
  15. END
  16. OFORMAT
  17. OldOperator=ADPro_Result
  18. OPERATOR "DYNAMIC_RANGE" 0 255
  19. IF rc=10 THEN DO
  20.  ADPRO_TO_FRONT
  21.  OKAY1 'Dynamic_Range failed'
  22. END
  23. OFORMAT OldOperator
  24. IF rc=10 THEN DO
  25.  ADPRO_TO_FRONT
  26.  OKAY1 'Error: Operator not found'||NL||,
  27.        '"Operators2/'||OldOperator||'"'
  28. END
  29.