汉若塔c语言源码,汉诺塔C语言.doc

汉诺塔C语言

汉诺塔C源码

HYPERLINK "javascript:fontZoom(12)"

#include? "stdio.h"#include? "conio.h"#include? "stdlib.h"#include? "dos.h"#include? "time.h"#include? "graphics.h"

#define S?? setcolor#define F?? setfillstyle#define R?? rectangle#define C?? circle#define B?? bar#define B3D bar3d#define L?? line#define O?? outtextxy

#define X 200#define Y 20

int nStep=0;int nRecord[7]={7,15,31,63,127,255,511},nRec;int nDisk,nDisknum;int nBaseNum;int nSelectDelay=1; /**USE IN AUTOPLAY**/float nDelay;char chMark[15];

struct rod?????? {?????? int nDisk[10][5];?????? int nDiskName[10];?????? }tree[3];

/********************************************/ntoa(int s){?int b[15];?int i,j;?for (i=0;i<15;i++)?? chMark[i]='\0';?for (i=0;s>=10;i++)?? {b[i]=s%10;?? s/=10;}?b[i]=s;?for(j=i;j>=0;j--)?? chMark[i-j]=b[j]+'0';}

void INITIAL()???? /**GAME INITIAL**/{?int gd=DETECT,gm=0;?registerbgidriver(EGAVGA_driver);?initgraph(&gd,&gm,"");?setbkcolor(0);}

void Start_Logo(){? F(1,8);? B(200,150,439,329);? S(7);? R(201,151,438,328);? S(WHITE);? R(199,149,440,330);? settextstyle(DEFAULT_FONT,HORIZ_DIR,2);? O(233,180,"HANOI TOWER");? S(1);? O(232,179,"HANOI TOWER");? S(WHITE);? settextstyle(DEFAULT_FONT,HORIZ_DIR,2);? O(284,204,"V 2.0");? S(1);? O(283,203,"V 2.0");? settextstyle(DEFAULT_FONT,HORIZ_DIR,1);? S(WHITE);? O(236,240,"COPYRIGHT (C) 2002 BY");? O(236,250,"--LING DONG? STUDIO--");? S(7);? O(236,280,"??? BOLM@ETANG.COM?? ");}

void END(){?char message[110]=">>> IF YOU WANT TO GET THE SOURCE PROGRAM\n\nPLEASE SEND AN E_MAIL TO TELL ME,AND I WILL SEND TO YOU!! ^-^";?int NUM;?closegraph();?sleep(1);?gotoxy(1,10);?for(NUM=0;NUM<110;NUM++)? {printf("%c",message[NUM]);?? delay(500);?? sound(0);delay(50);nosound();}? sleep(1);}

void FLASH_REC(){?int NUM,x1=8,x2=10;?randomize();?for(NUM=0;NUM<33;NUM++)?{? F(1,rand()%16);? B(x1,412,x2,414);? x1=x1+20;? x2=x2+20;?}}

void DRAW(){?F(1,8);?B(6,80,633,100); /**BROWN BAR**/?B