| |
| |
|
p.specht
 | On Oszilloskopen with Leuchtröhre saw one former often interesting figures, The of a in x- and y-Achsenrichtung with unterschiedlichen Frequencies and Phasenlagen angesteuerten Leuchtpunkt created get. in the nachfolgenden Program can itself diesbezüglich through geeignetes Umprogrammieren calm.
who always pleasure has, regulator and Drehknöpfe incorporate, is moreover cordial invited. famous are The with XProfan erreichbaren Grenzfrequenzen but not, there müssten we already with Inline-Assembler or XPSE ran. Feel free!
Window Title "Lissajou-Figuren":Window Style 24:Window 0,0-%maxx,%maxy:cls 0:showmax
declare xg&,xh&,yg&,yh&,pi2!,w!,x!,y!,phi!,n!,ewig&
xg&=width(%hwnd):xh&=xg&\2:yg&=height(%hwnd):yh&=yg&\2:pi2!=2*pi()
Repeat
n!=0
whileloop 0,xg&,6
n!=n!+0.1
phi!=&Loop*pi2!/xg&
MCLS xg&,yg&,0:StartPaint -1
usepen 0, 1 ,$00FF00
moveto xh&,yh&+300*sin(phi!)
whileloop 0,xg&+5,6
w!=&Loop*pi2!/xg&
y!=sin(n!*w!+phi!)
lineto xh&-500*sin(w!) , yh&+300*y!
Endwhile
EndPaint:MCopyBMP 0,0 - xg&,yg& >0,0;0
endwhile
until ewig&
|
|
| |
| XProfan 11Computer: Gerät, daß es in Mikrosekunden erlaubt, 50.000 Fehler zu machen, zB 'daß' statt 'das'... | 05/23/21 ▲ |
|
| |
|
(767)
Deutsch
English
Français
Español
Italia