/macosx-10.10.1/tcl-105/tcl_ext/tklib/tklib/examples/diagrams/ |
H A D | draw_heater.tcl | 9 set coords [lrange $begin 1 2] 11 lappend coords [expr {[lindex $begin 1]-$dist}] [lindex $begin 2] 12 lappend coords [expr {[lindex $begin 1]-$dist}] [lindex $end 2] 15 lappend coords [expr {[lindex $begin 1]+$dist}] [lindex $begin 2] 16 lappend coords [expr {[lindex $begin 1]+$dist}] [lindex $end 2] 19 lappend coords [lindex $begin 1] [expr {[lindex $begin 2]+$dist}] 20 lappend coords [lindex $end 1] [expr {[lindex $begin 2]+$dist}] 23 lappend coords [lindex $begin 1] [expr {[lindex $begin 2]-$dist}] 24 lappend coords [lindex $end 1] [expr {[lindex $begin 2]-$dist}] 26 lappend coords [linde [all...] |
/macosx-10.10.1/tcl-105/tcl_ext/tklib/tklib/modules/canvas/ |
H A D | canvas_mvg.tcl | 134 set coords [mvg::Translate [$canvas coords $item]] 147 lappend line {*}[lrange $coords 0 1] L {*}[lrange $coords 2 end] 151 lappend line {*}[mvg::Spline2MVG $coords] 153 lappend line {*}[mvg::Spline2MVG $coords false] 157 lappend line {*}[lrange $coords 0 1] C {*}[lrange $coords 2 end] 170 lassign $coords x0 y0 171 lassign [lrange $coords en [all...] |
/macosx-10.10.1/tcl-105/tcl_ext/tklib/tklib/modules/tkpiechart/ |
H A D | slice.tcl | 149 set coordinates [$canvas coords $($this,origin)] 152 $canvas coords $($this,origin) -$xRadius -$yRadius 153 $canvas coords $($this,topArc) -$xRadius -$yRadius $xRadius $yRadius 179 $canvas coords $($this,startBottomArcFill)\ 183 $canvas coords $($this,startBottomArc) -$xRadius -$yRadius $xRadius $yRadius 185 $canvas coords $($this,startLeftLine) 0 0 0 0 186 $canvas coords $($this,startRightLine) 0 0 0 0 188 $canvas coords $($this,endBottomArcFill)\ 192 $canvas coords $($this,endBottomArc) -$xRadius -$yRadius $xRadius $yRadius 194 $canvas coords [all...] |
/macosx-10.10.1/tcl-105/tcl_ext/snack/snack/demos/python/ |
H A D | polarspec.py | 27 coords=[] 34 coords.append(x) 35 coords.append(y) 38 c.create_polygon(coords, tags='polar', fill='green')
|
/macosx-10.10.1/apache-793/httpd/modules/mappers/ |
H A D | mod_imagemap.c | 133 static int pointinrect(const double point[2], double coords[MAXVERTS][2]) argument 136 if (coords[0][X] > coords[1][X]) { 137 max[0] = coords[0][X]; 138 min[0] = coords[1][X]; 141 max[0] = coords[1][X]; 142 min[0] = coords[0][X]; 145 if (coords[0][Y] > coords[1][Y]) { 146 max[1] = coords[ 158 pointincircle(const double point[2], double coords[MAXVERTS][2]) argument 203 is_closer(const double point[2], double coords[MAXVERTS][2], double *closest) argument [all...] |
/macosx-10.10.1/tcl-105/tcl_ext/tklib/tklib/examples/plotchart/ |
H A D | plotdemos12.tcl | 10 global coords 12 set coords "Coordinates: $xcoord, $ycoord" 37 pack [canvas .c -bg white] [label .l -textvariable coords]
|
/macosx-10.10.1/tcl-105/tcl_ext/snack/snack/demos/tcl/ |
H A D | polarspec.tcl | 39 set coords {} 46 lappend coords $x $y 49 eval .c coords polar $coords
|
/macosx-10.10.1/ruby-106/ruby/ext/tk/sample/demos-en/ |
H A D | hscale.rb | 47 w.coords 'poly',20,15,20,35,x2,35,x2,45,width,25,x2,5,x2,15,20,15 48 w.coords 'line',20,15,20,35,x2,35,x2,45,width,25,x2,5,x2,15,20,15
|
H A D | pendulum.rb | 119 btag.bind('Configure', proc{|w| @plate.coords(0, 25, w.to_i, 25)}, '%w') 126 @x_axis.coords(2, @psh, w-2, @psh) 127 @y_axis.coords(@psw, h-2, @psw, 2) 128 @label_theta.coords(@psw-4, 6) 129 @label_dtheta.coords(w-6, @psh+4) 162 @rod.coords(160, 25, x, y) 163 @bob.coords(x-15, y-15, x+15, y+15) 184 @graph[i].coords(lst) if lst && lst.length >= 4
|
H A D | vscale.rb | 50 w.coords 'poly',15,20,35,20,35,y2,45,y2,25,height,5,y2,15,y2,15,20 51 w.coords 'line',15,20,35,20,35,y2,45,y2,25,height,5,y2,15,y2,15,20
|
H A D | knightstour.rb | 87 @knight.coords(@board.coords(1+square)[0..1]) 115 square = @board.find_closest(*(@knight.coords << 0 << 65))[0].to_i - 1 148 w.coords('selected', w.coords(square)[0..1]) 207 coords = [col * 30 + 4, row * 30 + 4, col * 30 + 30, row * 30 + 30] 208 @board.create(TkcRectangle, coords, 219 @knight.coords(@board.coords(rand(64)+1)[0..1])
|
/macosx-10.10.1/ruby-106/ruby/ext/tk/sample/demos-jp/ |
H A D | hscale.rb | 50 w.coords 'poly',20,15,20,35,x2,35,x2,45,width,25,x2,5,x2,15,20,15 51 w.coords 'line',20,15,20,35,x2,35,x2,45,width,25,x2,5,x2,15,20,15
|
H A D | pendulum.rb | 121 btag.bind('Configure', proc{|w| @plate.coords(0, 25, w.to_i, 25)}, '%w') 128 @x_axis.coords(2, @psh, w-2, @psh) 129 @y_axis.coords(@psw, h-2, @psw, 2) 130 @label_theta.coords(@psw-4, 6) 131 @label_dtheta.coords(w-6, @psh+4) 164 @rod.coords(160, 25, x, y) 165 @bob.coords(x-15, y-15, x+15, y+15) 186 @graph[i].coords(lst) if lst && lst.length >= 4
|
H A D | vscale.rb | 51 w.coords 'poly',15,20,35,20,35,y2,45,y2,25,height,5,y2,15,y2,15,20 52 w.coords 'line',15,20,35,20,35,y2,45,y2,25,height,5,y2,15,y2,15,20
|
H A D | knightstour.rb | 89 @knight.coords(@board.coords(1+square)[0..1]) 117 square = @board.find_closest(*(@knight.coords << 0 << 65))[0].to_i - 1 150 w.coords('selected', w.coords(square)[0..1]) 209 coords = [col * 30 + 4, row * 30 + 4, col * 30 + 30, row * 30 + 30] 210 @board.create(TkcRectangle, coords, 221 @knight.coords(@board.coords(rand(64)+1)[0..1])
|
/macosx-10.10.1/ruby-106/ruby/ext/tk/sample/ |
H A D | tkline.rb | 32 $current_line.coords $start_x, $start_y, x, y 38 $current_line.coords $start_x, $start_y, x, y
|
/macosx-10.10.1/tcl-105/tcl_ext/tklib/tklib/modules/plotchart/ |
H A D | plotgantt.tcl | 234 foreach {xf1 yf1 xf2 yf2} [$w coords [lindex $from 2]] {break} 235 foreach {xt1 yt1 xt2 yt2} [$w coords [lindex $to 1]] {break} 241 set coords [list $xf2 $yfc \ 248 set coords [list $xf2 $yfc \ 256 return [$w create line $coords -arrow last -tag {vertscroll horizscroll below}] 283 foreach {x1 y1} [$w coords [lindex $entry 1]] {break} 284 foreach {dummy dummy x2 y2} [$w coords [lindex $entry 2]] {break} 327 set coords [list [expr {$xmin-5}] [expr {$ymin-5}] \ 337 [$w create polygon $coords -tag {summarybar vertscroll horizscroll below} \
|
H A D | plotpack.tcl | 180 # coords 181 lappend item [$w coords $id] 263 foreach {typeid coords tags binds options specifics} $item \ 284 set id [eval $w create $type $coords [join $options]] 341 foreach {type coords tags binds options specifics} $item \ 345 # item coords 346 lappend res \tcoords\t$coords
|
/macosx-10.10.1/tcl-105/tk/tk/library/demos/ |
H A D | pendulum.tcl | 86 $canvas coords rod $home 25 $x $y 87 $canvas coords bob \ 104 $canvas coords graph$i $list 130 %W coords plate 0 25 %w 25 132 %W coords pivot [expr $home-5] 20 [expr $home+5] 30 137 %W coords x_axis 2 $psh [expr %w-2] $psh 138 %W coords y_axis $psw [expr %h-2] $psw 2 139 %W coords label_dtheta [expr $psw-4] 6 140 %W coords label_theta [expr %w-6] [expr $psh+4]
|
H A D | hscale.tcl | 45 $w coords poly 20 15 20 35 $x2 35 $x2 45 $width 25 $x2 5 $x2 15 20 15 46 $w coords line 20 15 20 35 $x2 35 $x2 45 $width 25 $x2 5 $x2 15 20 15
|
H A D | vscale.tcl | 46 $w coords poly 15 20 35 20 35 $y2 45 $y2 25 $height 5 $y2 15 $y2 15 20 47 $w coords line 15 20 35 20 35 $y2 45 $y2 25 $height 5 $y2 15 $y2 15 20
|
H A D | knightstour.tcl | 95 $dlg.f.c coords knight [lrange [$dlg.f.c coords [expr {1+$square}]] 0 1] 129 {*}[$dlg.f.c coords knight] 0 65]-1}] 164 $w coords selected [lrange [$w coords $square] 0 1] 198 set coords [list [expr {$col * 30 + 4}] [expr {$row * 30 + 4}] \ 200 $c create rectangle $coords -fill $fill -disabledfill $dfill \ 207 $c coords knight [lrange [$c coords [expr {1 + int(rand() * 64)}]] 0 1]
|
/macosx-10.10.1/tcl-105/tcl_ext/bwidget/bwidget/ |
H A D | scrollview.tcl | 104 $path:cmd coords view -2 -2 -2 -2 135 set c [$path:cmd coords view] 138 $path:cmd coords view $x0 [lindex $c 1] $x1 [lindex $c 3] 151 set c [$path:cmd coords view] 154 $path:cmd coords view [lindex $c 0] $y0 [lindex $c 2] $y1 167 set c [$path:cmd coords view] 176 $path:cmd coords view $x0 $y0 $x1 $y1 197 set c [$path:cmd coords view]
|
/macosx-10.10.1/tcl-105/tcl_ext/snack/snack/generic/ |
H A D | jkCanvSect.c | 48 double *coords; member in struct:SectionItem 215 double *coords); 266 sectPtr->coords = NULL; 383 if (sectPtr->coords != NULL) ckfree((char *) sectPtr->coords); 384 sectPtr->coords = (double *) ckalloc((unsigned) 392 sectPtr->coords[i*2] = (double) i * xscale; 393 sectPtr->coords[i*2+1] = t; 994 if (sectPtr->coords != NULL) ckfree((char *) sectPtr->coords); 1067 double *coords = sectPtr->coords; local 1114 SectionToPoint(Tk_Canvas canvas, Tk_Item *itemPtr, double *coords) argument 1165 double *coords = sectPtr->coords; local 1193 double *coords = sectPtr->coords; local [all...] |
/macosx-10.10.1/tcl-105/tk/tk/library/ |
H A D | scale.tcl | 153 set coords [$w coords] 154 set Priv(deltaX) [expr {$x - [lindex $coords 0]}] 155 set Priv(deltaY) [expr {$y - [lindex $coords 1]}] 283 set coords "$x $y"
|