作業二:飛

size 200 200paper 0 0 0
repeat a 10 50

{pen (a*2) (a-50) 10

line 0 0 100 (a+10)}

repeat a 10 50

{pen (a*2) (a-50) 10line 100 (a+10) 200 0}

repeat a 10 40

{pen (a*3) 50 10line 0 100 100 (100-a)}

repeat a 10 40

{pen (a*3) 70 10line 100 (100-a) 200 100}

repeat a 10 25

{pen 70 (1*a) 42line 0 100 100 (100+a)}

repeat a 10 25

{pen 70 (1*a) 42line 100 (100+a) 200 100}

repeat a 10 25

{pen (a*2) (a-50) 10line 0 150 100 (150-a)}

repeat a 10 25

{pen (a*2) (a-50) 10line 100 (150-a) 200 150}

repeat a 10 60

{pen 100 200 (a*2)line 0 200 100 (200-a) }

repeat a 10 60{pen 100 200 (a*2)line 100 (200-a) 200 200}