2009年12月3日 星期四

作業陸:自畫像&他是我弟弟

自畫像:
我覺得我大概是長這鳥樣....


















自由創作:
很愛吃很愛睡
他是我弟弟
可是我要叫他姜哥

2009年11月12日 星期四

作業伍


主題:秋天賞楓要不要












size 200 200
paper 0 20 20


repeat x 0 200
{

pen ((

2009年11月5日 星期四

期中:數位康丁斯基



load dbngraphics.dbnpaper 0 70 80size 330 250
fast
//半圓壹repeat C 0 3{circle 65 215(C+40) 60}
//半圓貳repeat C 0 3{circle 80 225(C+30) 60}
//三角上set M 80Repeat A 85 225{ pen 60 20 35triangle M 85 M A (M*2) 85}
//三角下set N 25Repeat C 25 75{pen 60 30 20triangle N 75 (N+50) C (N*5) 75}
//圓Repeat A 60 40{circle 260 125 (A/2+20) 90}Repeat A 30 0{circle 260 125 (A/2) 90}
//三角下貳set M 225
Repeat A 25 115{ pen 30 20 20triangle M 25 (M+35) A (M+60) 25}
//三角上貳set N 215Repeat C 125 185{pen 30 10 20triangle N 185 (N+45) C (N+90) 185}
//三三角set M 180
Repeat A 30 55{ pen 100triangle M 30 (M+10) A (M+20) 30}
Repeat A 55 75{ pen 100triangle M 55 (M+10) A (M+20) 55}
Repeat A 75 95{ pen 100triangle M 75 (M+10) A (M+20) 75}
//黃方體Repeat B 0 7{pen 100 100 0 line 270 (225+B) 315 (225+B)}
//白方體Repeat C 0 5{pen 0 line 25 (115+C) 80 (115+C)}
//小黃三repeat A 65 80{pen 255 215 0triangle 80 95 65 110 A 110}
//小紅三repeat A 65 80{pen 100 0 0triangle 80 85 65 95 A 95}
//長方上repeat B 35 80{pen 50 0 0triangle 80 150 35 130 B 150}
//長方下repeat B 35 80{pen 0 50 30triangle 35 130 80 150 B 130}
//菱形repeat B 0 20{pen 80 5 0 line 135 (185+B) 115 (180+B)}
//半圓下repeat D 0 6{circle 75 10(D+40) 60}

2009年10月29日 星期四

作業肆


主題:你住哪個山頭?










size 114 225
paper 100

fast

command ss x y z c
{
pen x (10*y) (c*20)

line (10+z) (x+y-z) (65+z) (x+y-z)

line (110-z) (x+y-z) (40-z) (x+y-z)
}

repeat c 0 10
{
repeat a 0 9
{
repeat b 0 5
{

ss a (b*60) (c*10) b

}
}
}

2009年10月22日 星期四

作業叁

轟隆隆












load dbngraphics.dbn

paper 0 20 50

size 180 300

fast

Repeat A 30 0

{
pen 80 0 35

circle 20 255 (A/3) 0
circle 35 260 (A/2) 0
circle 55 265 (A/2) 0
circle 75 260 (A/2) 0
circle 90 255 (A/3) 0

circle 105 215 (A/4) 0
circle 115 215 (A/3) 0
circle 130 215 (A/2) 0
circle 145 215 (A/3) 0
circle 155 215 (A/4) 0


}


set M 45
Repeat A 0 40
{
pen 0 50 20
triangle 0 0 (M/2) A M 0
triangle M 0 (M+25) A (M*2) 0
triangle (M*2) 0 (M*2+25) A (M*3) 0
triangle (M*3) 0 (M*3+25) A (M*4) 0
triangle (M*4) 0 (M*4+25) A (M*5) 0
triangle (M*5) 0 (M*5+25) A (M*6) 0
}




repeat a 0 4
{

pen 90 90 0
line 40(a+250) 25(a+210)
line 25(a+210) 50(a+210)
line 50(a+210) 35(a+150)

line 63(a+185) 53(a+155)
line 53(a+155) 75(a+155)
line 75(a+155) 63(a+90)

line 125(a+210) 110(a+180)
line 110(a+180) 135(a+180)
line 135(a+180) 115(a+120)
}

2009年10月15日 星期四

作業貳:做水災

做水災了
一波又一波
青苔都長出來了



















paper 100 100 100

size 300 300

repeat a 0 5
{

pen 10 20 0
line 300 (a*1) 0(a*1)
}



repeat a 2 60
{
pen 70 70 70
line 150 (a*4) 135(a*2)
line 150 (a*4) 165(a*2)
}


repeat a 2 30
{
pen 70 70 70
line 50 (a*4) 40(a*2)
line 50 (a*4) 60(a*2)
}


repeat a 2 20
{
pen 70 70 70
line 100 (a*4) 85(a*2)
line 100 (a*4) 115(a*2)
}


repeat a 2 25
{
pen 70 70 70
line 190 (a*4) 175(a*2)
line 190 (a*4) 205(a*2)
}



repeat a 2 50
{
pen 70 70 70
line 240 (a*4) 225(a*2)
line 240 (a*4) 255(a*2)
}


repeat a 0 80
{

pen 100 100 100
line 300 (a*3) 0(a*3)
}



repeat a 0 75
{

pen 0 70 70
line 300 (a*3) 0(a*3)
}


repeat a 0 100
{

pen 0 70 80
line 300 (a*2) 0(a*2)
}

repeat a 0 70
{

pen 0 70 0
line 300 (a*2) 0(a*2)
}


repeat a 0 80
{

pen 0 70 0
line 300 (a*2) 0(a*2)
}


repeat a 0 40
{

pen 100 100 100
line 300 (a*1) 0(a*1)
}

2009年10月1日 星期四

9/25 名字

size 400 400
paper 10 60 80

pen 100 100 0

line 0 375 400 375
line 75 400 75 0
line 325 400 325 0
line 75 375 0 0
line 150 0 75 375
line 250 0 325 375
line 400 0 325 375

line 150 350 150 400
line 250 400 250 350
line 175 350 225 350
line 85 325 315 325
line 100 325 120 225
line 105 300 295 300
line 295 300 280 225
line 280 225 255 225

line 115 170 195 170
line 125 200 155 30
line 155 30 190 30
line 180 200 180 20
line 200 185 200 25
line 200 25 245 25
line 245 25 275 185
line 275 185 200 185