[Sin]心得

　　「Body movies」是我印象較深的一個作品，利用媒體藝術達到人際間交流，讓彼此不相識的人產生關聯，這比起現今網路上推廣的交友朋台來的直接又有趣又直接。其實在顏明宏老師的「科技藝術」這門課，我們也有看到類似的作品，那是利用媒體科技將車站樓梯變成一個個的鋼琴鍵盤，使得人們開始喜歡走樓梯，也變成一群人會在那邊玩著。
　　近幾次去新一代參觀，其實大部分台灣的互動媒體還是僵持在一對一，或是一對「少數的」多，作品製作起來的規模不算很大；總覺得台灣是一個很適合將互動科技以及藝術融入生活當中的地方，但實際面看起來，即便是一個很成功有趣的作品，其實很多人也都會有種害羞、不好意思去接觸、玩弄的感覺，說起來我們年輕一代的人也很矛盾呢，感覺上喜歡嘗鮮，卻又對於互動媒體沒什麼興趣感覺…對於這一點，其實還挺可惜的。

[Sin]Work07-「虛實間的扭曲空間」

先把作好的放上來...
因為它是用滑鼠去製作出來的
所以規律性上比較人性一點?
便還是使用以往的交錯式來製作

噩夢

size 400 400
paper 30 30 80
fast
command rect x y w h c
{
pen h h c
line x y (x+w) (y+w)
line x y (x-w) (y+w)
line x y (x+w) (y-w)
line x y (x-w) (y-w)

}

forever
{
rect <mouse 1> <mouse 2> (60-(<time 3>)) 30 (30+<time 4>)
}

思考

size 400 400
paper 100 80 20
fast
command rect x y w h c
{
pen (90+(c/3)) (45+(c/3)) (h-10)
line x y (x+w) (y+w)
line x y (x-w) (y+w)
line x y (x+w) (y-w)
line x y (x-w) (y-w)

}

forever
{
rect <mouse 1> <mouse 2> (60-(<time 3>)) 30 (<time 4>)
}

相框

size 400 400
paper 100 80 80
fast
command rect x y w h c
{
pen (c) (h) (h)
line x y (x+w) (y+w)
line x y (x-w) (y+w)
line x y (x+w) (y-w)
line x y (x-w) (y-w)

}

forever
{
rect <mouse 1> <mouse 2> (60-(<time 4>)) 30 (<time 4>)
}

俯視建築中的鋼架

size 400 400
paper 0
fast
command rect x y w h c
{
pen (100-(c)) (100-(c)) (100-(c/2))
rectangle (x-w) (y-w) (x+w) (y+w)

}

forever
{
rect <mouse 1> <mouse 2> (30-(<time 4>)+10) 30 (<time 4>)
}

無方向性

size 400 400
paper 100 80 20
fast
command rect x y w h c
{
pen (90+(c/3)) (45+(c/3)) (h-10)
line (x-w+10) y x (y+w)
line x (y+w) (x+w-10) (y)
line (x-w+10) y (x-w-10) (y)
line (x-w-10) y (x-w+10) (y-10)
line (x+w-10) y (x+w+10) (y)
line (x+w+10) y (x+w-10) (y-10)
line (x-w+10) (y-10) (x-w) (y-33)
line (x-w) (y-33) x (y-22)
line (x+w-10) (y-10) (x+w) (y-33)
line (x+w) (y-33) x (y-22)

}

forever
{
rect <mouse 1> <mouse 2> 20 10 (<time 4>)
}

[Sin]Mouse-「自畫像」&「熊貓殺人事件?」

這個東西...搞的像是P-BBS線上繪圖留言板似的...
又只能用滑鼠點擊控制黑跟白...
一整個就是詭異...

size 400 400

forever
{
set [<mouse 1> <mouse 2>] <mouse 3>
set [(<mouse 1>+1) (<mouse 2>)] <mouse 3>
set [(<mouse 1>-1) (<mouse 2>)] <mouse 3>
set [(<mouse 1>) (<mouse 2>+1)] <mouse 3>
set [(<mouse 1>) (<mouse 2>-1)] <mouse 3>
set [(<mouse 1>+1) (<mouse 2>+1)] <mouse 3>
set [(<mouse 1>-1) (<mouse 2>-1)] <mouse 3>
set [(<mouse 1>-1) (<mouse 2>+1)] <mouse 3>
set [(<mouse 1>+1) (<mouse 2>-1)] <mouse 3>

}

