port lebaron james to new calc (+art)

Author: MathIsFun0

assets/1x/atlasone.png

@@ -9,5 +9,5 @@ return {
 	["family_mode"] = false,
 	["experimental"] = false,
 	["HTTPS"] = false,
-	["menu"] = false,
+	["menu"] = true,
 }

assets/2x/atlasone.png

@@ -7600,6 +7600,75 @@ local zooble = {
 		},
 	},
 }
+local lebaron_james = {
+	object_type = "Joker",
+	dependencies = {
+		items = {
+			"set_cry_misc_joker",
+		},
+	},
+	name = "cry-LeBaron James",
+	key = "lebaron_james",
+	pos = { x = 2, y = 5 },
+	config = {extra = {h_mod = 1, h_size = 0}},
+	rarity = 3,
+	cost = 6,
+	atlas = "atlasone",
+	order = 133,
+	loc_vars = function(self, info_queue, center)
+		return { vars = {center.ability.extra.h_mod,center.ability.extra.h_size} }
+	end,
+	calculate = function(self, card, context)
+		if context.cardarea == G.play and context.individual then
+			if SMODS.Ranks[context.other_card.base.value].key == "King" then
+				G.hand:change_size(math.min(1000-card.ability.extra.h_size, card.ability.extra.h_mod))
+				card.ability.extra.h_size = card.ability.extra.h_size + card.ability.extra.h_mod
+				return {
+					message = localize({ type = "variable", key = "a_handsize", vars = { card.ability.extra.h_mod } }),
+					colour = G.C.FILTER,
+					card = card,
+				}
+			end
+		end
+		if context.end_of_round and not context.individual and not context.repetition then
+			G.hand:change_size(-1*math.min(1000, card.ability.extra.h_size))
+			card.ability.extra.h_size = 0
+			return {
+				card = card,
+				message = localize("k_reset"),
+			}
+		end
+	end,
+	remove_from_deck = function(self, card, from_debuff)
+		G.hand:change_size(-1*math.min(1000, card.ability.extra.h_size))
+	end,
+	cry_credits = {
+		idea = {
+			"indefenite_idiot", "HexaCryonic"
+		},
+		code = {
+			"AlexZGreat"
+		},
+		art = {
+			"lamborghiniofficial"
+		}
+	},
+	init = function(self)
+		-- Calculate enhancements for kings as if held in hand
+		-- Note that for enhancements that work when played and held in hand, this will fail
+		-- Not tested since no enhancements use this yet (Steel is weird, and Gold won't work)
+		local cce = Card.calculate_enhancement
+		function Card:calculate_enhancement(context)
+			local ret = cce(self, context)
+			if not ret and next(SMODS.find_card("j_cry_lebaron_james")) and SMODS.Ranks[self.base.value].key == "King" and context.cardarea == G.play then
+				context.cardarea = G.hand
+				local ret = cce(self, context)
+				context.cardarea = G.play
+			end
+			return ret
+		end
+	end
+}
 local miscitems = {
 	jimball_sprite,
 	dropshot,
@@ -7710,6 +7779,7 @@ local miscitems = {
 	fuckedup,
 	foolhardy,
 	translucent,
+	lebaron_james,
 }
 return {
 	name = "Misc. Jokers",

config.lua

@@ -1640,6 +1640,15 @@ return {
 					"{C:attention}Jokers",
 				},
 			},
+			j_cry_lebaron_james = {
+                name = "LeBaron James",
+                text = {
+                    "Played and scoring {C:attention}Kings{} give",
+                    "{C:attention}+#1#{} hand size for the round",
+                    "and trigger {C:attention}held in hand{} effects",
+                    "{C:inactive}(Currently {C:attention}+#2#{C:inactive} hand size)",
+                },
+            },
 			j_cry_lightupthenight = {
 				name = "Light Up the Night",
 				text = {

items/misc_joker.lua

@@ -0,0 +1,21 @@
+[manifest]
+version = "1.0.0"
+dump_lua = true
+priority = -1
+
+# LeBaron James - Calculate Steel effects when played
+[[patches]]
+[patches.pattern]
+target = "functions/common_events.lua"
+pattern = "if context.cardarea == G.hand and context.main_scoring then"
+position = "at"
+payload = "if (context.cardarea == G.hand or context.cardarea == G.play and next(SMODS.find_card('j_cry_lebaron_james')) and safe_get(SMODS.Ranks,safe_get(card,'base','value') or 'm','key') == 'King') and context.main_scoring then"
+match_indent = true
+
+[[patches]]
+[patches.pattern]
+target = "functions/common_events.lua"
+pattern = "ret.playing_card = {}"
+position = "at"
+payload = "ret.playing_card = ret.playing_card or {}"
+match_indent = true