2013-08-16 3 views
1

나는 시각적 프롤로그를 처음 접했고 궁금한 점은이 link에서 찾은 코드를 어떻게 통합 할 수 있는지 궁금합니다.Visual Prolog의 하노이 타워

내가 비주얼 프롤로그에서 콘솔 프로젝트를 만들 main.pro의 코드는 다음과 같습니다

/***************************************************************************** 

         Copyright (c) 2013 My Company 

******************************************************************************/ 

implement main 
    open core 

clauses 
    run():- 
     console::init(), 
     succeed(). % place your own code here 
end implement main 

goal 
    mainExe::run(main::run). 

그래서, 내 질문 곳 link에 하노이 타워의 코드를 삽입하는 것입니다? 사전에 어떤 도움

/* Program ch16e05.pro */ 

DOMAINS 
    loc =right;middle;left 

PREDICATES 
    hanoi(integer) 
    move(integer,loc,loc,loc) 
    inform(loc,loc) 

CLAUSES 
    hanoi(N):- 
     move(N,left,middle,right). 

    move(1,A,_,C):- 
     inform(A,C),!. 

    move(N,A,B,C):- 
     N1=N-1, move(N1,A,C,B), 
     inform(A,C),move(N1,B,A,C). 

    inform(Loc1, Loc2):-nl, 
     write("Move a disk from ", Loc1, " to ", Loc2). 

감사합니다 : 여러분의 편의를 위해

, 여기에 코드입니다.

답변

0

질문에 대한 링크가 끊어짐에 따라 새로운 링크가 제공됩니다. 당신은 여기에 원래 터보 프롤로그 소유자 책자의 PDF 찾을 :

인터넷 아카이브, 터보 프롤로그 소유자 핸드북 1987 (1987)
http://archive.org/details/bitsavers_borlandturOwnersHandbook1987_8438592

거기에 도메인, 술어 W 조항과 같은 코드입니다. 다음 위키 피 디아 항목에 에 따라 터보 프롤로그 코드 을 시각적 인 프롤로그 시스템으로 거의 바꿀 수 있습니다.

비주얼 프롤로그, 하노이 예
http://en.wikipedia.org/wiki/Visual_Prolog#Hanoi_Example

클래스의 인터페이스 공개 술어에 대한 사용 '조건'. 클래스의 구현 에서 개인 술어로 '클래스 술어'를 사용하십시오.

안녕 (프롤로그 < 5.2 비주얼 터보 프롤로그, PDC 프롤로그)

0

코드의 첫 번째 부분은 "현대"클래스를 기반으로 비주얼 프롤로그에 있지만 코드의 두 번째 부분은 이전 스타일입니다.