[Sin]期末→憂鬱的城市

照慣例的連點2~4、5、6次即可全選...

size 200 100
paper <time 4>

repeat aa 0 100
{
pen (aa-30)
line 0 aa 200 aa
}

forever
{
same? <mouse 3> 100
{
set s <mouse 1>
set g (<time 4>%5)
set c <mouse 2>
repeat a 0 0
{
repeat b 0 s
{
pen <time 4>
line (b-(a*10)) (<mouse 2>) (b-(a*10)) (<mouse 2>+20)
line (b-(a*10)-20) (<mouse 2>+20) (b-(a*10)-20) (<mouse 2>+40)
line (b-(a*10)-20) (<mouse 2>-20) (b-(a*10)-20) (<mouse 2>)

line (200-(b+(a*10))) (<mouse 2>) (200-(b-(a*10))) (<mouse 2>+20)
line (220-(b+(a*10))) (<mouse 2>-40) (220-(b-(a*10))) (<mouse 2>-60)
line (220-(b+(a*10))) (<mouse 2>-20) (220-(b-(a*10))) (<mouse 2>)

}
}
}

}