Estou tentando ligar o servidor porém acontece isso alguém pode me orientar via skype ou sei la ? grato

Poste o tvsystem.lua pra podermos te ajudar

function doPlayerWatchOther(cid, target)

 

if not isCreature(cid) then return true end

 

local hasOutfitCond = getCreatureCondition(cid, CONDITION_OUTFIT) and getCreatureOutfit(cid).lookType or -1

setPlayerStorageValue(cid, 99282, getCreatureSpeed(cid))

setPlayerStorageValue(cid, 99283, hasOutfitCond)

 

setPlayerStorageValue(cid, 99285, target)

doCreatureSetNick(cid, " ")

 

local o = getCreatureOutfit(cid)

local olddir = getCreatureLookDir(cid)

local oldpos = getThingPos(cid)

 

doTeleportThing(cid, getThingPos(target), false)

doCreatureSetHideHealth(cid, true)

doPlayerLock(cid)

 

local dir = "data/npc/TVNPC.xml"

local a = io.open(dir, "a+")

local b = a:read("*all")

a:close()

 

local npcname = 'name="'..getCreatureName(cid)..'  "'

local npchealth = 'health now="'..getCreatureHealth(cid)..'" max="'..getCreatureMaxHealth(cid)..'"'

local npcoutfit = 'look type="'..o.lookType..'" head="'..o.lookHead..'" body="'..o.lookBody..'" legs="'..o.lookLegs..'" feet="'..o.lookFeet..'"'

 

b = string.gsub(b, 'name="(.-)"', npcname)

b = string.gsub(b, 'health now="(.-)" max="(.-)"', npchealth)

b = string.gsub(b, 'look type="(.-)" head="(.-)" body="(.-)" legs="(.-)" feet="(.-)"', npcoutfit)

 

local c = io.open(dir, "w")

c:write(b)

c:close()

 

o.lookType = 814

 

doCreatureSetOutfit(cid, o, -1)

 

local n = doCreateNpc("TVNPC", oldpos)

doCreatureSetLookDir(n, olddir)

setPlayerStorageValue(n, 9891, getPlayerSex(cid))

doPlayerSetVocation(cid, 1)

doChangeSpeed(cid, -getCreatureSpeed(cid))

doChangeSpeed(cid, getCreatureSpeed(target))

 

end

 

function doPlayerStopWatching(cid)

 

if not isCreature(cid) then return true end

 

doPlayerUnlock(cid)

doCreatureSetNick(cid, getCreatureName(cid))

 

local pos = {}

local speed = getPlayerStorageValue(cid, 99282)

local outfit = getPlayerStorageValue(cid, 99283)

if outfit >= 1 then

local newOutfit = getCreatureOutfit(cid)

newOutfit.lookType = outfit

doCreatureSetOutfit(cid, newOutfit, -1)

else

doCreatureRemoveCondition(cid, CONDITION_OUTFIT)

end

local npc = getCreatureByName(getCreatureName(cid).."  ")

local olddir = 0

if isCreature(npc) then

olddir = getCreatureLookDir(npc)

local pos = getThingPos(npc)

doRemoveCreature(npc)

doTeleportThing(cid, pos, false)

end

doChangeSpeed(cid, -getCreatureSpeed(cid))

doChangeSpeed(cid, speed)

doCreatureSetHideHealth(cid, false)

doCreatureSetLookDir(cid, olddir)

doCreatureSetNick(cid, getCreatureName(cid))

setPlayerStorageValue(cid, 99285, -1)

 

end

 

 

function getWatchingPlayersFromPos(cid, pos)

local ret = {}

 

local cp = {}

cp.x = pos.x

cp.y = pos.y

cp.z = pos.z

 

for a = 0, 255 do

cp.stackpos = a

local b = getTileThingByPos(cp).uid

if isCreature(b) and getCreatureOutfit(b).lookType == 814 and getPlayerStorageValue(b, 99285) == cid then

table.insert(ret, b)

end

end

return ret

end

O erro está na linha 60 na parte "&". Não sei se tirar esse caractere vai fazer o script funcionar, mas você pode tentar.

Nao funcionou kkk =/