後來才想到...用graphics來寫的程式還比較短...

load dbngraphics.dbn
size 400 400

command rect x y a b c
{
field x y a b c
}

forever
{
rect (<mouse 1>+1) (<mouse 2>+1) (<mouse 1>-1) (<mouse 2>-1) <mouse 3>

}

老實說............






這個人是誰...這個人是誰...這個人是誰...這個人是誰...

這個人是誰...這個人是誰...這個人是誰...這個人是誰...

這個人是誰...這個人是誰...這個人是誰...這個人是誰...

這個人是誰...這個人是誰...這個人是誰...這個人是誰...


另一張...熊貓吧...XD"

看到室友送的熊貓公仔，就加上不知所云的東西.........

............臨時沒靈感=ˇ="

[Sin]Time-「翻頁」&「映襯」

上次練習過一次之後，這次還是想回歸灰階的感覺
色階雖簡單，但想想100種色階跑出來變化還是很大的=___="

於是想到以前上影音課的時候
范范老師說過很多東西，其實構造都一樣
只是改變一下它的方向以及時間差就可以成為一個豐富的作品

就這樣，上下來個方向以及色階顛倒，加上中間的時間差
看起來就很像一種連鎖反應一般
不過感覺很像書本一直被翻來翻去的XD"

不然看中間那條還蠻像波浪舞的(誤?)
仔細看中間，是否會變大變小呢?

之後因為覺得跑的有點慢...便加上了fast指令
結果又跑出了另一種效果，差異蠻大的
就想說一起放上來分享好了

「翻頁」↓




※礙於Html會將<>內的文字當成標籤語法...
所以就以檔案下載的方式...
無毒請安心食用=..=
程式碼↓
翻頁Doc檔


「映襯」↓







因為有經過排列的關係
以中間為對稱軸，左右兩邊的階調是剛好為顛倒的
程式碼按此↓
映襯Doc檔

[Sin]期中考

照慣例的連擊2~3下可全選(限定IE?)

load dbngraphics.dbn
size 550 400
paper 50 80 80

fast


repeat a 0 40
{
pen 100
triangle (205+a) 150 (275-a) 150 240 210
triangle (215+a) 100 (265-a) 100 240 150
triangle (220+a) 40 (260-a) 40 240 100
}

//yellow
repeat a 0 10
{
pen 100 (60+(a*2)) 10
line 25 (360+a) 80 (360+a)
}

repeat a 0 33
{
pen (100-(a/2)) 0 0
line (315+a) (290-(a/2)) (330+a) (320-(a/2))

}

repeat a 0 15
{
pen 60 0 0
line 420 (135+a) (420+(a*2)) (135+a)
}

repeat a 0 20
{
pen (80+a) (70+a) 0
line 420 (150+a) (420+(a*2)) (150+a)
pen 90 90 100
line 420 (175+(a/2)) 525 (175+(a/2))

}

repeat a 0 36
{
pen 100
line (465+(a/2)) (160-a) (500-(a/2)) (160-a)
}

repeat a 0 7
{
circle 425 365 (a+40) (80)
circle 445 355 (a+60) (80)
}


repeat a 0 30
{
pen 50 80 80
rectangle (370+a) (310+a) (420-a) (400-a)
}

repeat a 0 240
{
pen (100-(a/8))
line 420 (195+(a/5)) (500-(a/3)) (195+(a/5))
pen (100-(a/5)) 0 0
line (420+(a/3)) (243-(a/5)) 500 (243-(a/5))
pen (100-(a/5)) 0 (a/8)
line (300+(a/2)) (135+a) 420 (135+a)
pen (50+(a/4)) (50) (30)
line (440+((a/5)*2)) (45+(a/3)) (440-((a/5)*2)) (45+(a/3))

}

repeat a 0 5
{
pen 30 0 0
triangle (300) 135 420 135 420 (375-a)
pen 60 20 0
triangle 345 125 (540-a) 125 440 45
}

repeat a 0 10
{
circle 445 0 (a+70) (80)
}

repeat a 0 30
{
pen 50 80 80
rectangle (350+a) (0+a) (540-a) (15-a)
}


repeat a 0 70
{
circle 130 200 a (0+(a/3))
}

repeat a 0 180
{
pen (20+(a/4)) 10 (20+(a/18))
line (85+(a/4)) (25+(a)) (170-(a/5)) (25+(a))
}

