lly000lly 发表于 2012-10-8 00:07

真正的无限刷女皇蜂,考验电脑的时候到了!!!!!!!!!!!!!!!!!!!!!!!!!!

本帖最后由 lly000lly 于 2012-10-8 22:27 编辑

上次发帖忘记了标明是POX911兄原创,我这里表示道歉;
这次POX911兄修正了原来刷小虫养蜂的过程,可以一次到位,小虫直接孵化出女皇蜂,无需多次孵化;
原帖:http://forum.cheatengine.org/viewtopic.php?t=557381&postdays=0&postorder=asc&start=840
代码如下(为了不和一些特殊按键冲突,我修正了一下按键,你也可以自己修改):

ObjScan = createMemScan()
BaseAddress =getAddress('[[[[["Borderlands2.exe"+015B2260]+38]+2BC]+358]+1E4]+0')
Count =0
ObjResult = {}
CurrentObj = 0
AdultVarkidAddress = 0


function DenFind()
   memscan_firstScan(ObjScan,soExactValue,vtDword,"",BaseAddress,"0","0x00000000","0x70000000","",fsmAligned,"4",false,false,true,false)
   memscan_waitTillDone(ObjScan)
   ObjResult = createFoundList(ObjScan)
   foundlist_initialize(ObjResult)
   Count =foundlist_getCount(ObjResult) - 1
   CurrentObj = 1
   showMessage("Found " .. Count .. " Enemy Spawns")
end

createHotkey("DenFind",45)


function KillReset()
fori=1,Count do
   local offset = foundlist_getAddress(ObjResult,i)
   local address = getAddress(offset .. "+84")
   writeInteger(address,0)
end
end

function MaxUp()
for i=1,Count do
   localoffset = foundlist_getAddress(ObjResult,i)
   local address =getAddress(offset .. "+60")
   local CurVal = readInteger(address)
   writeInteger(address,CurVal + 1)
end
end

function MaxDown()
for i=1,Count do
   local offset = foundlist_getAddress(ObjResult,i)
   local address = getAddress(offset .. "+60")
   local CurVal =readInteger(address)
   if CurVal > 1 then
   writeInteger(address,CurVal - 1)
   end
end
end


createHotkey("KillReset",37)
createHotkey("MaxUp",38)
createHotkey("MaxDown",40)

function VarkidSwap()
   fori=3,Count-2 do
      local offset = foundlist_getAddress(ObjResult,i)
      if readInteger(getAddress("[" .. offset .. "+24]+44")) == 2 then
         if readInteger(getAddress("[[" .. offset .. "+24]+40]+2c")) == 990057071 then
            AdultVarkidAddress = "[[" .. offset .. "+24]+40]+0"
            --showMessage("AdultVarkidFound = " .. AdultVarkidAddress)
         end
      end
   end
   local VarScan = createMemScan()
   localVarkid = readInteger('[' .. AdultVarkidAddress .. ']+0')
   memscan_firstScan(VarScan,soExactValue,vtDword,"",Varkid,"0","0x00000000","0x70000000","",fsmAligned,"4",false,false,true,false)
   memscan_waitTillDone(VarScan)
   local VarResult =createFoundList(VarScan)
   foundlist_initialize(VarResult)
   localVarCount = foundlist_getCount(VarResult) - 1
   --showMessage("Found " ..VarCount .. " Enemy Spawns")
   for i=1,VarCount do
       local offset= foundlist_getAddress(VarResult,i)
      if readString(getAddress("[[[" ..offset .. "+AC]+44]+4]+0"),10,true) == "Vermi" then
         showMessage("Adult Varkids Replaced with Vermi")
         writeInteger(getAddress(AdultVarkidAddress),getAddress(offset))
      end
   end
end
createHotkey("VarkidSwap",39)

解释下用法:
1、前面的和以前一样,我不多说;
2、先按<Insert>搜索怪,然后等小虫出来后,按键盘右方向键就可以让小虫直接孵化成女皇蜂;
3、键盘左方向键为复活小虫,键盘上方向键为增加复活数量,键盘下方向键为减少复活数量;






Safe_And_Sound 发表于 2012-10-8 00:10

求CT 不太懂CE

