Commit deb7fff8 authored by Carlo Laurenzi's avatar Carlo Laurenzi
Browse files

Bug in Lib_Stroppa-Spat8.txt corrected.

parent d686cfd4
......@@ -98,12 +98,13 @@ if (@is_undef($source))
}
;; IGOTO method: same as goto, but with the possibility to specify a type of interpolation
; [to avoid the superposition of the last point of a previously running curve, with the first point
; of the current curve, arrive a little earlier at the end of the curve]
; [make sure that, if a previous curve was running, it is killed before the new one starts.]
@proc_def igoto($destination, $dur, $itp)
{
; print debut FlyingEngine $NOW for $dur seconds
; make sure that, if a previous curve was running, it is killed before the new one starts.
abort $last_igoto
abort $last_igoto
$last_igoto := {
curve FlyingEngine
@Grain := 0.05s,
......@@ -115,16 +116,18 @@ if (@is_undef($source))
{
$x
{
{ ($coordinates) } @type "sine_in_out"
; to avoid the superposition of the last point of a previously running curve, with the first point
; of the current curve, arrive a little earlier at the end of the curve
($dur - 0.01) { ($initlevels($destination)) } @type $itp
{ ($coordinates) } @type $itp
($dur - 0.01) { ($initlevels($destination)) } @type $itp
}
}
}
$dur ;print end FlyingEngine $NOW
;$dur print end FlyingEngine $NOW
}
;; Random space local method
;_________________________________________________________________________________________
/**** Random Granular Spatial Movement Process
......@@ -288,7 +291,6 @@ REMARK: spatial tables SHOULD have at lease TWO elements
}
; SPACE VOCABULARY: SEE EACH CONFIG FILE
;+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment