AFR Update and sorting

data/magic-m15-altered.mse-style/style

@@ -53,10 +53,10 @@ init script:
 	#Should multicolor lands with basic land types have a colored name?
 	mask_multi_land_with_color := { styling.colored_multicolor_land_name }
 	
-	base_template_prefix := [card: "" alias: "alias/" snow:"snow/" snowtexture:"snow/" devoid:"devoid/" nyx: "nyx/" miracle: "miracles/" node:"nodes/" promo: "promo/" crown: "legend/" cons:"conspiracy/" curtain: "curtains/" fnm: "fnm/", fnmpt: "paradox/", map: "maps/" energy: "energies/", mappt: "maps/" pt: "", slide: "masks/", slide2: "masks/", arrow: "arrows/", arrow2: "arrows/", arrow3: "arrows/", season: "season/" stamp: "" identity: "/magic-identity-new.mse-include/"]
-	shifted_template_prefix := [card: "shifted/" alias: "shifted/" snow:"snow/" snowtexture:"snow/" devoid:"devoid/" nyx: "nyx/" miracle: "shifted/"  node:"shifted/" promo: "promo/" crown: "shifted/" cons:"conspiracy/" curtain: "curtains/" fnm:"fnm/", fnmpt: "paradox/", map: "maps/" energy: "energies/", mappt: "maps/" pt: "shifted/", slide: "shifted/", slide2: "shifted/", arrow: "arrows/", arrow2: "arrows/", arrow3: "arrows/", season: "season/" stamp: "shifted/" identity: "/magic-identity-new.mse-include/"]
+	base_template_prefix := [card: "" alias: "alias/" snow:"snow/" snowtexture:"snow/" devoid:"devoid/" nyx: "nyx/" miracle: "miracles/" node:"nodes/" promo: "promo/" crown: "legend/" cons:"conspiracy/" curtain: "curtains/" fnm: "fnm/", fnmpt: "paradox/", map: "maps/" energy: "energies/", mappt: "maps/" pt: "", slide: "masks/", slide2: "masks/", slide3: "masks/", arrow: "arrows/", arrow2: "arrows/", arrow3: "arrows/", season: "season/" stamp: "" identity: "/magic-identity-new.mse-include/"]
+	shifted_template_prefix := [card: "shifted/" alias: "shifted/" snow:"snow/" snowtexture:"snow/" devoid:"devoid/" nyx: "nyx/" miracle: "shifted/"  node:"shifted/" promo: "promo/" crown: "shifted/" cons:"conspiracy/" curtain: "curtains/" fnm:"fnm/", fnmpt: "paradox/", map: "maps/" energy: "energies/", mappt: "maps/" pt: "shifted/", slide: "shifted/", slide2: "shifted/", slide3: "shifted/", arrow: "arrows/", arrow2: "arrows/", arrow3: "arrows/", season: "season/" stamp: "shifted/" identity: "/magic-identity-new.mse-include/"]
 	template_prefix := { if type == "miracle" and pure_snow() then [miracle:"snow/"] else if is_shifted() then shifted_template_prefix else base_template_prefix }
-	template_suffix := [card: "card.jpg"  node:"node.png" alias:"alias.png" devoid:"card.png" snow:"card.jpg" snowtexture:"snow.png" nyx: "nyx.png" miracle: "miracle.png" promo: "card.jpg" crown: "crown.png" cons:"cons.png" curtain: "card.png" fnm:"card.png", fnmpt: "pt.png", map: "card.png", energy: "card.png", mappt: "pt.png" pt: "pt.png", slide: "slide.png", slide2: "slide2.png", stamp: "stamp.jpg", arrow: "arrow.png", arrow2: "arrow2.png", arrow3: "arrow3.png", season: "flag.png" identity: "identity.png"]
+	template_suffix := [card: "card.jpg"  node:"node.png" alias:"alias.png" devoid:"card.png" snow:"card.jpg" snowtexture:"snow.png" nyx: "nyx.png" miracle: "miracle.png" promo: "card.jpg" crown: "crown.png" cons:"cons.png" curtain: "card.png" fnm:"card.png", fnmpt: "pt.png", map: "card.png", energy: "card.png", mappt: "pt.png" pt: "pt.png", slide: "slide.png", slide2: "slide2.png", slide3: "slide3.png", stamp: "stamp.jpg", arrow: "arrow.png", arrow2: "arrow2.png", arrow3: "arrow3.png", season: "flag.png" identity: "identity.png"]
 	template      := { crown_lead(type) + template_prefix()[type] + input + crown_follow(type) + template_suffix[type] }
 	land_template := { crown_lead(type) + template_prefix()[type] + (if input == "a" then "c" else input) + (if landless(type) then "" else "l") + crown_follow(type) + template_suffix[type] }
 	# Use land templates for previews because they show more contrast
@@ -100,6 +100,7 @@ init script:
 	cons_background := { color_background(type:"cons", base_hybrid: card_hybrid)}
 	background_slide := { color_background(type:"slide", base_hybrid: card_hybrid)}
 	background_slide_2 := { color_background(type:"slide2", base_hybrid: card_hybrid)}
+	background_slide_3 := { color_background(type:"slide3", base_hybrid: card_hybrid)}
 	season_background := { color_background(type:"season",     base_hybrid:card_hybrid) }
 	# Use the normal tap symbol
 	mana_t := {
@@ -151,7 +152,38 @@ init script:
 	override_clear := replace@(match:"</color>(</b></code>)?", replace: "")+
 		replace@(match:"(<code><b>)?<color:black>", replace: "")
 	override_filter := replace@(match:"\\[([^\\]]+)]", replace: "<code><b><color:black>[\\1]</color></b></code>")
-	text_filter := text_filter + override_clear + {if chosen(styling.other_options, choice:"override-style text") then override_filter(input) else input}
+	is_d20 := {styling.d20_dividers != "off" and not is_leveler()}
+	is_all_break := {contains(styling.d20_dividers, match:"all breaks")}
+	d20string := "^(<b>)?(((</sym>)?[-0-9 ,+>\<](<sym>)?)+|[Ee]lse|[Oo]ther) ?(</b>)?[|]"
+	d20_array := 
+		filter_text@(match:"(\n|"+d20string+")")
+		+split_text@(match:d20string)
+	number_of_rolls := {if is_all_break() then 1+length(filter_text(card.rule_text, match:"\n"))-rolls_start(card.text) else length(d20_array(input))-1}
+	rolls_start := {
+		if styling.d20_dividers == "all breaks +3" then 4
+		else if styling.d20_dividers == "all breaks +2" then 3
+		else if styling.d20_dividers == "all breaks +1" then 2
+		else if styling.d20_dividers == "all breaks" then 0
+		else if is_d20() then length(d20_array(input).0)
+		else 0
+	}
+	d20_filter := replace@(match:"^([Ee]lse ?|[Oo]ther ?|((</sym>)?[-0-9 ,+>\<](<sym>)?)+)[|]", replace:"<b>\\1</b>|")
+	top_of_para := {
+		input := input + no_roll(card.text)
+		if card_style.text.layout.paragraphs[input].top or else 0 > 0 then
+			card_style.text.top + card_style.text.layout.paragraphs[input].top - 0.5*(card_style.text.layout.paragraphs[input].top-card_style.text.layout.paragraphs[input-1].bottom)
+		else 0
+	}
+	height_of_para := {
+		input := input + no_roll(card.text)
+		if card_style.text.layout.paragraphs[input].bottom or else 0 > 0 then
+			card_style.text.layout.paragraphs[input].bottom + 1.3*(card_style.text.layout.paragraphs[input].top-card_style.text.layout.paragraphs[input-1].bottom) - card_style.text.layout.paragraphs[input].top
+		else 0
+	}
+	no_roll := {if styling.d20_dividers == "all breaks" then 1 else if rolls_start(input) == 0 then 1 else 0}
+
+	text_filter := text_filter + override_clear + d20_filter + {if chosen(styling.other_options, choice:"override-style text") then override_filter(input) else input}
+
 	center_map := {is_map() and (card.casting_cost == "" or chosen(styling.other_options, choice:"always center map names"))}
 	use_evobar := {chosen(styling.other_options, choice:"pokemon evobar")}
 	is_skinned := {chosen(styling.other_options, choice:"godzilla style alias")}
@@ -173,19 +205,24 @@ init script:
 	lv_1_height := {lv_2_coordinate()}
 	lv_2_coordinate := {max(min(52 + to_number(pull_comma_array(styling.level_offset, cell:0))+(if is_full_art() then 20 else if is_mutate() then 12 else nil),152), 0)}
 	lv_3_coordinate := {max(min(101 + to_number(pull_comma_array(styling.level_offset, cell:1)+(if is_full_art() then 10 else if is_mutate() then 12 else nil)),152), lv_2_coordinate())}
+	lv_4_coordinate := {max(min(152 + to_number(pull_comma_array(styling.level_offset, cell:2)+(if is_full_art() then 10 else if is_mutate() then 12 else nil)),152), lv_3_coordinate())}
 	lv_2_height := {lv_3_coordinate() - lv_2_coordinate()}
-	lv_3_height := {152-lv_3_coordinate()}
+	lv_3_height := {lv_4_coordinate()-lv_3_coordinate()}
+	lv_4_height := {152-lv_4_coordinate()}
 	l1_center := {327 + (if is_full_art() then 16 else 0) + 0.5*lv_1_height()}
 	l2_center := {327 + lv_2_coordinate() + 0.5*lv_2_height()}
 	l3_center := {327 + lv_3_coordinate() + 0.5*lv_3_height()}
-	overlay1 := {slice_crop(background_slide(), height: lv_2_height(), width:314, distance:(152-lv_2_coordinate()))}
-	overlay2 := {slice_crop(background_slide_2(), height: lv_3_height(), width:314, distance:lv_3_height())}
-	mask_height := {if input == "one" then lv_1_height() else if input == "two" then lv_2_height() else if input == "three" then lv_3_height() else 0}
+	l4_center := {327 + lv_4_coordinate() + 0.5*lv_4_height()}
+	overlay1 := {if is_d20() then "d20slice.png" else slice_crop(background_slide(), height: lv_2_height(), width:314, distance:(152-lv_2_coordinate()))}
+	overlay2 := {if is_d20() then "d20slice.png" else slice_crop(background_slide_2(), height: lv_3_height(), width:314, distance:lv_3_height())}
+	overlay3 := {if is_d20() then "d20slice.png" else slice_crop(background_slide_3(), height: lv_4_height(), width:314, distance:lv_4_height())}
+	mask_height := {if input == "one" then lv_1_height() else if input == "two" then lv_2_height() else if input == "three" then lv_3_height() else if input == "four" then lv_4_height() else 0}
 	lone_pt := {chosen(styling.other_options, choice:"regular pt on levelers") and not starting_loyalty()}
 	starting_loyalty := {chosen(styling.other_options, choice:"use starting loyalty")}
 	choose_ptbox := {if is_fnm() then fnm_ptbox() else card_ptbox()}
 	lv_2_ptbox := { if is_vehicle() then "vpt.png" else if is_clear() then "cpt.png" else if is_fnm() then fnm_ptbox() else leveler_ptbox2() }
 	lv_3_ptbox := { if is_vehicle() then "vpt.png" else if is_clear() then "cpt.png" else if is_fnm() then fnm_ptbox() else leveler_ptbox3() }
+	lv_4_ptbox := { if is_vehicle() then "vpt.png" else if is_clear() then "cpt.png" else if is_fnm() then fnm_ptbox() else color_background(type:"pt", base_hybrid:leveler_pt_hybrid3) }
 	arrow_left := {if box_leveler() then -3 else if loy_leveler() then 10 else 18}
 	arrow_width := {if box_leveler() then 84 else if loy_leveler() then 42 else 56}
 	arrow_height := {if aug_leveler(input) then 42 else if box_leveler() then 50 else if loy_leveler() then 40 else 40}
@@ -197,9 +234,10 @@ init script:
 
 	special_text := {if is_leveler() then ((if card.level_0 != "" then "[" + level_label(0) + " " + card.level_0 + "] " else "") + card.level_1_text + (if card.pt != "" then " [" + card.pt + "]" else "") + "\n"
 			+ (if card.level_1 != "" then "[" + level_label(1) + " " + card.level_1 + "] " else "") + card.level_2_text + (if card.pt_2 != "" then " [" + card.pt_2 + "]" else "") + "\n"
-			+ (if card.level_2 != "" then "[" + level_label(2) + " " + card.level_2 + "] " else "") + card.level_3_text + (if card.pt_3 != "" then " [" + card.pt_3 + "]" else "")
+			+ (if card.level_2 != "" then "[" + level_label(2) + " " + card.level_2 + "] " else "") + card.level_3_text + (if card.pt_3 != "" then " [" + card.pt_3 + "]" else "") + (if card.level_4_text != "" then "\n" else "")
+			+ (if card.level_3 != "" then "[" + level_label(3) + " " + card.level_3 + "] " else "") + card.level_4_text + (if card.pt_7 != "" then " [" + card.pt_7 + "]" else "")
 		) else if is_mutate() then
-			card.level_1_text + "\n" + card.text
+			card.level_1_text + "\n" + card.rule_text
 		else ""
 	}
 	card_shape := {if is_leveler() then "leveler" else "normal"}
@@ -306,6 +344,16 @@ styling field:
 	type: text
 	name: font cap
 	description: Caps the font size of all text boxes to allow consistent sizes. Default is 14.
+styling field:
+	type: choice
+	name: d20 dividers
+	choice: d20 mode
+	choice: off
+	choice: all breaks
+	choice: all breaks +1
+	choice: all breaks +2
+	choice: all breaks +3
+	description: Do dice levels normally, off, on all linebreaks, on all but the first linebreak, etc.
 styling field:
 	type: text
 	name: arrow or bullet offsets
@@ -313,7 +361,7 @@ styling field:
 styling field:
 	type: text
 	name: level offset
-	description: Formatted as 1,2,3,. Move the level boxes down X pixels. Use negative to move up.
+	description: Formatted as 1,2,3,. Move the level boxes down X pixels. Use negative to move up. For 4 equal levels, use -14,-25,-38,
 styling field:
 	type: text
 	name: level label
@@ -694,7 +742,7 @@ card style:
 		left: {if card.level_2 != "" then (if loy_leveler() then 57 else if box_leveler() then 78 else 75) else if is_map() then 40 else 29}
 		top: {331 + lv_3_coordinate()}
 		right: {if card.pt_3 != "" then 277 else 342}
-		height: {if not is_leveler() then 0 else lv_3_height()-2}
+		height: {if not is_leveler()then 0 else lv_3_height()-2}
 		font:
 			name: MPlantin
 			italic name: MPlantin-Italic
@@ -725,6 +773,41 @@ card style:
 		line height soft: 0.9
 		line height hard max: {if is_modal(card.level_3_text) then 1.0 else 1.3 }
 		line height line max: 1.6
+	level 4 text:
+		left: {if card.level_3 != "" then (if loy_leveler() then 57 else if box_leveler() then 78 else 75) else if is_map() then 40 else 29}
+		top: {331 + lv_4_coordinate()}
+		right: {if card.pt_7 != "" then 277 else 342}
+		height: {if not is_leveler() then 0 else lv_4_height()-2}
+		font:
+			name: MPlantin
+			italic name: MPlantin-Italic
+			size: {if styling.font_cap != "" then to_number(styling.font_cap) else 14}
+			scale down to: 6
+			color: { if is_full_art() or is_fnm() then "white" else "black"}
+			shadow color: {if is_full_art() or is_fnm() then "black" else rgba(0,0,0,0)}
+			shadow displacement x: -1
+			shadow displacement y: 1
+		symbol font:
+			name: { styling.text_box_mana_symbols }
+			size: {if styling.font_cap != "" then to_number(styling.font_cap) else 14}
+			scale down to: 6
+		alignment:
+			script:
+				if (styling.center_text == "short text only" and
+				   not contains(match:"\n", card.rule_text) and
+				   card.flavor_text == "<i-flavor></i-flavor>" and
+				   card_style.text.content_lines <= 2) or
+				   styling.center_text == "always"
+				then "middle center"
+				else "middle left"
+		z index: 3
+		padding left:   6
+		padding right:  4
+		line height hard: {if is_modal(card.level_4_text) then 0.9 else 1.2 }
+		line height line: 1.5
+		line height soft: 0.9
+		line height hard max: {if is_modal(card.level_4_text) then 1.0 else 1.3 }
+		line height line max: 1.6
 	watermark:
 		left: { if is_map() then 40 else 19 }
 		top: { if is_full_art() then 359 else 330 }
@@ -787,6 +870,23 @@ card style:
 		symbol font:
 			name: { styling.level_mana_symbols }
 			size: {12 + if center_label(0) then 0.5 else 0}
+	level 3:
+		z index: 7
+		left: {if box_leveler() then 8 else if loy_leveler() then 14 else 21}
+		top: {l4_center() - (if aug_leveler(3) then 4 else 2) - (if center_label(3) then 6 else 0) + arrow_offset(3)}
+		width: {if is_leveler() or card.level_2 != "" then (34 + (if box_leveler() then 30 else 0)) else 0}
+		height:	{ if card_style.level_4_text.height < 10 and card.level_3 == "" then 0 else 22}
+		alignment: center middle shrink-overflow
+		font:
+			name: Beleren Bold
+			size: {if loy_leveler() then 11 else 12 + if center_label(0) then 2 else 0}
+			weight: bold
+			color: {if loy_leveler() then "white" else "black"}
+			shadow color: { if loy_leveler() then rgba(0,0,0,0) else "white"}
+			shadow blur: 2
+		symbol font:
+			name: { styling.level_mana_symbols }
+			size: {12 + if center_label(0) then 0.5 else 0}
 	############################# PT
 	pt:
 		z index: 4
@@ -834,6 +934,21 @@ card style:
 			shadow color: {if is_shifted() or is_fnm() then rgb(0,0,0) else rgba(0,0,0,0)}
 			shadow displacement x: -1
 			shadow displacement y: 1
+	pt 7:
+		z index: 4
+		left: 291
+		top: {(l4_center() - 12)}
+		width: {if is_leveler() and not lone_pt() or card.pt_7 != "" then 60 else 0}
+		height: {if card_style.level_4_text.height < 10 and card.pt_7 == "" then 0 else 28}
+		alignment: center middle shrink-overflow
+		font:
+			name: Beleren Bold
+			size: {if is_map() then 14 else 16}
+			color: {if is_shifted() or is_fnm() then "white" else if is_vehicle() and (not is_legend() or chosen(styling.other_options, choice:"brown legendary vehicle pt")) then "white" else "black"}
+			separator color: red
+			shadow color: {if is_shifted() or is_fnm() then rgb(0,0,0) else rgba(0,0,0,0)}
+			shadow displacement x: -1
+			shadow displacement y: 1
 	loyalty:
 		z index: 7
 		left: 326
@@ -914,6 +1029,12 @@ extra card field:
 	script: card.card_color
 	editable: false
 	save value: false
+extra card field:
+	type: choice
+	name: pt box 4
+	script: card.card_color
+	editable: false
+	save value: false
 extra card field:
 	type: choice
 	name: stamp
@@ -1050,12 +1171,6 @@ extra card field:
 	script: card.card_color
 	save value: false
 	editable: false
-extra card field:
-	type: choice
-	name: flash indicator
-	choice: dot
-	save value: false
-	editable: false
 # Add the word "LEVEL" to the top arrow.
 extra card field:
 	type: text
@@ -1063,20 +1178,27 @@ extra card field:
 	editable: false
 	save value: false
 	script: if loy_leveler() then ":" else level_label(0)
-# Add the word "LEVEL" to the first arrow.
+# Add the word "LEVEL" to the second arrow.
 extra card field:
 	type: text
 	name: lvl label 1
 	editable: false
 	save value: false
 	script: if loy_leveler() then ":" else level_label(1)
-# Add the word "LEVEL" to the second arrow.
+# Add the word "LEVEL" to the third arrow.
 extra card field:
 	type: text
 	name: lvl label 2
 	editable: false
 	save value: false
 	script: if loy_leveler() then ":" else level_label(2)
+# Add the word "LEVEL" to the fourth arrow.
+extra card field:
+	type: text
+	name: lvl label 3
+	editable: false
+	save value: false
+	script: if loy_leveler() then ":" else level_label(2)
 extra card field:
 	type: choice
 	name: level 2 overlay
@@ -1091,6 +1213,13 @@ extra card field:
 	choice: mask
 	editable: false
 	show statistics: false
+extra card field:
+	type: choice
+	name: level 4 overlay
+	script: card.card_color
+	choice: mask
+	editable: false
+	show statistics: false
 extra card field:
 	type: choice
 	name: arrow 1
@@ -1112,6 +1241,13 @@ extra card field:
 	editable: false
 	save value: false
 	show statistics: false
+extra card field:
+	type: choice
+	name: arrow 4
+	script: card.card_color
+	editable: false
+	save value: false
+	show statistics: false
 extra card field:
 	type: choice
 	name: mutbar
@@ -1264,6 +1400,15 @@ extra card style:
 		visible: { card.pt_3 != "" }
 		render style: image
 		image: {if is_map() then mappt_background() else combine_blend(image1: lv_3_ptbox(), image2: "ptbox_multiply_2.png", combine: "multiply")}
+	pt box 4:
+		left: 278
+		top: { l4_center() - (if is_map() then 26 else 15)}
+		width: { if (is_leveler() and not lone_pt()) or card.pt_3 != "" then (if is_map() then 90 else 81) else 0}
+		height:	{ if (is_leveler() and not lone_pt()) or card.pt_3 != "" then (if is_map() then 54 else 42) else 0}
+		z index: 3
+		visible: { card.pt_7 != "" }
+		render style: image
+		image: {if is_map() then mappt_background() else combine_blend(image1: lv_4_ptbox(), image2: "ptbox_multiply_3.png", combine: "multiply")}
 	loyalty box:
 		right: 362
 		top: 466
@@ -1487,24 +1632,46 @@ extra card style:
 			color: black
 			weight: {if loy_leveler() then "" else "bold"}
 		visible: {card.level_2 != ""}
+	lvl label 3:
+		left: {if box_leveler() then 8 else if loy_leveler() then 48 else 21}
+		top: {l4_center() - (if loy_leveler() then 2 else 10) + arrow_offset(3)}
+		width: {if is_leveler() or card.level_3 != "" then (if loy_leveler() then 10 else 34 + (if box_leveler() then 30 else 0)) else 0}
+		height: {if loy_leveler() then 10 else if center_label(3) then 0 else 10}
+		z index: 6
+		alignment: middle center
+		font:
+			name: {if loy_leveler() then "MPlantin" else "Beleren Small Caps"}
+			size: {if loy_leveler() then 15 else if length(level_label(2)) < 8 or box_leveler() then 7 else 6}
+			color: black
+			weight: {if loy_leveler() then "" else "bold"}
+		visible: {card.level_3 != ""}
 	level 2 overlay:
 		left: 29
-		top: { 329 + lv_2_coordinate()}
-		height: { lv_2_height()}
+		top: { if is_d20() then top_of_para(rolls_start(card.text)) else 329 + lv_2_coordinate()}
+		height: { if is_d20() then height_of_para(rolls_start(card.text)) else lv_2_height()}
 		width: 314
 		z index: 0
 		render style: image
 		image: {overlay1()}
-		visible: {is_leveler() and not is_full_art() and not is_map() and not is_fnm()}
+		visible: {(is_d20() and number_of_rolls(card.text) > 0) or is_leveler() and not is_full_art() and not is_map() and not is_fnm()}
 	level 3 overlay:
 		left: 29
-		top: { 329 + lv_3_coordinate()}
-		height: { lv_3_height()}
+		top: { if is_d20() then top_of_para(rolls_start(card.text)+2) else 329 + lv_3_coordinate()}
+		height: { if is_d20() then height_of_para(rolls_start(card.text)+2) else lv_3_height()}
 		width: 314
 		z index: 0
 		render style: image
 		image: {overlay2()}
-		visible: {is_leveler() and not is_full_art() and not is_map() and not is_fnm()}
+		visible: {(is_d20() and number_of_rolls(card.text)-no_roll(card.text) > 2) or is_leveler() and not is_full_art() and not is_map() and not is_fnm()}
+	level 4 overlay:
+		left: 29
+		top: { if is_d20() then top_of_para(rolls_start(card.text)+4) else 329 + lv_4_coordinate()}
+		height: { if is_d20() then height_of_para(rolls_start(card.text)+4) else lv_4_height()}
+		width: 314
+		z index: 0
+		render style: image
+		image: {overlay3()}
+		visible: {(is_d20() and number_of_rolls(card.text)-no_roll(card.text) > 4) or is_leveler() and not is_full_art() and not is_map() and not is_fnm()}
 	arrow 1:
 		z index: 5
 		left: {arrow_left()}
@@ -1529,6 +1696,14 @@ extra card style:
 		height:	{arrow_height(2)}
 		render style: image
 		image: {if loy_leveler() then loyalty_image(card.level_2) else if box_leveler() then choose_ptbox() else arrow_background()}
+	arrow 4:
+		z index: 5
+		left: {arrow_left()}
+		top: {l4_center() - 16 + arrow_offset(3)}
+		width: {if card.level_3 != "" then arrow_width() else 0}
+		height:	{arrow_height(3)}
+		render style: image
+		image: {if loy_leveler() then loyalty_image(card.level_3) else if box_leveler() then choose_ptbox() else arrow_background()}
 	mutbar:
 		z index: 2
 		left: 28