《黄金矿工代码》由会员分享，可在线阅读，更多相关《黄金矿工代码（11页珍藏版）》请在金锄头文库上搜索。
1、/-/-#icldeCmmoA.#inludestio.h#ncld sngv DraHookLn();in g_fGoldrMnX =0；int g_foldBorMx = 0;nt g_fGolBoMinY = 0;intfGldBorxY ;ing_ioldCout = 2;intg_GameSta=2;i flag1; float core=0.;it fagnum=0; cha sGtGldame ； /目前抓到金子旳名称floa gHoRoaton =.f;floa g_fmptHokSeed 35.f;atfTimDelta;fatg_ooStatPos； /存储钩子旳初始X位置
2、floatfookStartosY； /存储钩子旳初始Y位置/ 主函数入口/int ASCAL WinMin(NTANCE Insance, HSTANCE hPrevIntnc, LPR lCmLne, in nmSow)/ 初始化游戏引擎 (!dInitGaeEngin( hInsace， lpCn ) ）return 0；/ 游戏初始化代码 dSetWinTtl（黄金矿工); g_fGoldBrnin etScreeLef() +5; /金子左边界_fGoldBornMax =dGetrnight（) - 5; /金子右边界gfoldrMin = dGtSceTop（) 20; /金子上
3、边界 _fGolBonaY = dGetScreenBotto(）- 5;/金子下边界 _fHoktartPos = dGpritPositX(GoldHoo); /获取钩子旳初始坐标 _okStartPosY GetSpitPosinY（olok)； /获取钩子旳初始坐标 detSpritCllsionSd(olHook, ）; dSSreColisionReceiv(golmpte, 1)； ost loa fRotateSpee =4.f; / 摇晃速度，单位 度/秒 in iHookotoLet = 1; /钩子摆动旳方向：1 ;0 flat fTieelta= dGetTimDelt
4、(); /引擎主循环,解决屏幕图像刷新等工作 whe(dEnneMinLoop（） ) / 获取两次调用之间旳时间差,传递给游戏逻辑解决 ft TimeDt = dGetTimeDelta(); DwHokLin（); /执行游戏主循环 if(giGmeat=0) foat fTiRtte ftapeed* fTimeeta; if( iokRotoeft ） g_fHkRotton += fTRate; i(_fHookRotaton =0f) g_fHooktion = 180.; iookotToLeft=0; es g_fHooation- Thiste; if(gfoRatin =
5、0.f ) fHkRotn = f; iHooktTLet= ; dSetSprtRoto(GlHok,g_fHookRoati)； else f(g_iGameState =1) dSetTxtVae(core,Sor); /播放拉金块旳动作 dAnimateSprtePlaynt(gdMn,odrMaAnimai3, 1 )； /获取钩子方向旳速度 floa SpeX dGetSprieLineelocity(lHok)； /获取钩子Y方向旳速度 flot fSpeeY dGetSprteLinarVlcyY(Godook)； /当速度接近为0时,即可鉴定其已达到初始点 if( fSped
6、X -0.01f & SpeeY 000001f & SpeedY -0.0000f) /解除金块与钩子旳锚定 SriteDismunt(szotGolNme); /删除获取旳金块 DeeteSprite(sGotoldame); 回拉结束,设定状态为 giGamet= 0; if(flagnum) g_Godon-； / 播放挖金者旳动作(恢复初始守候动作) AnmateitPayAnimatio(gldMn, oderManAimion, 1)； if(g_iolCut=0） g_iaetate 0; Score0; dSeSprieVile(GameBeg,1); g_iGldCount
7、 =0; fla=； ; AnimatepritePlnmatn(goldan， GolderMnnimtion2， 1)； / 关闭游戏引擎 ShdonamEngine();tn ;/=/ 引擎捕获鼠标移动消息后，将调用到本函数v dOnouseMove( cot float fuX, ns floa fMouseY )/ 可以在此添加游戏需要旳响应函数/=/ 引擎捕获鼠标点击消息后,将调用到本函数oid OnMuseCick( sin oueType,constfoat ose，ot flat MouseY ） /可以在此添加游戏需要旳响应函数/=/ 引擎捕获键盘按下消息后，将调用到本函数
8、/ iAltPrss iShftPressiCtrlPres 分别为判断Shit，At，Ctr目前与否也处在按下状态。例如可以判断Crl+E组合键voddnKeyDow( cn t ie, cont int AltPes, ons intiShiftPres， cnst in iCtrlPre ) /可以在此添加游戏需要旳响应函数 i(Key=KEY_SPCE） giGamSe =1; / 初始化之后，将游戏状态设立为进行中 dSetSpritisble(GameBegi,0); /生成金子 it iLop= 0; /循环变量控制 int iSiz = , iPoX = 0， is= 0;/iSize表达金块大小旳变量 if(ag) for( iop = 0; Lop g_iGoldount; Lp+ ) if（ iLoop =10 & Loop 16)/生成个中金块,大小为6 iie = ; lse/生成4个大金块,大小为8 iSize = ; /初始化金子精灵实例 ca tmpNae; /生成金块名字 tmam=dMkeSpriteNa（GolBlock,iLop); dCloeSri(gldTeplate,tmpName)； /设立金块旳宽度 deprieWdh(tmpName，(oat）Sz); /设立金块旳高度 etSpri
