作業四：使用command square 結構綜合設計 - 橘紅矩陣

size 200 300


fast


command sqr z x c v
{


repeat a z c
{
line a v a x
}

}


paper 100 50 0

set b 75

pen 100 10 0
sqr 0 250 25 300
sqr 0 175 25 225
sqr 0 100 25 150
sqr 0 25 25 75

pen 100 15 0
sqr 10 225 35 275
sqr 10 150 35 200
sqr 10 75 35 125
sqr 10 0 35 50

pen 100 20 10
sqr 25 250 50 300
sqr 25 175 50 225
sqr 25 100 50 150
sqr 25 25 50 75

pen 100 25 10
sqr 40 225 70 275
sqr 40 150 70 200
sqr 40 75 70 125
sqr 40 0 70 50

pen 100 30 15
sqr 65 250 95 300
sqr 65 175 95 225
sqr 65 100 95 150
sqr 65 25 95 75

pen 100 30 15
sqr 95 225 130 275
sqr 95 150 130 200
sqr 95 75 130 125
sqr 95 0 130 50

作業三：三原型綜合設計創作 - 美國星

Load dbngraphics.dbn

size 400 200
paper 100 0 0
pen 100 70 70

repeat A 0 40
{
line 0 (A*4) 400 (A*4)
}

repeat A 0 30
{
line 0 (A*3) 400 (A*3)
}

set M 50

//第一個
Repeat A 0 70
{
pen 0
triangle M 0 A (M/2) M 0
triangle M 0 (M+25) A (M*2) 0
triangle 90 (M/2) (M+30+A) 25 (M*2) 0
}

//第二個
repeat B 0 175
{
triangle (M*4) 0 (M*5) B (M*6) 0
}

repeat A 0 100
{

triangle (M*4) 0 (M*2+25+A) (M+M/2) (M*4+25) (M+M/2)

triangle (M*6) 0 (M*5+25+A) (M+M/2) (M*7+25) (M+M/2)

}

//點點

set C 10
repeat A 0 4
{
repeat B 1 20
{
Circle (C*3*B) (C*B) A 0
Circle (C*2*B) (C*B) A 0
}
}


repeat A 0 2
{
repeat B 0 20
{
Circle (C*B) (C*B) (A/2) 0
Circle (C/2*B) (C*B) (A/2) 0
}
}


//墨鏡


field 40 15 65 30 90
field 80 15 110 30 90
field 175 50 240 85 90
field 260 50 325 85 90
field 185 73 200 80 0
field 270 73 285 80 0


repeat A 0 3
{
pen 0
line 43 (25+A) 50 (25+A)
line 83 (25+A) 90 (25+A)
pen 100
line 62 (24+A) 80 (24+A)
line 233 (75+A) 265 (75+A)
}

repeat A 0 3
{
rectangle (175+A) (50+A) (240+A) (85+A)
rectangle (260+A) (50+A) (325+A) (85+A)
}

repeat A 0 1
{
rectangle (40+A) (15+A) (65+A) (30+A)
rectangle (80+A) (15+A) (110+A) (30+A)
}

作業二：pattern - 蝴蝶結cute!

size 400 400

repeat A 0 50
{

pen 50 0 50
line 0 A 400 A

}

repeat A 50 100
{

pen 60 0 50
line 0 A 400 A

}

repeat A 100 150
{

pen 70 0 50
line 0 A 400 A

}

repeat A 150 200
{

pen 80 0 50
line 0 A 400 A

}



repeat A 0 50
{

pen 50 0 50
line A 0 A 400

}

repeat A 50 100
{

pen 60 0 50
line A 0 A 400

}

repeat A 100 150
{

pen 70 0 50
line A 0 A 400

}

repeat A 150 200
{

pen 80 0 50
line A 0 A 400

}



repeat A 200 0
{

pen 10
line 0 A 200 A

}

repeat A 400 300
{

pen 80
line A 0 A 200

}


repeat A 0 100
{

pen 80
line A 200 A 400

}








repeat A 0 200
{

pen 90 80 40
line 0 200 A 0

}

repeat A 400 200
{

pen 90 80 40
line 200 400 400 A

}





repeat A 400 300
{

pen 80
line 100 A 200 A

}

repeat A 0 100
{

pen 80
line 200 A 300 A

}





repeat A 400 200
{

pen 100
line 200 A 400 A

}

repeat A 200 0
{

pen 100
line 0 A 200 A

}




repeat A 200 100
{

pen 0 100 30
line A 400 A 300

}

repeat A 100 0
{

pen 0 100 30
line 100 300 A 400

}

repeat A 200 300
{

pen 0 90 30
line 0 A 100 A

}


repeat A 300 400
{

pen 0 90 30
line 100 300 0 A

}



repeat A 200 100
{

pen 0 100 30
line 300 A 400 A

}

repeat A 100 0
{

pen 0 100 30
line 300 100 400 A

}

repeat A 200 300
{

pen 0 90 30
line A 0 A 100

}

repeat A 300 400
{

pen 0 90 30
line 300 100 A 0

}





repeat A 0 2
{

pen 10
line 160 (260+A) 180 (252+A)
line 180 (252+A) 200 (255+A)
line 200 (258+A) 172 (257+A)
line (172+A) 257 (160+A) 228
line 160 (228+A) 175 (205+A)
line 175 (205+A) 200 200

}

repeat A 0 2
{

pen 10
line (200+A) 230 (190+A) 220
line (190+A) 220 (195+A) 210
line 195 (210+A) 205 (210+A)
line (205+A) 210 (211+A) 225

}

repeat A 0 2
{

line (230+A) 230 (220+A) 200
line 220 (200+A) 235 (200+A)
line 225 (228+A) 235 (223+A)

}


repeat A 0 2
{

line 240 (190+A) 258 (185+A)
line (258+A) 185 (250+A) 195
line (250+A) 195 (232+A) 180
line (232+A) 180 (245+A) 165
line 245 (165+A) 260 (173+A)

}

作業一 ：個人中文名字設計 –劉敏妃

paper 100 40 60
size 400 400
pen 100 100 100
line 0 200 325 400
line 0 125 350 400
line 0 50 375 400
line 50 0 400 400
line 125 0 400 375
pen 100 100 100
line 42 225 42 88
line 83 126 83 190
line 110 210 158 250
line 158 250 158 198
line 158 198 135 175
line 125 222 110 153
line 77 120 50 0
line 100 145 100 0
line 130 172 160 125
line 180 215 180 150
line 210 290 210 115
line 230 265 230 340
line 230 305 280 345
line 250 285 235 150
line 270 300 270 195
line 280 310 280 215
line 300 360 295 280
line 300 330 330 360
line 320 350 310 250
line 305 335 330 280
line 340 390 340 330
line 360 385 360 320
line 390 400 390 390
line 370 365 370 335