• 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!

Tutorial Best Vip System! Full!

Buenas, tengo unos problemas aqui con el script del VIP antes del name, miralos porfa


[03/07/2011 09:42:33] Lua Script Error: [CreatureScript Interface]
[03/07/2011 09:42:33] data/creaturescripts/scripts/vip.lua:eek:nLogin
[03/07/2011 09:42:33] data/creaturescripts/scripts/vip.lua:3: attempt to index global 'db' (a nil value)
[03/07/2011 09:42:33] stack traceback:
[03/07/2011 09:42:33] [C]: in function '__index'
[03/07/2011 09:42:33] data/creaturescripts/scripts/vip.lua:3: in function <data/creaturescripts/scripts/vip.lua:1>
[03/07/2011 09:42:33] Waker has logged out.

si me podrias ayudar te lo agradeceria mucho. Saludos
 
Trata de usar este haber que sucede..

function pegarNome(name)
return string.sub(name, 7)
end

function onLogin(cid)
local name = getCreatureName(cid)
local nome = getPlayerGUID(cid)

if isPremium(cid) == TRUE then
if string.sub(name, 1,6) == "[VIP] " then
return true
else
db.executeQuery("UPDATE `players` SET `name` = '[VIP] "..name.."' WHERE `id`= " .. nome .. ";")
doPlayerSendTextMessage(cid,19,"You go kicked in 10 seconds for update you name.")
addEvent(doRemoveCreature,10000,cid)
end
else
if string.sub(name, 1,6) == "[VIP] " then
db.executeQuery("UPDATE `players` SET `name` = '"..pegarNome(getCreatureName(cid)).."' WHERE `id`= " .. nome .. ";")
doPlayerSendTextMessage(cid,19,"You go kicked in 10 seconds for update you name.")

addEvent(doRemoveCreature,10000,cid)
end

end
return true
end
Click to expand...
 
hola, probé el otro script y esto es lo que sale:

[04/07/2011 19:30:50] Lua Script Error: [CreatureScript Interface]
[04/07/2011 19:30:50] data/creaturescripts/scripts/vip.lua:eek:nLogin
[04/07/2011 19:30:50] data/creaturescripts/scripts/vip.lua:13: attempt to index global 'db' (a nil value)
[04/07/2011 19:30:50] stack traceback:
[04/07/2011 19:30:50] [C]: in function '__index'
[04/07/2011 19:30:50] data/creaturescripts/scripts/vip.lua:13: in function <data/creaturescripts/scripts/vip.lua:5>
[04/07/2011 19:30:50] Waker has logged out.

creo que es lo mismo :S. Gracias, saludos
 
Que server usas?

Trata de cambia en el scrtip db.executeQuery por db.query
 
Gracias por ayudarme, ya encontre la solución, y pensar que la tenía a un script al lado, tuve que modificar el script que me diste, y agregarle que conectara con mysql y todo eso... si quieres lo publico :) gracias. mi server es TFS V o.2.10
 
Ponlo aqui para que vea que le hiciste si no fue lo que te dije.
Algunas cositas cambian de 0.4 a 0.2

saludos!
 
Necesito un script para que los vips ganen mas exp y suban skills mas rapido porfa! podrias enseñarme como hacerlo !
 
Prueba-

local ex = getPlayerRates(cid)[SKILL__LEVEL]
function onLogin(cid)
if isPremium(cid) == TRUE and getPlayerStorageValue(cid, 12345) == 0 then
setPlayerStorageValue(cid, 12345, 1)
doPlayerSetRate(cid, SKILL__LEVEL, (ex+0.05))

elseif isPremium(cid) == FALSE and getPlayerStorageValue(cid, 12345) == 1 then
doPlayerSetRate(cid, SKILL__LEVEL, (ex-0.05))
setPlayerStorageValue(cid, 12345, 0)
end

return TRUE
end
Click to expand...

MM test..
 
Lo as de registrar en en login.lua tambie.
registerCreatureEvent(cid, "experiencia")

luego te fijas en el xml que tengas experiencia tambien puesta en esa linea ya ves donde deve de ir.
y lo pruebas.
 