repeat a 0 15
{
circle 130 200 (a+70) (50+(a*4))
}

repeat a 0 25
{
circle 130 200 (a) (100)
}

repeat a 0 70
{
pen (20+(a/4)) (10+a) (20+(a/18))
triangle (60+a) (310-a) (195-a) (310-a) 130 210
}

[ta]無言的練習

嗯...無言了

盯著中間的黑線看，到底是不是一條平行的線勒?

size 180 100
paper 100
fast

repeat a 0 179
{
pen a 0 0
line a 0 a 100
}

forever
{

set ss
set dd
repeat a 0 10
{
repeat b 0 5
{

pen (ss) (20) (dd)
line ((ss+(a*dd))-20) (0) ((ss+(a*dd))-20) (100)

}
pen 100
line 0 50 200 50
}

}

[Sin]Command - 汽水味覺感

想了很久，很難有畫面出來 便在Google上搜尋了一下「馬賽克」 結果就找到了下面這張

圖片來源：http://www.riton.com.tw/images/pic_253.jpg

就開始使用DBN製作 ...... ...... 嗯...感覺差強人意啦XD"

不過讓我想到之前上課看到的芬達汽水那個作品

還有阮媽色彩學的味覺感官 便取了這個名字

哈，因為挺相像的XDD"

口味依此為

蔓越莓、柳橙、冰淇淋、青蘋果、葡萄

可樂、ZERO、薄荷檸檬(?)、萊姆、藍莓(?)

...內含自創口味?

很多的程式碼囧...
(依照口味順序)

(滑鼠連擊2~3下可全選※限定IE?)

蔓越莓

size 114 390
paper 0

fast


command ss x y z c
{
pen (40+(10*c)) (c) c
line (0+(z)) (x+y-(z)) (5+(z)) (x+y-z)

line (113-z) (x+y-(z)) (108-(z)) (x+y-z)
}

repeat c 0 20
{
repeat a 0 5
{
repeat b 0 33
{

ss a (b*13) (c*6) (b*2)

}
}
}

柳橙

size 114 390
paper 0

fast


command ss x y z c
{
pen (40+(10*c)) (35+c) c
line (0+(z)) (x+y-(z)) (5+(z)) (x+y-z)

line (113-z) (x+y-(z)) (108-(z)) (x+y-z)
}

repeat c 0 20
{
repeat a 0 5
{
repeat b 0 33
{

ss a (b*13) (c*6) (b*2)

}
}
}

冰淇淋

size 114 390
paper 0

fast

command ss x y z c
{
pen (8*((c/2)/3)) (30+c) (50+c)
line (0+(z)) (x+y-(z)) (5+(z)) (x+y-z)

line (113-z) (x+y-(z)) (108-(z)) (x+y-z)
}

repeat c 0 20
{
repeat a 0 5
{
repeat b 0 33
{

ss a (b*13) (c*6) (b*2)

}
}
}

青蘋果

size 114 390
paper 0

fast


command ss x y z c
{
pen (20+c) (30+(5*c)) (20+c)
line (0+(z)) (x+y-(z)) (5+(z)) (x+y-z)

line (113-z) (x+y-(z)) (108-(z)) (x+y-z)
}

repeat c 0 20
{
repeat a 0 5
{
repeat b 0 33
{

ss a (b*13) (c*6) (b*2)

}
}
}

葡萄

size 114 390
paper 0

fast

command ss x y z c
{
pen (2*(c)) (c) (3*c)
line (0+(z)) (x+y-(z)) (5+(z)) (x+y-z)

line (113-z) (x+y-(z)) (108-(z)) (x+y-z)
}

repeat c 0 20
{
repeat a 0 5
{
repeat b 0 33
{

ss a (b*13) (c*6) (b*2)

}
}
}

可樂

size 114 390
paper 0

fast


command ss x y z c
{
pen (5*(c/2)) (3*(c/2)) (3*(c/3))
line (0+(z)) (x+y-(z)) (5+(z)) (x+y-z)

line (113-z) (x+y-(z)) (108-(z)) (x+y-z)
}

repeat c 0 20
{
repeat a 0 5
{
repeat b 0 33
{

ss a (b*13) (c*6) (b*2)

}
}
}

ZERO

size 114 390
paper 0

fast


command ss x y z c
{
pen (140-(c*2))
line (0+(z)) (x+y-(z)) (5+(z)) (x+y-z)

line (113-z) (x+y-(z)) (108-(z)) (x+y-z)
}

