本源码适用于按键精灵手机版Dim现在时(),Advertisement,barnfull,barnlevel,dw1,dw2,aaa,aCall调整屏幕()Call定位干扰()Call重新联机()Call定位种田()Call主程序()Sub主程序()DoIfReadUIConfig("fans")ThenCall粉丝移除()EndIfFor2Call种植小麦()Call小麦收割()Delay300NextCall粮仓()Ifbarnfull=1ThenTracePrint"判定粮仓满了"Call商店()EndIfCall粮仓水位()//读取界面元素名称为"账号"的默认值,如果该元素未设置默认值则读出100IfReadUIConfig("honey")ThenCall收集()EndIf//-----找邻居卖东西IfReadUIConfig("neighbor")Then//-----开始找邻居的时间Call读现在时(1)If计时器(30,1,false)ThenGotojumpfindEndIfDelay200//---点击次数aaa=0DoUntil计时器(30,1,false)=TrueCall找邻居()Call邻居小麦()Delay1000LoopDelay200RemjumpfindEndIfCall商店()Call重新联机()FindPic917,443,967,491,"Attachment:定位图.png","000000",0,0.7,dw1,dw2Ifdw1<0Anddw2<0ThenCall定位种田()EndIfLoopEndSubSub调整屏幕()TouchDown366,563,1Delay200TouchDown799,248,2Delay200TouchMove630,373,1,200Delay500TouchUp2TouchUp1EndSubSub定位种田()DimcornerX,cornerYDelay200Call读现在时(0)doDelay100Swipe376,250,514,445,300Delay100FindPic0,0,259,142,"Attachment:tree.png","000000",0,0.7,cornerX,cornerYIfcornerX>0AndcornerY>0ThenTracePrint"已定位种田"Delay200TouchDown635,422Delay200TouchMove635,160Delay200TouchUpDelay200TracePrint"调整完毕"ExitDoEndIfIf计时器(10,0,false)ThenTracePrint"指定时间到"Call调整屏幕()Call定位干扰()Call重新联机()EndIfLoopEndSubSub种植小麦()DimlandX,landY//--------无云----------FindPic569,530,651,595,"Attachment:FirstFarmland0.png","000000",0,0.6,landX,landYIflandX<0AndlandY<0Then//--------阴影----------FindPic569,530,651,595,"Attachment:FirstFarmland1.png","000000",0,0.6,landX,landYEndIfIflandX>0AndlandY>0ThenTracePrint"开始种植"Call第一田()Delay500If小麦()=1ThenTracePrint"准备刷地"Call刷地()EndIfDelay1000//TXL=now//PlantingNumber=PlantingNumber+1EndIfEndSubSub小麦收割()Dimland2X,land2Y//--------无云----------FindPic580,528,647,584,"Attachment:FirstFarmland2.png","000000",0,0.7,land2X,land2YIfland2X<0Andland2Y<0Then//--------阴影----------FindPic580,528,647,584,"Attachment:FirstFarmland3.png","000000",0,0.7,land2X,land2YEndIfIfland2X>0Andland2Y>0ThenTracePrint"开始收割"Call第一田()Delay500If收割()=1ThenCall刷地()EndIfDelay1000EndIfEndSub//---点击第一块土地Sub第一田()Delay200Tap609,564TracePrint"已点击第一田"Delay200EndSubFunction小麦()DimintX,intYFindPic497,436,573,512,"Attachment:wheat0.png","000000",0,0.7,intX,intYIfintX>0AndintY>0ThenTracePrint"已找到小麦图标"TouchDown537,473,0TracePrint"已点击小麦图标"Delay100小麦=1ElseTracePrint"未找到小麦图标"小麦=-1EndIfEndFunctionFunction收割()DimintX,intYFindPic465,472,556,552,"Attachment:Sickle.png","000000",0,0.7,intX,intYIfintX>0AndintY>0ThenTouchDown511,492,0TracePrint"已按镰刀"Delay100收割=1ElseTracePrint"未找到镰刀图标"收割=-1EndIfEndFunctionSub刷地()//种植速度，24是延时//读取界面元素名称为"账号"的默认值,如果该元素未设置默认值则读出100DimfaTracePrint"刷地"fa=ReadUIConfig("farm")//将小麦移动至第一块田TouchMove606,568,0,200Delay200//刷第一排TouchMove941,395,0,800Delay200Iffa=0ThenTouchUp0GotofarmlandEndIf//调整至第二排TouchMove905,376,0,200Delay200//刷第二排TouchMove567,545,0,800Iffa=1ThenTouchUp0GotofarmlandEndIf//调整至第三排TouchMove531,528,0,200//刷第三排TouchMove869,359,0,800Iffa=2ThenTouchUp0GotofarmlandEndIf//调整至第四排TouchMove832,342,0,200//刷第四排TouchMove496,508,0,800Iffa=3ThenTouchUp0Gotofar...
