deff('y=gauss(u)','y=exp(-(u)^2)'); // Scilab-Funktionsdefinition
 deff('z=welle(w)','z=gauss(w)-gauss(w-2)/3'); // mit Schwanz

clf(0); scf(0); x=0; vt=0;     // Init 
label=.5; winkel=0; box=1;     // Label: Höhe Winkel Box

for vt=-1:1:3;    // von:delta:bis Parameter
          // pause // "return" eintippen in Konsole
          x=-4:.1:6;  // von:delta:bis Laufvariable

          subplot(411);     // Reihen, Spalte, Element
          titel='(A) +X Welle f(x,vt) = welle(-(x-vt)) = welle(vt-x)'; 
          plot(x,welle(vt-x),'red');
          xstring(vt,label,' vt = '+string(vt)+' ',winkel,box);  // Label
          xtitle(titel,'x','f(x)');               // Titel
          
          subplot(412);     // Reihen, Spalte, Element
          titel='(B) -X Welle f(x,vt) = welle(vt+x)'; 
          plot(x,welle(x+vt),'red');
          xstring(-vt,label,' vt = '+string(vt)+' ',winkel,box);  // Label
          xtitle(titel,'x','f(x)');               // Titel
 
          subplot(413);     // Reihen, Spalte, Element
          titel='(C) +T Welle f(x,vt) = welle(x-vt)'; 
          plot(x,welle(x-vt),'blue');
          xstring(vt,label,' vt = '+string(vt)+' ',winkel,box);  // Label
          xtitle(titel,'x','f(x)');               // Titel
  
          subplot(414);     // Reihen, Spalte, Element
          titel='(D) -T Welle f(x,vt) = welle(-x-vt)'; 
          plot(x,welle(-x-vt),'blue');
          xstring(-vt,label,' vt = '+string(vt)+' ',winkel,box);  // Label
          xtitle(titel,'x','f(x)');               // Titel
       
     end;
          xselect();   // Fenster on top
          xs2gif(0,'4wellen_xt-schwanz.gif');   // #0 Ausgabe als GIF-File