File: curve-value.help.tcl

package info (click to toggle)
din 5.2.1-6
  • links: PTS, VCS
  • area: main
  • in suites: bullseye, buster, sid
  • size: 2,200 kB
  • sloc: cpp: 9,369; sh: 6,563; ansic: 2,977; tcl: 1,770; makefile: 283
file content (23 lines) | stat: -rw-r--r-- 818 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
set curve-value(name) curve-value
set curve-value(short) cv
set curve-value(purpose) {set x, y of a vertex or tangent of a curve}
set curve-value(invoke) {curve-value OR cv <curve_name> <what> <id> <x> <y>}
set curve-value(help) {
  what: v (for vertex) OR lt (for left tangent) OR rt (for right tangent)
  x, y: x, y position
  
  if you want x or y to remain same, put a . when setting values.

}
set curve-value(examples) {
  curve-value bezier1 v 0 0 0 ;# set 1st vertex of curve bezier1 to origin
  cv bezier1 lt 0 -1 0 ;# set left tangent of 1st vertex to -1, 0
  cv bezier1 rt 0 1 0 ;# set right tangent of 1st vertex to 1, 0
  
  ;# set 2nd vertex of octave shift curve.
  ;# x remains same
  curve-value os v 1 . 4  
  
  ;# set 2nd vertex of octave shift curve.
  ;# y remains same
  curve-value os v 1 2 .}