load dbngraphics.dbn
size 400 300
paper 75 85 85
FAST
//黃矩
repeat a 0 10
{
pen 90 75 30
line 380 (275+a) 325 (275+a)
}
//紅方
repeat a 0 22
{
pen 60 0 30
line (160+a) (220+(a/2)) (150+a) (240+(a/2))
}
//黑三樹
repeat a 0 25
{
pen 100
triangle (200+a) 110 (250-a) 110 225 150
}
repeat b 0 20
{
triangle (210+b) 73 (240-b) 73 225 110
triangle (215+b) 30 (235-b) 30 225 73
}
//右倒三
repeat a 0 60
{
pen 60 (50-a) (a/2)
triangle (250+a) 240 (360-a) 240 305 150
}
//右等三
repeat a 0 30
{
pen 60 (40-a) 10
triangle (275+a) 20 (335-a) 20 305 150
}
//瞳孔
repeat a 0 25
{
circle 305 150 a 100
}
//虹膜
repeat a 25 60
{
circle 305 150 a a
}
//黑外框
repeat a 60 63
{
circle 305 150 a 80
}
//左上彎彎
repeat a 0 5
{
circle 100 (275+a) 35 50
circle 80 (275+a) 55 80
}
//擋
repeat a 0 50
{
pen 75 85 85
line 15 (275+a) 145 (260+a)
triangle 100 280 (150-a) 280 100 200
}
//紅三
repeat a 0 63
{
pen 60 0 30
line (40+a) 180 40 150
}
//綠三
repeat a 0 30
{
pen 65 80 (a/2)
line 40 150 99 (150+a)
}
//大紅直三
repeat a 0 95
{
pen (50+a) (a/2) (a-10)
triangle 100 283 (195-a) 102 100 102
}
//橘倒三
repeat a 0 70
{
pen (80+(a/4)) 35 20
triangle (25+a) 95 95 25 (165-a) 95
}
//下彎
repeat a 0 10
{
circle 95 (-10+a) 60 80
}
//擋
repeat a 10 0
{
pen 75 85 85
line 30 (a) 165 (a)
}
//紅小三
repeat a 0 7
{
pen 80 10 20
triangle 85 110 100 (110-a) 100 102
}
//黃小三
repeat a 0 12
{
pen 90 75 30
triangle 80 125 99 (124-a) 99 112
}
//小灰條
repeat a 0 8
{
pen 15
line 20 (132+a) 99 (132+a)
}
//小黑倒三
repeat a 0 15
{
pen 90
triangle (40+a) 124 (70-a) 124 55 95
}
