Grapes/win 2.8
[Don't Edit] 3.14
----------
BGstretchOn BGfile
0 
----------
UserFunction
0
----------
y = f(x)
0
----------
0 = f(x,y)
0
----------
Point
22 2 3 6 0 0 0 0 5 0 1 0 0 0 0 0 0 0 0 0 0 0 4 1 1 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
P
1 0 2
P
(roll(2Pi(k+a)/n)).x
(roll(2Pi(k+a)/n)).y
0


t 0.1
0 0
16777215 16711680 16777215 1 0 0 1 1 0 0
4 0 1 0
Q
1 0 2
Q
(roll(2Pi(k)/n)).x
(roll(2Pi(k)/n)).y
0


t 0.1
0 0
16777215 16711680 16777215 1 0 0 1 1 0 0
4 0 1 0
R
4 0 1
R
m

0


t 0.1
0 0
16777215 16711680 16777215 1 0 0 3 1 0 0
4 0 3 0
S
0 0 1
T
0 0 1
U
0 0 1
V
0 0 1
A
7 0 2
A
(roll(2Pik/n)).x
(roll(2Pik/n)).y
0
0
n
k 1
0 0
0 8421504 16777215 1 0 0 1 1 0 0
2 0 1 0
B
0 0 1
C
2 0 2
C
0
0
1


t 0.1
0 0
16777215 8421504 16777215 0 0 0 2 1 0 0
2 0 1 0
D
0 0 1
E
0 0 1
F
0 0 1
G
0 0 1
H
0 0 1
I
0 0 1
J
0 0 1
K
0 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 1 0
----------
Segments
1
1 1 1 3145983 16777215 1 1 1 0 0
0 
2 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
----------
paramater
14
1 0
1 1 1 0 1
11 0
1 1 1 1 0
1 0
1 1 1 1 0
1 0
1 1 1 1 0
11 0
1 1 1 1 4
64 0
1 1 1 1 2
1 0
1 1 1 1 0
1 0
1 1 1 1 0
1 0
1 1 1 1 0
1 0
1 1 1 1 0
1 0
1 1 1 1 0
1 0
1 1 1 1 0
1 0
1 1 1 1 0
1 0
1 1 1 0 3
1 1 0
----------
KakuMode ScanWidth LogMode ThetaMode AreaMode capStyle
1 2 2 2 1 0 1 1 0 1 0 32 0
DrawMode SegmentShowSync
1 1
AfterImageColorNo, CanAImg,MaxAimgN0
0 1 3001
circleMode
1
----------
ScaleX
Vlow,VHigh,label
0 959 x
x
AxesVisible,ScaleVisible,Svaluevisible,AddDegreeLetter,ScaleGuidevisible
0 0 1 0 1
NUmber,Base,Linterval,numberR
1 1 1 1.12418300653595
High,Low
1.20643383549542 -1.19106616450458
----------
ScaleY
Vlow,VHigh,label
0 914 y
AxesVisible,ScaleVisible,Svaluevisible,ScaleGuidevisible
0 0 1 1 0
NUmber,Base,Linterval,NumbeerR
1 1 1 1.01026694045175
High,Low
1.1818664423374 -1.1031335576626
----------
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
0 
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 52 112 85 0 0 0 0 1 0 1 0
1
----------
PetaMEMO SECTION
Style, Color, BGcolor , Size, PositionX, positionY
3 0 2 14 0 0 0

70
{n}と{m}に値を入力


{n=}!{n}角形の頂点に
素数刻みで離れた
頂点に色糸を張る
{m=}!{m}番目の素数=!{Cells(m,1)}
まで使用する


!{n}角形の頂点の、
!{a}個離れた点を結ぶ弦
#hidescript//SetColor
#SetColor(L1,hsl(2a/n,1,0.5))

#hidescript//SetMono
#SetColor(L1,rgb(0,0,0))

#Hidescript//模様を描く
#calc
#for k:=1 to n
#Calc
#next
#draw

#Hidescript//模様を順次描く
#calc
#for k:=1 to n
#Draw
#next
#draw

#//初期化
#a:=1
#k:=1
#draw
#ClrAImg
#Refresh

#//急速描画
#Call(初期化)
#for b:=1 to m
#  a:=Cells(b,1)
#  Call(SetColor)
#  Call(模様を描く)
#Next

#//順次描画
#Call(初期化)
#for b:=1 to m
#  a:=Cells(b,1)
#  Call(SetColor)
#  Call(模様を順次描く)
#Next

#//急速描画（Mono）
#Call(初期化)
#for b:=1 to m
#  a:=Cells(b,1)
#  Call(SetMono)
#  Call(模様を描く)
#Next

#//順次描画（Mono）
#Call(初期化)
#for b:=1 to m
#  a:=Cells(b,1)
#  Call(SetMono)
#  Call(模様を順次描く)
#Next


----------
11
4 27 1
4 67 1
4 219 1
7 62 1
7 62 1
7 62 1
7 62 1
7 62 1
7 49 0
7 49 0
4 24 0
----------
Table SECTION
RowNo, ColumnNo
100 10 200
Table Data
1
data	2	2								
2
data	3	4								
3
data	5	6								
4
data	7	8								
5
data	11	10								
6
data	13	12								
7
data	17	14								
8
data	19	16								
9
data	23	18								
10
data	29	20								
11
data	31	22								
12
data	37	24								
13
data	41	26								
14
data	43									
15
data	47									
16
data	53									
17
data	59									
18
data	61									
19
data	67									
20
data	71									
21
data	73									
22
data	79									
23
data	83									
24
data	97									
25
data	101									
26
data	103									
27
data	107									
28
data	109									
29
data	113									
30
data	127									
31
data	131									
32
data	137									
33
data	137									
34
data	139									
35
data	149									
36
data	157									
37
data	163									
38
data	167									
39
data	167									
40
data	173									
41
data	179									
42
data	181									
43
data	191									
44
data	193									
45
data	197									
46
data	199									
47
data	211									
48
data	223									
49
data	227									
50
data	229									
51
data	233									
52
data	239									
53
data	241									
54
data	251									
55
data	257									
56
data	263									
57
data	269									
58
data	271									
59
data	277									
60
data	281									
61
data	283									
62
data	293									
63
data	307									
64
data	311									
65
data	313									
66
data	317									
67
data	331									
68
data	337									
69
data	347									
70
data	349									
71
data	353									
72
data	359									
73
data	367									
74
data	373									
75
data	379									
76
data	383									
77
data	389									
78
data	397									
79
data	401									
80
data	409									
81
data	419									
82
data	421									
83
data	431									
84
data	433									
85
data	439									
86
data	443									
87
data	449									
88
data	457									
89
data	461									
90
data	463									
91
data	467									
92
data	479									
93
data	487									
94
data	491									
95
data	499									
96
data	503									
97
data	509									
98
data	521									
99
data	523									
100
data	541									


60 60 60 60 60 60 60 60 60 60
----------
SimpleMemo SECTION
0
----------