SienTo Posted January 10, 2012 Share Posted January 10, 2012 Περιμένω τα αποτελέσματα ^^ Link to comment Share on other sites More sharing options...
efthimakos Posted January 10, 2012 Author Share Posted January 10, 2012 Περιμένω τα αποτελέσματα ^^ tpt pali re gamwto...:// Link to comment Share on other sites More sharing options...
efthimakos Posted January 10, 2012 Author Share 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... Link to comment Share on other sites More sharing options...
efthimakos Posted January 10, 2012 Author Share 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.. Link to comment Share on other sites More sharing options...
SienTo Posted January 10, 2012 Share 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% θα δουλέψει. Link to comment Share on other sites More sharing options...
efthimakos Posted January 11, 2012 Author Share Posted January 11, 2012 me tn arcana t koitaksa k egw k pio prin dn ftaiei ayto....kt allo einai.... Link to comment Share on other sites More sharing options...
efthimakos Posted January 11, 2012 Author Share 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...:/ Link to comment Share on other sites More sharing options...
Recommended Posts
Please sign in to comment
You will be able to leave a comment after signing in
Sign In Now