11/06DBN期中考 數位康丁斯基

load dbngraphics.dbn

size 520 420

paper 50 100 100

//黃槓pen 90 100 0

repeat a 0 9

{line 430 (400-a) 495 (400-a)}

//三角(1)repeat b 0 50

{pen 100 triangle 225 35 250 (35+b) 275 35}

//三角(2)repeat b 0 50

{pen 100 triangle 215 85 250 (85+b) 285 85}

//三角(3)repeat b 0 50

{pen 100 triangle 205 135 250 (135+b) 295 135}

//右中白槓pen 0repeat c 0 8

{line 25 (200+c) 100 (200+c)}

//白槓下黑三角repeat d 0 20

{pen 100 triangle 30 150 45 (150-d) 60 150}
//三角形(4)repeat f 0 200

{pen 0 (f-50) 0 triangle 345 50 400 (50+f) 455 50}

//三角形(5)repeat f 0 100

{pen 0 (f-50) 0 triangle 325 355 400 (355-f) 475 355}

//三角(6)Repeat e 0 70

{ pen (70-(e/2)) (20-(e/2)) (20) triangle 100 175 (170-e) 175 100 325}

//三角(9)Repeat e 0 70

{ pen (70) (30) (e-50) triangle (10+e) 110 (120-e)110 65 50 }

//三角(7)repeat h 0 20

{pen 110 0 0triangle 100 (175+h) 100 195 75 195}

//三角(8)repeat h 0 30

{pen 100 100 0triangle 100 (195+h) 100 225 75 225}
//正方形中三角1repeat s 0 75

{pen 20 70 50triangle 25 (225+s) 100 225 25 300}

//正方形中三角2repeat s 0 75

{pen 100 20 10triangle 100 (225+s) 100 300 25 300}

//正方形Repeat i 0 42

{ pen 70 0 0 triangle (240+i) (320) (280) (310) 290 340 triangle (240+i) (320) (290-i) (340) 250 350}

//圓(1)repeat e 0 30{circle 400 250 e 100}

//圓(2)repeat e 0 50{circle 400 250 (e+30) c}

//圓(3)repeat e 0 8{circle 400 250 (e+80) 100}