read_image(Image,'1.bmp')
get_image_size(Image, Width, Height)
*图像中心点
halfWidth := Width/2
halfHeight := Height/2
visionHeight := 700.0
takePictureHeight := 18.0
value := takePictureHeight /visionHeight
**随意设置的点
P := [500.0, 2000.0 ]
delta_row := |P[0] - halfWidth|* value
delta_col := |P[1] - halfHeight|* value
if (P[0] < halfWidth )
row := P[0] + delta_row
else
row := P[0] - delta_row
endif
if (P[1] < halfWidth )
col := P[1] + delta_col
else
col := P[1] - delta_col
endif
********************
* P是高低视差之前的值
* row col是高低视差之后的值
********************