% GNU Octave/Matlab
% mik81
% 
% Stehende Welle

steps = 1/80
speed = (1/steps)/5

timebase = (0.: steps : 3.);
wave = sin( 2. * pi * timebase);

for phi=steps:steps:1
  hinlaufend = sin (2. * pi * timebase - 2. * pi * phi);
  ruecklaufend = sin (2. * pi * timebase + 2. * pi * phi);
  sum = hinlaufend + ruecklaufend;

  axis([0, 3, -2.2, +2.2]);
  plot(timebase, hinlaufend, ";Hinlaufend;"
    , timebase, ruecklaufend, ";Ruecklaufend;"
    , timebase, sum, ";Resultat;"
    , [.5, .5], [-2.2, 2.2], ";Minimum Knoten;"
    , [.75, .75], [-2.2, 2.2], ";Maximum Knoten;");

  clear filename;
  filename = sprintf("./wave%05i.png", phi/steps);
  printf("%s", filename);
  printf("\n");

  print(filename, "-dpng", "-landscape");
  clearplot;
end