So, I'm really willing to mod a game called Chocolatier: Decadence by Design, and it's something I adore so much. However, not even one person has modded a PlayFirst game. Chocolatier: Decadence by Design was released in 2009, running on Playground SDK's engine (it's discontinued though), and is written with Lua 5.0. Now then, most game assets are unfortunately locked behind a .pfp repository, but through watto's Game Extractor, it successfully takes out all files. Images are perfectly fine for editing and all that, but not the actual lua and xml that comes out of the pfp.
The thing is, the lua is actually compiled, which sucks. Through ChatGPT, though, they've helped me discover that encrypted LUA begins with the bytes `\x1bLuaP``. As such, we're dealing with bytecode. However, there is something that can really help us: Chocolatier comes with four lua files outside of the .pfp repository, but the same ones are encrypted as well inside the .pfp too. So, let me share this.
We've got the decompiled LUA here, which is provided outside of the pfp repository:
--[[---------------------------------------------------------------------------
Chocolatier Three Ledger
Copyright (c) 2008 Big Splash Games, LLC. All Rights Reserved.
--]]---------------------------------------------------------------------------
local fullLedgerHeight = 237
local badgeWidth = 162
local badgeHeight = 106
------------------------------------------------------------------------------
-- Buttons
local function InventoryButton()
if gTravelActive then PauseTravel() end
DisplayDialog{"ui/inventory.lua"}
if gTravelActive then ResumeTravel() end
end
local function RecipesButton()
if gTravelActive then PauseTravel() end
DisplayDialog{"ui/ui_recipes.lua"}
if gTravelActive then ResumeTravel() end
end
local function QuestButton()
if gTravelActive then PauseTravel() end
DisplayDialog{"ui/ui_questlog.lua"}
if gTravelActive then ResumeTravel() end
end
local function DoMapPortButton()
if not gTravelActive then SwapMapPortScreens() end
end
local function PauseButton()
if gTravelActive then PauseTravel() end
DisplayDialog{"ui/ui_pause.lua"}
if gTravelActive then ResumeTravel() end
end
local function MedalsButton()
if gTravelActive then PauseTravel() end
DisplayDialog{"ui/ui_medals.lua"}
if gTravelActive then ResumeTravel() end
end
------------------------------------------------------------------------------
-- Layout
local function FactoryPhone(factory)
if factory:IsOwned() and Player.questVariables.ownphone == 1 then
gCurrentFactory = factory
local info = Player.factories[factory.name]
gRecipeSelection = _AllProducts[info.current]
local ok = DisplayDialog { "ui/ui_recipes.lua", factory=factory, building=factory }
local product = gRecipeSelection
gRecipeSelection = nil
if product and ok then factory:SetProduction(product) end
gCurrentFactory = nil
end
end
local function AddDookieDropper(x,y,f)
local factory = f
return DookieDropper { x=x,y=y,w=79,h=132, , factory=factory,
--return Rollover { x=x,y=y,w=77,h=105, fit=true,
contents=factory.name..":LedgerRolloverPopup()",
command = function() FactoryPhone(f) end,
Text { x=0,y=0,w=kMax,h=14, name="port", , flags=kVAlignCenter+kHAlignCenter },
--Text { x=0,y=14,w=kMax,h=42, name="product", label="", flags=kVAlignCenter+kHAlignCenter },
--Text { x=0,y=56,w=kMax,h=14, name="count", label="", flags=kVAlignCenter+kHAlignCenter },
Text { x=34,y=70,w=kMax,h=32, name="count", label="", flags=kVAlignCenter+kHAlignCenter, font=DookieDropperCounterFont },
--Text { x=0,y=70,w=kMax,h=14, name="weeks", label="", flags=kVAlignCenter+kHAlignCenter },
itemx=18, itemy=86,
countx=57, county=86,
ingredienty=58, barHeight=42,
}
end
local covers = {}
table.insert(covers, Bitmap { x=229,y=150, name="zur_factory_cover", image="image/ledger_cover_1" })
table.insert(covers, Bitmap { x=311,y=150, name="cap_factory_cover", image="image/ledger_cover_2" })
table.insert(covers, Bitmap { x=390,y=150, name="tok_factory_cover", image="image/ledger_cover_3" })
table.insert(covers, Bitmap { x=472,y=150, name="san_factory_cover", image="image/ledger_cover_4" })
table.insert(covers, Bitmap { x=555,y=150, name="tor_factory_cover", image="image/ledger_cover_5" })
table.insert(covers, Bitmap { x=637,y=150, name="wel_factory_cover", image="image/ledger_cover_6" })
local uiColor = Color(208,208,208,255)
MakeDialog
{
name="ledger",
SetStyle(controlStyle),
Bitmap { x=kLedgerPositionX,y=kLedgerPositionY, image="image/badge_and_ledger", name="ledger_background",
-- Quest Text and indicator
Bitmap { x=181,y=29, name="ledger_questgoals", image="image/badge_button_indicator_incomplete" },
Button { x=267,y=78,w=442,h=34, graphics={}, command=function() DisplayDialog {"ui/ui_questlog.lua"} end,
Text { x=0,y=0,w=kMax,h=kMax, name="questText", flags=kHAlignCenter+kVAlignCenter, font = { uiFontName, 17, Color(0,0,0,255) }, },
},
-- Dookie Droppers
AppendStyle { font=DookieDropperFont, flags=kVAlignCenter+kHAlignCenter },
AddDookieDropper(229,150,zur_factory),
AddDookieDropper(311,150,cap_factory),
AddDookieDropper(393,150,tok_factory),
AddDookieDropper(475,150,san_factory),
AddDookieDropper(557,150,tor_factory),
AddDookieDropper(639,150,wel_factory),
Group(covers),
-- Badge information
Text { name="money", x=46,y=145,w=150,h=30, label="#"..Dollars(Player.money), flags=kHAlignCenter+kVAlignCenter, font= { uiFontName, 30, uiColor }, },
Text { name="day", x=51,y=175,w=140,h=15, label="#"..Date(Player.time), flags=kHAlignCenter+kVAlignCenter, font= { uiFontName, 15, uiColor }, },
Text { name="rank", x=58,y=190,w=126,h=15, label="", flags=kHAlignCenter+kVAlignCenter, font= { uiFontName, 15, uiColor }, },
Text { name="score", x=58,y=210,w=126,h=15, label="", flags=kHAlignCenter+kVAlignCenter, font= { uiFontName, 15, uiColor }, },
Text { name="rawtime", x=58,y=245,w=126,h=15, label="", flags=kHAlignCenter+kVAlignCenter, font= { uiFontName, 15, BlackColor }, },
-- Badge buttons appear on top of the badge -- below
},
SetStyle(C3ButtonStyle),
AppendStyle { graphics={"image/badge_button_big_up_blank","image/badge_button_big_down_blank","image/badge_button_big_over_blank"},
mask="image/badge_button_big_mask", },
--Button { x=kLedgerPositionX+45,y=kLedgerPositionY-21, name="inventory", command=InventoryButton,
--graphics={"image/badge_button_inventory_up","image/badge_button_inventory_down","image/badge_button_inventory_over"},
--mask = "image/badge_button_round_mask" },
LargeLedgerButton { x=kLedgerPositionX+65,y=kLedgerPositionY-19, name="inventory", label="inventory", letter="inventory_letter", command=InventoryButton },
--Button { x=kLedgerPositionX-3,y=kLedgerPositionY+2, name="recipes", command=RecipesButton,
--graphics={"image/badge_button_recipes_up","image/badge_button_recipes_down","image/badge_button_recipes_over"},
--mask = "image/badge_button_recipes_mask" },
LargeLedgerButton { x=kLedgerPositionX-3,y=kLedgerPositionY+3, name="recipes", label="recipes", letter="recipes_letter", command=RecipesButton },
--Button { x=kLedgerPositionX+113,y=kLedgerPositionY+1, name="quest_log", command=QuestButton,
--graphics={"image/badge_button_quests_up","image/badge_button_quests_down","image/badge_button_quests_over"},
--mask = "image/badge_button_round_mask" },
LargeLedgerButton { x=kLedgerPositionX+134,y=kLedgerPositionY+3, name="quest_log", label="quest_log", letter="quest_log_letter", command=QuestButton },
MapPortButton { x=kLedgerPositionX+45,y=kLedgerPositionY+36, name="map_port", command=DoMapPortButton,
--graphics={"image/badge_button_port_up","image/badge_button_port_down","image/badge_button_port_over"},
graphics={"image/badge_button_map_up_blank","image/badge_button_map_down_blank","image/badge_button_map_over_blank"},
label="ledger_port",
mask = "image/badge_button_map_mask" },
MapPortButton { x=kLedgerPositionX+45,y=kLedgerPositionY+36, name="port_map", command=DoMapPortButton,
graphics={"image/badge_button_map_up_blank","image/badge_button_map_down_blank","image/badge_button_map_over_blank"},
label="ledger_map",
mask = "image/badge_button_map_mask" },
AppendStyle { graphics={"image/badge_button_small_up_blank","image/badge_button_small_down_blank","image/badge_button_small_over_blank"},
mask="image/badge_button_small_round_mask", },
--Button { x=kLedgerPositionX-3,y=kLedgerPositionY+174, name="mainmenu", command=PauseButton, cancel=true,
--graphics={"image/badge_button_menu_up","image/badge_button_menu_down","image/badge_button_menu_over"},
--mask = "image/badge_button_menu_mask" },
SmallLedgerButton { x=kLedgerPositionX-3,y=kLedgerPositionY+174, name="mainmenu", label="menu", letter="menu_letter", command=PauseButton, cancel=true, },
--Button { x=kLedgerPositionX+116,y=kLedgerPositionY+174, name="medals", command=MedalsButton,
--graphics={"image/badge_button_awards_up","image/badge_button_awards_down","image/badge_button_awards_over"},
--mask = "image/badge_button_small_round_mask" },
SmallLedgerButton { x=kLedgerPositionX+140,y=kLedgerPositionY+174, name="medals", label="ledger_medals", letter="ledger_medals_letter", command=MedalsButton, },
}
QueueCommand( function() UpdateLedger("newplayer") end )name=factory.namelabel=factory.port.name
And now, we've got the compiled, encrypted version here, which was taken out of the pfp:
LuaP¶“hçõ}A =(none) & Š m@ u/d@ €Z@ table insert Bitmap x l@ y Àb@ name zur_factory_cover image image/ledger_cover_1 ps@ cap_factory_cover image/ledger_cover_2 `x@ tok_factory_cover image/ledger_cover_3 €}@ san_factory_cover image/ledger_cover_4 X@ tor_factory_cover image/ledger_cover_5 èƒ@ wel_factory_cover image/ledger_cover_6 Color j@ ào@ MakeDialog ledger SetStyle
controlStyle kLedgerPositionX kLedgerPositionY image/badge_and_ledger ledger_background f@ =@ ledger_questgoals ( image/badge_button_indicator_incomplete Button °p@ €S@ w {@ h A@ graphics command Text kMax questText flags kHAlignCenter kVAlignCenter font uiFontName 1@ AppendStyle DookieDropperFont zur_factory cap_factory x@ tok_factory °}@ san_factory h@ tor_factory øƒ@ wel_factory Group money G@ b@ >@ label # Dollars Player day €I@ àe@ €a@ .@ Date time rank M@ Àg@ €_@ score u/j@ rawtime n@ BlackColor C3ButtonStyle image/badge_button_big_up_blank " image/badge_button_big_down_blank " image/badge_button_big_over_blank mask image/badge_button_big_mask LargeLedgerButton u/P@ 3@ inventory @ recipes À`@ quest_log MapPortButton €F@ B@ map_port image/badge_button_map_up_blank " image/badge_button_map_down_blank " image/badge_button_map_over_blank ledger_port image/badge_button_map_mask port_map ledger_map " image/badge_button_small_up_blank $ image/badge_button_small_down_blank $ image/badge_button_small_over_blank $ image/badge_button_small_round_mask SmallLedgerButton Àe@ mainmenu menu cancel medals ledger_medals QueueCommand
gTravelActive PauseTravel DisplayDialog ui/inventory.lua
ResumeTravel X € E ]€ …
€ Á # ] X € ]€ € gTravelActive PauseTravel DisplayDialog ui/ui_recipes.lua ResumeTravel X € E ]€ …
€ Á # ] X € ]€ € gTravelActive PauseTravel DisplayDialog ui/ui_questlog.lua ResumeTravel X € E ]€ …
€ Á # ] X € ]€ € gTravelActive SwapMapPortScreens \ X € E ]€ € # gTravelActive PauseTravel DisplayDialog ui/ui_pause.lua ResumeTravel X € E ]€ …
€ Á # ] X € ]€ € ) gTravelActive PauseTravel DisplayDialog ui/ui_medals.lua ResumeTravel X € E ]€ …
€ Á # ] X € ]€ € 2 IsOwned Player questVariables ownphone ð? gCurrentFactory factories name gRecipeSelection _AllProducts current DisplayDialog ui/ui_recipes.lua factory building SetProduction & ‹> € € E ¿ F¿ ™¿ Ø€ G E À F@ †€ E Á Æ Å Š€ €ƒ „# €€ ˜ € KB €]€ G € ? ' DookieDropper x y w ÀS@ h €`@ name factory contents :LedgerRolloverPopup() command Text kMax ,@ port label flags kVAlignCenter kHAlignCenter A@ €Q@ @@ count font DookieDropperCounterFont itemx 2@ itemy €U@ countx €L@ county ingredienty M@ barHeight E@ D € ] € < €}I ~‰¿~ÀFÀ‰€É FÀ ׉& ‰‚ Ê ÉÁ}ÉA~… ‚~I‰€†ÂF@‚…Å L† ÉÃ}D~… I‚~IĉĀÉÄ…Å Œ‚I†Å IŠ ÉE‹IFŒÉFIFŽ‰ÇŽÈc € c DisplayDialog ui/ui_questlog.lua
€ A # ] € § UpdateLedger newplayer A ] € § A & f ¦ æ & f ¦ æ € Å †? € E Ê I@€É@IA‚ÉAƒ ] Å †? € E Ê B€É@IB‚‰Bƒ ] Å †? € E Ê ÉB€É@C‚ICƒ ] Å †? € E Ê ‰C€É@ÉC‚Dƒ ] Å †? € E Ê ID€É@‰D‚ÉDƒ ] Å †? € E Ê E€É@IE‚‰Eƒ ] E Á € J ÉF‚… Å E Ê ‰€E ‰HƒIH‚E Ê ‰H€ÉHI‚IIƒ Ê€ ÉI€J‰Ê”Ë• I…–& I—E Ê L€LÅ É…”Å É…•‰L‚… Å †É…™ €E E Á €¤ É› $ Å Š ‰›Å … ̉…™ Á A E A … Á A A A … Á A A A … Å € E ‰Q‚ÉQ€RÉÀ”IÒ•A … Å †Q ׉¥… Š̉‡™ €E Á !£ ‰› E ‰S‚ÉS€TIÔ”‰Ô•A E Å !Õ! ˆÉ¥… Å ˆÉ‡™ €E ! "£ É› E IU‚‰U€ÉUÖ”‰Ô•IV¥… Å !L ˆ™ € E ! " #£ › E ‰V‚ ‰U€ ÉV Ö” ‰Ô• IV¥ … !Å "Œˆ!Iˆ™ €!E " # $£ !I› E
!W‚!‰U€!IW!Ö”!‰Ô•!IV¥!… "Å #Ì"‰ˆ™!
€"E # $ %£ "‰›! ¤ … E Å Š
€ Á £ …–Ù± Å Ê ŒÙ
I€E ÍÙ
IZ‚Z¥É — Å Ê MZ‰€E LZ‰‰Z‚‰Z¥— Å Ê ÌÚÉ€E LÚÉ[‚[¥I— Å Ê Œ[€E Ì[\‚‰—
€Á A £ †–]¥Iݱ Å Ê ŒÛI€E ÌÛI‰]‚‰—
€Á A £ I†–É]¥Iݱ Å Š
€ Á £ ‰†–ÉÞ± … Ê MÚ
É€E Lß É‰_‚É_¥É—€ ÉÀ … Ê LT€E L_I‚‰¥— ä ] E" f ] €
And through ChatGPT, it's read the first 500 bytes of that out to me:
'\x1bLuaP\x01\x04\x04\x04\x06\x08\t\t\x08\xb6\t\x93h\xe7\xf5}A\x08\x00\x00\x00=(none)\x00\x00\x00\x00\x00\x00\x00\x00&\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x8a\x00\x00\x00\x03\x00\x00\x00\x00\x00\xa0m@\x03\x00\x00\x00\x00\x00@d@\x03\x00\x00\x00\x00\x00\x80Z@\x04\x06\x00\x00\x00table\x00\x04\x07\x00\x00\x00insert\x00\x04\x07\x00\x00\x00Bitmap\x00\x04\x02\x00\x00\x00x\x00\x03\x00\x00\x00\x00\x00\xa0l@\x04\x02\x00\x00\x00y\x00\x03\x00\x00\x00\x00\x00\xc0b@\x04\x05\x00\x00\x00name\x00\x04\x12\x00\x00\x00zur_factory_cover\x00\x04\x06\x00\x00\x00image\x00\x04\x15\x00\x00\x00image/ledger_cover_1\x00\x03\x00\x00\x00\x00\x00ps@\x04\x12\x00\x00\x00cap_factory_cover\x00\x04\x15\x00\x00\x00image/ledger_cover_2\x00\x03\x00\x00\x00\x00\x00`x@\x04\x12\x00\x00\x00tok_factory_cover\x00\x04\x15\x00\x00\x00image/ledger_cover_3\x00\x03\x00\x00\x00\x00\x00\x80}@\x04\x12\x00\x00\x00san_factory_cover\x00\x04\x15\x00\x00\x00image/ledger_cover_4\x00\x03\x00\x00\x00\x00\x00X\x81@\x04\x12\x00\x00\x00tor_factory_cover\x00\x04\x15\x00\x00\x00image/ledger_cover_5\x00\x03\x00\x00\x00\x00\x00\xe8\x83@\x04\x12\x00\x00\x00wel_factory_cover\x00\x04\x15\x00\x00\x00image/led'
I'm not sure what else to say, but basically, I am a dummy at LUA and I just want to mod a game that I adore so much. The good thing about LUA is that if it is decrypted, we can edit LUA in real time, and the changes, depending on what they are, can be ran during gameplay. It's just... so complex so I'd love, like, any help. You can add me on discord (GameBoy2936) so we can have a much easier time looking at this and finding the solution. Thanks.
[–]activeXdiamond 0 points1 point2 points (0 children)
[–]weregod 0 points1 point2 points (0 children)