Subversion Repositories wimsdev

Rev

Rev 4047 | Rev 4158 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 4047 Rev 4048
Line 4... Line 4...
4 
slib_title=Draw a clock according to given time
 4 
slib_title=Draw a clock according to given time
5 
slib_parms=4\
 5 
slib_parms=4\
6 
0:0:0,time in hh:mm:ss\
 6 
0:0:0,time in hh:mm:ss\
7 
200, clock size (120,160,200 or 240)\
 7 
200, clock size (120,160,200 or 240)\
8 
1,style (1 or 2)\
 8 
1,style (1 or 2)\
9 
,option words (exactmin, nosecond, nohour, nominut)
 9 
,option words (exactmin, nosecond, nohour, nominute)
10 
slib_author=Gang Xiao
 10 
slib_author=Gang Xiao
11 
slib_out=Source for insdraw
 11 
slib_out=Source for insdraw
12 
!exit
 12 
!exit
13 
 
 13 
 
14 
:proc
 14 
:proc
Line 54... Line 54...
54 
!if nohour notwordof $slib_option
 54 
!if nohour notwordof $slib_option
55 
 slib_out=$slib_out\
 55 
 slib_out=$slib_out\
56 
 fpoly $slib_ch, $slib_h1*$slib_hl,$slib_h2*$slib_hl, $slib_h2*(-$slib_hw),$slib_h1*$slib_hw, $slib_h1*(-$slib_sb),$slib_h2*(-$slib_sb), $slib_h2*$slib_hw,$slib_h1*(-$slib_hw)\
 56 
 fpoly $slib_ch, $slib_h1*$slib_hl,$slib_h2*$slib_hl, $slib_h2*(-$slib_hw),$slib_h1*$slib_hw, $slib_h1*(-$slib_sb),$slib_h2*(-$slib_sb), $slib_h2*$slib_hw,$slib_h1*(-$slib_hw)\
57 
 poly $slib_ch, $slib_h1*$slib_hl,$slib_h2*$slib_hl, $slib_h2*(-$slib_hw),$slib_h1*$slib_hw, $slib_h1*(-$slib_sb),$slib_h2*(-$slib_sb), $slib_h2*$slib_hw,$slib_h1*(-$slib_hw)
 57 
 poly $slib_ch, $slib_h1*$slib_hl,$slib_h2*$slib_hl, $slib_h2*(-$slib_hw),$slib_h1*$slib_hw, $slib_h1*(-$slib_sb),$slib_h2*(-$slib_sb), $slib_h2*$slib_hw,$slib_h1*(-$slib_hw)
58 
!endif
 58 
!endif
59 
!if nominut notwordof $slib_option
 59 
!if nominute notwordof $slib_option
60 
 slib_out=$slib_out\
 60 
 slib_out=$slib_out\
61 
 fpoly $slib_cm, $slib_m1*$slib_ml,$slib_m2*$slib_ml, $slib_m2*(-$slib_mw),$slib_m1*$slib_mw, $slib_m1*(-$slib_sb),$slib_m2*(-$slib_sb), $slib_m2*$slib_mw,$slib_m1*(-$slib_mw)\
 61 
 fpoly $slib_cm, $slib_m1*$slib_ml,$slib_m2*$slib_ml, $slib_m2*(-$slib_mw),$slib_m1*$slib_mw, $slib_m1*(-$slib_sb),$slib_m2*(-$slib_sb), $slib_m2*$slib_mw,$slib_m1*(-$slib_mw)\
62 
 poly $slib_cm, $slib_m1*$slib_ml,$slib_m2*$slib_ml, $slib_m2*(-$slib_mw),$slib_m1*$slib_mw, $slib_m1*(-$slib_sb),$slib_m2*(-$slib_sb), $slib_m2*$slib_mw,$slib_m1*(-$slib_mw)
 62 
 poly $slib_cm, $slib_m1*$slib_ml,$slib_m2*$slib_ml, $slib_m2*(-$slib_mw),$slib_m1*$slib_mw, $slib_m1*(-$slib_sb),$slib_m2*(-$slib_sb), $slib_m2*$slib_mw,$slib_m1*(-$slib_mw)
63 
!endif
 63 
!endif
64 
slib_out=$slib_out\
 64 
slib_out=$slib_out\