`open_canvas', `clear_canvas', `draw_obj'
-----------------------------------------

open_canvas(ID[,GEOMETRY])
     :: $BIA2hMQ%&%#%s%I%&(B ($B%-%c%s%P%9(B) $B$r@8@.$9$k(B.

clear_canvas(ID,INDEX)
     :: $B%-%c%s%P%9$r%/%j%"$9$k(B.

draw_obj(ID,INDEX,POINTORSEGMENT [,COLOR])
     :: $B%-%c%s%P%9>e$KE@$^$?$O@~J,$rIA2h$9$k(B.

RETURN
     0

ID, INDEX, COLOR
     $B@0?t(B

POINTORSEGMENT
     $B%j%9%H(B

   * $B$3$l$i$O(B OpenXM $B%5!<%P(B `ox_plot' (Windows $B>e$G$O(B `engine')
     $B$K$h$jDs6!$5$l$k(B.

   * `open_canvas' $B$O(B, $BIA2hMQ$N%&%#%s%I%&(B($B%-%c%s%P%9(B)$B$r@8@.$9$k(B.
     GEOMETRY $B$K$h$j%&%#%s%I%&$N%5%$%:$r(B pixel $BC10L$G(B [X,Y] $B$G;XDj$9$k(B.
     default size $B$O(B [`300',`300'].  $B%-%c%s%P%9$N<1JL;R$H$7$F(B, $B@0?tCM$r(B
     OpenXM $B%5!<%P$N%9%?%C%/$K(B push $B$9$k(B.  $B$3$N<1JL;R$O(B `draw_obj'
     $B$N8F$S=P$7$KI,MW$G$"$j(B, `ox_pop_cmo' $B$K(B
     $B$h$j<h$j=P$7$FJ];}$9$kI,MW$,$"$k(B.

   * `clear_canvas' $B$O(B, $B%5!<%P(B id ID, $B%-%c%s%P%9(B id INDEX
     $B$G;XDj$5$l$k%-%c%s%P%9$r%/%j%"$9$k(B.

   * `draw_obj' $B$O(B, $B%5!<%P(B id ID, $B%-%c%s%P%9(B id INDEX
     $B$G;XDj$5$l$k%-%c%s%P%9$KE@$^$?$O@~J,$rIA2h$9$k(B. POINTORSEGMENT $B$,(B
     [X,Y] $B$N>l9gE@$N:BI8(B, [X,Y,U,V] $B$N>l9g(B [X,Y], [U,V]
     $B$r7k$V@~J,$rI=$9$H8+$J$5$l$k(B.  $B%-%c%s%P%9$N:BI8$O(B,
     $B:8>e6y$r86E@$H$7$F2#J}8~$K(B $BBh0l:BI8(B, $B=DJ}8~$KBhFs:BI8$r$H$k(B. $BCM$O(B
     pixel $BC10L$G;XDj$9$k(B.  COLOR $B$N;XDj$,$"$k>l9g(B, COLOR/65536 mod 256,
     COLOR/256 mod 256, COLOR mod 256 $B$r$=$l$>$l(B Red, Green, Blue $B$NCM(B
     ($B:GBg(B 255) $B$H$_$J$9(B.

     [182] Id=ox_launch_nox(0,"ox_plot");
     0
     [183] open_canvas(Id);
     0
     [184] Ind=ox_pop_cmo(Id);
     0
     [185] draw_obj(Id,Ind,[100,100]);
     0
     [186] draw_obj(Id,Ind,[200,200],0xffff);
     0
     [187] draw_obj(Id,Ind,[10,10,50,50],0xff00ff);
     0
     [188] clear_canvas(Id,Ind);
     0

$B;2>H(B
     *Note `ox_launch ox_launch_nox ox_shutdown': ox_launch
     ox_launch_nox ox_shutdown, *Note `ox_reset ox_intr
     register_handler': ox_reset ox_intr register_handler, *Note
     `ox_pop_cmo ox_pop_local': ox_pop_cmo ox_pop_local.

