Grapes/win 2.8
[Don't Edit] 3.14
----------
BGstretchOn BGfile
1 
----------
UserFunction
3 1 2 3 1 1 1
2(0.7x+y+0.4z,0.7x+0.4y+z)
h(2Pix)
sin(x+a(sinbx+sin3bx/5))
----------
y = f(x)
0
----------
0 = f(x,y)
0
----------
Point
22 8 9 10 11 12 13 14 1 2 3 4 5 6 7 15 16 17 18 0 0 0 19 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
P
1 3 2
P
(intr(C,D,F,G)).x
(intr(C,D,F,G)).y
0


t 0.1
0 0
16711680 16711680 16777215 0 0 0 1 1 0 0
3 0 1
Q
1 3 2
Q
(intr(D,E,F,G)).x
(intr(D,E,F,G)).y
0


t 0.1
0 0
16711680 16711680 16777215 0 0 0 1 1 0 0
3 0 1
R
1 3 2
R
(rot(P,2Pi*k/s)).x
(rot(P,2Pi*k/s)).y
0


t 0.1
0 0
255 16711680 16777215 0 0 0 1 1 0 0
3 0 1
S
1 3 2
S
(rot(Q,2Pi*k/s)).x
(rot(Q,2Pi*k/s)).y
0


t 0.1
0 0
255 16711680 16777215 0 0 0 1 1 0 0
3 0 1
T
1 0 2
T
(rot(D,2Pi*k/s)).x
(rot(D,2Pi*k/s)).y
0


t 0.1
1 0
16711680 16711680 16777215 1 0 0 1 1 0 0
8 0 1
U
1 3 2
U
(d*R).x
(d*R).y
0


t 0.1
0 0
255 16711680 16777215 0 0 0 1 1 0 0
3 0 1
V
1 3 2
V
(d*S).x
(d*S).y
0


t 0.1
0 0
255 16711680 16777215 0 0 0 1 1 0 0
3 0 1
A
1 3 2
A
0
0
0


t 0.1
0 0
16711680 16711680 16777215 0 0 0 1 1 0 0
3 0 1
B
1 3 2
B
1
0
0


t 0.1
0 0
16711680 16711680 16777215 0 0 0 1 1 0 0
3 0 1
C
1 3 2
C
(rot(B,2Pi/n)).x
(rot(B,2Pi/n)).y
0


t 0.1
0 0
16711680 16711680 16777215 0 0 0 1 1 0 0
3 0 1
D
1 3 2
D
(rot(B,4Pi/n)).x
(rot(B,4Pi/n)).y
0


t 0.1
0 0
16711680 16711680 16777215 0 0 0 1 1 0 0
3 0 1
E
1 3 2
E
(rot(B,6Pi/n)).x
(rot(B,6Pi/n)).y
0


t 0.1
0 0
16711680 16711680 16777215 0 0 0 1 1 0 0
3 0 1
F
1 3 2
F
(rot(C,2Pi/s)).x
(rot(C,2Pi/s)).y
0


t 0.1
0 0
16711680 16711680 16777215 0 0 0 1 1 0 0
3 0 1
G
1 3 2
G
(rot(D,2Pi/s)).x
(rot(D,2Pi/s)).y
0


t 0.1
0 0
16711680 16711680 16777215 0 0 0 1 1 0 0
3 0 1
H
1 0 2
H
(d*T).x
(d*T).y
0


t 0.1
1 0
255 16711680 16777215 1 0 0 1 1 0 0
8 0 1
I
1 3 2
I
(d*U).x
(d*U).y
0


t 0.1
0 0
255 16711680 16777215 0 0 0 1 1 0 0
3 0 1
J
1 3 2
J
(d*V).x
(d*V).y
0


t 0.1
0 0
255 16711680 16777215 0 0 0 1 1 0 0
3 0 1
K
1 0 2
K
(d*H).x
(d*H).y
0


t 0.1
1 0
65280 16711680 16777215 1 0 0 1 1 0 0
8 0 1
L
0 0 1
M
0 0 1
N
0 0 1
O
1 0 2
O
0
0
0


t 0.1
0 0
16777215 16711680 16777215 1 0 0 1 1 0 0
3 0 2
----------
Segments
3
7 1 1 16744703 16777215 2 1 1
0 
3 4 5 0 0 0 0 0 0 0 0
7 1 1 65280 16777215 2 1 1
0 
6 7 15 0 0 0 0 0 0 0 0
7 1 1 16711680 16777215 2 1 1
0 
16 17 18 0 0 0 0 0 0 0 0
----------
paramater
14
0.4 0
1 1 0.1 0 6
5 0
1 1 0.1 0 7
1 0
1 1 0.1 1 0
1.85 0
1 1 0.05 1 4
261.62557 0
1 1 1 0 8
4 0
1 1 1 1 1
1 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
18 0
1 1 2 1 3
0.25 0
1 1 0.05 0 5
1 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
0 0
1 1 0.1 1 0
18 0
1 1 1 0 2
1 1 64
----------
KakuMode ScanWidth LogMode ThetaMode AreaMode capStyle
1 4 2 1 1 0 1 1 0 0 0 32
DrawMode SegmentShowSync
1 0
AfterImageColorNo, CanAImg,MaxAimgN0
0 1 3001
circleMode
1
----------
ScaleX
Vlow,VHigh,label
0 610 x
x
AxesVisible,ScaleVisible,Svaluevisible,AddDegreeLetter,ScaleGuidevisible
0 0 0 0 0
NUmber,Base,Linterval,numberR
7 1 1 7
High,Low
5.64814814814815 -5.64814814814815
----------
ScaleY
Vlow,VHigh,label
0 610 y
AxesVisible,ScaleVisible,Svaluevisible,ScaleGuidevisible
0 0 0 0 0
NUmber,Base,Linterval,NumbeerR
7 1 1 7
High,Low
5.65883221026156 -5.65883221026156
----------
ScaleS
SquareQ AreaRectify PsMesh AxisWidth FontSize AxisOn letterCenterShowPOsition ShowEquation AxisType PolorNum Areafixed
0 1 0 1 12 0 0 0 0 0 12 0 0 0
----------
Yvalue
1 1
----------
Iinterval
Svalue Evalue sliceNo
1 -1
1 1
40 10
Dfuncno Efuncno AreaQ
1 0 0
----------
Yvalue Function List
6
y1
y2
y3
y4
y5
y6
----------
Panel Position
0 0 0 0 0 62 137 8000 0 0 0 0 1 0 1 0
1
----------
PetaMEMO SECTION
Style, Color, BGcolor , Size, PositionX, positionY
3 16711680 0 12 0 0 0

106
<Red><B>ﾘｰｽのﾊﾟﾗﾒｰﾀ</B></Red>
1/ﾘｰｽ密度　3≦ n ≦8
頂点　　　　6≦ s ≦30
拡大　　 　0.1≦ d ≦2
#HideScript
#on a,b,m,t change

#//リースを描く
#ClrAImg
#for k:=1 to s
#    draw
#next k

#//赤鼻のトナカイ
#SetSampleRate(11025)
#playAfter(x,0,t,f(g(3/2 mx)))
#playAfter(x,0,t*2,f(g(5/3 mx)))
#playAfter(x,0,t,f(g(3/2 mx)))
#playAfter(x,0,t*2,f(g(5/4 mx)))
#playAfter(x,0,t*2,f(g(2mx)))
#playAfter(x,0,t*2,f(g(5/3 mx)))
#playAfter(x,0,t*4,f(g(3/2 mx)))
#playAfter(x,0,t*2,f(g(0 mx)))
#playAfter(x,0,t,f(g(3/2 mx)))
#playAfter(x,0,t,f(g(5/3 mx)))
#playAfter(x,0,t,f(g(3/2 mx)))
#playAfter(x,0,t,f(g(5/3 mx)))
#playAfter(x,0,t*2,f(g(3/2 mx)))
#playAfter(x,0,t*2,f(g(2mx)))
#playAfter(x,0,t*4,f(g(15/8 mx)))
#playAfter(x,0,t*4,f(g(0 mx)))
#playAfter(x,0,t,f(g(4/3 mx)))
#playAfter(x,0,t*2,f(g(3/2 mx)))
#playAfter(x,0,t,f(g(4/3 mx)))
#playAfter(x,0,t*2,f(g(9/8 mx)))
#playAfter(x,0,t*2,f(g(15/8 mx)))
#playAfter(x,0,t*2,f(g(5/3 mx)))
#playAfter(x,0,t*3,f(g(3/2 mx)))
#playAfter(x,0,t*3,f(g(0 mx)))
#playAfter(x,0,t,f(g(3/2 mx)))
#playAfter(x,0,t,f(g(5/3 mx)))
#playAfter(x,0,t,f(g(3/2 mx)))
#playAfter(x,0,t,f(g(5/3 mx)))
#playAfter(x,0,t*2,f(g(3/2 mx)))
#playAfter(x,0,t*2,f(g(18/8 mx)))
#playAfter(x,0,t*4,f(g(2mx)))
#playAfter(x,0,t*2,f(g(5/3 mx)))
#playAfter(x,0,t*2,f(g(5/3 mx)))
#playAfter(x,0,t*2,f(g(2mx)))
#playAfter(x,0,t*2,f(g(5/3 mx)))
#playAfter(x,0,t*2,f(g(3/2 mx)))
#playAfter(x,0,t,f(g(5/4 mx)))
#playAfter(x,0,t*2,f(g(3/2 mx)))
#playAfter(x,0,t*2,f(g(0 mx)))
#playAfter(x,0,t*2,f(g(4/3 mx)))
#playAfter(x,0,t*2,f(g(5/3 mx)))
#playAfter(x,0,t*2,f(g(3/2 mx)))
#playAfter(x,0,t*2,f(g(4/3 mx)))
#playAfter(x,0,t*3,f(g(5/4 mx)))
#playAfter(x,0,t*2,f(g(9/8 mx)))
#playAfter(x,0,t*2,f(g(5/4 mx)))
#playAfter(x,0,t*2,f(g(3/2 mx)))
#playAfter(x,0,t*2,f(g(5/3 mx)))
#playAfter(x,0,t*2,f(g(15/8 mx)))
#playAfter(x,0,t*2,f(g(15/8 mx)))
#playAfter(x,0,t*2,f(g(15/8 mx)))
#playAfter(x,0,t*2,f(g(0 mx)))
#playAfter(x,0,t*2,f(g(2mx)))
#playAfter(x,0,t*2,f(g(2 mx)))
#playAfter(x,0,t*2,f(g(15/8 mx)))
#playAfter(x,0,t*2,f(g(5/3 mx)))
#playAfter(x,0,t*2,f(g(3/2 mx)))
#playAfter(x,0,t,f(g(4/3 mx)))
#playAfter(x,0,t*3,f(g(9/8 mx)))
#playAfter(x,0,t,f(g(3/2 mx)))
#playAfter(x,0,t*2,f(g(5/3 mx)))
#playAfter(x,0,t,f(g(3/2 mx)))
#playAfter(x,0,t*2,f(g(5/4 mx)))
#playAfter(x,0,t*2,f(g(2mx)))
#playAfter(x,0,t*2,f(g(5/3 mx)))
#playAfter(x,0,t*4,f(g(3/2 mx)))
#playAfter(x,0,t*2,f(g(0 mx)))
#playAfter(x,0,t,f(g(3/2 mx)))
#playAfter(x,0,t,f(g(5/3 mx)))
#playAfter(x,0,t,f(g(3/2 mx)))
#playAfter(x,0,t,f(g(5/3 mx)))
#playAfter(x,0,t*2,f(g(3/2 mx)))
#playAfter(x,0,t*2,f(g(2mx)))
#playAfter(x,0,t*4,f(g(15/8 mx)))
#playAfter(x,0,t*4,f(g(0 mx)))
#playAfter(x,0,t,f(g(4/3 mx)))
#playAfter(x,0,t*2,f(g(3/2 mx)))
#playAfter(x,0,t,f(g(4/3 mx)))
#playAfter(x,0,t*2,f(g(9/8 mx)))
#playAfter(x,0,t*2,f(g(15/8 mx)))
#playAfter(x,0,t*2,f(g(5/3 mx)))
#playAfter(x,0,t*4,f(g(3/2 mx)))
#playAfter(x,0,t*2,f(g(0 mx)))
#playAfter(x,0,t,f(g(3/2 mx)))
#playAfter(x,0,t,f(g(5/3 mx)))
#playAfter(x,0,t,f(g(3/2 mx)))
#playAfter(x,0,t,f(g(5/3 mx)))
#playAfter(x,0,t*2,f(g(3/2 mx)))
#playAfter(x,0,t*2,f(g(2*9/8 mx)))
#playAfter(x,0,t*4,f(g(2mx)))
#play;
----------
11
424 10 0
4 24 0
4 24 0
4 24 0
4 24 0
4 24 0
4 24 0
4 24 0
4 24 0
4 24 0
4 24 0
----------
Table SECTION
RowNo, ColumnNo
0 10 200
Table Data


60 60 60 60 60 60 60 60 60 60
----------
SimpleMemo SECTION
23
1. Play（パラメータ，開始秒，終了秒，波形関数）
量子化16 ビット，サンプリングレート22050Hz（変更可能），ステレオの音を出す．
􀂃 例 ： 振動数440Hz の正弦波を２秒間鳴らすのなら，
Play( t , 0 , 2 , sin880Pit ) （補足：左記の"Pit"はπ と ｔ の積です）
􀂃 例 ： 左チャンネルから440Hz，右チャンネルから441Hz の音を出すのなら，
Play( t , 0 , 2 , (sin880Pit , sin882Pit)) （補足：ステレオ出力時にはベクト
ルデータを与えます）
􀂃 パラメータは，“t” 以外のパラメータや変数“x”でも構いません．
􀂃 最大，480,000÷サンプリングレート（秒）まで可能です．
􀂃 演奏が開始されるのは，すべてのデータの計算終了後です．演算速度の遅いマシンで
は，演奏開始までに時間がかかることがあります．

5. SetSampleRate(サンプリングレート)
サンプリングレートを変更する．
􀂃 例 ： 48,000Hz に設定するには
SetSampleRate(48000)

   　◆  残像の基本概念　◆（メルマガ７「残像」による）
　残像は，グラフが動くときに，以前に描かれていたグラフを残すようにしたものです。
陽関数，陰関数，基本図形，曲線，連結図形のすべてについて，残像を残すことができます。
ただし，図形の内部のペイントやハッチングは残像の対象にはなりません。
残像の対象となるのは１次元図形だけです。
　なお，基本図形の点のところで設定する［軌跡］も残像の一種です。
----------