repeat c 0 20
{
repeat a 0 5
{
repeat b 0 33
{

ss a (b*13) (c*6) (b*2)

}
}
}

薄荷檸檬

size 114 390
paper 0

fast


command ss x y z c
{
pen (2*(c)) (3*c) (c)
line (0+(z)) (x+y-(z)) (5+(z)) (x+y-z)

line (113-z) (x+y-(z)) (108-(z)) (x+y-z)
}

repeat c 0 20
{
repeat a 0 5
{
repeat b 0 33
{

ss a (b*13) (c*6) (b*2)

}
}
}

萊姆

size 114 390
paper 0

fast


command ss x y z c
{
pen ((c)) (2*c) (3*c)
line (0+(z)) (x+y-(z)) (5+(z)) (x+y-z)

line (113-z) (x+y-(z)) (108-(z)) (x+y-z)
}

repeat c 0 20
{
repeat a 0 5
{
repeat b 0 33
{

ss a (b*13) (c*6) (b*2)

}
}
}

藍莓

command ss x y z c
{
pen (2*(c)) (c) (3*c)
line (0+(z)) (x+y-(z)) (5+(z)) (x+y-z)

line (113-z) (x+y-(z)) (108-(z)) (x+y-z)
}

repeat c 0 20
{
repeat a 0 5
{
repeat b 0 33
{

ss a (b*13) (c*6) (b*2)

}
}
}

[Sin]三原型合體之「摺紙-花朵」&「圈圈字」

新增一枚圓形練習
感謝FaceBook的廣告所提供的靈感XDDD



(連擊兩至三次，可全選)

load dbngraphics.dbn
size 300 240
paper 0 50 100
fast

repeat a 1 20
{
set b 1
circle 150 124 (10*a) 0


}

repeat a 0 40
{
pen 0 0 100
line 0 (240-a) 300 (240-a)
line 0 (a) 300 (a)

}

repeat a 0 85
{
triangle (155) 80 (155+a) 150 240 150
}

repeat a 0 105
{
triangle (205+a) 70 300 150 305 70

}

repeat a 0 50
{
line (50+a) 200 (50+a) 150
line (50+a) 40 (50+a) 90
line (260+(a/5)) (70+a) 300 (70+a)
}

repeat a 0 5
{
line (150+a) 0 (150+a) 240
}



在筆記本上無意畫出來的怪畫面，利用線條描繪出來之後
忽然有種摺紙的感覺....
之後再用了漸層上色，愕然的發現，還可以玩了錯視
是哪一個正方形在上?哪一個在下?
看中間兩條線，到底是有平行還是不平行?

很想寫長一點，這樣搭配滑鼠去滾動視窗應該很有趣...
不過程式碼真的是太長了..........想太多還是?

以下是冗長的程式碼..........
(在文字框內空白處，連擊兩到三次(?)可以全選...)

在筆記本上一時的靈感，利用線條構成

最後決定加上灰階的變化

結果呈現出來的感覺就像是紙折出來的花

感覺挺妙的...........

而且還多出了一種錯試的感覺

是哪一個正方形在上?哪一個在下?

左右兩條的中線，到底有沒有平行?

原本想說在畫長一點...

但礙於程式碼實在有夠冗長......

所以打消念頭.........想太多還是...?

不過結果倒是非常有趣~哈

以下是長到不行的程式碼

(點擊滑鼠二至三下(?)可以全選)

Load dbngraphics.dbn
size 400 500
paper 100
fast

repeat a 0 40
{
repeat b 0 2
{
pen 75
line (200+a*5) ((b*200)+5) (200+a*5) ((b*200)+95)
line (a*5) ((b*200)+105) (a*5) ((b*200)+195)
line 0 ((b*200)+(a/2)*5) (200) ((b*200)+(a/2)*5)
line 200 ((b*200+100)+(a/2)*5) (400) ((b*200+100)+(a/2)*5)
}
}

pen 100
line 300 0 300 500

line 100 0 100 500

//field

//
repeat a 0 4
{

field (60+(a*10)) (490-(a*10)) (100) 450 (30-(a*10))
}

repeat a 0 4
{

field 100 (485-(a*10)) (140-(a*10)) 445 (10+(a*10))
}

repeat a 0 4
{

field (100) (445) (140-(a*10)) (405+(a*10)) (30-(a*10))
}

repeat a 0 4
{

field (60+(a*10)) 450 100 (410+(a*10)) (10+(a*10))
}

