[Help] add Pentagram box new characters Season Xlll xteam

[luskmomo]

require("ScriptDefine")
require("ScriptUtil")
require("ScriptExtraCommand")


function OnReadScript()


ScriptLoader_OnReadScript()


end




function OnShutScript()


ScriptLoader_OnShutScript()


end




function OnTimerThread()


ScriptLoader_OnTimerThread()


end




function OnCommandManager(aIndex,code,arg)


if ScriptLoader_OnCommandManager(aIndex,code,arg) ~= 0 then


return 1


end


return 0


end




function OnCharacterEntry(aIndex)


local UserName = GetObjectName(aIndex)
local TargetIndex = GetObjectIndexByName(UserName)
local UserAccountLevel = GetObjectAccountLevel(aIndex)
local UserLevel = GetObjectLevel(aIndex)
local UserAccountExpireDate = GetObjectAccountExpireDate(aIndex)


NoticeSend(aIndex,0,string.format(MessageGet(256,GetObjectLang(aIndex)),UserName))


local SQL_ODBC = "MuOnline"


local SQL_USER = ""


local SQL_PASS = ""


SQLConnect(SQL_ODBC,SQL_USER,SQL_PASS)


if SQLQuery(string.format("SELECT Bonus FROM Character WHERE Name='%s'",GetObjectName(aIndex))) == 0 or SQLFetch() == 0 then


SQLClose()


SQLQuery(string.format("INSERT INTO Character (Name,Bonus) VALUES ('%s',1)",GetObjectName(aIndex)))


SQLClose()


else


local BonusStatus = SQLGetNumber("Bonus")


SQLClose()


if BonusStatus == 0 then


SQLQuery(string.format("UPDATE Character SET Bonus=1 WHERE Name='%s'",GetObjectName(aIndex)))
SQLClose()


EffectAdd(TargetIndex,0,29,86400,0,0,0,0)
EffectAdd(TargetIndex,0,44,86400,0,0,0,0)
EffectAdd(TargetIndex,0,45,86400,0,0,0,0)
EffectAdd(TargetIndex,0,46,86400,0,0,0,0)
EffectAdd(TargetIndex,0,47,86400,0,0,0,0)
EffectAdd(TargetIndex,0,48,86400,0,0,0,0)
EffectAdd(TargetIndex,0,49,86400,0,0,0,0)
EffectAdd(TargetIndex,0,89,86400,0,0,0,0)
EffectAdd(TargetIndex,0,90,86400,0,0,0,0)
ItemGive(TargetIndex,51)
NoticeSend(aIndex,1,"You received a starter pack")
end
end




if UserAccountLevel == 0 then


NoticeSend(aIndex,1,"Welcome to MuEdge Season13")
NoticeSend(aIndex,1,"www.muedge.com.br")


elseif UserAccountLevel == 0 then


NoticeSend(aIndex,1,string.format(MessageGet(248,GetObjectLang(aIndex)),UserAccountExpireDate))

elseif UserAccountLevel == 1 then


NoticeSend(aIndex,1,string.format(MessageGet(249,GetObjectLang(aIndex)),UserAccountExpireDate))


elseif UserAccountLevel == 2 then


NoticeSend(aIndex,1,string.format(MessageGet(250,GetObjectLang(aIndex)),UserAccountExpireDate))


elseif UserAccountLevel == 3 then


NoticeSend(aIndex,1,string.format(MessageGet(251,GetObjectLang(aIndex)),UserAccountExpireDate))


end


ScriptLoader_OnCharacterEntry(aIndex)


end




function OnCharacterClose(aIndex)


ScriptLoader_OnCharacterClose(aIndex)


end




function OnNpcTalk(aIndex,bIndex)


if ScriptLoader_OnNpcTalk(aIndex,bIndex) ~= 0 then


return 1


end


return 0


end




function OnMonsterDie(aIndex,bIndex)


ScriptLoader_OnMonsterDie(aIndex,bIndex)


end




function OnUserDie(aIndex,bIndex)


ScriptLoader_OnUserDie(aIndex,bIndex)


end




function OnUserRespawn(aIndex,KillerType)


ScriptLoader_OnUserRespawn(aIndex,KillerType)


end




function OnCheckUserTarget(aIndex,bIndex)


if ScriptLoader_OnCheckUserTarget(aIndex,bIndex) == 0 then


return 0


end


return 1


end




function OnCheckUserKiller(aIndex,bIndex)


if ScriptLoader_OnCheckUserKiller(aIndex,bIndex) == 0 then


return 0


end


return 1


end




function OnPacketRecv(aIndex,buff,size)


ScriptLoader_OnPacketRecv(aIndex,buff,size)


end

[MentaL]

[Daigo Umehara]

What exactly do you need? Or whats is the issue? Please explain more