作業四:彩色毛玻璃

太陽好大 毛玻璃折射很刺眼....

size 220 220
paper 0

fast

command rect L B R T

{
pen (t) (20+t) (10*t)
repeat F 0 10
{
line ((20*f)+(l)) (b+t-(l)) ((20*f)+(l)) ((b*t)-l)
line (b+t-(l)) ((20*f)+(l)) ((b*t)-l) ((20*f)+(l))
}
}

repeat c 0 10
{
repeat a 0 20
{
repeat b 0 60
{

rect a (b*2) (c*10) (b*2)

}
}
}


反差色