121

코딩 도장

일주일에 하나씩 가벼운 마음으로 코드를 작성합니다. 누가 떠밀지 않아도 스스로 자라길 원하는 사람들...
클럽장: 아샬 | http://club.filltong.net/codingdojo
최근 방문자들   모든회원보기
풀이 풀이
지뢰찾기 (J)  

2008. 06. 17. 10:07   |   조회수:422 김창준 김창준
http://club.filltong.net/codingdojo/4170  복사
  1. board=:   0=?@$&8
    graphic=: {&'.*'
    guard=:   0,.~0,.0,~0,]
    scr=:     (1 1,:3 3)+/@,;._3 guard
    hint=:    scr{.@":@[`('*'"_)@.]&>]

 

다음은 실행예:

  1.    (graphic,:hint) b=.board 5 6
    .....*
    ...***
    ......
    ......
    ......

    00124*
    001***
    001232
    000000
    000000

 

만약 매 글자 사이에 공백을 넣는 것이 중요하다면...

  1.    ,"2 ,&' '"0 (graphic,:hint) b
    . . . . . *
    . . . * * *
    . . . . . .
    . . . . . .
    . . . . . .

    0 0 1 2 4 *
    0 0 1 * * *
    0 0 1 2 3 2
    0 0 0 0 0 0
    0 0 0 0 0 0

 

댓글 9 개

  • 드...드디어 올라왔...... ㅎㄷㄷ 2008. 06. 17. 10:23

  • 이건 뭐 한 편의 사기극이군요. -_-;;; 2008. 06. 17. 11:13

  • 덜덜 -_-;;

    2008. 06. 17. 11:20

  • 사실, 이런 풀이야말로 그 과정을 보고 싶은데 말이죠.

    머릿 속 구상을 함수로 분할해 시작한 건지, 아니면 리팩터링 과정을 통해 나온 건지... 검증은 어떤 식으로 하는 건지.. 등등...

    왠지 인터프리터 환경 최대 활용 & 마무리는 한 큐에! 라는 느낌입니다만.....     2008. 06. 17. 11:32

  • 덜덜덜 ... =_=a 2008. 06. 17. 11:35

  • 6월 J 강림하시닷..!;
    2008. 06. 17. 12:29

  • '흠좀무'는 이런 때 쓰라고 있는 거겠죠..ㅡ.ㅡ;;; 2008. 06. 17. 13:10

  • 정말 신기하군요. 배우고 싶은 언어입니다. 2008. 06. 17. 14:04

  • 허걱.. 정녕 5라인으로 끝인가요? 2008. 06. 19. 18:07

등록
목록 맨뒤로 글쓰기
다음글다음글   지뢰찾기 (C++)   |   
이전글이전글   지뢰찾기 (파이썬)   |