• There is NO official Otland's Discord server and NO official Otland's server list. The Otland's Staff does not manage any Discord server or server list. Moderators or administrator of any Discord server or server lists have NO connection to the Otland's Staff. Do not get scammed!

Item Upgrades 8.6 (cryingdamson 0.3.6 V8.2)

D

Darted450

New Member
Joined
Apr 28, 2014
Messages
54
Reaction score
1
Can anybody link me to a working item upgrade system for (cryingdamson 0.3.6 V8.2)?

I've been searching around, and every script I find comes up with errors and fails to launch! Any help really appreciated
 
Sort by date Sort by votes
[29/04/2014 21:19:57] [Error - LuaScriptInterface::loadFile] data/actions/scripts/upgrade.lua:1: unexpected symbol near '['
[29/04/2014 21:19:57] [Warning - Event::loadScript] Cannot load script (data/actions/scripts/upgrade.lua)
[29/04/2014 21:19:57] data/actions/scripts/upgrade.lua:1: unexpected symbol near '['
 
Upvote 0 Downvote
Darted450 said:
[29/04/2014 21:19:57] [Error - LuaScriptInterface::loadFile] data/actions/scripts/upgrade.lua:1: unexpected symbol near '['
[29/04/2014 21:19:57] [Warning - Event::loadScript] Cannot load script (data/actions/scripts/upgrade.lua)
[29/04/2014 21:19:57] data/actions/scripts/upgrade.lua:1: unexpected symbol near '['
Click to expand...


...bump

tried using your script, but didn't seem to work as I got this error stated above
 
Upvote 0 Downvote
you sure you pasted it correctly?

Code: 
--- Perfect refine system by Mock the bear (MTB).
--- Email: [email protected]
-- &a = weapon attack
-- &d = weapon defense
-- &s = shield defense
-- &p = armor defense
-- # = nivel do item
-- @ = max level
local gain = {
gainArmor='&p+(1)',loseArmor='&p-(1)',
gainShield='&s+#',loseShield='&s-(#+1)',
gainAttack='&a+(1*(#))',loseAttack='&a-(1*(#+1))',
gainDefense='&d+(1*(#))',loseDefense='&d-(1*(#+1))',
chance='(100/math.sqrt((((@/4)+(#*2))/@)*#))',
maxlvl = 25,
blocked_ids = {2195}
}
local it = {
--[itemid] = [percent]
[8306] = 0, -- 0% additional
[8305] = 100, -- 50%
}
if not setItemName then
function setItemName(uid,name)
return doItemSetAttribute(uid,'name',name)
end
function setItemArmor(uid,name)
return doItemSetAttribute(uid,'armor',name)
end
function setItemDefense(uid,name)
return doItemSetAttribute(uid,'defense',name)
end
function setItemAttack(uid,name)
return doItemSetAttribute(uid,'attack',name)
end
function getItemAttack(uid)
return getItemAttribute(uid,'attack')
end
function getItemDefense(uid)
return getItemAttribute(uid,'defense')
end
function getItemArmor(uid)
if type(uid) == 'number' then
return getItemAttribute(uid,'armor')
else
return getItemInfo(uid.itemid).armor
end
end
end

