2008-10-21（課堂練習）

size 500 200
paper 0
fast
Repeat A 0 350
{
pen 20 70 20
Line 0 (A*08) (A*08) 0
pen 90 70 50
Line 0 (A*08) (A*08) 0
}
Repeat B 0 500
{
pen 80 50 90
Line 400 0 (B*8) (B*8)
}
Repeat B 0 500
{
pen 50 50 90
Line 500 0 (B*8) (B*8)
}
Repeat B 500 0
{
pen 80 50 90
Line 500 0 (B*8) (B*8)
}
Repeat B 300 0
{
pen 50 50 90
Line 500 0 (B*8) (B*8)
}
Repeat B 300 0
{
pen 60 50 40
Line 300 0 (B*8) (B*8)
}
Repeat B 300 0
{
pen 10 50 40
Line 200 0 (B*8) (B*8)
}
Repeat B 300 0
{
pen 20 80 10
Line 100 0 (B*8) (B*8)
}