2009年11月5日 星期四

期中考題─數位康丁斯基













// enter programLoad dbngraphics.dbnpaper 20 70 80size 300 230fast
//1repeat E 0 6{pen 170 190 0 line 15 (200+E) 50 (200+E)}
//2set M 125Repeat A 175 125{ pen 10 20 35triangle 25 175 75 A M 175}
//3set M 100Repeat A 25 125{ pen 30 0 20triangle 50 25 75 A M 25}
//4set M 145Repeat A 40 75{ pen 100triangle 125 40 135 A M 40}
//5set M 147Repeat A 75 100{ pen 100triangle 123 75 135 A M 75}
//6set M 152Repeat A 100 125{pen 100triangle 118 100 135 A M 100}
//7Repeat A 90 210{pen 180 20 50triangle 155 90 220 A 220 90}
//8Repeat A 85 35{pen 100 30 10triangle 175 85 225 A 275 85}
//9Repeat A 90 100{pen 110 40 10triangle 220 90 220 A 235 100}
//10Repeat A 100 115{pen 90 80 10triangle 220 100 220 A 240 115}
//11Repeat A 110 90{pen 100triangle 245 110 255 A 265 110}
//12repeat W 0 6{pen 0 line 220 (120+W) 280 (120+W)}
//13Repeat A 130 150{pen 10 30 20triangle 220 130 220 A 265 130}
//14Repeat A 150 130{pen 90 0 50triangle 220 150 265 A 265 150}
//15field 150 150 170 170 10
//16set L 3circle 75 125 L 100circle 75 125 (L+1) 95circle 75 125 (L+2) 90circle 75 125 (L+3) 85circle 75 125 (L+4) 80circle 75 125 (L+5) 75circle 75 125 (L+6) 70circle 75 125 (L+7) 65circle 75 125 (L+8) 60circle 75 125 (L+9) 55circle 75 125 (L+10) 50circle 75 125 (L+11) 45circle 75 125 (L+12) 40circle 75 125 (L+13) 35circle 75 125 (L+14) 30circle 75 125 (L+15) 25circle 75 125 (L+16) 20circle 75 125 (L+17) 15circle 75 125 (L+18) 10
//17set L 21circle 75 125 (L+1) 10circle 75 125 (L+2) 15circle 75 125 (L+3) 20circle 75 125 (L+4) 25circle 75 125 (L+5) 30circle 75 125 (L+6) 35circle 75 125 (L+7) 40circle 75 125 (L+8) 45circle 75 125 (L+9) 50circle 75 125 (L+10) 55circle 75 125 (L+11) 60circle 75 125 (L+12) 65circle 75 125 (L+13) 70circle 75 125 (L+14) 75circle 75 125 (L+15) 80circle 75 125 (L+16) 85circle 75 125 (L+17) 90circle 75 125 (L+18) 95circle 75 125 (L+19) 100
//18set p 50circle 75 125 (p-1) 80circle 75 125 (p-2) 80circle 75 125 (p-3) 80circle 75 125 (p-4) 80circle 75 125 (p-5) 80circle 75 125 (p-6) 80circle 75 125 (p-7) 80
//19set t 60circle 225 0 (t-1) 90circle 225 0 (t-2) 90circle 225 0 (t-3) 90circle 225 0 (t-4) 90circle 225 0 (t-5) 90circle 225 0 (t-6) 90circle 225 0 (t-7) 90circle 225 0 (t-8) 90circle 225 0 (t-9) 90
//20set t 45circle 215 220 (t-1) 30circle 215 220 (t-2) 30circle 215 220 (t-3) 30circle 215 220 (t-4) 30circle 215 220 (t-5) 30circle 215 220 (t-6) 30circle 215 220 (t-7) 30circle 215 220 (t-8) 30
//21set t 60circle 230 220 (t-1) 60circle 230 220 (t-2) 60circle 230 220 (t-3) 60circle 230 220 (t-4) 60circle 230 220 (t-5) 60circle 230 220 (t-6) 60circle 230 220 (t-7) 60

追蹤者