2009年12月17日 星期四

作業九: 應用 判斷 same? notsame? 結構式 配合其它的指令創作

主題:錯視

圖:



影片:



程式碼:
size 200 200
Paper 0

Pen 100
repeat A 200 0
{
Same? A 25
{
line 25 A A A
}
Notsame? A 110
{
line A A A 90
line A A A 110
}
}

Pen 50
repeat A 0 200
{
Same? A 25
{
line 20 A A A
}
Notsame? A 110
{
line A A A 90
line A A A 110
}
}
pen 0
line 90 90 90 125

沒有留言:

張貼留言