TalkAction Fly System By Darkhaos

[Darkhaos]

not working as I would not have put the sources that you edit only the kind that you edit to dowload because of the same view on the site at which you leave dowload

thanks I do not know why this is not working I'm using the tfs pl1 and not working

Did you compiled the server? i tested it now and is working

 

[Fire Element]

nice system =)

in a moment I will test

 

[vyctor17]

Did you compiled the server? i tested it now and is working

yes i compiled the server and not the up and not down: S

 

[vyctor17]

hey dark please help your fly does not work ake ra vo colokar dowload the sources that he compiled the player can not enter it and log out

Server Sources rar

my login:

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
-- 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')
}

function onLogin(cid)
if isPremium(cid) then
doPlayerSetExperienceRate(cid, 1.5)
doPlayerSetMagicRate(cid, 1.5)
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You are premium, enjoy 50% extra experience, skills and magic level rates.")
end
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

setPlayerStorageValue(cid, 14755, -1)
registerCreatureEvent(cid, "Reward")
registerCreatureEvent(cid, "Mail")
registerCreatureEvent(cid, "NotLoot")
registerCreatureEvent(cid, "Mail")
registerCreatureEvent(cid, "GuildMotd")
registerCreatureEvent(cid, "Idle")
registerCreatureEvent(cid, "SkullCheck")
registerCreatureEvent(cid, "ReportBug")
registerCreatureEvent(cid, "PlayerDeath")
registerCreatureEvent(cid, "rep")
registerCreatureEvent(cid, "BountyHunter")
registerCreatureEvent(cid, "KillingInTheNameOf")
registerCreatureEvent(cid, "Addons")
registerCreatureEvent(cid, "AdvanceReward")
registerCreatureEvent(cid, "PlayerLogout")
registerCreatureEvent(cid, "getspeed")
registerCreatureEvent(cid,'SpellUp')
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
-- ///////////////////////////////////////////////////
-- //// Fly System By Darkhaos ////
-- ////////////////////// V. 0.2 /////////////////////
-- ////////////////// Contact: Otland/////////////////
-- ///////////////////////////////////////////////////

function onLogin(cid)

if getCreatureStorage(cid, FLY_STORAGE) > 0 then
local storpos = {x = getCreatureStorage(cid, storPos.x), y = getCreatureStorage(cid, storPos.y), z = getCreatureStorage(cid, storPos.z), stackpos = 0}
doCreateTile(storpos)
local thing = getThingFromPos(storpos)
if thing.itemid < 1 or isInArray(WATER, thing.itemid) then
for _, area in ipairs(getArea(storpos, RANGEX, RANGEY)) do
doCreateTile(area)
local thing = getThingFromPos(area)
if thing.itemid < 1 then
doCreateItem(ITEM_FLYTILE, 1, area)
elseif isInArray(WATER, getThingFromPos(area).itemid) then
doTransformItem(getThingFromPos(area).uid, ITEM_WATERTILE)
end
end
end
doRemoveConditions(cid, true)
doSetCreatureOutfit(cid, FLY_OUTFIT, -1)
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You are now flying.")
doTeleportThing(cid, storpos)
return true
end
end

my logout:

-- ///////////////////////////////////////////////////
-- //// Fly System By Darkhaos ////
-- ////////////////////// V. 0.2 /////////////////////
-- ////////////////// Contact: Otland/////////////////
-- ///////////////////////////////////////////////////

function onLogout(cid)

if getCreatureStorage(cid, FLY_STORAGE) > 0 then
local pos = getCreaturePosition(cid)
pos.stackpos = 0
for _, area in ipairs(getArea(pos, RANGEX, RANGEY)) do
doCreateTile(area)
local thing = getThingFromPos(area)
if thing.itemid == ITEM_FLYTILE then
doRemoveItem(thing.uid)
elseif thing.itemid == ITEM_WATERTILE then
doTransformItem(thing.uid, WATER[1])
end
end
doCreatureSetStorage(cid, storPos.x, pos.x)
doCreatureSetStorage(cid, storPos.y, pos.y)
doCreatureSetStorage(cid, storPos.z, pos.z)
end
return true
end

 

[Mock]

My system is 100% lua do not needs source changes and worke like yours...

 

[lucas123]

mock, seu sistema nao pode anda perto de paredes, e tem varios bugs como por exemplo se alguem apanha sai sangue, vc nao pode volta aonde tava.
porem meu sistema ainda supera os 2 =D
nenhum void nem em baixo, andando sobre telhados etc

 

[vidde07]

where do i find the source thing?????????????????????

 

[tigerx2]

The player can go to "nothing" ?

Nothing I means black tiles, what I didn't make in RME

 

[knightxd]

limit it in the function on move...

puts an range on tiles that still have watter and you're saved

 

[Sir MoX]

I have a queston...

Create a file on data/lib called 075-fly.lua and paste this:

why I cant find the folder data/lib ?? where is it

 

[cirtaboy]

Is there any fix for 0.4?

 

[Ranyo13]

4185 C:\Users\John\Desktop\NaxdeOt Sources 8\game.cpp expected unqualified-id before '{' token
4466 C:\Users\John\Desktop\NaxdeOt Sources 8\game.cpp expected unqualified-id before '{' token
4755 C:\Users\John\Desktop\NaxdeOt Sources 8\game.cpp expected unqualified-id before '{' token
C:\Users\John\Desktop\NaxdeOt Sources 8\dev-cpp\Makefile.win [Build Error] [obj//game.o] Error 1

Help me plz with this.

 

[ownerofkills]

In member function 'bool ConfigManager::load()':
292 C:\Users\Nick\Desktop\0.3.6pl1.r80\configmanager.cpp 'FLY_STORAGE' was not declared in this scope
292 C:\Users\Nick\Desktop\0.3.6pl1.r80\configmanager.cpp *** [obj//configmanager.o] Error 1

Help me please idk whats wrong

 

[ownerofkills]

Bump

 

[ownerofkills]

Bump

 

[ownerofkills]

in member function 'bool configmanager::load()':
292 c:\users\nick\desktop\0.3.6pl1.r80\configmanager.cpp 'fly_storage' was not declared in this scope
292 c:\users\nick\desktop\0.3.6pl1.r80\configmanager.cpp *** [obj//configmanager.o] error 1

help me please idk whats wrong

bump!

 

[Dominik ms]

Put this to you lib directory:

fly_storage = 5565

 

[Darkhaos]

Put this to you lib directory:

No.

Put that in config.lua

 

[ownerofkills]

No.

Put that in config.lua

Yes I did but it still doesn't work

 

[ownerofkills]

Bump