IDL中浮雕效果的实现.docVIP

原][图像处理]IDL中浮雕效果的实现 2007-10-02 22:22 今天上网无意中看到对图像浮雕处理的方法，要实现浮雕其实非常简单。我们把图象的一个象素和左上方的象素进行求差运算，并加上一个灰度。这个灰度就是表示背景颜色。 代码如下： ---------------------------------------- ;$; NAME????? :;???? embossment;; PURPOSE :;???? 对灰度图做浮雕处理;; CATEGORY:;???? Image Process;; CALLING SEQUENCE:;????? result = embossment(image = image);; MODIFICATION HISTORY:;???? Written by: QQz, 2007-10-2;$Function embossment,image = image ;compile_opt STRICTARR;Catch, errorIF error NE 0 THEN BEGIN????? Catch, /Cancel????? ok = Dialog_Message(!Error_State.Msg)????? RETURN,0ENDIF;if size(image,/n_dim) ne 2 then begin??? print,must 2D imge ??? return,0endif;;背景值background = 128;;创建左上点图像uperleft = shift(image,1,1)uperleft[*,0] = image[*,0]uperleft[0,*] = image[0,*];;当前像素值减去左上点像素值 再加上背景值image = image - uperleft +background;return,1End -------------------------------------------------------------- 限制 ：只对灰度图处理，如果是rgb图像，就需要取其中一个通道或者用 0.3 * R + 0.59*G + 0.11 *B 公式转为灰度，再用本函数 返回：如果成功返回1 ，失败返回0 调用例子： READ_JPEG, FILEPATH(rose.jpg, SUBDIRECTORY=[examples, data]), image image = reform(0.3*image[0,*,*] + 0.59*image[0,*,*]??? +0.11*image[0,*,*]) r =??? embossment(image = image) if r then tv,image 效果 原始图像 [原][编程基础]IDl界面编写技巧--复杂的界面还是有技巧可循的 2007-07-16 23:45 界面编写的原则： 1 。 顶base 不设置大小，由子组件撑起整个界面 2 。 所有组件不用xoffset 和yoffset，少用xsize和ysize 3 。 设置xsize和ysize时，尽量不用定死的数组，而更加当前屏幕大小给定一定比例。 4.??????? 规划好整个界面，同一类组件单独放在一个base里 --------------------------------------------------------------------------------------------------------- 说明： 1 程序中顶base是不设置大小的，应该设置子组件的大小，然后把界面给撑起来。： 这样整个界面自适应，也容易修改添加界面。 2 所有组件应该不用设置偏移量（xoffset，yoffset），用了偏移量，界面结构会变的混乱和不可控制。 所有组件最好让它直接根据默认的规则自然排列。如果真的需要把某个组件偏移的话，那么就用widget_label，设置它的value为所需要长度的空字符串,来替代xoffset和yoffset。 3 除了关键的子组件，也尽量避免使用xsize和ysize。其实很多时候组件大小都是根据结构自适应的，用到xsize和ysize的地方很少。如果每个组件都设置大小，那么界面就会很死板，在不同分辨率的屏幕会变乱和难于维护。 每次必须要设大小的是draw，和一些需要撑其界面的重要子部件。 4 设置xsize和ysize，最好是先用get_screen_size获得整个屏幕大小，在根据获得大小的比例来设定某组件的xszie和ysize.例如：我获得当前屏幕大小的数组是screensize，那我xsize