极度飞车.
初学者
初学者
  • 最后登录2018-04-17
  • 发帖数17
  • 金币71枚
  • 贡献勋章0枚
  • 社区居民
阅读:105回复:2

请问一下这段代码,最后显示的是清晰度吗?数值大小代表什么?

楼主#
更多 发布于:2018-04-14 11:10
dev_close_window()
dev_open_window(0, 0, 800, 640, 'black', window)
*dir:='E:/20180414/T1_2_OK'
dir:='C:/Users/ZDH-XMYF-010/Desktop/新建文件夹'
list_files (dir,['files','recursive','follow_links'], ImageFiles)
tuple_regexp_select (ImageFiles, ['\\.(tif|tiff|gif|bmp|jpg|jpeg|\
                     jp2|png|pcx|pgm|ppm|pbm|xwd|ima)$',\
                     'ignore_case'], ImageFiles)
for Index := 0 to |ImageFiles| - 1 by 1
     read_image (Image1, ImageFiles[Index])


laplace(Image1, ImageLaplace4, 'signed', 3, 'n_4')


laplace(Image1, ImageLaplace8, 'signed', 3, 'n_8')


add_image(ImageLaplace4, ImageLaplace4, ImageResult1, 1, 0)


 add_image(ImageLaplace4, ImageResult1, ImageResult1, 1, 0)


add_image(ImageLaplace8, ImageResult1, ImageResult1, 1, 0)


mult_image(ImageResult1, ImageResult1, ImageResult, 1, 0)


 intensity(ImageResult, ImageResult, Value, Deviation)
  dev_display (Image1)
   * Ret:=[Ret,Value]
disp_message(window, Value, 'window', 12, 12, 'red', 'true')
endfor
喜欢0
Corodile
初学者
初学者
  • 最后登录2018-04-24
  • 发帖数19
  • 金币65枚
  • 贡献勋章0枚
沙发#
发布于:2018-04-14 14:59
是的,而且是拉普拉斯梯度函数
参考 https://blog.csdn.net/dangkie/article/details/77726792
极度飞车.
初学者
初学者
  • 最后登录2018-04-17
  • 发帖数17
  • 金币71枚
  • 贡献勋章0枚
  • 社区居民
板凳#
发布于:2018-04-17 13:56
好的,谢谢。。。。。。。。。。
游客

返回顶部
支付

欢迎打赏,请选择打赏金额

支付即代表同意《本站支付协议》 有疑问请联系客服