hxianzhe 发表于 2012-10-8 00:10

还不如直接改装备得了,作弊还要绕个弯子啊

Safe_And_Sound 发表于 2012-10-8 00:17

多谢楼主 变女王蜂刷去了 嘿嘿

327879589 发表于 2012-10-8 00:41

Safe_And_Sound 发表于 2012-10-8 00:17 static/image/common/back.gif
多谢楼主 变女王蜂刷去了 嘿嘿

女皇蜂是个啥 那种会变卵的蝗虫么 走哪儿打的??

金光霹雳 发表于 2012-10-8 00:44

LZ你说的右方向键可以变女皇,可是没用啊,只能刷出小黄蜂刷不出女皇啊!

yhjyol 发表于 2012-10-8 00:47

hxianzhe 发表于 2012-10-8 00:10 static/image/common/back.gif
还不如直接改装备得了,作弊还要绕个弯子啊

你不懂修改党的乐趣。人家刚安装完游戏按下修改器就二周目全武器收集通关了...

fpsfans001 发表于 2012-10-8 00:54

还是自个养成比较好,然后XX掉....呃,这什么心态?

kmdarkmaster 发表于 2012-10-8 00:59

有了这个修改真是方便多了,感谢分享。

Safe_And_Sound 发表于 2012-10-8 01:13

327879589 发表于 2012-10-8 00:41 static/image/common/back.gif
女皇蜂是个啥 那种会变卵的蝗虫么 走哪儿打的??

苔原告诉或者腐蚀地区

mchotdog002 发表于 2012-10-8 01:16

这个不错~养蜜蜂最恶心了,半天不变

o無o名o 发表于 2012-10-8 01:20

1.0能用?{:3_142:}

mchotdog002 发表于 2012-10-8 01:23

没成功啊= =直接下的CT。。

yhy668 发表于 2012-10-8 01:23

好像很复杂

pk1209 发表于 2012-10-8 02:10

用不了啊啊啊啊

阴灰海 发表于 2012-10-8 03:25

厉害啊!!!!,先试试

阴灰海 发表于 2012-10-8 04:03

我1.02版本的没用,小虫倒是可以复活,但没法直接变。
我复述下我的步骤,开CE-开游戏进苔原-选CE读脚本点执行-选游戏按INSERT-CE弹FOUND 80 ENEMEY SPAWNS -回游戏按小键盘右=ok?,这步骤对不对?还是要先杀一只小虫?求教

wzcwzc2010 发表于 2012-10-8 08:55

那叫峰皇?比魔虫还难打。一出就十来个

lly000lly 发表于 2012-10-8 22:28

上次发的附件发错了,sorry,我已经补正

旧情绪 发表于 2012-10-9 00:12

还是没用 = =. 右方向键是视角,可能按键冲突 .望楼主解决阿..

xanlank 发表于 2012-10-9 00:37

我就刷出来过一次~~就在也不灵了

疯狂高达 发表于 2012-10-9 00:38

我试了几次 只有女皇蜂一个后没看见感觉不行 加以LZ改一改吧

杀了掉橙色护盾我看了一般。。。

jzj020170 发表于 2012-10-9 01:28

感觉左方向键好用 为啥右方向键按下后没有反应呢 楼主能稍微具体一点么

力量哥 发表于 2012-10-9 01:38

自己养猪、养蜂才是乐趣

干什么都作弊,等到死的时候还能作弊吗?

shqn123 发表于 2012-10-9 05:23

谢谢分享

疯狂高达 发表于 2012-10-9 08:11

←键能用↑键↓键能用→键不行 点多次 只能看到小虫子进化2次 没看到进化到女黄蜂的形态   进化只有几只 不是全部

黑色狂想 发表于 2012-10-9 12:00

这个必须顶

dokidoki 发表于 2012-10-9 12:01

支持分享

888sunge 发表于 2012-10-9 12:31

LZ有用过吗?有效吗?

jzj020170 发表于 2012-10-9 12:45

貌似只有在腐蚀洞穴群才可以。。。。
页: [1] 2
查看完整版本: 真正的无限刷女皇蜂,考验电脑的时候到了!!!!!!!!!!!!!!!!!!!!!!!!!!