⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 hannota.htm

📁 hanota的源程序
💻 HTM
📖 第 1 页 / 共 2 页
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- saved from url=(0043)http://myweb.yzu.edu.cn/toby88/c/c1/hnt.htm -->
<!-- saved from url=(0032)http://kcliu.nyist.net/hanoi.htm --><HTML 
xmlns="http://www.w3.org/TR/REC-html40" xmlns:o = 
"urn:schemas-microsoft-com:office:office" xmlns:w = 
"urn:schemas-microsoft-com:office:word"><HEAD><TITLE>hannota</TITLE>
<META http-equiv=Content-Type content="text/html; charset=GB2312">
<META content=Word.Document name=ProgId>
<META content="MSHTML 6.00.2800.1106" name=GENERATOR>
<META content="Microsoft Word 9" name=Originator><LINK 
href=".././hanoi.files/filelist.xml" rel=File-List><!--[if gte mso 9]><xml>
 <o:DocumentProperties>
  <o:Template>Normal</o:Template>
  <o:LastAuthor>kcliu</o:LastAuthor>
  <o:Revision>2</o:Revision>
  <o:TotalTime>0</o:TotalTime>
  <o:Created>2000-04-14T02:25:00Z</o:Created>
  <o:LastSaved>2000-04-14T02:25:00Z</o:LastSaved>
  <o:Pages>4</o:Pages>
  <o:Words>522</o:Words>
  <o:Characters>2980</o:Characters>
  <o:Company>nist</o:Company>
  <o:Lines>24</o:Lines>
  <o:Paragraphs>5</o:Paragraphs>
  <o:CharactersWithSpaces>3659</o:CharactersWithSpaces>
  <o:Version>9.2812</o:Version>
 </o:DocumentProperties>
</xml><![endif]--><!--[if gte mso 9]><xml>
 <w:WordDocument>
  <w:PunctuationKerning/>
  <w:DrawingGridVerticalSpacing>7.8 磅</w:DrawingGridVerticalSpacing>
  <w:DisplayHorizontalDrawingGridEvery>0</w:DisplayHorizontalDrawingGridEvery>
  <w:DisplayVerticalDrawingGridEvery>2</w:DisplayVerticalDrawingGridEvery>
  <w:Compatibility>
   <w:SpaceForUL/>
   <w:BalanceSingleByteDoubleByteWidth/>
   <w:DoNotLeaveBackslashAlone/>
   <w:ULTrailSpace/>
   <w:DoNotExpandShiftReturn/>
   <w:AdjustLineHeightInTable/>
   <w:UseFELayout/>
  </w:Compatibility>
 </w:WordDocument>
