home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Misc / EDG-CT1.DMS / in.adf / CT.run / Scripts2 / 5 / Dynamic_Range < prev    next >
Encoding:
Text File  |  1995-10-11  |  970 b   |  45 lines

  1. /*
  2.                         Control Tower Arexx Script
  3.                            Written By J.L. White
  4.                          (C)1995 Merlin's Software
  5.  
  6. Lines=8
  7. 01=Dynamic Range
  8. 02= 
  9. 03=Dynamic range is an expression of the
  10. 04=image's informational bandwidth; the 
  11. 05=volume of its graphical content.  You
  12. 06=usually want to maintain the broadest
  13. 07=dynamic range possible when digitizing
  14. 08=an image or clip.
  15.  
  16. */
  17.  
  18. options results
  19.  
  20. arg FrameNum TotalNum
  21. address "IMAGEFX.1"
  22.  
  23. if FrameNum = 0 then do
  24.     RequestSlider '"Select Lower Color Limit!"' 0 255 100
  25.     Answer = Result
  26.     RequestSlider '"Select Upper Color Limit!"' 0 255 100
  27.     Answer2 = Result
  28.     call open TempFile,"Ram:CT-IFDR",W
  29.     call writeln TempFile,Answer
  30.     call writeln TempFile,Answer2
  31.     call close TempFile
  32.     end
  33. else do
  34.     call open TempFile,"Ram:CT-IFDR",R
  35.     line = readln(TempFile)
  36.     parse var line Answer
  37.     line = readln(TempFile)
  38.     parse var line Answer2
  39.     call close TempFile
  40.     end
  41.  
  42. DynamicRange Answer Answer
  43.  
  44. exit
  45.