//

repeat a 0 4
{

field (50+(a*10)) (400-(a*10)) (100) 350 (50-(a*10))
}

repeat a 0 4
{

field 100 (395-(a*10)) (150-(a*10)) 345 (10+(a*10))
}

repeat a 0 4
{

field (100) (295+(a*10)) (150-(a*10)) (345) (50-(a*15))
}

repeat a 0 4
{

field (50+(a*10)) 350 100 (300+(a*10)) (10+(a*10))
}

//

repeat a 0 5
{

field (40+(a*10)) (280-(a*10)) (100) 220 (70-(a*15))
}

repeat a 0 5
{

field 100 (275-(a*10)) (160-(a*10)) 215 (10+(a*15))
}

repeat a 0 5
{

field (100) (215) (160-(a*10)) (155+(a*10)) (70-(a*15))
}

repeat a 0 5
{

field (40+(a*10)) 220 100 (160+(a*10)) (10+(a*15))
}

//
repeat a 0 6
{

field (30+(a*10)) (150-(a*10)) (100) 80 (90-(a*15))
}

repeat a 0 6
{

field 100 (145-(a*10)) (170-(a*10)) 75 (10+(a*15))
}

repeat a 0 6
{

field (100) (75) (170-(a*10)) (5+(a*10)) (90-(a*15))
}

repeat a 0 6
{

field (30+(a*10)) 80 100 (10+(a*10)) (10+(a*15))
}

//rec
//---------------------left-----------------------------------
//a-01-le
repeat a 0 4
{

pen 100
rectangle (60+(a*10)) (490-(a*10)) (100) 450
}

repeat a 0 4
{

pen 100
rectangle 100 (485-(a*10)) (140-(a*10)) 445
}

//a-02-le
repeat a 0 4
{

pen 100
rectangle (50+(a*10)) (400-(a*10)) (100) 350
}

repeat a 0 4
{

pen 100
rectangle 100 (395-(a*10)) (150-(a*10)) 345
}

//a-03-le
repeat a 0 5
{

pen 100
rectangle (40+(a*10)) (280-(a*10)) (100) 220
}

repeat a 0 5
{

pen 100
rectangle 100 (275-(a*10)) (160-(a*10)) 215
}

//a-04-le
repeat a 0 6
{

pen 100
rectangle (30+(a*10)) (150-(a*10)) (100) 80
}

repeat a 0 6
{

pen 100
rectangle 100 (145-(a*10)) (170-(a*10)) 75
}

//--------------------right----------------------------------------

//a-01-ri
repeat a 0 4
{

pen 100
rectangle (100) (445) (140-(a*10)) (405+(a*10))
}

repeat a 0 4
{

pen 100
rectangle (60+(a*10)) 450 100 (410+(a*10))
}

//a-02-ri
repeat a 0 4
{

pen 100
rectangle (100) (345) (150-(a*10)) (295+(a*10))
}

repeat a 0 4
{

pen 100
rectangle (50+(a*10)) 350 100 (300+(a*10))
}
//a-03-ri
repeat a 0 5
{

pen 100
rectangle (100) (215) (160-(a*10)) (155+(a*10))
}

repeat a 0 5
{

pen 100
rectangle (40+(a*10)) 220 100 (160+(a*10))
}
//a-04-ri
repeat a 0 6
{

pen 100
rectangle (100) (75) (170-(a*10)) (5+(a*10))
}

repeat a 0 6
{

pen 100
rectangle (30+(a*10)) 80 100 (10+(a*10))
}

//---------------------b---------------------------------
//field

//
repeat a 0 6
{

field (230+(a*10)) (420) (300) (350+(a*10)) (90-(a*15))
}

repeat a 0 6
{

field (300) (425) (370-(a*10)) (355+(a*10)) (10+(a*15))
}

repeat a 0 6
{

field (300) (495-(a*10)) (370-(a*10)) (425) (90-(a*15))
}

repeat a 0 6
{

field (230+(a*10)) (490-(a*10)) (300) (420) (10+(a*15))
}

//

repeat a 0 5
{

field (240+(a*10)) (280) (300) (220+(a*10)) (70-(a*15))
}

repeat a 0 5
{

field (240+(a*10)) (340-(a*10)) 300 (280) (10+(a*15))
}

repeat a 0 5
{

field (300) (345-(a*10)) (360-(a*10)) (285) (70-(a*15))
}

