7.4

&EB := &E
endif()
%=================================================
if(&S < 180)
&SB := 180
elseif()
&SB := &S
endif()
%=================================================
set-
fill-
color([getcyan(&c),getmagenta(&c),getyellow(&c),if(getblack(&c)>50,100,getblack(&c)+20)])
moveto(cos(&SB) * &R,neg(sin(&SB) * &R))
rlineto(0,&HB)
arc(0,&HB,&R,&SB,&EB)
rlineto(0,neg(&HB))
closepath()
strokeandfill()
endif()
%====================================================
setfillcolor(&c)
pie(0,0,&R,&S,&E)
strokeandfill()
&SB := (&S+&E)/2
%====================================================
if(gt(&SB,180))
margin(cos(&SB) * &R,neg(sin(&SB) * &R)+&HB+(0.2/&Scaling))
elseif()
margin(cos(&SB) * &R,neg(sin(&SB) * &R)-(0.05/&Scaling))
endif()
%====================================================
scale(1,1/&Scaling)
if(and(gt(&SB,90),lt(&SB,270)))
showright(&L+' ')
elseif()
show(' '+&L)
endif()
grestore()
GE (function)
Compares two expressions of any type and returns true if the first is greater than or equal to the second, false otherwise. This
is the functional equivalent to the >= operator.
Syntax
ge( expression1, expression2 ) Boolean value
Arguments
expression1, expression2
Values of any type. Both expressions must be of the same type.
©2010 Objectif Lune Inc - 284 -