****old version***
read_image (Image, 'mreut')
get_image_size (Image, Width, Height)
open_window (0, 0, Width, Height, 0, 'buffer', '', WindowHandle1)
set_part (WindowHandle1, 0, 0, -1, -1)
disp_image (Image, WindowHandle1)
set_color (WindowHandle1, 'red')
set_line_width (WindowHandle1, 11)
disp_line (WindowHandle1, 180, 70, 180, 364)
dump_window_image (RImage, WindowHandle1)
close_window(WindowHandle1)
****new version***
* dev_open_window(0, 0, Width, Height, 'black', WindowHandle)
* dev_set_part (0, 0, Height-1, Width-1)
* dev_display (Image)
* dev_set_line_width (1)
* disp_line (WindowHandle, 180, 70, 180, 364)
* dump_window_image (RImage, WindowHandle)
* dev_close_window ()
用来画线的算子是disp_line()