
load dbngraphics.dbn
size 350 350
paper 0 0 20
repeat A 0 350
{
pen 30 24 A
line 0 A 350 A
}
Repeat A 350 0
{
pen 255 255 0 Line (5+A/10) 0 (0+A*60) 350
}
Repeat A 350 0
{
pen 255 69 0 Line (0+A/10) 0 (0+A*20) 325
}
Repeat A 350 0
{
pen 100 0 0 Line (1+A/5) 0 (0+A*10) 280
}
沒有留言:
張貼留言