7.4

type
Type of value (integer, measure, currency, string, Boolean) the function returns.
Code Sample Example
This example displays a string.
function @showtext(&mystring: string)
moveto(1,1)
show(&mystring)
endfunction()
Code Sample Example
This example illustrates a procedure that creates a 3D pie chart.
Example
function @_3DPie( &W:measure, &H:measure, &HB:measure, &S:measure, &E:measure,
&L:string, &c:color )
%====================================================
% &W is the total width of the pie chart
% &H is the total height of the pie chart
% &HB is the height of the lower band
% &S is the starting angle (0..360)
% &E is the ending angle (0..360 and bigger than &S)
% &L is the label text
%====================================================
%Local variables
%====================================================
define(&SB,measure,0)
define(&EB,measure,0)
define(&Scaling,measure,0)
define(&R,measure,&W/2)
%====================================================
&Scaling := (&H-&HB)/&W
gsave()
if(&Scaling<0.01)
&Scaling := 0.01
endif()
if(&Scaling>1)
&Scaling := 1
endif()
scale(1,&Scaling)
setstyle(&Style1)
&HB := &HB / &Scaling
translate(&R,&R)
if(&E > 180)
if(&E > 360)
&EB := 360
elseif()
©2010 Objectif Lune Inc - 283 -