作業九

像是絢麗的花火不斷噴射散落，不同顏色的變化有著不同的驚奇。


size 400 400
forever
{
paper 100
pen 100 10
set B 80
repeat A 0 100
{
same? A B
{
line 10 A A B
line 10 (A*2) (A*2) (B*2)
line 20 (A*4) (A*4) (B*4)
line 30 (A*6) (A*6) (B*6)
line 40 (A*8) (A*8) (B*8)
line 50 (A*10) (A*10) (B*10)
line 60 (A*12) (A*12) (B*12)
line 70 (A*14) (A*14) (B*14)
line 80 (A*16) (A*16) (B*16)
line 90 (A*18) (A*18) (B*18)
line 100 (A*20) (A*20) (B*20)
line 110 (A*22) (A*22) (B*22)
}
notsame? A B
{
line 0 (A*2) (A*2) (B*2)
line 20 (A*3) (A*3) (B*3)
line 40 (A*4) (A*4) (B*4)
line 60 (A*5) (A*5) (B*5)
line 80 (A*6) (A*6) (B*6)
line 100 (A*7) (A*7) (B*7)
line 120 (A*8) (A*8) (B*8)
line 140 (A*9) (A*9) (B*9)
line 160 (A*10) (A*10) (B*10)
line 180 (A*11) (A*11) (B*11)
line 200 (A*12) (A*12) (B*12)
line 220 (A*13) (A*13) (B*13)
line 240 (A*14) (A*14) (B*14)
line 260 (A*15) (A*15) (B*15)
line 280 (A*16) (A*16) (B*16)
line 300 (A*17) (A*17) (B*17)
line 320 (A*18) (A*18) (B*18)
line 340 (A*19) (A*19) (B*19)
line 360 (A*20) (A*20) (B*20)
line 380 (A*21) (A*21) (B*21)
line 400 (A*22) (A*22) (B*22)
}
}
}