Subversion Repositories wimsdev

Rev

Rev 13585 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 13585 Rev 15531
Line 87... Line 87...
87
      !endif
87
      !endif
88
      !for slib_e in $slib_ee
88
      !for slib_e in $slib_ee
89
        !if $slib_e<-1
89
        !if $slib_e<-1
90
          slib_extender=$slib_extender\
90
          slib_extender=$slib_extender\
91
disk $slib_e,0,$slib_dotwidth,_color_\
91
disk $slib_e,0,$slib_dotwidth,_color_\
92
line $slib_e,0,-1,0,_color_
92
segment $slib_e,0,-1,0,_color_
93
        !endif
93
        !endif
94
        !if $slib_e>1
94
        !if $slib_e>1
95
          slib_extender=$slib_extender\
95
          slib_extender=$slib_extender\
96
disk $slib_e,0,$slib_dotwidth,_color_\
96
disk $slib_e,0,$slib_dotwidth,_color_\
97
line $slib_e,0,1,0,_color_
97
segment $slib_e,0,1,0,_color_
98
        !endif
98
        !endif
99
      !next slib_e
99
      !next slib_e
100
    !endif
100
    !endif
101
    !if $slib_i isitemof $slib_pairs
101
    !if $slib_i isitemof $slib_pairs
102
      !if $slib_orient=0
102
      !if $slib_orient=0
Line 111... Line 111...
111
parallel -1,0,0.5,0,3.5,0,2,_color_$slib_extender
111
parallel -1,0,0.5,0,3.5,0,2,_color_$slib_extender
112
        !goto loopend
112
        !goto loopend
113
      !else
113
      !else
114
        slib_out=$slib_out\
114
        slib_out=$slib_out\
115
affine $slib_mat2,$slib_x,$slib_y\
115
affine $slib_mat2,$slib_x,$slib_y\
116
line 1,0,2,0,_color_
116
segment 1,0,2,0,_color_
117
      !endif
117
      !endif
118
    !endif
118
    !endif
119
    !if $slib_i=$slib_paired
119
    !if $slib_i=$slib_paired
120
      !if $slib_orient=0
120
      !if $slib_orient=0
121
        slib_x=$[$slib_x-1.5]
121
        slib_x=$[$slib_x-1.5]