</xml><![endif]-->
<STYLE>@font-face {
	font-family: 宋体;
}
@font-face {
	font-family: @宋体;
}
P.MsoNormal {
	TEXT-JUSTIFY: inter-ideograph; FONT-SIZE: 10.5pt; MARGIN: 0cm 0cm 0pt; FONT-FAMILY: "Times New Roman"; TEXT-ALIGN: justify; mso-style-parent: ""; mso-pagination: none; mso-bidi-font-size: 12.0pt; mso-fareast-font-family: 宋体; mso-font-kerning: 1.0pt
}
LI.MsoNormal {
	TEXT-JUSTIFY: inter-ideograph; FONT-SIZE: 10.5pt; MARGIN: 0cm 0cm 0pt; FONT-FAMILY: "Times New Roman"; TEXT-ALIGN: justify; mso-style-parent: ""; mso-pagination: none; mso-bidi-font-size: 12.0pt; mso-fareast-font-family: 宋体; mso-font-kerning: 1.0pt
}
DIV.MsoNormal {
	TEXT-JUSTIFY: inter-ideograph; FONT-SIZE: 10.5pt; MARGIN: 0cm 0cm 0pt; FONT-FAMILY: "Times New Roman"; TEXT-ALIGN: justify; mso-style-parent: ""; mso-pagination: none; mso-bidi-font-size: 12.0pt; mso-fareast-font-family: 宋体; mso-font-kerning: 1.0pt
}
P.MsoPlainText {
	TEXT-JUSTIFY: inter-ideograph; FONT-SIZE: 10.5pt; MARGIN: 0cm 0cm 0pt; FONT-FAMILY: 宋体; TEXT-ALIGN: justify; mso-pagination: none; mso-font-kerning: 1.0pt; mso-hansi-font-family: "Courier New"; mso-bidi-font-family: "Courier New"
}
LI.MsoPlainText {
	TEXT-JUSTIFY: inter-ideograph; FONT-SIZE: 10.5pt; MARGIN: 0cm 0cm 0pt; FONT-FAMILY: 宋体; TEXT-ALIGN: justify; mso-pagination: none; mso-font-kerning: 1.0pt; mso-hansi-font-family: "Courier New"; mso-bidi-font-family: "Courier New"
}
DIV.MsoPlainText {
	TEXT-JUSTIFY: inter-ideograph; FONT-SIZE: 10.5pt; MARGIN: 0cm 0cm 0pt; FONT-FAMILY: 宋体; TEXT-ALIGN: justify; mso-pagination: none; mso-font-kerning: 1.0pt; mso-hansi-font-family: "Courier New"; mso-bidi-font-family: "Courier New"
}
DIV.Section1 {
	page: Section1
}
</STYLE>
</HEAD>
<BODY lang=ZH-CN style="TEXT-JUSTIFY-TRIM: punctuation; tab-interval: 21.0pt" 
background=hannota.files/bg3.htm onload="">
<DIV class=Section1 style="LAYOUT-GRID-LINE: 15.6pt">
<P class=MsoPlainText><SPAN 
lang=EN-US><![if !supportEmptyParas]><![endif]>&nbsp;<o:p></o:p></SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>#include&lt;graphics.h&gt;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>#include"dos.h"</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>#include "stdio.h"</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>#include "alloc.h"</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp; </SPAN>int 
num1,num2,num3,h0,cy[66];</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>void plot1(int ,int ,int ,int );</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp; </SPAN>void move(char getone,char 
putone)</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>{<SPAN style="mso-spacerun: yes">&nbsp;&nbsp; </SPAN>int 
x0=40,x,y,w,h,tx,ty,tw,th,x1,x2,y1,y2,xm1,ym1,xm2,ym2;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>int i,n,size;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>void 
*buffer,*buffer1;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>switch(getone)</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>{</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>case 
'A':num1--;break;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>case 
'B':num2--;break;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>case 
'C':num3--;break;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>default: exit(0);</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>}</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>switch(putone)</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>{</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>case 
'A':num1++;break;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>case 
'B':num2++;break;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>case 
'C':num3++;break;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>default: exit(0);</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>}</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>switch(getone)</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>{</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>case 
'A':x=120;y1=cy[num1+1]-h0;break;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>case 
'B':x=320;y1=cy[num2+1]-h0;break;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>case 
'C':x=520;y1=cy[num3+1]-h0;break;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>default: exit(0);</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>}</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp; </SPAN>switch(putone)</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>{</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>case 
'A':tx=120-50;ty=cy[num1]-h0;break;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>case 
'B':tx=320-50;ty=cy[num2]-h0;break;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>case 
'C':tx=520-50;ty=cy[num3]-h0;break;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>default: exit(0);</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN 
style="mso-spacerun: yes">&nbsp;&nbsp;&nbsp; </SPAN>}</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>x1=x-50;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>x2=x+50;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>y2=y1+h0;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>xm1=(x1+tx)/2;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>ym1=(y1+ty)/2;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>xm2=xm1+100;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>ym2=ym1+h0;</SPAN></P>
<P class=MsoPlainText><SPAN 
lang=EN-US><![if !supportEmptyParas]><![endif]>&nbsp;<o:p></o:p></SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>size=imagesize(x1,y1,x2,y2);</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>buffer=malloc(size);</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>getimage(x1,y1,x2,y2,buffer);</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>setfillstyle(SOLID_FILL,3);</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>bar(x1,y1,x2,y2);</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>setcolor(YELLOW);</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>line((x1+x2)/2,y1,(x1+x2)/2,y2);</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>buffer1=malloc(size);</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>n=abs(tx-x1);</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>for(i=0;i&lt;n;i+=3)</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>{</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>xm1=x1+(float)(tx-x1)/n*i;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>ym1=y1+(float)(ty-y1)/(tx-x1)*(xm1-x1);</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>xm2=xm1+100;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>ym2=ym1+h0;</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>getimage(xm1,ym1,xm2,ym2,buffer1);</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>putimage(xm1,ym1,buffer,COPY_PUT);/* delay(10); */</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>putimage(xm1,ym1,buffer1,COPY_PUT);</SPAN></P>
<P class=MsoPlainText><SPAN lang=EN-US><SPAN style="mso-spacerun: yes">&nbsp; 
</SPAN>}</SPAN></P>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -