[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 內填亂完練習

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

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