
load dbngraphics.dbn
paper 100
size 300 300
fast
//頭冠上的徽章
Repeat D 0 30
{ pen 90 80 2
triangle (135+D) 185 150 165 150 275}
//頭冠
repeat B 0 10
{ pen 90 80 30 line (90) (235+B) (150) (160+B)
pen 90 80 30 line (150) (160+B) (210) (235+B)
}
//頭冠repeat A 0 10
{ pen 90 70 10 line (40) (240+A) (100) (150+A)
pen 90 70 10 line (100) (150+A) (150) (195+A)
pen 90 70 10 line (150) (195+A) (200) (150+A)
pen 90 70 10 line (200) (150+A) (260) (240+A)
}
//頭冠
repeat B 0 10
{ pen 90 80 30 line (80) (215+B) (150) (140+B)
pen 90 80 30 line (150) (140+B) (220) (215+B)
}
//眼睛
Repeat C 0 65
{ pen 0 triangle 50 120 (115-C) 120 50 145
pen 0 triangle 240 120 (240-C) 120 240 145
}
//鼻子
Repeat D 0 40
{ pen 40 0 0
triangle (130+D) 65 150 45 150 125}
//嘴巴
repeat E 0 10
{ pen 95 90 5 line (120) (20+E) (180) (20+E)
}
//臉紋
repeat F 0 10
{ pen 90 70 10 line (40) (90+F) (80) (50+F)
pen 90 70 10 line (40) (70+F) (80) (30+F)
pen 90 70 10 line (220) (50+F) (260) (90+F)
pen 90 70 10 line (220) (30+F) (260) (70+F)
}
沒有留言:
張貼留言