Este es mi login.lua
-- This is the configuration
-- The "type" of message to send to the player (default is white(message_status_default)) (types you can check in "global.lua")
SHOP_MSG_TYPE = MESSAGE_STATUS_DEFAULT
-- time (in seconds) between connections to SQL database by iPACC
SQL_interval = 60
-- Do not change this.
SQL_COMUNICATION_INTERVAL = SQL_interval * 1000

local config = {
loginMessage = getConfigValue('loginMessage'),
useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
}

function onLogin(cid)
if(InitShopComunication == 0) then
local eventServ = addEvent(sql_communication, SQL_COMUNICATION_INTERVAL, {})
InitShopComunication = eventServ
end

local loss = getConfigValue('deathLostPercent')
if(loss ~= nil) then
doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, loss * 10)
end

local accountManager = getPlayerAccountManager(cid)
if(accountManager == MANAGER_NONE) then
local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage
if(lastLogin > 0) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
else
str = str .. " Please choose your outfit."
doPlayerSendOutfitWindow(cid)
end

doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
elseif(accountManager == MANAGER_NAMELOCK) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?")
elseif(accountManager == MANAGER_ACCOUNT) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")
else
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")
end

if(not isPlayerGhost(cid)) then
doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
end

registerCreatureEvent(cid, "Mail")
registerCreatureEvent(cid, "GuildMotd")

registerCreatureEvent(cid, "Idle")
if(config.useFragHandler) then
registerCreatureEvent(cid, "SkullCheck")
end

registerCreatureEvent(cid, "ReportBug")
registerCreatureEvent(cid, "AdvanceSave")
return true
end

