要點第二次才會跑出來 >.<
所以錄的畫面時間會有點久...
程式碼：
Load dbngraphics.dbn
paper 20 80 80
size 300 230fast
Repeat E 0 6
{
pen 160 200 10
line 250 (200+E) 285 (200+E)
}
Repeat A 175 125
{
pen 10 20 35
triangle 200 175 235 A 275 175
}
Repeat A 25 125
{
pen 30 0 20
triangle 210 25 235 A 260 25
}
Repeat A 40 75
{
pen 100triangle 175 40 185 A 195 40
}
Repeat A 75 100
{
pen 100
triangle 173 75 185 A 195 75
}
Repeat A 100 125
{
pen 100
triangle 170 100 185 A 200 100
}
Repeat A 90 210
{
pen 150 10 10
triangle 150 90 75 A 75 90
}
Repeat A 85 35
{
pen 90 50 10
triangle 25 85 75 A 125 85
}
Repeat A 90 100
{
pen 200 10 20
triangle 60 100 75 A 75 100
}
Repeat A 100 115
{
pen 90 80 10
triangle 55 115 75 A 75 115
}
Repeat A 110 90
{
pen 100
triangle 20 110 30 A 45 110
}
repeat W 0 6
{
pen 0 line 25 (120+W) 75 (120+W)
}
Repeat A 130 150
{
pen 10 30 20
triangle 30 130 75 A 75 130
}
Repeat A 150 130
{
pen 180 10 10
triangle 30 130 30 A 75 150
}
Repeat A 175 150
{
pen 180 10 10
triangle 125 150 125 A 150 150
}
Repeat A 175 150
{
pen 180 10 10
triangle 125 175 150 A 150 150
}
circle 235 125 35 35
circle 235 125 34 34
circle 235 125 33 33
circle 235 125 15 15
circle 235 125 14 14
circle 235 125 13 13
circle 235 125 12 12
circle 235 125 11 11
circle 235 125 10 10
circle 235 125 9 9
circle 235 125 8 8
circle 235 125 7 7
circle 235 125 6 6
circle 235 125 5 5
circle 235 125 4 4
circle 235 125 3 3
circle 235 125 2 2
circle 235 125 1 1
set t 45
circle 75 25 (t-1) 30
circle 75 25 (t-2) 30
circle 75 25 (t-3) 30
circle 75 25 (t-4) 30
circle 75 25 (t-5) 30
circle 75 25 (t-6) 30
circle 75 25 (t-7) 30
circle 75 25 (t-8) 30
沒有留言:
張貼留言