local function isArmor(uid) -- Function by Mock the bear.
if (getItemInfo(uid.itemid).armor ~= 0) and (getItemWeaponType(uid.uid) == 0) then
return true
end
return false
end
local function isWeapon(uid) -- Function by Mock the bear.
uid = uid or 0
local f = getItemWeaponType(uid)
if f == 1 or f == 2 or f == 3 then
return true
end
return false
end
local function isShield(uid) -- Function by Mock the bear.
uid = uid or 0
if getItemWeaponType(uid) == 4 then
return true
end
return false
end
local function isBow(uid) -- Function by Mock the bear.
uid = uid or 0
if getItemWeaponType(uid) == 5 then
return true
end
return false
end
local function getWeaponLevel(uid) -- Function by Mock the bear.
uid = uid or 0
local name = getItemName(uid.uid) or getItemInfo(uid.itemid).name or ''
local lvl = string.match(name,'%s%+(%d+)%s*')
return tonumber(lvl) or 0
end
local function doTransform(s,i) -- Function by Mock the bear.
local c = string.gsub(s,'@',gain.maxlvl)
local c = string.gsub(c,'&a',(getItemAttack(i.uid) ~= 0 and getItemAttack(i.uid) or getItemInfo(i.itemid).attack))
local c = string.gsub(c,'&d',(getItemDefense(i.uid) ~= 0 and getItemDefense(i.uid) or getItemInfo(i.itemid).defense))
local c = string.gsub(c,'&s',(getItemDefense(i.uid) ~= 0 and getItemDefense(i.uid) or getItemInfo(i.itemid).defense))
local c = string.gsub(c,'&p',(getItemArmor(i.uid) ~= 0 and getItemArmor(i.uid) or getItemInfo(i.itemid).armor))
local c = string.gsub(c,'#',getWeaponLevel(i))
local q = assert(loadstring('return '..c))
return math.floor(assert(q()))
end
function onUse(cid, item, fromPosition, itemEx, toPosition)
if item.uid == 0 or item.itemid == 0 then return false end
toPosition.stackpos = 255
if isInArray(gain.blocked_ids, itemEx.itemid)
or (not getItemWeaponType(itemEx.uid) or getItemWeaponType(itemEx.uid) > 5)
or (getItemWeaponType(itemEx.uid) == 0 and not isArmor(itemEx))
or itemEx.itemid == 0 or itemEx.type > 1 or isItemStackable(itemEx.uid) then
doPlayerSendTextMessage(cid, 24,"You cant refine this item.")
return TRUE
end
if isCreature(itemEx.uid) == TRUE then
return FALSE
end
local level = getWeaponLevel(itemEx)
local chance = doTransform(gain.chance,itemEx)
if level == gain.maxlvl then
doSendMagicEffect(toPosition, 2)
return doPlayerSendTextMessage(cid, 24,"Your item is on max level, you can't upgrade it.")
end
doPlayerSendTextMessage(cid, 24,"Trying refine with "..(chance+it[item.itemid] > 100 and 100 or chance+it[item.itemid]).."% of sucess!")
if chance+it[item.itemid] >= math.random(0,100) then
local nm = getItemName(itemEx.uid)
local slot = nm:match('(%[.+%])') or '' ---If you server use slot system dont change it ^^
slot = slot~='' and ' '..slot or slot
setItemName(itemEx.uid, getItemNameById(itemEx.itemid)..' +'..(level+1)..slot)
addEvent(doPlayerSendTextMessage,500,cid, 24,"Your item has been upgrated to +"..(level+1)..slot..".")
doSendMagicEffect(toPosition, 12)
if isArmor(itemEx) then
local get = doTransform(gain.gainArmor,itemEx)
setItemArmor(itemEx.uid,get)
elseif isBow(itemEx.uid) then
setItemAttack(itemEx.uid, doTransform(gain.gainAttack,itemEx))
elseif isWeapon(itemEx.uid) then
setItemAttack(itemEx.uid, doTransform(gain.gainAttack,itemEx))
setItemDefense(itemEx.uid, doTransform(gain.gainDefense,itemEx))
elseif isShield(itemEx.uid) then
setItemDefense(itemEx.uid, doTransform(gain.gainShield,itemEx))
end
else
if level == 0 then
addEvent(doPlayerSendTextMessage,500,cid, 24,"No effect.")
doSendMagicEffect(toPosition, 2)
elseif level > 0 then
local nm = getItemName(itemEx.uid)
local slot = nm:match('(%[.+%])') or '' ---If you server use slot system dont change it ^^
slot = slot~='' and ' '..slot or slot
if level == 1 then
setItemName(itemEx.uid, getItemNameById(itemEx.itemid)..slot)
addEvent(doPlayerSendTextMessage,500,cid, 24,"Your item back to normal.")
else
setItemName(itemEx.uid, getItemNameById(itemEx.itemid)..' +'..(level-1)..slot)
addEvent(doPlayerSendTextMessage,500,cid, 24,"Your item back to +"..(level-1)..slot..".")
end
if isArmor(itemEx) then
setItemArmor(itemEx.uid,doTransform(gain.loseArmor ,itemEx))
elseif isWeapon(itemEx.uid) then
setItemAttack(itemEx.uid, doTransform(gain.loseAttack,itemEx))
setItemDefense(itemEx.uid, doTransform(gain.loseDefense,itemEx))
elseif isBow(itemEx.uid) then
setItemAttack(itemEx.uid, doTransform(gain.loseAttack,itemEx))
elseif isShield(itemEx.uid) then
setItemDefense(itemEx.uid, doTransform(gain.loseShield,itemEx))
end
end
doSendMagicEffect(toPosition, 9)
end
doRemoveItem(item.uid,1)
return true
end