function sql_communication(parameters)
local result_plr = db.getResult("SELECT * FROM z_ots_comunication WHERE `type` = 'login';")
if(result_plr:getID() ~= -1) then
while(true) do
id = tonumber(result_plr:getDataInt("id"))
action = tostring(result_plr:getDataString("action"))
delete = tonumber(result_plr:getDataInt("delete_it"))
cid = getPlayerByName(tostring(result_plr:getDataString("name")))
if isPlayer(cid) == TRUE then
if action == 'give_item' then
local itemtogive_id = tonumber(result_plr:getDataInt("param1"))
local itemtogive_count = tonumber(result_plr:getDataInt("param2"))
local container_id = tonumber(result_plr:getDataInt("param3"))
local container_count = tonumber(result_plr:getDataInt("param4"))
local add_item_type = tostring(result_plr:getDataString("param5"))
local add_item_name = tostring(result_plr:getDataString("param6"))
local b_head_slot = getPlayerSlotItem(cid, 1)
local b_necklace_slot = getPlayerSlotItem(cid, 2)
local b_backpack_slot = getPlayerSlotItem(cid, 3)
local b_armor_slot = getPlayerSlotItem(cid, 4)
local b_right_hand = getPlayerSlotItem(cid, 5)
local b_left_hand = getPlayerSlotItem(cid, 6)
local b_legs_slot = getPlayerSlotItem(cid, 7)
local b_feet_slot = getPlayerSlotItem(cid, 8)
local b_ring_slot = getPlayerSlotItem(cid, 9)
local b_arrow_slot = getPlayerSlotItem(cid, 10)
if b_arrow_slot.itemid == 0 or (b_left_hand.itemid == 0 and b_right_hand.itemid == 0) then
local full_weight = 0
if add_item_type == 'container' then
container_weight = getItemWeight(container_id, 1)
items_weight = container_count * getItemWeight(itemtogive_id, itemtogive_count)
full_weight = items_weight + container_weight
else
full_weight = 1
end
local free_cap = getPlayerFreeCap(cid)
if add_item_type == 'container' then
local new_container = doCreateItemEx(container_id)
local iter = 0
while iter ~= container_count do
doAddContainerItem(new_container, itemtogive_id, itemtogive_count)
iter = iter + 1
end
doPlayerAddItemEx(cid, new_container)
itemtogive_id = container_id
else
local addeditem = doPlayerAddItem(cid, itemtogive_id, itemtogive_count)
end
local head_slot = getPlayerSlotItem(cid, 1)
local necklace_slot = getPlayerSlotItem(cid, 2)
local backpack_slot = getPlayerSlotItem(cid, 3)
local armor_slot = getPlayerSlotItem(cid, 4)
local right_hand = getPlayerSlotItem(cid, 5)
local left_hand = getPlayerSlotItem(cid, 6)
local legs_slot = getPlayerSlotItem(cid, 7)
local feet_slot = getPlayerSlotItem(cid, 8)
local ring_slot = getPlayerSlotItem(cid, 9)
local arrow_slot = getPlayerSlotItem(cid, 10)
if ring_slot.itemid == itemtogive_id or feet_slot.itemid == itemtogive_id or legs_slot.itemid == itemtogive_id or armor_slot.itemid == itemtogive_id or necklace_slot.itemid == itemtogive_id or head_slot.itemid == itemtogive_id or arrow_slot.itemid == itemtogive_id or left_hand.itemid == itemtogive_id or right_hand.itemid == itemtogive_id or backpack_slot.itemid == itemtogive_id then
if b_ring_slot.uid ~= ring_slot.uid or b_feet_slot.uid ~= feet_slot.uid or b_legs_slot.uid ~= legs_slot.uid or b_armor_slot.uid ~= armor_slot.uid or b_necklace_slot.uid ~= necklace_slot.uid or b_head_slot.uid ~= head_slot.uid or b_backpack_slot.uid ~= backpack_slot.uid or b_right_hand.uid ~= right_hand.uid or b_left_hand.uid ~= left_hand.uid or b_arrow_slot.uid ~= arrow_slot.uid then
doPlayerSendTextMessage(cid, SHOP_MSG_TYPE, 'You received >> '.. add_item_name ..' << from OTS shop. You should re-login now to become sure your new item will not disappear if any error occur.')
db.executeQuery("DELETE FROM `z_ots_comunication` WHERE `id` = " .. id .. ";")
db.executeQuery("UPDATE `z_shop_history_item` SET `trans_state`='realized', `trans_real`=" .. os.time() .. " WHERE id = " .. id .. ";")
else
doPlayerSendTextMessage(cid, SHOP_MSG_TYPE, '>> '.. add_item_name ..' << from OTS shop not added. Unknown error occured. Wait about '.. SQL_interval ..' seconds. If error will occur again contact with admin. Error item ID is: '.. id ..'')
end
else
doPlayerSendTextMessage(cid, SHOP_MSG_TYPE, '>> '.. add_item_name ..' << from OTS shop not added. Unknown error occured. Wait about '.. SQL_interval ..' seconds. If error will occur again contact with admin. Error item ID is: '.. id ..'')
end
else
doPlayerSendTextMessage(cid, SHOP_MSG_TYPE, '>> '.. add_item_name ..' << from OTS shop is waiting for you. Please take items from both hands or item from arrow slot and wait about '.. SQL_interval ..' seconds to get it.')
end
end
end
if not(result_plr:next()) then
break
end
end
result_plr:free()
end
local eventServ = addEvent(sql_communication, SQL_COMUNICATION_INTERVAL, parameters)
end
Click to expand...


Como quedaría?
 
entre

registerCreatureEvent(cid, "Mail")
registerCreatureEvent(cid, "GuildMotd")

registerCreatureEvent(cid, "Idle")
if(config.useFragHandler) then
registerCreatureEvent(cid, "SkullCheck")

en ese espacio pon lo que te dije arriba..
 
No funciona :S tengo esto
local ex = getPlayerRates(cid)[SKILL__LEVEL]
function onLogin(cid)
if isPremium(cid) == TRUE and getPlayerStorageValue(cid, 12345) == 0 then
setPlayerStorageValue(cid, 12345, 1)
doPlayerSetRate(cid, SKILL__LEVEL, (ex+0.05))

elseif isPremium(cid) == FALSE and getPlayerStorageValue(cid, 12345) == 1 then
doPlayerSetRate(cid, SKILL__LEVEL, (ex-0.05))
setPlayerStorageValue(cid, 12345, 0)
end

return TRUE
end
Click to expand...

de xml y en login puse
registerCreatureEvent(cid, "experiencia")

estas seguro q hay q poner "experiencia"?
 
Up: si, postea el xml.. lo que agregaste.. llamalo todo experiencia y no tienes problemas a de ir creo .
 

Similar threads

S
need help with monsters / necesito ayuda con los monstruos
Replies
2
Views
288
eduardollrb
E
Back
Top