作業十: 應用 Key 整合判斷結構式 配合其它的指令--> 創作具有主題性的動態海報設計

心電圖








load dbnletters.dbn

size 200 200
fast
paper 100

//設計一個檢查按下哪一個按鍵的功能
number keycheck
{
set keyvalue 0
repeat a 1 26
{
same? 100
{
set keyvalue a
}
}
value (keyvalue)
}

set k 0
forever
{

//設定字母顏色
pen (/2) (/2)

//依據所按的字母來畫圖
set k

letter k ((/12)*12+2) ((/12)*12+2)

notsmaller? k 26
{
set k 0
}
}

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

展開光譜








size 300 300
forever
{
paper 0 0 7
pen 90 10
set B 50
repeat A 0 100
{
same? A B
{
line A 0 A B
line (B*2) 0 (B*2) (A*2)
line (B*3) 0 (B*3) (A*3)
line (B*4) 0 (B*4) (A*4)
line (B*5) 0 (B*5) (A*5)
line (B*6) 0 (B*6) (A*6)


}
notsame? A B
{
line (A*1) 4 (B*1) (A*1)
line (A*2) 2 (B*2) (A*2)
line (A*3) 3 (B*3) (A*3)

line (A*6) 280 (B*6) (A*6)
line (A*7) 180 (B*7) (A*7)
line (A*8) 80 (B*8) (A*8)
line (A*9) 8(B*9) (A*9)
line (A*10) 0(B*10) (A*10)


}
}
}

作業八: 個人心得300字

前田約翰(John Maeda)
世界知名的圖像設計師、視覺藝術家、電腦科技專家，也是麻省理工學院（MIT）
媒體實驗室的教授。

也是科技與藝術的混合體。取得博士學位後，他回到麻省理工學院任教，指導「美學與電腦小組」，造就許多科技界與設計界的成功人士。現在電腦網頁上經常出現的FLASH動畫技術，
也是他的一項重要貢獻。

從此他以提倡「簡單」、平衡「複雜」為己任，帶頭成立一個「MIT簡單聯盟」

他的作品帶給人簡單明瞭~~
讓人好操作，容易上手~~
也是我們現在所學的軟體開發人~~
在動畫方面他也有參與一部分~~

作業七: 應用 Mouse-1-2-3 配合Time 4 地底隧道

size 400 400
paper 100
fast

command rect x y w h c
{
pen 60 70
line (x-w/3) (y-h/3) (x+w/3) (y-h/3)
line (x+w/2) (y-h/2) (x+w/2) (y+h/2)
line (x+w/2) (y+h/2) (x-w/2) (y+h/2)
line (x-w/2) (y+h/2) (x-w/2) (y-h/2)
}
forever
{
rect 50 20
}

作業六: 應用 Mouse-paint-->「自畫像」&「自由創作」 各一幅

作業五 TIME

size 200 200


paper 10


repeat x 0 200
{
pen 10 10
line 100 100 x 200
}

repeat x 0 200
{
pen 10 10
line 100 100 x 0
}
repeat x 0 200
{
pen 50 10
line 200 100 x 200
}repeat x 0 200
{
pen 50 10
line 200 100 x 0
}repeat x 0 200
{
pen 50 10
line 0 100 x 200
}repeat x 0 200
{
pen 50 10
line 0 100 x 0
}

11/5期中考

}


Load dbngraphics.dbn

size 350 300

paper 255 228 181

fast



set M 50




Repeat C 100 275//直角
{
pen 10 45 55

triangle (M*3+75) C (M*3) (M*2) (M*3) (M*2)

}

repeat A 285 275//左上長方形
{
line 15 A 75 A
}


pen 10 20 35//右中長方形

repeat A 150 190
{
line 225 A 290 A
}

repeat A 140 130 //右下長方形
{
line 225 A 325 A
}


pen 100 50 0//右下大倒三角
Repeat A 175 300
{
line A 75 240 25
}
pen 80 80 0
Repeat A 255 300//右邊倒小三角
{
line A 120 280 85
}

pen 0 0 0//中間三個三角形
Repeat A 100 135
{
line A 25 115 75
}

Repeat A 85 145
{
line A 75 115 125
}

Repeat A 75 150
{
line A 125 115 180
}


pen 60 0 0//左邊三角
Repeat A 25 75
{
line A 20 50 175
}


Repeat A 15 85//左邊倒三角
{
line A 250 50 175
}

pen 50 0 0//中間矩形

Repeat A 225 250
{
line 150 A 175 A
}


pen 255 194 14//三角
Repeat A 255 225
{
line A 125 225 115
}


pen 0 0 0//三角
Repeat A 245 225
{
line A 115 225 100
}

Repeat A 0 90//圓
{
circle 50 175 (A/2) 80
}


Repeat A 0 40
{
circle 50 175 (A/2) 80
}

作業四 command square 結構綜合設計

size 150 150
paper 100 100 20
command square x y s c
{
pen c
line x y s (s+s)


}
repeat A 1 20
{
repeat B 0 20
{
square (A*10+3) (B*10+5) 2 (A+B*10)
}
}

作業三 ：三原型

load dbngraphics.dbn
paper 100 20 20
size 300 300
fast

circle 150 150 190 15
circle 150 150 170 15
circle 150 150 150 15
circle 150 150 130 15
circle 150 150 110 15
circle 150 150 90 15
circle 150 150 70 15
circle 150 150 50 15
circle 150 150 30 15
circle 150 150 10 15


circle 0 150 149 0
circle 0 150 145 0
circle 0 150 140 0
circle 0 150 135 0
circle 0 150 130 0



circle 300 150 149 0
circle 300 150 145 0
circle 300 150 140 0
circle 300 150 135 0
circle 300 150 130 0

作業二 延伸

程式碼
size 300 300
paper 0
fast

Repeat A 0 100
{
pen 255 20 147
line 0 (A*3) 5 (A*3)

pen 25
line 27 (A*3) 50 (A*3)

pen 2 2 200
line 27 (A*3) 32 (A*3)

pen 35
line 0 (A*3) 300 (A*3)
pen 2 2 200
line 50 (A*3) 250 (A*3)

pen 45
line 0 (A*6) 300 (A*6)
pen 2 2 2
line 0 (A*6) 300 (A*6)
}

Repeat A 0 300
{
pen 0 50 0
Line 300 (A*6) (A*6) 0

pen 60 5 5
Line 150 (A*6) (A*6) 0

pen 60 5 5
Line 0 (A*6) (A*6) 300

pen 0 50 0
Line 0 (A*6) (A*6) 150
}

中文名字設計

size 500 500
paper 100

pen 0
line 175 450 175 25
line 105 450 75 400
line 89 425 250 425
line 89 400 250 400
line 175 325 120 250
line 175 305 215 250
line 225 325 320 325
line 235 300 235 215
line 235 300 315 300
line 315 300 315 215
line 235 215 315 215
line 235 258 315 258
line 225 199 325 199
line 175 25 200 50
line 215 130 215 50
line 305 175 355 145
line 385 125 255 125
line 325 163 325 25
line 325 100 265 50
line 325 100 385 50