课程设计-计算机技术基础(c语言)小虫子挖隧道设计

计算机技术基础课程设计C语言设计报告题目小虫子挖隧道一、选题背景1、问题提出通过C语言的学习和对程序设计的兴趣，使我很想设计一个小程序，使自己对程序设计有更深的认识，来充实一下这学期的学习。2、在这个程序中应用了C语言中的一些基本知识，来运行出一个应用方向键的小程序。二、设计思路1、练习进行图形的界面处理，通过语句INCLUDE将库函数引出，通过INIT函数初始化图形系统，编写相应的的功能函数完成大嘴巴的效果，通过循环响应。2、在实现过程中，通过调用虫子嘴巴函数和四个方向移动函数，可以看到在设计的背景颜色下以张着大嘴巴挖出隧道移动。3、主要应用如下PIESLICE绘制并填充一个扇形SETFILLSTYE设置填充模式和颜色INCLUDE文件包含初始化图形系统FOR循环INITGRAPH初始化图形系统CLOSEGRAPH关闭初始化图形系统SETBKCOLOR设计背景颜色PUTPIXEL在指定位置画一像素开始INITGROUNDFORI1PUTPIXELIIINCLUDEINCLUDEINCLUDEDEFINEMAXX640DEFINEMAXY480DEFINEMINX0DEFINEMINY0DEFINEMIDX0DEFINEMIDY0DEFINER15MAININTI,X,Y退出CHARC/定义变量/INIT/调用图形初始化函数/GROUND/调用画土地函数/X320Y240DAZUIRX,Y,13/调用画虫子函数/CWHILEC015CGETCHSWITCHCCASEMDAZUIX,Y,13/调用合上嘴巴函数/DELAY2000/延迟2000毫秒/DAZUIX,Y,0/调用合上嘴巴函数/XX15/嘴巴前进/DELAY1000/延迟1000毫秒/DAZUIRX,Y,13/调用向右嘴巴函数/BREAKCASEHDAZUIX,Y,13/调用合上嘴巴函数/DELAY2000/延迟2000毫秒/DAZUIX,Y,0/调用合上嘴巴函数/YY15/移动嘴巴位置/DELAY1000/延迟1000毫秒/DAZUITX,Y,13/调用向上嘴巴函数/BREAKCASEKDAZUIX,Y,13/调用合上嘴巴函数/DELAY2000/延迟2000毫秒/DAZUIX,Y,0/调用合上嘴巴函数/XX15/移动嘴巴位置/DELAY1000/延迟1000毫秒/DAZUILX,Y,13/调用向左嘴巴函数/BREAKCASEPDAZUIX,Y,13/调用合上嘴巴函数/DELAY2000/延迟2000毫秒/DAZUIX,Y,0/调用合上嘴巴函数/YY15/移动嘴巴位置/DELAY1000/延迟1000毫秒/DAZUIBX,Y,13/调用向下嘴巴函数/BREAKDEFAULTINIT/定义初始化图形系统函数/INTGDRIVERDETECTINTGMOBEINITGRAPH/初始化图象系统/SETBKCOLOR0/定义背景为黑色/RETURNGROUND/画绿地函数/INTI,RX,RYFORI1I2000I/循环系统语句/PUTPIXELRANDMAXX,RANDMAXY,2/在指定位置画一像素/FORI1I1000IRXRANDMAXXRYRANDMAXY/随机位置画一像素/PUTPIXELRX,RY,12PUTPIXELRX1,RY,12PUTPIXELRX1,RY1,12/在三个相邻位置画像素/FORI1I20000IPUTPIXELRANDMAXX,RANDMAXY,10/在指定位置画一像素/RETURNDAZUIINTX,INTY,INTLCOLOR/在X,Y处以LCOLOR色画合上大嘴巴/SETCOLORLCOLOR/设置当前画线颜色/SETFILLSTYLE1,LCOLOR/设置填充模式和颜色/PIESLICEX,Y,0,360,R/绘制并填充一个扇形/SETLINESTYLE0,0,3/设置当前画线宽度和类型/SETCOLOR0/设置当前画线颜色/CIRCLEX4,Y6,2/在给定半径以（X,Y）为圆心画圆/RETURNDAZUIRINTX,INTY,INTLCOLOR/在X,Y处以LCOLOR色向右的大嘴巴/SETCOLORLCOLOR/设置当前画线颜色/SETFILLSTYLE1,LCOLOR/设置填充模式和颜色/PIESLICEX,Y,30,330,R/绘制并填充一个扇形/SETLINESTYLE0,0,3/设置当前画线宽度和类型/SETCOLOR0/设置当前画线颜色/CIRCLEX4,Y6,2/在给定半径以（X,Y）为圆心画圆/RETURNDAZUILINTX,INTY,INTLCOLOR/在X,Y处以LCOLOR色向左的大嘴巴/SETCOLORLCOLOR/设置当前画线颜色/SETFILLSTYLE1,LCOLOR/设置填充模式和颜色/PIESLICEX,Y,210,360,R/绘制并填充一个扇形/PIESLICEX,Y,0,150,R/绘制并填充一个扇形/SETLINESTYLE0,0,3/设置当前画线宽度和类型/SETCOLOR0/设置当前画线颜色/CIRCLEX4,Y6,2/在给定半径以（X,Y）为圆心画圆/RETURNDAZUITINTX,INTY,INTLCOLOR/在X,Y处以LCOLOR色向上的大嘴巴/SETCOLORLCOLOR/设置当前画线颜色/SETFILLSTYLE1,LCOLOR/设置填充模式和颜色/PIESLICEX,Y,120,360,R/绘制并填充一个扇形/PIESLICEX,Y,0,60,R/绘制并填充一个扇形/SETLINESTYLE0,0,3/设置当前画线宽度和类型/SETCOLOR0/设置当前画线颜色/CIRCLEX7,Y6,2/在给定半径以（X,Y）为圆心画圆/RETURNDAZUIBINTX,INTY,INTLCOLOR/在X,Y处以LCOLOR色向下的大嘴巴/SETCOLORLCOLOR/设置当前画线颜色/SETFILLSTYLE1,LCOLOR/设置填充模式和颜色/PIESLICEX,Y,0,240,R/绘制并填充一个扇形/PIESLICEX,Y,300,360,R/绘制并填充一个扇形/SETLINESTYLE0,0,3/设置当前画线宽度和类型/SETCOLOR0/设置当前画线颜色/CIRCLEX7,Y6,2/在给定半径以（X,Y）为圆心画圆/RETURN五、主要解决问题的方法及技术要求主要用函数和循环函数，结合背景设计，用PIESLICE,SELFILLSTYLE画扇形，并成为大嘴巴的电子形象。六、设计结果说明1、设计优点该程序运用了所学到的基本知识，通过宏定义和多次的调用函数，浅显易懂，运行后比较生动，达到了设计的初衷。看过的人可以很清楚明白，并且可以通过改变程序的设计背景，达到意想的效果。2、设计不足此程序不是游戏模式，只是一个运用所学过的知识，运行出一个可通过键盘调节的小程序。3、设计改进如果通过更深入的学习，可以尝试把此程序设计在音效之下，并改进成游戏模式。GANEMPLOYMENTTRIBUNALCLAIMEMPLOYMENTTRIBUNALSSORTOUTDISAGREEMENTSBETWEENEMPLOYERSANDEMPLOYEESYOUMAYNEEDTOMAKEACLAIMTOANEMPLOYMENTTRIBUNALIFYOUDONTAGREEWITHTHEDISCIPLINARYACTIONYOUREMPLOYERHASTAKENAGAINSTYOUYOUREMPLOYERDISMISSESYOUANDYOUTHINKTHATYOUHAVEBEENDISMISSEDUNFAIRLYFORMOREINFORMATIONABOUTDISMISSALANDUNFAIRDISMISSAL,SEEDISMISSALYOUCANMAKEACLAIMTOANEMPLOYMENTTRIBUNAL,EVENIFYOUHAVENTAPPEALEDAGAINSTTHEDISCIPLINARYACTIONYOUREMPLOYERHASTAKENAGAINSTYOUHOWEVER,IFYOUWINYOURCASE,THETRIBUNALMAYREDUCEANYCOMPENSATIONAWARDEDTOYOUASARESULTOFYOURFAILURETOAPPEALREMEMBERTHATINMOSTCASESYOUMUSTMAKEANAPPLICATIONTOANEMPLOYMENTTRIBUNALWITHINTHREEMONTHSOFTHEDATEWHENTHEEVENTYOUARECOMPLAININGABOUTHAPPENEDIFYOURAPPLICATIONISRECEIVEDAFTERTHISTIMELIMIT,THETRIBUNALWILLNOTUSUALLYACCEPTITIFYOUAREWORRIEDABOUTHOWTHETIMELIMITSAPPLYTOYOU,TAKEADVICEFROMONEOFTHEORGANISATIONSLISTEDUNDERFURTHERHELPEMPLOYMENTTRIBUNALSARELESSFORMALTHANSOMEOTHERCOURTS,BUTITISSTILLALEGALPROCESSANDYOUWILLNEEDTOGIVEEVIDENCEUNDERANOATHORAFFIRMATIONMOSTPEOPLEFINDMAKINGACLAIMTOANEMPLOYMENTTRIBUNALCHALLENGINGIFYOUARETHINKINGABOUTMAKINGACLAIMTOANEMPLOYMENTTRIBUNAL,YOUSHOULDGETHELPSTRAIGHTAWAYFROMONEOFTHEORGANISATIONSLISTEDUNDERFURTHERHELPIFYOUAREBEINGREPRESENTEDBYASOLICITORATTHETRIBUNAL,THEYMAYASKYOUTOSIGNANAGREEMENTWHEREYOUPAYTHEIRFEEOUTOFYOURCOMPENSATIONIFYOUWINTHECASETHISISKNOWNASADAMAGESBASEDAGREEMENTINENGLANDANDWALES,YOURSOLICITORCANTCHARGEYOUMORETHAN35OFYOURCOMPENSATIONIFYOUWINTHECASEIFYOUARETHINKINGABOUTSIGNINGUPFORADAMAGESBASEDAGREEMENT,YOUSHOULDMAKESUREYOURECLEARABOUTTHETERMSOFTHEAGREEMENTITMIGHTBEBESTTOGETADVICEFROMANEXPERIENCEDADVISER,FOREXAMPLE,ATACITIZENSADVICEBUREAUTOFINDYOURNEARESTCAB,INCLUDINGTHOSETHATGIVEADVICEBYEMAIL,CLICKONNEARESTCABFORMOREINFORMATIONABOUTMAKINGACLAIMTOANEMPLOYMENTTRIBUNAL,SEEEMPLOYMENTTRIBUNALSTHELACKOFAIRUPTHEREWATCHMCAYMANISLANDSBASEDWEBB,THEHEADOFFIFASANTIRACISMTASKFORCE,ISINLONDONFORTHEFOOTBALLASSOCIATIONS150THANNIVERSARYCELEBRATIONSANDWILLATTENDCITYSPREMIERLEAGUEMATCHATCHELSEAONSUNDAY“IAMGOINGTOBEATTHEMATCHTOMORROWANDIHAVEASKEDTOMEETYAYATOURE,“HETOLDBBCSPORT“FORMEITSABOUTHOWHEFELTANDIWOULDLIKETOSPEAKTOHIMFIRSTTOFINDOUTWHATHISEXPERIENCEWAS“UEFAHASOPENEDDISCIPLINARYPROCEEDINGSAGAINSTCSKAFORTHE“RACISTBEHAVIOUROFTHEIRFANS“DURINGCITYS21WINMICHELPLATINI,PRESIDENTOFEUROPEANFOOTBALLSGOVERNINGBODY,HASALSOORDEREDANIMMEDIATEINVESTIGATIONINTOTHEREFEREESACTIONSCSKASAIDTHEYWERE“SURPRISEDANDDISAPPOINTED“BYTOURESCOMPLAINTINASTATEMENTTHERUSSIANSIDEADDED“WEFOUNDNORACISTINSULTSFROMFANSOFCSKA“AGEHASREACHEDTHEENDOFTHEBEGINNINGOFAWORDMAYBEGUILTYINHISSEEMSTOPASSINGALOTOFDIFFERENTLIFEBECAMETHEAPPEARANCEOFTHESAMEDAYMAYBEBACKINTHEPAST,TOONESELFTHEPARANOIDWEIRDBELIEFDISILLUSIONMENT,THESEDAYS,MYMINDHASBEENVERYMESSY,INMYMINDCONSTANTLYALWAYSFEELONESELFSHOULDGOTODOSOMETHING,ORWRITESOMETHINGTWENTYYEARSOFLIFETRAJECTORYDEEPLYSHALLOW,SUDDENLYFEELSOMETHING,DOIT一字开头的年龄已经到了尾声。或许是愧疚于自己似乎把转瞬即逝的很多个不同的日子过成了同一天的样子；或许是追溯过去，对自己那些近乎偏执的怪异信念的醒悟，这些天以来，思绪一直很凌乱，在脑海中不断纠缠。总觉得自己自己似乎应该去做点什么，或者写点什么。二十年的人生轨迹深深浅浅，突然就感觉到有些事情，非做不可了。THEENDOFOURLIFE,ANDCANMEETMANYTHINGSREALLYDO而穷尽我们的一生，又能遇到多少事情是真正地非做不可DURINGMYCHILDHOOD,THINKLUCKYMONEYANDNEWCLOTHESARENECESSARYFORNEWYEAR,BUTASTHEADVANCEOFTHEAGE,WILLBEMOREANDMOREFOUNDTHATTHOSETHINGSAREOPTIONALJUNIORHIGHSCHOOL,THOUGHTTOHAVEACRUSHONJUSTMEANSTHATTHEREALGROWTH,BUTOVERTHEPASTTHREEYEARSLATER,HISWRITINGOFALUMNIINPEACE,SUDDENLYFOUNDTHATISNTREALLYGROWUP,ITSEEMSISNOTSOIMPORTANTTHENINHIGHSCHOOL,THINKDONTWANTTOGIVEVENTTOOUTYOURINNERVOICECANBEINTHEHIGHSCHOOLCHILDRENOFTHEFEELINGSINAPERIOD,BUTWASEVENTUALLYINFARCTIONWHENGRADUATIONPARTYINTHETHROAT,LATERAGAINSTOODONTHEPITCHHEHASSWEATPROFUSELY,LOOKEDATHISTHROWNABASKETBALLHOOPS,SUDDENLYFOUNDHIMSELFHASALREADYCANTREMEMBERHISAPPEARANCE童年时，觉得压岁钱和新衣服是过年必备，但是随着年龄的推进，会越来越发现，那些东西根本就可有可无；初中时，以为要有一场暗恋才意味着真正的成长，但三年过去后，自己心平气和的写同学录的时候，突然就发现是不是真正的成长了，好像并没有那么重要了；然后到了高中，觉得非要吐露出自己的心声才能为高中生涯里的懵懂情愫划上一个句点，但毕业晚会的时候最终还是被梗塞在了咽喉，后来再次站在他曾经挥汗如雨的球场，看着他投过篮球的球框时，突然间发现自己已经想不起他的容颜。ORIGINALLY,THISWORLD,CANPRODUCEACHEMICALREACTIONTOANEVENT,INADDITIONTORESOLUTELY,HAVETODO,ANDTIME原来，这个世界上，对某个事件能产生化学反应的，除了非做不可的坚决，还有，时间。APERSONSTIME,YOURIDEASAREALWAYSSPECIALTOCLEARWANT,WANT,LINEISCLEAR,ASIFNOTHINGCOULDSHAKEHISALSOONCESEEMEDTOBEDETERMINEDTODOSOMETHING,BUTMOREOFTENISHEBACKEDOUTATLASTDISLIKEHISCOWARDICE,FINALLYFOUNDTHATTHEREAREALOTOFLOVE,THEREAREALOTOFMISS,LIKESHADOWREALLYHAVEBEENDOOMEDTHOSEWHODO,JUSTGREENYEARSONESELFGIVEONESELFANARMINJECTION,ORISASELFRIGHTEOUSSPIRITUAL一个人的时候，自己的想法总是特别地清晰。想要的，不想要的，界限明确，好像没有什么可以撼动自己。也曾经好像已经下定了决心去做某件事，但更多的时候是最后又打起了退堂鼓。嫌恶过自己的怯懦，最终却发现有很多缘分，有很多错过，好像冥冥之中真的已经注定。那些曾经所谓的非做不可，只是青葱年华里自己给自己注射的一支强心剂，或者说，是自以为是的精神寄托罢了。ATTHEMOMENT,THESKYISDARK,THEAIRISFRESHFACTORAFTERJUSTRAINEDSUDDENLYTHOUGHTOFBLUEPLAIDSHIRTTHOSEWEREBROKENINTOVARIOUSSHAPESOFSTATIONERYFROMTHECORNERATTHEBEGINNINGOFDEEPFRIENDSHIPHAVEDECLAREDTHEENDOFTHEENCOUNTERTHATHAVENTSTARTPLANNINGTHOSEYEARS,THOSEDAYSOFDO,FINALLY,LIKEYOUTH,WILLENDINOURLIFE此刻，天空是阴暗的，空气里有着刚下过雨之后的清新因子。突然想到那件蓝格子衬衫；那些被折成各种各样形状的信纸；那段从街角深巷伊始的友谊；还有那场还没有开始就宣告了终结的邂逅计划那些年那些天的非做不可，终于和青春一样，都将在我们的人生中谢幕。BAUMGARTNERTHEDISAPPOINTINGNEWSMISSIONABORTEDRPLAYSANIMPORTANTROLEINTHISMISSIONSTARTINGATTHEGROUND,CONDITIONSHAVETOBEVERYCALMWINDSLESSTHAN2MPH,WITHNOPRECIPITATIONORHUMIDITYANDLIMITEDCLOUDCOVERTHEBALLOON,WITHCAPSULEATTACHED,WILLMOVETHROUGHTHELOWERLEVELOFTHEATMOSPHERETHETROPOSPHEREWHEREOURDAYTODAYWEATHERLIVESITWILLCLIMBHIGHERTHANTHETIPOFMOUNTEVEREST55MILES/885KILOMETERS,DRIFTINGEVENHIGHERTHANTHECRUISINGALTITUDEOFCOMMERCIALAIRLINERS56MILES/917KILOMETERSANDINTOTHESTRATOSPHEREASHECROSSESTHEBOUNDARYLAYERCALLEDTHETROPOPAUSE,ECANEXPECTALOTOFTURBULENCETHESUPERSONICDESCENTCOULDHAPPENASEARLYASSUNDATHEWEATHETHEBALLOONWILLSLOWLYDRIFTTOTHEEDGEOFSPACEAT120,000FEETTHEN,IWOULDASSUME,HEWILLSLOWLYSTEPOUTONTOSOMETHINGRESEMBLINGANOLYMPICDIVINGPLATFORMBELOW,THEEARTHBECOMESTHECONCRETEB