repeat a 0 5
{

field (300) (285) (360-(a*10)) (225+(a*10)) (10+(a*15))
}

//

repeat a 0 4
{

field (250+(a*10)) (195-(a*10)) (300) (145) (10+(a*15))
}

repeat a 0 4
{

field (300) (150) (350-(a*10)) (100+(a*10)) (10+(a*15))
}

repeat a 0 4
{

field (300) (200-(a*10)) (350-(a*10)) (150) (50-(a*10))
}

repeat a 0 4
{

field (250+(a*10)) (145) 300 (95+(a*10)) (50-(a*10))
}

//
repeat a 0 4
{

field (260+(a*10)) (85-(a*10)) (300) (45) (10+(a*10))
}

repeat a 0 4
{

field (300) (50) (340-(a*10)) (10+(a*10)) (10+(a*10))
}

repeat a 0 4
{

field (300) (90-(a*10)) (340-(a*10)) (50) (30-(a*10))
}

repeat a 0 4
{

field (260+(a*10)) 45 300 (5+(a*10)) (30-(a*10))
}

//rec
//---------------------left-----------------------------------
//b-01-le
repeat a 0 6
{

pen 100
rectangle (230+(a*10)) (420) (300) (350+(a*10))
}

repeat a 0 6
{

pen 100
rectangle (300) (425) (370-(a*10)) (355+(a*10))
}

//b-02-le
repeat a 0 5
{

pen 100
rectangle (240+(a*10)) (280) (300) (220+(a*10))
}

repeat a 0 5
{

pen 100
rectangle (300) (285) (360-(a*10)) (225+(a*10))
}

//b-03-le
repeat a 0 5
{

pen 100
rectangle (250+(a*10)) (195-(a*10)) (300) (145)
}

repeat a 0 5
{

pen 100
rectangle (300) (150) (350-(a*10)) (100+(a*10))
}

//b-04-le
repeat a 0 4
{

pen 100
rectangle (260+(a*10)) (85-(a*10)) (300) (45)
}

repeat a 0 4
{

pen 100
rectangle (300) (50) (340-(a*10)) (10+(a*10))
}

//--------------------right----------------------------------------

//b-01-ri
repeat a 0 6
{

pen 100
rectangle (300) (495-(a*10)) (370-(a*10)) (425)
}

repeat a 0 6
{

pen 100
rectangle (230+(a*10)) (490-(a*10)) (300) (420)
}

//b-02-ri
repeat a 0 5
{

pen 100
rectangle (300) (345-(a*10)) (360-(a*10)) (285)
}

repeat a 0 5
{

pen 100
rectangle (240+(a*10)) (340-(a*10)) 300 (280)
}

//b-03-ri
repeat a 0 5
{

pen 100
rectangle (300) (200-(a*10)) (350-(a*10)) (150)
}

repeat a 0 5
{

pen 100
rectangle (250+(a*10)) (145) 300 (95+(a*10))
}

//b-04-ri
repeat a 0 4
{

pen 100
rectangle (300) (90-(a*10)) (340-(a*10)) (50)
}

repeat a 0 4
{

pen 100
rectangle (260+(a*10)) 45 300 (5+(a*10))
}

[Sin]Pattern-風的流動

嗯，經過試玩了巢狀式的Repeat...
發現它的加加減減可以行成一些意想不到的樣子
可以讓同一條線經由Repeat A、B變成相互交織，有一樣規律的變化
所以就想到了沙子經風吹拂之後的樣子
便試了一下~ 有點長，有多種顏色變化

影片


先來個沙漠樣

size 600 500
paper 80 40 20
fast
repeat a 0 250
{
pen (a/3-50) (a/3-70) 0
line 600 (a*3) 0 (a*2)
}

repeat a 0 60
{
repeat b 0 20
{
pen (a+50) 50 20
line (a*2-50) (b*60-100) (a*20) b
}
}

水波


size 600 500
paper 100 100 100
fast
repeat a 0 250
{
pen 0 0 (a)
line 600 (a*3) 0 (a*2)
}

repeat a 0 60
{
repeat b 0 20
{
pen 0 (b/2*5+10) (a+100)
line (a*2-50) (b*60-100) (a*20) b
}
}

草原


size 600 500
paper 80 100 20
fast
repeat a 0 250
{
pen 0 (a) 0
line 600 (a*3) 0 (a*2)
}

