index 4fc6fc35dc1141c8067be4aaf4891fa249200a04..bb3a7f76570e5685b6fa12c8a74799b264ed93e6 100644 (file)
-#define INKSCAPE_LPE_SKETCH_CPP
-/** \file
- * LPE <sketch> implementation
+/** @file
+ * @brief LPE sketch effect implementation
*/
-/*
- * Authors:
- * Johan Engelen
-*
-* Copyright (C) Johan Engelen 2007 <j.b.c.engelen@utwente.nl>
+/* Authors:
+ * Jean-Francois Barraud <jf.barraud@gmail.com>
+ * Johan Engelen <j.b.c.engelen@utwente.nl>
+ *
+ * Copyright (C) 2007 Authors
*
* Released under GNU GPL, read the file 'COPYING' for more information
*/
#include "live_effects/lpe-sketch.h"
-#include "display/curve.h"
-#include <libnr/n-art-bpath.h>
// You might need to include other 2geom files. You can add them here:
#include <2geom/path.h>
#include <2geom/sbasis.h>
#include <2geom/sbasis-geometric.h>
+#include <2geom/sbasis-math.h>
#include <2geom/bezier-to-sbasis.h>
#include <2geom/sbasis-to-bezier.h>
#include <2geom/d2.h>
Effect(lpeobject),
// initialise your parameters here:
//testpointA(_("Test Point A"), _("Test A"), "ptA", &wr, this, Geom::Point(100,100)),
- nbiter_approxstrokes(_("Strokes"), _("Draw that many approximating strokes"), "nbiter_approxstrokes", &wr, this, 5),
- strokelength(_("Max stroke length"),
+ nbiter_approxstrokes(_("Strokes:"), _("Draw that many approximating strokes"), "nbiter_approxstrokes", &wr, this, 5),
+ strokelength(_("Max stroke length:"),
_("Maximum length of approximating strokes"), "strokelength", &wr, this, 100.),
- strokelength_rdm(_("Stroke length variation"),
+ strokelength_rdm(_("Stroke length variation:"),
_("Random variation of stroke length (relative to maximum length)"), "strokelength_rdm", &wr, this, .3),
- strokeoverlap(_("Max. overlap"),
- _("How much successive strokes should overlap (relative to maximum length)."), "strokeoverlap", &wr, this, .3),
- strokeoverlap_rdm(_("Overlap variation"),
+ strokeoverlap(_("Max. overlap:"),
+ _("How much successive strokes should overlap (relative to maximum length)"), "strokeoverlap", &wr, this, .3),
+ strokeoverlap_rdm(_("Overlap variation:"),
_("Random variation of overlap (relative to maximum overlap)"), "strokeoverlap_rdm", &wr, this, .3),
- ends_tolerance(_("Max. end tolerance"),
+ ends_tolerance(_("Max. end tolerance:"),
_("Maximum distance between ends of original and approximating paths (relative to maximum length)"), "ends_tolerance", &wr, this, .1),
- parallel_offset(_("Parallel offset"),
- _("Average distance from approximating path to original path"), "parallel_offset", &wr, this, 5.),
- tremble_size(_("Max. tremble"),
+ parallel_offset(_("Average offset:"),
+ _("Average distance each stroke is away from the original path"), "parallel_offset", &wr, this, 5.),
+ tremble_size(_("Max. tremble:"),
_("Maximum tremble magnitude"), "tremble_size", &wr, this, 5.),
- tremble_frequency(_("Tremble frequency"),
- _("Avreage number of tremble periods in an approximating stroke"), "tremble_frequency", &wr, this, 1.),
- nbtangents(_("Construction lines"),
+ tremble_frequency(_("Tremble frequency:"),
+ _("Average number of tremble periods in a stroke"), "tremble_frequency", &wr, this, 1.)
+#ifdef LPE_SKETCH_USE_CONSTRUCTION_LINES
+ ,nbtangents(_("Construction lines:"),
_("How many construction lines (tangents) to draw"), "nbtangents", &wr, this, 5),
- tgtscale(_("Scale"),
+ tgtscale(_("Scale:"),
_("Scale factor relating curvature and length of construction lines (try 5*offset)"), "tgtscale", &wr, this, 10.0),
- tgtlength(_("Max. length"), _("Maximum length of construction lines"), "tgtlength", &wr, this, 100.0),
- tgtlength_rdm(_("Length variation"), _("Random variation of the length of construction lines"), "tgtlength_rdm", &wr, this, .3)
+ tgtlength(_("Max. length:"), _("Maximum length of construction lines"), "tgtlength", &wr, this, 100.0),
+ tgtlength_rdm(_("Length variation:"), _("Random variation of the length of construction lines"), "tgtlength_rdm", &wr, this, .3),
+ tgt_places_rdmness(_("Placement randomness:"), _("0: evenly distributed construction lines, 1: purely random placement"), "tgt_places_rdmness", &wr, this, 1.)
+#ifdef LPE_SKETCH_USE_CURVATURE
+ ,min_curvature(_("k_min:"), _("min curvature"), "k_min", &wr, this, 4.0)
+ ,max_curvature(_("k_max:"), _("max curvature"), "k_max", &wr, this, 1000.0)
+#endif
+#endif
{
// register all your parameters here, so Inkscape knows which parameters this effect has:
//Add some comment in the UI: *warning* the precise output of this effect might change in future releases!
registerParameter( dynamic_cast<Parameter *>(¶llel_offset) );
registerParameter( dynamic_cast<Parameter *>(&tremble_size) );
registerParameter( dynamic_cast<Parameter *>(&tremble_frequency) );
+#ifdef LPE_SKETCH_USE_CONSTRUCTION_LINES
registerParameter( dynamic_cast<Parameter *>(&nbtangents) );
+ registerParameter( dynamic_cast<Parameter *>(&tgt_places_rdmness) );
registerParameter( dynamic_cast<Parameter *>(&tgtscale) );
registerParameter( dynamic_cast<Parameter *>(&tgtlength) );
registerParameter( dynamic_cast<Parameter *>(&tgtlength_rdm) );
-
+#ifdef LPE_SKETCH_USE_CURVATURE
+ registerParameter( dynamic_cast<Parameter *>(&min_curvature) );
+ registerParameter( dynamic_cast<Parameter *>(&max_curvature) );
+#endif
+#endif
nbiter_approxstrokes.param_make_integer();
nbiter_approxstrokes.param_set_range(0, NR_HUGE);
tremble_frequency.param_set_increments(.5, 1.5);
strokeoverlap_rdm.param_set_range(0, 1.);
+#ifdef LPE_SKETCH_USE_CONSTRUCTION_LINES
nbtangents.param_make_integer();
nbtangents.param_set_range(0, NR_HUGE);
tgtscale.param_set_range(0, NR_HUGE);
tgtlength.param_set_range(0, NR_HUGE);
tgtlength.param_set_increments(1., 5.);
tgtlength_rdm.param_set_range(0, 1.);
+ tgt_places_rdmness.param_set_range(0, 1.);
+ //this is not very smart, but required to avoid having lot of tangents stacked on short components.
+ //Nota: we could specify a density instead of an absolute number, but this would be scale dependant.
+ concatenate_before_pwd2 = true;
+#endif
}
LPESketch::~LPESketch()
//This returns a random perturbation. Notice the domain is [s0,s0+first multiple of period>s1]...
-Geom::Piecewise<Geom::D2<Geom::SBasis> >
+Geom::Piecewise<Geom::D2<Geom::SBasis> >
LPESketch::computePerturbation (double s0, double s1){
using namespace Geom;
Piecewise<D2<SBasis> >res;
-
+
//global offset for this stroke.
- double offsetX = parallel_offset-parallel_offset.get_value();
- double offsetY = parallel_offset-parallel_offset.get_value();
+ double offsetX = 2*parallel_offset-parallel_offset.get_value();
+ double offsetY = 2*parallel_offset-parallel_offset.get_value();
Point A,dA,B,dB,offset = Point(offsetX,offsetY);
//start point A
for (unsigned dim=0; dim<2; dim++){
dA[dim] = 2*tremble_size-tremble_size.get_value();
}
//compute howmany deg 3 sbasis to concat according to frequency.
+
unsigned count = unsigned((s1-s0)/strokelength*tremble_frequency)+1;
+ //unsigned count = unsigned((s1-s0)/tremble_frequency)+1;
+
for (unsigned i=0; i<count; i++){
- D2<SBasis> perturb = D2<SBasis>();
+ D2<SBasis> perturb = D2<SBasis>(SBasis(2, Linear()), SBasis(2, Linear()));
for (unsigned dim=0; dim<2; dim++){
B[dim] = offset[dim] + 2*tremble_size-tremble_size.get_value();
- perturb[dim].push_back(Linear(A[dim],B[dim]));
+ perturb[dim][0] = Linear(A[dim],B[dim]);
dA[dim] = dA[dim]-B[dim]+A[dim];
- dB[dim] = 2*tremble_size-tremble_size.get_value();
- perturb[dim].push_back(Linear(dA[dim],dB[dim]));
+ //avoid dividing by 0. Very short strokes will have ends parallel to the curve...
+ if ( s1-s0 > 1e-2)
+ dB[dim] = -(2*tremble_size-tremble_size.get_value())/(s0-s1)-B[dim]+A[dim];
+ else
+ dB[dim] = -(2*tremble_size-tremble_size.get_value())-B[dim]+A[dim];
+ perturb[dim][1] = Linear(dA[dim],dB[dim]);
}
- A = B;
dA = B-A-dB;
+ A = B;
+ //dA = B-A-dB;
res.concat(Piecewise<D2<SBasis> >(perturb));
}
res.setDomain(Interval(s0,s0+count*strokelength/tremble_frequency));
+ //res.setDomain(Interval(s0,s0+count*tremble_frequency));
return res;
}
@@ -182,13 +208,6 @@ LPESketch::doEffect_pwd2 (Geom::Piecewise<Geom::D2<Geom::SBasis> > const & pwd2_
Piecewise<D2<SBasis> > output;
-
- //init random parameters.
- parallel_offset.resetRandomizer();
- strokelength_rdm.resetRandomizer();
- strokeoverlap_rdm.resetRandomizer();
- tgtlength_rdm.resetRandomizer();
-
// some variables for futur use (for construction lines; compute arclength only once...)
// notations will be : t = path time, s = distance from start along the path.
Piecewise<SBasis> pathlength;
@@ -207,22 +226,22 @@ LPESketch::doEffect_pwd2 (Geom::Piecewise<Geom::D2<Geom::SBasis> > const & pwd2_
double piece_total_length = piecelength.segs.back().at1()-piecelength.segs.front().at0();
pathlength.concat(piecelength + total_length);
total_length += piece_total_length;
-
+
//TODO: better check this on the Geom::Path.
- bool closed = piece.segs.front().at0() == piece.segs.back().at1();
- if (closed){
+ bool closed = piece.segs.front().at0() == piece.segs.back().at1();
+ if (closed){
piece.concat(piece);
piecelength.concat(piecelength+piece_total_length);
}
for (unsigned i = 0; i<nbiter_approxstrokes; i++){
- //Basic steps:
- //- Choose a rdm seg [s0,s1], find coresponding [t0,t1],
+ //Basic steps:
+ //- Choose a rdm seg [s0,s1], find coresponding [t0,t1],
//- Pick a rdm perturbation delta(s), collect 'piece(t)+delta(s(t))' over [t0,t1] into output.
// pick a point where to start the stroke (s0 = dist from start).
- double s1=0.,s0 = ends_tolerance*strokelength+0.0001;//the root finder might miss 0.
+ double s1=0.,s0 = ends_tolerance*strokelength+0.0001;//the root finder might miss 0.
double t1, t0;
double s0_initial = s0;
bool done = false;// was the end of the component reached?
@@ -232,10 +251,10 @@ LPESketch::doEffect_pwd2 (Geom::Piecewise<Geom::D2<Geom::SBasis> > const & pwd2_
if (!closed && s1>piece_total_length - ends_tolerance.get_value()*strokelength) break;
if ( closed && s0>piece_total_length + s0_initial) break;
- std::vector<double> times;
- times = roots(piecelength-s0);
+ std::vector<double> times;
+ times = roots(piecelength-s0);
t0 = times.at(0);//there should be one and only one solution!!
-
+
// pick a new end point (s1 = s0 + strokelength).
s1 = s0 + strokelength*(1-strokelength_rdm);
// don't let it go beyond the end of the orgiginal path.
@@ -251,15 +270,16 @@ LPESketch::doEffect_pwd2 (Geom::Piecewise<Geom::D2<Geom::SBasis> > const & pwd2_
s1 = 2*piece_total_length - strokeoverlap*(1-strokeoverlap_rdm)*strokelength-0.0001;
}
}
- times = roots(piecelength-s1);
+ times = roots(piecelength-s1);
if (times.size()==0) break;//we should not be there.
t1 = times[0];
-
+
//pick a rdm perturbation, and collect the perturbed piece into output.
- Piecewise<D2<SBasis> > pwperturb = computePerturbation(s0,s1);
+ Piecewise<D2<SBasis> > pwperturb = computePerturbation(s0-0.01,s1+0.01);
pwperturb = compose(pwperturb,portion(piecelength,t0,t1));
+
output.concat(portion(piece,t0,t1)+pwperturb);
-
+
//step points: s0 = s1 - overlap.
//TODO: make sure this has to end?
s0 = s1 - strokeoverlap*(1-strokeoverlap_rdm)*(s1-s0);
@@ -267,6 +287,7 @@ LPESketch::doEffect_pwd2 (Geom::Piecewise<Geom::D2<Geom::SBasis> > const & pwd2_
}
}
+#ifdef LPE_SKETCH_USE_CONSTRUCTION_LINES
//----- Construction lines.
//TODO: choose places according to curvature?.
@@ -277,14 +298,47 @@ LPESketch::doEffect_pwd2 (Geom::Piecewise<Geom::D2<Geom::SBasis> > const & pwd2_
Piecewise<D2<SBasis> > m = pwd2_in;
Piecewise<D2<SBasis> > v = derivative(pwd2_in);
Piecewise<D2<SBasis> > a = derivative(v);
+
+#ifdef LPE_SKETCH_USE_CURVATURE
+ //---- curvature experiment...(enable
+ Piecewise<SBasis> k = curvature(pwd2_in);
+ OptInterval k_bnds = bounds_exact(abs(k));
+ double k_min = k_bnds->min() + k_bnds->extent() * min_curvature;
+ double k_max = k_bnds->min() + k_bnds->extent() * max_curvature;
+
+ Piecewise<SBasis> bump;
+ //SBasis bump_seg = SBasis( 2, Linear(0) );
+ //bump_seg[1] = Linear( 4. );
+ SBasis bump_seg = SBasis( 1, Linear(1) );
+ bump.push_cut( k_bnds->min() - 1 );
+ bump.push( Linear(0), k_min );
+ bump.push(bump_seg,k_max);
+ bump.push( Linear(0), k_bnds->max()+1 );
+
+ Piecewise<SBasis> repartition = compose( bump, k );
+ repartition = integral(repartition);
+ //-------------------------------
+#endif
+
for (unsigned i=0; i<nbtangents; i++){
+
// pick a point where to draw a tangent (s = dist from start along path).
- double s = total_length * ( i + tgtlength_rdm ) / (nbtangents+1.);
- std::vector<double> times;
+#ifdef LPE_SKETCH_USE_CURVATURE
+ double proba = repartition.firstValue()+ (rand()%100)/100.*(repartition.lastValue()-repartition.firstValue());
+ std::vector<double> times;
+ times = roots(repartition - proba);
+ double t = times.at(0);//there should be one and only one solution!
+#else
+ //double s = total_length * ( i + tgtlength_rdm ) / (nbtangents+1.);
+ double reg_place = total_length * ( i + .5) / ( nbtangents );
+ double rdm_place = total_length * tgt_places_rdmness;
+ double s = ( 1.- tgt_places_rdmness.get_value() ) * reg_place + rdm_place ;
+ std::vector<double> times;
times = roots(pathlength-s);
double t = times.at(0);//there should be one and only one solution!
+#endif
Point m_t = m(t), v_t = v(t), a_t = a(t);
- //Compute tgt length according to curvature (not exceeding tgtlength) so that
+ //Compute tgt length according to curvature (not exceeding tgtlength) so that
// dist to origninal curve ~ 4 * (parallel_offset+tremble_size).
//TODO: put this 4 as a parameter in the UI...
//TODO: what if with v=0?
@@ -299,9 +353,26 @@ LPESketch::doEffect_pwd2 (Geom::Piecewise<Geom::D2<Geom::SBasis> > const & pwd2_
}
output.concat(Piecewise<D2<SBasis> >(tgt));
}
+#endif
+
return output;
}
+void
+LPESketch::doBeforeEffect (SPLPEItem */*lpeitem*/)
+{
+ //init random parameters.
+ parallel_offset.resetRandomizer();
+ strokelength_rdm.resetRandomizer();
+ strokeoverlap_rdm.resetRandomizer();
+ ends_tolerance.resetRandomizer();
+ tremble_size.resetRandomizer();
+#ifdef LPE_SKETCH_USE_CONSTRUCTION_LINES
+ tgtlength_rdm.resetRandomizer();
+ tgt_places_rdmness.resetRandomizer();
+#endif
+}
+
/* ######################## */
} //namespace LivePathEffect (setq default-directory "c:/Documents And Settings/jf/Mes Documents/InkscapeSVN")
@@ -316,4 +387,4 @@ LPESketch::doEffect_pwd2 (Geom::Piecewise<Geom::D2<Geom::SBasis> > const & pwd2_
fill-column:99
End:
*/
-// vim: filetype=cpp:expandtab:shiftwidth=4:tabstop=8:softtabstop=4 :
+// vim: filetype=cpp:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:encoding=utf-8:textwidth=99 :