Threaded Mode | Linear Mode

JohnnyLucker · 11-03-2013 04:33 AM

1.Есть мобы у них есть name,но при поучение dmg от них в системники пишется nonamenpc,итовер не видит их в упор и даже в игнор нельзя их кинуть так же пишет выделите цель,хотя я выделил в чём беда как решать проблему?

2.Скрипт на заточку вобще работал когда-то? и бо гдне пробывал после одного точение не точит можно конечно выставить кликер на место запуска и остановки скрипта и будет точить так по 1 но это же через жопу почему он не работает постоянно сам?

*freemanpro* · 11-03-2013 04:58 AM

это анти бот мобы, надо просто узнать их ID и тупо заблокировать по скрипту и все (или у тебя стоит кривой патч на имена мобов )

обычно это кривой патч в котором нахватает название этих мобов ( люди иногда ставять дро споил патч )

Chuck_uz · 11-03-2013 19:13 PM

насчет скрипта на заточку

PHP Code:

-- SCRIPT CONFIGURATION!

item_name = "Ring of Queen Ant"
enchant_name = "Blessed Scroll: Enchant Armor (B-Grade)"
blessed_enchant_name = "Blessed Scroll: Enchant Armor (B-Grade)"
max_enchant = 20
max_safe_enchant = 20
delay = 2100
 
-- END OF SCRIPT CONFIGURATION
 
-- HELPER FUNCTIONS
function enchantResult()
 return GetEnchantManager():getLastResult()
end
 
function getItemByName(name, maxenchant)
    invList = GetInventory();
    for item in invList.list do
 if item.Name == name and item.Enchanted < maxenchant then
 return item
 end
    end
end
 
stats = {}
 
function registerSuccess(base)
    if stats[base] == nil then
 stats[base] = { success = 0, failure = 0 }
    end
    stats[base].success = stats[base].success + 1
end
 
function registerFailure(base)
    if stats[base] == nil then
 stats[base] = { success = 0, failure = 0 }
    end
    stats[base].failure = stats[base].failure + 1
end
 
function printStatistics()
    for i,v in ipairs(stats) do
 --ShowToClient("Enchant", "[" .. i - 1 .. "->" .. i .. "] Rate: success: " .. v.success .. " / fail: " .. v.failure .." (" .. ( v.success * 100 )/ ( v.success + v.failure ) .. "%)")
    end
end
 
-- MAIN LOOP!
 
while true do
    -- find item for enchanting
    item = getItemByName(item_name, max_enchant)
    if ( item == nil ) then
 ShowToClient("Enchant", "HETy Item uJIu TO4ku" )
 break
    end
    -- find proper enchant scroll
    enchant = nil
    if ( item.Enchanted >= max_safe_enchant ) then
 enchant = getItemByName(blessed_enchant_name, 20)
    else
 enchant = getItemByName(enchant_name, 20)
    end
 
    if ( enchant == nil ) then
 --ShowToClient("Enchant", "Out of enchants")
 break
    end
 
 GetEnchantManager():setDelay(delay)
    GetEnchantManager():setEnchantId(enchant.objectId)
    GetEnchantManager():setItemId(item.objectId)
    GetEnchantManager():Enchant()
 
    while ( enchantResult() == Enchant.ENCHANT_PENDING ) do
 Sleep(200)
    end
 
    if ( enchantResult() == Enchant.ENCHANT_SUCCESS ) then    
 Sleep ( 800 ) -- sleep so item data is updated
 item = GetInventory():FindById(item.objectId)
 --ShowToClient("Enchant", item.Name .. " is now +" .. item.Enchanted);
 registerSuccess ( item.Enchanted )
    elseif ( enchantResult() == Enchant.ENCHANT_FAILURE ) then
 --ShowToClient("Enchant", item.Name .. " failed on " .. item.Enchanted .. " -> " .. item.Enchanted+1)
 Sleep ( 800 ) -- sleep so item data is updated
 registerFailure ( item.Enchanted + 1)
    end
    printStatistics()
end


Action(34,false,false); 
ShowToClient("Enchant", "Bce 3aTo4uJI")

printStatistics() 

Работает, юзай.

JohnnyLucker · 11-05-2013 03:31 AM

Code:

59021    FARMS A9E89C

Вот в патчи id и имя,и в игре так же Farm,но в системники нонейм так что сделать поподробней в такой ситуации,щас уже не надо но хочу знаю на будущие как с этим бороться.
И еще один вопрос скрипт есть на смену цели если цель не видна? видел пару но плагины а плагины я так понял только для платной версии?

Chuck_uz · 11-06-2013 21:38 PM

в чат пишешь /targetfix

JohnnyLucker · 11-07-2013 23:47 PM

Chuck_uz
Попробовал ваш скрипт,всё равно точит один раз и всё,в чём проблема может быть?

Chuck_uz · 11-08-2013 22:58 PM

Изначально у меня тоже точило 1 раз, затем я поменял параметр Sleep ( 500 ) на Sleep ( 800 )
И все замечательно стало точиться.

Code:

if ( enchantResult() == Enchant.ENCHANT_SUCCESS ) then 

 [color=#FF0000]Sleep ( 800 )[/color] -- sleep so item data is updated

 item = GetInventory():FindById(item.objectId)

 --ShowToClient("Enchant", item.Name .. " is now +" .. item.Enchanted);

 registerSuccess ( item.Enchanted )

 elseif ( enchantResult() == Enchant.ENCHANT_FAILURE ) then

 --ShowToClient("Enchant", item.Name .. " failed on " .. item.Enchanted .. " -> " .. item.Enchanted+1)

 [color=#FF0000]Sleep ( 800 )[/color] -- sleep so item data is updated

 registerFailure ( item.Enchanted + 1)

 end

Попробуйте и Вы "поиграть" с ним.

gikku · 11-13-2013 13:43 PM

A esli imea mobov na ruskom iazike bot ne videt i ne biot ih vapse shto delati??

Possibly Related Threads...
Thread:		Author	Replies:	Views:	Last Post
	/xcfg pickup, Вопрос.	user1488	4	6,977	06-07-2015 13:02 PM Last Post: user1488
	вопрос о рыбалке	Cyberdis	8	10,023	10-07-2014 12:35 PM Last Post: Gast1488
	Вопрос по бесплатному боту	donking	1	3,311	10-02-2014 22:09 PM Last Post: phuntik
	Умная защита вопрос ответ	drenod	0	2,582	07-15-2014 23:40 PM Last Post: drenod
	Нубский вопрос по написанию скрипта	geezer	2	3,873	07-02-2014 01:43 AM Last Post: Spectre7TS
	Вопрос по работе бота	trbogdan	5	8,207	05-08-2014 13:03 PM Last Post: zbn
	Вопрос.	bogdanwesel0017	0	2,353	01-17-2014 14:11 PM Last Post: bogdanwesel0017
	Вопрос: Автоматизировать бафф через alt+b	TurboON	8	12,173	08-21-2013 06:50 AM Last Post: Linuksoid
	Ребята что это такое?	xOrion	2	4,970	05-31-2013 00:18 AM Last Post: Nikas

Threaded Mode \| Linear Mode Такое дело Вопрос/Расуждения!
Author	Message