Basic256 Programme stehende Welle einfach
Quellcode
Basiswissen
Das untenstehende Programm kann direkt in Basic256 ausgeführt werden.
Quellcode
# Stehende Welle einfach
#
# Gunter Heim, 2016
#
# Unten im Bild grün werden zwei gegenläufige Sinuswellen über ihren zeitlichen Verlauf dargestellt. Darüber in rot wird die Summe der zwei Wellen angezeigt. Die Summe zweier gegenläufiger Wellen ist immer eine stehende Welle. Stehende Wellen haben immer feste Knoten, die sich nicht bewegen.
#
cls
clg
graphsize 640,150
fastgraphics
omega=1
# Bildbreite entspricht 2Pi:
k=1/640*2*pi
# Stauchung auf x-Achse um Faktor 4:
k=k*4 # Wellenzahl
t=0
while t<100
clg
cls
print t
for x=0 to 640
# Die Summe zweier Wellen gleicher Länge, die in entgegengesetzter Richtung laufen, erzeugen immer eine stehende Welle.
# Die dunkelgrünen Einzelwellen unten im Bild
u=10*cos(k*x + omega*t )
v=10*cos(-k*x + omega*t)
color green
plot x,u+80
plot x,v+80
color red
plot x,v+u+40
color darkgreen
next x
t=t+0.1
refresh
end while
end