mine, working, slightly edited for personal use
 
Upvote 0 Downvote
I got it working, but now I want to edit it so you can only upgrade an item once, and it would give better results (between 1-10)
 
Upvote 0 Downvote
upgrade once:
Code: 
maxlvl = 1,

to get better results you have to work on this bit, i'm not really sure how to do it.. also chance should be changed, since upgrading to +1 has 100% chance of success
Code: 
gainArmor='&p+(1)',loseArmor='&p-(1)',
gainShield='&s+#',loseShield='&s-(#+1)',
gainAttack='&a+(1*(#))',loseAttack='&a-(1*(#+1))',
gainDefense='&d+(1*(#))',loseDefense='&d-(1*(#+1))',
chance='(100/math.sqrt((((@/4)+(#*2))/@)*#))',
 
Upvote 0 Downvote
pejsolo said:
upgrade once:
Code: 
maxlvl = 1,

to get better results you have to work on this bit, i'm not really sure how to do it.. also chance should be changed, since upgrading to +1 has 100% chance of success
Code: 
gainArmor='&p+(1)',loseArmor='&p-(1)',
gainShield='&s+#',loseShield='&s-(#+1)',
gainAttack='&a+(1*(#))',loseAttack='&a-(1*(#+1))',
gainDefense='&d+(1*(#))',loseDefense='&d-(1*(#+1))',
chance='(100/math.sqrt((((@/4)+(#*2))/@)*#))',
Click to expand...

gainAttack='&a+math.random(100)',loseAttack='&a-(1*(#+1))',

Will select a number between 1-100
 
Upvote 0 Downvote

Similar threads

ralke
  • Question
TFS 1.X+ Upgrade system doesn't add enchantment values if player dies and spawn
Replies
0
Views
292
ralke
ralke
Fischturd
  • Question
Lua HealthGain and ManaGain
Replies
6
Views
631
Fischturd
Fischturd
D
  • Question
TFS 1.X+ TFS 1.5 downgrade to 8.6 not compiling
Replies
0
Views
344
dyl12189
D
VitoxMaster
  • Question
[TFS 1.5 8.6] STAT_MAXHITPOINTS problem with multiple items
Replies
3
Views
584
VitoxMaster
VitoxMaster
S
  • Question
tfs 0.4 tibia 8.6 0xc000007b error
Replies
2
Views
205
staberek
S
G
  • Question
TFS 0.X [TFS]0.3.6 decrease map size or compile 64bit
Replies
1
Views
376
claws2012
C
E
  • Solved
TFS 1.X+ [Error - mysql_store_result] Query: SELECT 'QuestPoints' FROM 'players' WHERE 'id' =8
Replies
2
Views
293
Erna
E
Nith
  • Question
TFS 0.X Error in Actions
Replies
0
Views
140
Nith
Nith
Back
Top