검색어 입력폼

LISP(painted puzzle)

등록일 2004.04.14 한글파일한글 (hwp) | 3페이지 | 가격 2,000원

소개글

리습 프로그램입니다.
그대로 돌려보시면 실행됩니다~

목차

1. 프로그래밍 소스
2. 실행화면 캡쳐

본문내용

(defun test ()
(dotimes (i 24)
(setf *piece* (list p1 p2 p3 p4))
(setf *piece* (nth i (permute-piece *piece*)))
(dotimes (j 4)
(setf (first *piece*) (orient (first *piece*) j))
(push (first *piece*) *push-piece*)
(match1))) )

다운로드 맨위로