efthimakos Posted January 10, 2012 Author Posted January 10, 2012 Περιμένω τα αποτελέσματα ^^ tpt pali re gamwto...:// Quote
efthimakos Posted January 10, 2012 Author Posted January 10, 2012 na s pw..yparxounn dyo scripts grafei enchant...t ena einai legetai ''enchantbless'' k ''enchantnobless'' egw mpainw sto prwto k ta allazw... Quote
efthimakos Posted January 10, 2012 Author Posted January 10, 2012 isws se voithisei ayto ''enchantnobless''http://www.4shared.com/photo/hewyJ7hP/enchantnobless.html? k ''enchantbless''http://www.4shared.com/photo/izIFHUPy/enchantbless.html?....koitata kltr.. Quote
SienTo Posted January 10, 2012 Posted January 10, 2012 Το είδα το script. Δε μου λες, τα scroll που κάνεις enchant είναι Normal ή Blessed Enchant Scrolls? //edit: ΕΛΕΟΣ!!! Πάλι καλά που έβαλες το screenshot. Εσύ στο όπλο έχεις βάλει Arcane Mace Acumen ενώ το όπλο λέγετε Arcana Mace Acumen. //edit2: Άν δεν δουλέψει, τότε κλείσε το Lineage, κλείσε το L2Tower, σβήστο και από το Tray (κάτω δεξιά), άνοιξε το enchantbless.lua με σημειωματάριο. Αντέγραψε το script: -- SCRIPT CONFIGURATION! item_name = "Arcana Mace" enchant_name = "Scroll: Enchant Weapon (S-Grade)" blessed_enchant_name = "Blessed Scroll: Enchant Weapon (S-Grade)" max_enchant = 25 max_safe_enchant = 3 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", "Out of items" ) 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 ( 500 ) -- 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 ( 500 ) -- sleep so item data is updated registerFailure ( item.Enchanted + 1) end printStatistics() end ShowToClient("Enchant", "Enchant script finished") printStatistics() Κάνε επικόλληση μέσα στο enchantbless.lua. Αποθήκευσε το, άνοιξε tower και 100% θα δουλέψει. Quote
efthimakos Posted January 11, 2012 Author Posted January 11, 2012 me tn arcana t koitaksa k egw k pio prin dn ftaiei ayto....kt allo einai.... Quote
efthimakos Posted January 11, 2012 Author Posted January 11, 2012 me tn arcana t koitaksa k egw k pio prin dn ftaiei ayto....kt allo einai.... tlk tpt...apo exthes paleyw...:/ Quote
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.