Category : C Source Code
Archive   : GPLTS202.ZIP
Filename : POLAR.DEM
# Show some of the new polar capabilities.
#
set polar
set dummy x
set samples 160
set xrange [0:2*pi]
set title "Three circles (with aspect ratio distortion)"
plot .5,1,1.5
pause -1 "Hit return"
set title ""
plot cos(2*x)
pause -1 "Hit return"
plot 2*sqrt(cos(x)),-2*sqrt(cos(x))
pause -1 "Hit return"
set offset pi/4,pi/4,0,0
plot sin(4*x),cos(4*x)
set offset 0,0,0,0
pause -1 "Hit return"
set yrange [-5:5]
plot x/cos(3*x)
pause -1 "Hit return"
set autoscale
plot 1-sin(x)
pause -1 "Hit return"
set xrange [0:12*pi]
plot 2*x
pause -1 "Hit return"
butterfly(x)=exp(cos(x))-2*cos(4*x)+sin(x/12)**5
set samples 800
pause 0 "This is a big one (many samples), be patient..."
set title "Butterfly"
set nokey
plot butterfly(x)
pause -1 "Hit return"
# undo what we've done above
set nopolar
set samples 160
set autoscale xy
set title ""
set offset 0,0,0,0
set key
Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!
This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.
But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/