Diseño y Posicionamiento Web con Joomla › Foros › General › Joomla en General › AYUDA!!!!! JSON
- Este debate tiene 0 respuestas, 1 mensaje y ha sido actualizado por última vez el hace 11 años, 10 meses por
nymic.
-
AutorEntradas
-
-
11/04/2013 a las 01:33 #109056
nymic
Participantehola que tal ante todo muchas gracias por tomarse el tiempo de leer este articulo creado por un noob del asunto…..
bueno mi tema esque tengo una cadena de archivo json la cadena funciona bien solo que me da el resultado en codificado yo necesito que no este codificado para poder retocar unos cambios aca les paso la cadena y si son tan amables me pueden decir q debo corregir para que no me salga codificado…..
local myJSON = json.json
CHDMP = CHDMP or {}
local private = {}function private.GetGlobalInfo()
local retTbl = {}
retTbl.locale = GetLocale();
retTbl.realm = GetRealmName();
retTbl.realmlist = GetCVar(“realmList”);
local version, build, date, tocversion = GetBuildInfo();
retTbl.clientbuild = build;
return retTbl;
end
function private.GetUnitInfo()
local retTbl = {}
retTbl.name = UnitName(“player”);
local _, class = UnitClass(“player”);
retTbl.class = class;
retTbl.level = UnitLevel(“player”);
local _,race = UnitRace(“player”);
retTbl.race = race;
retTbl.gender = UnitSex(“player”);
local honorableKills = GetPVPLifetimeStats()
retTbl.kills = honorableKills;
retTbl.honor = GetHonorCurrency();
retTbl.arenapoints = GetArenaCurrency();
retTbl.money = GetMoney();
retTbl.specs = GetNumTalentGroups();
return retTbl;
end
function private.GetSpellData()
local retTbl = {}
for i = 1, MAX_SKILLLINE_TABS do
local name, _, _, offset, numSpells = GetSpellTabInfo(i);
if not name then
break;
end
for s = offset + 1, offset + numSpells do
spellInfo = GetSpellLink(s, BOOKTYPE_SPELL);
if spellInfo ~= nil then
for spellid in string.gmatch(GetSpellLink(s, BOOKTYPE_SPELL), “.-Hspell:(%d+).*”) do
retTbl[spellid] = {[“ID”] = i, [“S”] = spellid}
end
end
end
end
private.ILog(“Copiando los hechizos…”);
return retTbl;
end
function private.GetGlyphData()
local retTbl = {}
for i = 1, GetNumTalentGroups() do
retTbl[i] = {}
local curid = {[1] = 1,[2] = 1}
for j = 1, 6 do
local _, glyphType, glyphSpellID, _ = GetGlyphSocketInfo(j,i);
if not retTbl[i][glyphType] then
retTbl[i][glyphType] = {}
end
if not glyphSpellID then
glyphSpellID = -1;
end
retTbl[i][glyphType][curid[glyphType]] = glyphSpellID;
curid[glyphType] = curid[glyphType]+1;
end
end
private.ILog(“Copiando glifos…”);
return retTbl;
end
function private.GetCurrencyData()
local retTbl = {}
for i = 1, GetCurrencyListSize() do
local name, _, _, _, _, count, _, _, itemID = GetCurrencyListInfo(i)
retTbl[i] = {[‘C’] = count, [‘I’] = itemID};
end
return retTbl;
end
function private.GetMACData()
local retTbl = {}
for i = 1, GetNumCompanions(“MOUNT”) do
local _, _, M = GetCompanionInfo(“MOUNT”, i);
retTbl[“M:”..i] = M;
end
for i = 1, GetNumCompanions(“CRITTER”) do
local _, _, C = GetCompanionInfo(“CRITTER”, i);
retTbl[“C:”..i] = C;
end
private.ILog(“Copiando monturas y mascotas…”);
return retTbl;
end
function private.GetAchievements()
local retTbl = {}
for _, j in pairs(CHDMP.AchievementIds) do
IDNumber, _, _,Completed, Month, Day, Year, _, _, _, _ = GetAchievementInfo(j)
if IDNumber and Completed then
local posixtime = time{year = 2000 + Year, month = Month, day = Day};
if posixtime then
retTbl[IDNumber] = {[“I”] = IDNumber, [“D”] = posixtime}
end
end
end
private.ILog(“Copiando logros…”);
return retTbl;
end
function private.GetRepData()
local retTbl = {}
for i = 1, GetNumFactions() do
local name, _, _, _, _, earnedValue, _, canToggleAtWar, _, _, _, _, _ = GetFactionInfo(i)
retTbl[i] = {[“N”] = name, [“V”] = earnedValue, [“F”] = bit.bor(((not canToggleAtWar) and 16) or 0)}
end
private.ILog(“Copiando reputaciones…”);
return retTbl;
end
function private.GetIData()
local retTbl = {}
for i = 1, 74 do
itemLink = GetInventoryItemLink(“player”, i)
if itemLink then
count = GetInventoryItemCount(“player”,i)
for entry, chant, Gem1, Gem2, Gem3,unk1,unk2,unk3,lvl1 in string.gmatch(itemLink,”.-Hitem:(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+).*”) do
retTbl[“0000:”..i] = {[“I”] = entry, [“C”] = count, [“G1”] = Gem1, [“G2”] = Gem2, [“G3″] = Gem3};
end
end
end
for bag = 0, 11 do
for slot = 1, GetContainerNumSlots(bag) do
ItemLink = GetContainerItemLink(bag, slot)
if ItemLink then
local texture, count, locked, quality, readable = GetContainerItemInfo(bag, slot);
local Tbag = bag + 1000;
for entry, chant, Gem1, Gem2, Gem3, unk1, unk2, unk3, lvl1 in string.gmatch(ItemLink,”.-Hitem:(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+):(%d+).*”) do
retTbl[Tbag..”:”..slot] = {[“B”] = Tbag,[“S”] = slot, [“I”] = entry, [“C”] = count, [“G1”] = Gem1, [“G2”] = Gem2, [“G3”] = Gem3};
end
end
end
end
private.ILog(“Copiando inventorio…”);
return retTbl;
end
function private.GetSkillData()
local retTbl = {}
for i = 1, GetNumSkillLines() do
local skillName, isHeader, _, skillRank, _, _, skillMaxRank, _, _, _, _, _, _ = GetSkillLineInfo(i)
retTbl[i] = {[“N”] = skillName,[“C”] = skillRank,[“M”] = skillMaxRank}
end
return retTbl;
end
function private.CreateWoWReanMigrador()
private.dmp = {};
private.dmp.ginf = private.trycall(private.GetGlobalInfo, private.ErrLog) or {};
private.dmp.uinf = private.trycall(private.GetUnitInfo, private.ErrLog) or {};
private.dmp.rep = private.trycall(private.GetRepData, private.ErrLog) or {};
private.dmp.achiev = private.trycall(private.GetAchievements, private.ErrLog) or {};
private.dmp.glyphs = private.trycall(private.GetGlyphData, private.ErrLog) or {};
private.dmp.creature = private.trycall(private.GetMACData, private.ErrLog) or {};
private.dmp.spells = private.trycall(private.GetSpellData, private.ErrLog) or {};
private.dmp.skills = private.trycall(private.GetSkillData, private.ErrLog) or {};
private.dmp.inventory = private.trycall(private.GetIData, private.ErrLog) or {};
private.dmp.currency = private.trycall(private.GetCurrencyData, private.ErrLog) or {};
return b64_enc(myJSON.encode(private.dmp));
end
function private.Log(str_in)
print(“124c0080C0FF “..str_in..”124r”);
end
function private.ErrLog(err_in)
private.errlog = private.errlog or “”
private.errlog = private.errlog .. “err=” .. b64_enc(err_in) .. “n”
print(“124c00FF0000”..(err_in or “nil”)..”124r”);
end
function private.GetWoWReanMigrador()
return b64_enc(private.CreateWoWReanMigrador());
end
function private.ILog(str_in)
print(“124c0080FF80″..str_in..”124r”);
end
function private.trycall(f,herr)
local status, result = xpcall(f,herr)
if status then
return result;
end
return status;
end
function private.SaveCharData(data_in)
private.ILog(“Migracion finalizada en WTFAccount%Username%SavedVariables%WoWRean_Migrador.lua “);
CHDMP_DATA = b64_enc(data_in)
CHDMP_KEY = Sha1(data_in)
end
function private.TradeSkillFrame_OnShow_Hook(frame, force)
if private.done == true then
return
end
if frame and frame.GetName and frame:GetName() == “TradeSkillFrame” then
local isLink, _ = IsTradeSkillLinked();
if isLink == nil then
local link = GetTradeSkillListLink();
if not link then
return
end
local skillname = link:match(“%[(.-)%]”);
private.dmp = private.dmp or {};
private.dmp.skilllink = private.dmp.skilllink or {};
private.dmp.skilllink[skillname] = link;
print(“TradeSkillFrame_Show”,skillname,link)
private.SaveCharData(private.Encode(private.GetWoWReanMigrador()))
end
end
end
SLASH_CHDMP1 = “/migrar”;
SlashCmdList[“CHDMP”] = function(msg)
if msg == “done” then
private.done = true;
return;
elseif msg == “help” then
return;
else
private.done = false;
end
if not private.tradeskillframehooked then
hooksecurefunc(_G, “ShowUIPanel”, private.TradeSkillFrame_OnShow_Hook);
private.tradeskillframehooked = true;
end
private.SaveCharData(b64_enc(private.GetWoWReanMigrador()))
endesta es la cadena json necesitaria saber que debo modificar para q no codifique el resultado tambien esta adjunta por si alguien quiere verlo mas detenidamente desde ya muchas gracias a todos
[attachment:1]cadena json.txt.lua[/attachment]
[attachment:1]cadena json.txt.lua[/attachment]
[attachment:1]cadena json.txt.lua[/attachment]
[attachment:1]cadena json.txt.lua[/attachment]
-
-
AutorEntradas
- Debes estar registrado para responder a este debate.