[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
}

}