| version 1.5, 2002/07/14 03:57:24 |
version 1.6, 2002/07/14 07:10:01 |
|
|
| /* $OpenXM: OpenXM_contrib2/asir2000/lib/glib,v 1.4 2002/07/10 08:40:58 takayama Exp $ */ |
/* $OpenXM: OpenXM_contrib2/asir2000/lib/glib,v 1.5 2002/07/14 03:57:24 takayama Exp $ */ |
| /* $Id$ */ |
/* $Id$ */ |
| |
|
| |
|
| Line 147 def glib_check_arg(X,Y) { |
|
| Line 147 def glib_check_arg(X,Y) { |
|
| } |
} |
| } |
} |
| |
|
| /*&usage begin: glib_putpixel(X,Y | color) |
/*&usage begin: glib_putpixel(X,Y|color) |
| It puts a pixel at [{X},{Y}] with {color} |
It puts a pixel at [{X},{Y}] with {color} |
| example: glib_putpixel(1,2 | color=0xffff00); |
example: glib_putpixel(1,2 | color=0xffff00); |
| end: */ |
end: */ |
| Line 169 def glib_putpixel(X,Y) { |
|
| Line 169 def glib_putpixel(X,Y) { |
|
| } |
} |
| } |
} |
| |
|
| /*&usage begin: glib_line(X0,Y0,X1,Y1 | color) |
/*&usage begin: glib_line(X0,Y0,X1,Y1|color) |
| It draw the line [{X0},{Y0}]-- [{X1},{Y1}]with {color} |
It draw the line [{X0},{Y0}]-- [{X1},{Y1}]with {color} |
| example: glib_line(0,0,5,3/2 | color=0xff00ff); |
example: glib_line(0,0,5,3/2 | color=0xff00ff); |
| end: */ |
end: */ |
| Line 281 def glib_clip1_y(X0,Y0,X1,Y1,Clip) { |
|
| Line 281 def glib_clip1_y(X0,Y0,X1,Y1,Clip) { |
|
| return([X0,Y0,X1,Y1]); |
return([X0,Y0,X1,Y1]); |
| } |
} |
| |
|
| /*&usage begin:glib_print(X,Y,Text|color) |
/*&usage begin: glib_print(X,Y,Text|color) |
| It put a string {Text} at [{X},{Y}] on the glib canvas. |
It put a string {Text} at [{X},{Y}] on the glib canvas. |
| example: glib_print(100,100,"Hello Worlds" | color=0xff0000); |
example: glib_print(100,100,"Hello Worlds" | color=0xff0000); |
| end: */ |
end: */ |
| Line 317 def glib_history(L) { |
|
| Line 317 def glib_history(L) { |
|
| return 0; |
return 0; |
| } |
} |
| |
|
| /*&usage begin:glib_tops() |
/*&usage begin: glib_tops() |
| If Glib_ps is set to 1, |
If Glib_ps is set to 1, |
| it returns a postscript program to draw the picture on the canvas. |
it returns a postscript program to draw the picture on the canvas. |
| end: */ |
end: */ |