精细绘图及动画.htm
来自「大家 看看 多多关注」· HTM 代码 · 共 633 行 · 第 1/3 页
HTM
633 行
ie5menu.style.top = document.body.scrollTop + event.clientY;
ie5menu.style.visibility = "visible";
return false;
}
function hidemenuie5() {
ie5menu.style.visibility = "hidden";
}
function highlightie5() {
if (event.srcElement.className == "menuitems") {
event.srcElement.style.backgroundColor = "highlight";
event.srcElement.style.color = "white";
if (display_url)
window.status = event.srcElement.url;
}
}
function lowlightie5() {
if (event.srcElement.className == "menuitems") {
event.srcElement.style.backgroundColor = "";
event.srcElement.style.color = "black";
window.status = "";
}
}
function jumptoie5() {
if (event.srcElement.className == "menuitems") {
if (event.srcElement.getAttribute("target") != null)
window.open(event.srcElement.url, event.srcElement.getAttribute("target"));
else
window.location = event.srcElement.url;
}
}
// End -->
</SCRIPT>
<SCRIPT language=JavaScript>
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
// -->
</SCRIPT>
<DIV id=Layer1
style="HEIGHT: 24px; LEFT: 484px; POSITION: absolute; TOP: 68px; VISIBILITY: hidden; WIDTH: 146px; Z-INDEX: 1">
<TABLE bgColor=#000000 border=0 cellPadding=1 cellSpacing=0
height=24 width="100%">
<TBODY>
<TR>
<TD>
<TABLE bgColor=#ffffe6 border=0 cellPadding=0
cellSpacing=0 height=24 width="100%">
<TBODY>
<TR>
<TD
class=zi>点击“保存设置”按扭可使您本次阅读的整体设置（文字、字号、背景）得以保留，下次阅读时您就不必再重新设置，以符合您的阅读习惯。</TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></DIV>
<DIV id=Layer2
style="HEIGHT: 14px; LEFT: 644px; POSITION: absolute; TOP: 6px; WIDTH: 19px; Z-INDEX: 2"> </DIV>
<TABLE align=center cellPadding=0 cellSpacing=0 width=650>
<TBODY>
<TR align=left vAlign=center>
<TD background=精细绘图及动画.files/titleback.png colSpan=2
height=22 vAlign=top width=650>
<TABLE border=0 cellPadding=0 cellSpacing=2
width="100%">
<TBODY>
<TR>
<TD vAlign=top width=40> </TD>
<TD class=zi vAlign=center width=562><B><FONT
color=#ffffff>.:.:精细绘图及动画:.:.</FONT></B></TD>
<TD class=zi vAlign=top width=18> </TD>
<TD vAlign=center width=16><A
href="javascript:window.close();" title=关闭窗口><IMG
border=0 height=19 src="精细绘图及动画.files/close.png"
width=19></A></TD></TR></TBODY></TABLE></TD></TR>
<TR align=left vAlign=center>
<TD bgColor=#bdcff7 colSpan=2 height=24 vAlign=top>
<TABLE border=0 cellPadding=0 cellSpacing=0
width="100%">
<TBODY>
<TR>
<TD width=1></TD>
<TD align=right width=24><A
href="http://www.ie586.net/"
onmouseout=MM_swapImgRestore()
onmouseover="MM_swapImage('Image5','','images/home2.png',1)"><IMG
border=0 height=22 name=Image5
src="精细绘图及动画.files/home.png" title=返回页面
width=24></A></TD>
<TD align=right width=24><A
href="http://210.76.63.207/lb5000/leoboard.cgi"
onmouseout=MM_swapImgRestore()
onmouseover="MM_swapImage('Image4','','images/re_write2.gif',1)"><IMG
border=0 height=19 name=Image4
src="精细绘图及动画.files/re_write.gif" title=发表评论
width=20></A></TD>
<TD width=24>
<DIV align=center><A
href="http://www.vcok.com/class/list.asp?id=220#"
onclick="window.print();return false"><IMG
alt=打印文档 border=0 height=22 name=p
onmouseover="MM_swapImage('p','','images/print2.png',1)"
src="精细绘图及动画.files/print.png"
width=24></A></DIV></TD>
<TD width=2></TD>
<TD class=zi height=25 vAlign=center
width=308><FONT size=2> 文字 <SELECT
name=seltextcolor
onchange=setFontColor(this.value);
style="HEIGHT: 20px; WIDTH: 60px; fontsize: 9pt">
<OPTION selected value=#000000>黑色</OPTION>
<OPTION value=#FFFFFF>白色</OPTION> <OPTION
value=#FF0000>红色</OPTION> <OPTION
value=#555555>灰色</OPTION> <OPTION
value=#00FF00>绿色</OPTION> <OPTION
value=#0000FF>蓝色</OPTION> <OPTION
value=#00cccc>青色</OPTION> <OPTION
value=#ffff00>黄色</OPTION></SELECT> 背景 <SELECT
name=selbkcolor onchange=setBgColor(this.value);
style="HEIGHT: 20px; WIDTH: 60px; fontsize: 9pt">
<OPTION selected value=#FFFFFF>白色</OPTION>
<OPTION value=#000000>黑色</OPTION> <OPTION
value=#FFCCFF>粉红</OPTION> <OPTION
value=#CCCCCC>灰色</OPTION> <OPTION
value=#CCFFCC>绿色</OPTION> <OPTION
value=#99CCFF>蓝色</OPTION> <OPTION
value=#CCFFFF>青色</OPTION> <OPTION
value=#FFCCCC>综色</OPTION></SELECT> 字号 <SELECT
name=selfontsize onchange=setFontSize(this.value);
style="HEIGHT: 20px; WIDTH: 60px; fontsize: 9pt">
<OPTION selected value=9pt>9 pt</OPTION> <OPTION
value=10pt>10 pt</OPTION> <OPTION value=12pt>12
pt</OPTION> <OPTION value=14pt>14 pt</OPTION>
<OPTION value=16pt>16 pt</OPTION> <OPTION
value=19pt>19 pt</OPTION></SELECT> </FONT></TD>
<TD class=zi width=85><FONT size=2><A
href="javascript:saveit();"
onmouseout="MM_showHideLayers('Layer1','','hide')"
onmouseover="MM_showHideLayers('Layer1','','show')"><IMG
align=absBottom border=0 height=22 name=s
onmouseover="MM_swapImage('s','','images/save2.png',1)"
src="精细绘图及动画.files/save.png"
width=23></A>保存设置</FONT></TD>
<TD class=zi width=2><FONT size=2> </FONT></TD>
<TD class=zi width=164><FONT
size=2> 人气指数：<FONT
color=#ff0000>1782</FONT>
</FONT></TD></TR></TBODY></TABLE></TD></TR>
<TR align=left vAlign=center>
<TD bgColor=#bdcff7 colSpan=2 height=370>
<TABLE align=center bgColor=#ffffff border=1
borderColorDark=#4275d6 borderColorLight=#ffffff
cellPadding=5 cellSpacing=0 height=360 width=640>
<TBODY>
<TR align=left vAlign=top>
<TD id=thetd style="FONT-SIZE: 10pt">
<DIV align=left
style="HEIGHT: 132px; WIDTH: 626px">
<P align=left>
<STYLE type=text/css>TD {
FONT-SIZE: 9pt
}
BODY {
COLOR: #000000; FONT-SIZE: 9pt; LINE-HEIGHT: 150%
}
A:link {
COLOR: #000000; TEXT-DECORATION: none
}
A:visited {
COLOR: #000000; TEXT-DECORATION: none
}
A:active {
COLOR: #000000; TEXT-DECORATION: none
}
A:hover {
COLOR: #ff0000; TEXT-DECORATION: underline
}
</STYLE>
<P align=center><FONT color=#cc0000
size=5><B>精细绘图及动画 </B></FONT></P>
<P> 制个程序是本人自己编写，所以这里能后做出详细解释。程序运行后会在屏幕上用triplex_font显示“press
any key for set
off”，下<BR>方是用基本的线条画出的发射架（有点粗糙），即程序中的DrawGun()函数，当按下任意键后，将在发射架上方出现一个用横线填充的飞机，同<BR>时背景被繁星填充，此时必须按住任意键不放，否则飞机将不会发射。发射完成后，即飞机坐标小于0，将出现一句话："successfully!!!,press
ESC to
quit",若中途按ESC退出，则飞机Y坐标不小于0，将出现"failue,..."这句话。</P>
<P>#include<graphics.h><BR>#include<conio.h><BR>#include<stdio.h><BR>#include<stdlib.h><BR>#include<alloc.h></P>
<P>#define ESC 0x1b/*ESC的ASCII码，十六进制*/</P>
<P>void
InstallGraph(void);/*图形程序加载函数的说名语句*/<BR>void
DrawGun(void); /*画发射架函数的说明语句*/<BR>void
DrawPlan(void); /*画飞机函数的说明语句*/<BR>void
DrawStar(void); /*画星函数的说明语句*/</P>
<P>void *buf; /*全局变量，用于存储飞机的图像*/<BR>int x0=300;
/*以下是飞机的位置初始化参数*/<BR>int y0=340;<BR>int
width1=5;<BR>int width2=20;<BR>int
height=25;<BR>int y1=8;<BR>int y2=15;<BR>int
y3=23;<BR>int y4=38;</P>
<P>/*主函数开始*/<BR>main()<BR>{<BR>int size;<BR>int
i=0;<BR>int key;<BR>int station;</P>
<P><BR>InstallGraph();<BR>setbkcolor(BLACK);<BR>cleardevice();/*图形驱动程序和屏幕初始化工作完成*/</P>
<P>setcolor(BLUE);/*设置字的颜色*/<BR>settextstyle(TRIPLEX_FONT,0,4);/*设置字体*/<BR>outtextxy(80,100,"Ready!...Any
key to SET OFF !!!");<BR>DrawGun();
/*画出发射架*/<BR>getch(); /*if press key,clear the
words and start*/</P>
<P>cleardevice();<BR>DrawGun();<BR>DrawPlan();<BR>DrawStar();<BR>setcolor(LIGHTRED);/*define
result words color*/</P>
<P> do{ /*程序主循环开始，用于运动飞机，方法是用异或的方式在屏幕上连续画出飞机
的图像，每画一次，新图像和来的位置相差两个像素点。<BR>这个值是可调的，值越大，飞机飞行的速度越快*/</P>
<P>putimage(x0-width2,y0-height-3*width1-i,buf,XOR_PUT);<BR>i+=2;<BR>putimage(x0-width2,y0-height-3*width1-i,buf,XOR_PUT);</P>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?