repeat a 0 60
{
repeat b 0 20
{
pen 0 (a+10) (b/4*5)
line (a*2-50) (b*60-100) (a*20) b
}
}

火焰(森林大火?)


size 600 500
paper 100 20 0
fast
repeat a 0 250
{
pen (a/3+100) 0 0
line 600 (a*3) 0 (a*2)
}

repeat a 0 60
{
repeat b 0 20
{
pen (a+50) 0 0
line (a*2-50) (b*60-100) (a*20) b
}
}

烏雲(雲中月圓?)


size 600 500
paper 40
fast

repeat a 0 250
{
pen (100-a/3+10)
line 600 (a*3) 0 (a*2)
}



紫色...不知道是啥...程式碼也沒複製到=.=...

[ta]Repeat 內填亂完練習

奇妙的東西，數值加加減減、乘乘除除就有很多變化
而且程式碼又短=.=

不過變太多了，程式碼都被蓋掉了，噗...

[Sin]Work_01 個人中文名字設計-陳漢章

呀...這有點囧...之前上課申請的網址是「md-95452136」
之後去老師的部落格才發現是「dm-95452136」=.=...

上次上課申請的→這裡
虧我都把作業傳上去了...

重新發一次吧XD"

=============================================

dbn第一次的使用，有點類似大二的Processing...
只是這個要使用的指令比較簡單，比起C++或是AS也少了嚴格的格式規定

因為只有線條構成，就想到可以弄得像是現在衣服很流行的格子交錯的花紋
有些地方讓它故意凸出，有點像是手工縫織的感覺
不過礙於要一條一條的寫程式碼實在有點太過於麻煩...
就在老師的Blog上先看了dbn的教學，找了一下迴圈怎麼執行，就有先使用到repeat的寫法了...

以下是攏長的程式碼

size 450 550
paper 100 50 0

repeat A 0 50
{
pen 100 70 0
line (a*5) 0 (a*6) 600
pen 100 60 0
line 0 (a*5) 500 (a*6)
}

repeat A 30 80
{
pen 40
line (a*7) 0 (a*4) 600
}

repeat A 50 80
{
pen 30
line (a*7) 600 (a*4) 00
}

//chen right

repeat A 40 87
{
pen 60 0 0
line (A*5) 445 (A*5) 500
line (A*5) 430 (A*5) 400
line (A*5) 355 (A*5) 295
line (A*5) 250 (A*5) 220
pen 100 0 0
line ((A*5)+2) 445 ((A*5)+2) 500
line ((A*5)+2) 430 ((A*5)+2) 400
line ((A*5)+2) 355 ((A*5)+2) 295
line ((A*5)+2) 250 ((A*5)+2) 220
}

repeat A 45 86
{
pen 60 0 0
line 395 (A*5) 435 (A*5)
line 200 (A*5) 240 (A*5)
pen 100 0 0
line 395 ((A*5)+2) 435 ((A*5)+2)
line 200 ((A*5)+2) 240 ((A*5)+2)
}

repeat A 40 70
{
pen 60 0 0
line (A*5) 180 (A*5) 150
line (A*5) 60 (A*5) 25
pen 100 0 0
line ((A*5)+2) 180 ((A*5)+2) 150
line ((A*5)+2) 60 ((A*5)+2) 25
}

repeat A 62 87
{
pen 60 0 0
line (A*5) 120 (A*5) 90
pen 100 0 0
line ((A*5)+2) 120 ((A*5)+2) 90
}

repeat A 5 105
{
pen 60 0 0
line 310 (A*5) 350 (A*5)
pen 100 0 0
line 310 ((A*5)+2) 350 ((A*5)+2)
}

//chen left
repeat A 1 32
{
pen 60 0 0
line (A*5) 445 (A*5) 500
line (A*5) 175 (A*5) 150
pen 100 0 0
line ((A*5)+2) 445 ((A*5)+2) 500
line ((A*5)+2) 175 ((A*5)+2) 150
}

repeat A 15 32
{
pen 60 0 0
line (A*5) 400 (A*5) 375
line (A*5) 315 (A*5) 290
pen 100 0 0
line ((A*5)+2) 400 ((A*5)+2) 375
line ((A*5)+2) 315 ((A*5)+2) 290
}

repeat A 73 100
{
pen 60 0 0
line 140 (A*5) 160 (A*5)
pen 100 0 0
line 140 ((A*5)+2) 160 ((A*5)+2)
}

