B반 최상호 코딩수학으로 만드는 창의코딩나라 최종작품
- B반/중등B1최상호
- 2021-06-05 10:20:19
- 조회수 136
//나무 기둥 부분
goto( -61, -35, 5)
item = 2
doit(4u)
goto( -59, -45, 5)
doit(4u)
goto( -61, -55, 5)
doit(4u)
goto( 61, -47, 5)
doit(4u)
goto( 61, -57, 5)
doit(4u)
goto( 61, 15, 5)
doit(4u)
goto( 61, 25, 5)
doit(4u)
goto( 61, 35, 5)
doit(4u)
goto( 61, 45, 5)
doit(4u)
goto( 61, 55, 5)
doit(4u)
goto( 51, 62, 5)
doit(4u)
goto( 41, 62, 5)
doit(4u)
goto( 31, 62, 5)
doit(4u)
goto( 21, 62, 5)
doit(4u)
goto( 11, 62, 5)
doit(4u)
goto( 1, 62, 5)
doit(4u)
goto( -9, 62, 5)
doit(4u)
goto( -19, 62, 5)
doit(4u)
goto( -29, 62, 5)
doit(4u)
goto( -39, 62, 5)
doit(4u)
goto( -49, 62, 5)
doit(4u)
goto( -59, 62, 5)
doit(4u)
beginxyz; item=5
//다리 제작
//기둥부분
집합{ sqrt( y, z-13 ) <= 4 && -65<x && x<65 && z>13 ; 0}
집합{ nemo( y, z-10 ) <= 3 && -65<x && x<65 && z>10 ; 0}
집합{ nemo( x-20, y+3 ) <= 1 && z>33 && z<36 ; 6 }
집합{ nemo( x-20, y+4 ) <= 1 && z>31 && z<34 ; 6 }
집합{ nemo( x-18, y+3 ) <= 1 && z>25 && z<30 ; 6 }
집합{ nemo( x-22, y+3 ) <= 1 && z>25 && z<30 ; 6 }
집합{ nemo( x-18, y+3 ) <= 1 && z>19 && z<23 ; 6 }
집합{ nemo( x-22, y+3 ) <= 1 && z>19 && z<23 ; 6 }
집합{ nemo( x-20, y+3 ) <= 1 && z>13 && z<18 ; 6 }
집합{ nemo( x-18, y+3 ) <= 1 && z>13 && z<16 ; 6 }
집합{ nemo( x-22, y+3 ) <= 1 && z>13 && z<16 ; 6 }
집합{ nemo( x-20, y-3 ) <= 1 && z>33 && z<36 ; 6 }
집합{ nemo( x-20, y-4 ) <= 1 && z>31 && z<34 ; 6 }
집합{ nemo( x-18, y-3 ) <= 1 && z>25 && z<30 ; 6 }
집합{ nemo( x-22, y-3 ) <= 1 && z>25 && z<30 ; 6 }
집합{ nemo( x-18, y-3 ) <= 1 && z>19 && z<23 ; 6 }
집합{ nemo( x-22, y-3 ) <= 1 && z>19 && z<23 ; 6 }
집합{ nemo( x-20, y-3 ) <= 1 && z>13 && z<18 ; 6 }
집합{ nemo( x-18, y-3 ) <= 1 && z>13 && z<16 ; 6 }
집합{ nemo( x-22, y-3 ) <= 1 && z>13 && z<16 ; 6 }
집합{ nemo( x+20, y+3 ) <= 1 && z>33 && z<36 ; 6 }
집합{ nemo( x+20, y+4 ) <= 1 && z>31 && z<34 ; 6 }
집합{ nemo( x+18, y+3 ) <= 1 && z>25 && z<30 ; 6 }
집합{ nemo( x+22, y+3 ) <= 1 && z>25 && z<30 ; 6 }
집합{ nemo( x+18, y+3 ) <= 1 && z>19 && z<23 ; 6 }
집합{ nemo( x+22, y+3 ) <= 1 && z>19 && z<23 ; 6 }
집합{ nemo( x+20, y+3 ) <= 1 && z>13 && z<18 ; 6 }
집합{ nemo( x+18, y+3 ) <= 1 && z>13 && z<16 ; 6 }
집합{ nemo( x+22, y+3 ) <= 1 && z>13 && z<16 ; 6 }
집합{ nemo( x+20, y-3 ) <= 1 && z>33 && z<36 ; 6 }
집합{ nemo( x+20, y-4 ) <= 1 && z>31 && z<34 ; 6 }
집합{ nemo( x+18, y-3 ) <= 1 && z>25 && z<30 ; 6 }
집합{ nemo( x+22, y-3 ) <= 1 && z>25 && z<30 ; 6 }
집합{ nemo( x+18, y-3 ) <= 1 && z>19 && z<23 ; 6 }
집합{ nemo( x+22, y-3 ) <= 1 && z>19 && z<23 ; 6 }
집합{ nemo( x+20, y-3 ) <= 1 && z>13 && z<18 ; 6 }
집합{ nemo( x+18, y-3 ) <= 1 && z>13 && z<16 ; 6 }
집합{ nemo( x+22, y-3 ) <= 1 && z>13 && z<16 ; 6 }
집합{ nemo( x-20, y ) <= 4 && 35>=z && z>0 ; 37}
집합{ nemo( x+20, y ) <= 4 && 35>=z && z>0 ; 37}
집합{ nemo( x-20, y ) <= 10-0.2*z && z>=35 ; 42}
집합{ nemo( x+20, y ) <= 10-0.2*z && z>=35 ; 42}
집합{ nemo( x+20, y ) <= 7 && 10>=z && z>0 ; 37}
집합{ nemo( x-20, y ) <= 7 && 10>=z && z>0 ; 37}
집합{ nemo( x+20, y+3 ) <= 1 && z>35 && z<39 ;37 }
집합{ nemo( x+20, y+3 ) <= 39-z && z>37 ; 37}
집합{ nemo( x+20, y-3 ) <= 1 && z>35 && z<39 ;37 }
집합{ nemo( x+20, y-3 ) <= 39-z && z>37 ; 37}
집합{ nemo( x+23, y ) <= 1 && z>35 && z<39 ;37 }
집합{ nemo( x+23, y ) <= 39-z && z>37 ; 37}
집합{ nemo( x+17, y ) <= 1 && z>35 && z<39 ;37 }
집합{ nemo( x+17, y ) <= 39-z && z>37 ; 37}
집합{ nemo( x-20, y+3 ) <= 1 && z>35 && z<39 ;37 }
집합{ nemo( x-20, y+3 ) <= 39-z && z>37 ; 37}
집합{ nemo( x-20, y-3 ) <= 1 && z>35 && z<39 ;37 }
집합{ nemo( x-20, y-3 ) <= 39-z && z>37 ; 37}
집합{ nemo( x-23, y ) <= 1 && z>35 && z<39 ;37 }
집합{ nemo( x-23, y ) <= 39-z && z>37 ; 37}
집합{ nemo( x-17, y ) <= 1 && z>35 && z<39 ;37 }
집합{ nemo( x-17, y ) <= 39-z && z>37 ; 37}
집합{ sqrt( x+24, y+4 ) <= 2 && z>10 && z<=36 ; 37}
집합{ sqrt( x+16, y+4 ) <= 2 && z>10 && z<=36 ; 37}
집합{ sqrt( x+24, y-4 ) <= 2 && z>10 && z<=36 ; 37}
집합{ sqrt( x+16, y-4 ) <= 2 && z>10 && z<=36 ; 37}
집합{ sqrt( x-24, y+4 ) <= 2 && z>10 && z<=36 ; 37}
집합{ sqrt( x-16, y+4 ) <= 2 && z>10 && z<=36 ; 37}
집합{ sqrt( x-24, y-4 ) <= 2 && z>10 && z<=36 ; 37}
집합{ sqrt( x-16, y-4 ) <= 2 && z>10 && z<=36 ; 37}
집합{ sqrt( x+24, y+4 ) <= 13-0.3*z && z>36 ; 42}
집합{ sqrt( x+16, y+4 ) <= 13-0.3*z && z>36 ; 42}
집합{ sqrt( x+24, y-4 ) <= 13-0.3*z && z>36 ; 42}
집합{ sqrt( x+16, y-4 ) <= 13-0.3*z && z>36 ; 42}
집합{ sqrt( x-24, y+4 ) <= 13-0.3*z && z>36 ; 42}
집합{ sqrt( x-16, y+4 ) <= 13-0.3*z && z>36 ; 42}
집합{ sqrt( x-24, y-4 ) <= 13-0.3*z && z>36 ; 42}
집합{ sqrt( x-16, y-4 ) <= 13-0.3*z && z>36 ; 42}
집합{ sqrt( x+20, y+8 ) <= 6 && z>10 && z<12 && y<-5 && x>-28 ; 0}
집합{ sqrt( x+20, y-8 ) <= 6 && z>10 && z<12 && y>5 && x>-28 ; 0}
집합{ sqrt( x-20, y+8 ) <= 6 && z>10 && z<12 && y<-5 && x<28 ; 0}
집합{ sqrt( x-20, y-8 ) <= 6 && z>10 && z<12 && y>5 && x<28 ; 0}
집합{ sqrt( x+20, y+8 ) <= 7 && z>0 && z<12 && y<-5 && x>-28 ; 37}
집합{ sqrt( x+20, y-8 ) <= 7 && z>0 && z<12 && y>5 && x>-28 ; 37}
집합{ sqrt( x-20, y+8 ) <= 7 && z>0 && z<12 && y<-5 && x<28 ; 37}
집합{ sqrt( x-20, y-8 ) <= 7 && z>0 && z<12 && y>5 && x<28 ; 37}
//연결다리
집합{ nemo( y-4, z-30 ) <= 1 && -15<x && x<15 && z<31 ; 0}
집합{ nemo( y+4, z-30 ) <= 1 && -15<x && x<15 && z<31 ; 0}
집합{ sqrt( x, z ) <= 12 && z>0 && z<9 && y<10 && y>-10 ; 0}
집합{ nemo( y, z-16 ) <= 5 && -14<x && x<14 && z<13 ; 0}
집합{ nemo( y, z-16 ) <= 5 && -56<x && x<-26 && z<13 ; 0}
집합{ nemo( y, z-16 ) <= 5 && 26<x && x<56 && z<13 ; 0}
집합{ nemo( y, z-10 ) <= 5 && -15<x && x<15 && z<10 ; 6}
집합{ nemo( y, z-16 ) <= 6 && -56<x && x<56 && z<12 ; 15}
집합{ nemo( y-4, z-30 ) <= 2 && -15<x && x<15 && z<31 ; 44}
집합{ nemo( y+4, z-30 ) <= 2 && -15<x && x<15 && z<31 ; 44}
//다리 양끝 기둥
집합{ nemo( x-57, y ) <= 6 && 22>=z && z>20 && x>56 ; 0}
집합{ nemo( x+57, y ) <= 6 && 22>=z && z>20 && x<-56 && x>-63 ; 0}
집합{ nemo( x-57, y ) <= 7 && 22>=z && z>0 && x>55 ; 37}
집합{ nemo( x+57, y ) <= 7 && 22>=z && z>0 && x<-55 ; 37}
//다리 지탱선(이차함수 그래프 이용)
집합{ nemo( x, y ) <= 64 && z<0 ; 0}//지하세계에 남아있는 파편 제거
집합{ abs((z+13), 0.025*(x+50)*(x+50))<23 && y==-6 && x<-23 ; 0}
집합{ abs((z+13), 0.025*(x+50)*(x+50))<25 && y==-6 && x<-23 ; 15}
집합{ abs((z+13), 0.025*(x+50)*(x+50))<23 && y==6 && x<-23 ; 0}
집합{ abs((z+13), 0.025*(x+50)*(x+50))<25 && y==6 && x<-23 ; 15}
집합{ abs((z+13), 0.025*(x-50)*(x-50))<23 && y==-6 && x>23 ; 0}
집합{ abs((z+13), 0.025*(x-50)*(x-50))<25 && y==-6 && x>23 ; 15}
집합{ abs((z+13), 0.025*(x-50)*(x-50))<23 && y==6 && x>23 ; 0}
집합{ abs((z+13), 0.025*(x-50)*(x-50))<25 && y==6 && x>23 ; 15}
//땅
집합{ nemo( x+61, z-2 ) <= 5 && z<6 ; 1 }
집합{ nemo( x-62, z-2 ) <= 6 && z<6 ; 1 }
집합{ nemo( y+61, z-2 ) <= 6 && z<6 ; 1 }
집합{ nemo( y-62, z-2 ) <= 8 && z<6 ; 1 }
//오른쪽 건물 구멍
집합{ nemo( x-61, z-10 ) <= 3 && y<-16 && y>-39 && x<64 ; 0 }
//왼쪽 집
집합{ nemo( x+61, z-8 ) <= 4 && y<-20 && y>-28 ; 7 }
집합{ nemo( x+61, y+24 ) <= 17-z && z>11 ; 42}
집합{ nemo( x+61, z-8 ) <= 8 && y>12 && y<20 && x<-56 ; 8 }
집합{ nemo( x+62, z-8 ) <= 5 && y>15 && y<45 ; 8 }
집합{ nemo( x+61, z-8 ) <= 8 && y>44 && y<52 && x<-56 ; 8 }
집합{ nemo( x+60, y-16) <= 20-z && z>16 ; 8 }
집합{ nemo( x+63, y-32) <= 20-z && z>13 ; 8 }
집합{ nemo( x+60, y-48) <= 20-z && z>16 ; 8 }
//나무 윗부분
집합{ sqrt( x+61, y+35 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x+59, y+45 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x+61, y+55 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x-61, y+47 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x-61, y+57 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x-61, y-15 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x-61, y-25 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x-61, y-35 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x-61, y-45 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x-61, y-55 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x-51, y-62 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x-41, y-62 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x-31, y-62 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x-21, y-62 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x-11, y-62 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x-1, y-62 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x+9, y-62 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x+19, y-62 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x+29, y-62 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x+39, y-62 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x+49, y-62 ) <= 13-z && 9<z ; 3 }
집합{ sqrt( x+59, y-62 ) <= 13-z && 9<z ; 3 }
//오른쪽 건물
집합{ nemo( x-61, z-8 ) <= 4 && y<-15 && y>-40; 46 }
집합{ sqrt( x-57, y+40 ) <= 1 && 5<z && z<15 ; 46 }
집합{ sqrt( x-64, y+40 ) <= 1 && 5<z && z<15 ; 46 }
집합{ sqrt( x-57, y+15 ) <= 1 && 5<z && z<15 ; 46 }
집합{ sqrt( x-64, y+15 ) <= 1 && 5<z && z<15 ; 46 }
//강 위의 배
집합{ sqrt( x, y+20 ) <=4 && z>4 && z<8 && y>-20 ; 0 }
집합{ nemo( x, z-3 ) <= 3 && y<-19 && y>-35 && z>3 ; 0 }
집합{ sqrt( x, y+35 ) <= 2 && z>3 && z<5 && y<-34 ; 0 }
집합{ sqrt( x, y+20 ) <= z && z<6 && y>-20 ; 36 }
집합{ nemo( x, z-1 ) <= 4 && y<-19 && y>-35 && z<5 ; 36 }
집합{ sqrt( x, y+35 ) <= z-1 && z<5 && y<-34 ; 36 }코드입니다!!
첨부