repeat A 58 80
{
pen 60 0 0
line 75 (A*5) 95 (A*5)
pen 100 0 0
line 75 ((A*5)+2) 95 ((A*5)+2)
}

repeat A 28 65
{
pen 60 0 0
line 140 (A*5) 160 (A*5)
pen 100 0 0
line 140 ((A*5)+2) 160 ((A*5)+2)
}

repeat A 5 100
{
pen 60 0 0
line 5 (A*5) 50 (A*5)
pen 100 0 0
line 5 ((A*5)+2) 50 ((A*5)+2)

}

//Han

repeat A 10 19
{
pen 100
line (A*5) 130 (A*5) 120
line (A*5) 85 (A*5) 75
pen 0 0 100
line ((A*5)+3) 130 ((A*5)+3) 120
line ((A*5)+3) 85 ((A*5)+3) 75
}

repeat A 4 12
{
pen 100
line 64 (A*5) 79 (A*5)
pen 0 0 100
line 64 ((A*5)+3) 79 ((A*5)+3)
}

repeat A 23 40
{
pen 100
line (A*5) 150 (A*5) 140
line (A*5) 100 (A*5) 90
line (A*5) 70 (A*5) 60
line (A*5) 35 (A*5) 25
pen 0 0 100
line ((A*5)+3) 150 ((A*5)+3) 140
line ((A*5)+3) 100 ((A*5)+3) 90
line ((A*5)+3) 70 ((A*5)+3) 60
line ((A*5)+3) 35 ((A*5)+3) 25
}

repeat A 25 38
{
pen 100
line (A*5) 125 (A*5) 115
line (A*5) 55 (A*5) 45
pen 0 0 100
line ((A*5)+3) 125 ((A*5)+3) 115
line ((A*5)+3) 55 ((A*5)+3) 45
}

repeat A 24 33
{
pen 100
line 125 (A*5) 135 (A*5)
line 185 (A*5) 195 (A*5)
pen 0 0 100
line 125 ((A*5)+3) 135 ((A*5)+3)
line 185 ((A*5)+3) 195 ((A*5)+3)
}

repeat A 12 20
{
pen 100
line 115 (A*5) 125 (A*5)
line 185 (A*5) 200 (A*5)
pen 0 0 100
line 115 ((A*5)+3) 125 ((A*5)+3)
line 185 ((A*5)+3) 200 ((A*5)+3)
}

repeat A 11 25
{
pen 100
line 145 (A*5) 170 (A*5)
pen 0 0 100
line 145 ((A*5)+3) 170 ((A*5)+3)
}

repeat A 1 11
{
pen 100
line 135 (A*5) 145 (A*5)
line 175 (A*5) 185 (A*5)
pen 0 0 100
line 135 ((A*5)+3) 145 ((A*5)+3)
line 175 ((A*5)+3) 185 ((A*5)+3)
}

//chang

repeat A 69 94
{
pen 100
line (A*5) 150 (A*5) 140
line (A*5) 120 (A*5) 110
line (A*5) 100 (A*5) 90
line (A*5) 70 (A*5) 60
line (A*5) 45 (A*5) 35
line (A*5) 20 (A*5) 10
pen 0 0 100
line ((A*5)+2) 150 ((A*5)+2) 140
line ((A*5)+2) 120 ((A*5)+2) 110
line ((A*5)+2) 100 ((A*5)+2) 90
line ((A*5)+2) 70 ((A*5)+2) 60
line ((A*5)+2) 45 ((A*5)+2) 35
line ((A*5)+2) 20 ((A*5)+2) 10
}

repeat A 28 35
{
pen 100
line 382 (A*5) 417 (A*5)
pen 0 0 100
line 382 ((A*5)+2) 417 ((A*5)+2)
}

repeat A 22 30
{
pen 100
line 361 (A*5) 371 (A*5)
line 431 (A*5) 441 (A*5)
pen 0 0 100
line 361 ((A*5)+2) 371 ((A*5)+2)
line 431 ((A*5)+2) 441 ((A*5)+2)
}

repeat A 18 8
{
pen 100
line 435 (A*5) 445 (A*5)
line 345 (A*5) 355 (A*5)
pen 0 0 100
line 435 ((A*5)+2) 445 ((A*5)+2)
line 345 ((A*5)+2) 355 ((A*5)+2)
}

repeat A 1 8
{
pen 100
line 382 (A*5) 417 (A*5)
pen 0 0 100
line 382 ((A*5)+2) 417 ((A*5)+2)
}