SCALE_FONT_STORE_STRONGHOLD_LIST = 0.8
Store_stronghold_doc_handle = -1
local THREE_COUNT = 1
local NUKEPLANT = 2
local BROTHEL = 3
local POWDER = 4
local STRONGHOLD_POPULATE_TITLE = 0
local STRONGHOLD_POPULATE_FIXED = 1
local STRONGHOLD_POPULATE_REWARDS = 2
local STORE_STRONGHOLD_POPUP_X = 134
local STORE_STRONGHOLD_POPUP_Y = 170
local STORE_STRONGHOLD_INFO_RESPONDER = "store_stronghold_populate"
local Stronghold_image_data = {
[THREE_COUNT] = { "ui_stronghold_3count_02", "ui_stronghold_3count_02", "ui_stronghold_3count_03" },
[NUKEPLANT] = { "ui_stronghold_nuke_02", "ui_stronghold_nuke_02", "ui_stronghold_nuke_03" },
[BROTHEL] = { "ui_stronghold_bdsm_02", "ui_stronghold_bdsm_02", "ui_stronghold_bdsm_03" },
[POWDER] = { "ui_stronghold_3count_02", "ui_stronghold_3count_02", "ui_stronghold_3count_03" },
}
Store_stronghold_top_menu = {}
-- Hint bar and store header vdo's.
local Store_logo1
local Store_logo2
local Not_popup_grp
local Detail_grp
local Reward_image
local Store_stronghold_in_anim
local Rewards_data = {}
local Stronghold_id
local Stronghold_input_tracker = {}
local Stronghold_gang_h
local Store_stronghold_max_level = 0
local Store_stronghold_upgrades_ready = false
local Store_stronghold_kill_list_mouse = false
local REWARD_SPACING = 26
-- We used this as a reference to the current submenu we are building.
local Store_stronghold_building_menu = {}
-- keeps track of which selection we were on when leaving to a sub-document
local Store_stronghold_current_menu_selection = 1
local Stronghold_hint_bar_mouse_input_tracker
local Stronghold_full_screen_mouse_input_tracker
local Game_platform
local Store_title_name = nil
---------------------------------------------------------------------------
-- Initialize crib Store (Customization)
---------------------------------------------------------------------------
function store_stronghold_init()
Store_common_current_highlight_color = COLOR_STORE_REWARDS_PRIMARY
Game_platform = game_get_platform()
Store_stronghold_doc_handle = vint_document_find("store_stronghold")
local store_group = vint_object_find("screen_grp",0,Store_common_doc_handle)
vint_set_property(store_group,"visible",false)
-- Set up some callbacks for the common store script
Store_common_populate_list_cb = store_stronghold_populate_list
Store_common_exit_cb = store_stronghold_exit
-- Subscribe to the button presses we need, Input_tracker is created in store_common.lua
Input_tracker:subscribe(false)
vint_dataresponder_request(STORE_STRONGHOLD_INFO_RESPONDER, "store_stronghold_populate_title", 0, STRONGHOLD_POPULATE_TITLE)
vint_dataresponder_request(STORE_STRONGHOLD_INFO_RESPONDER, "store_stronghold_populate_data", 0, STRONGHOLD_POPULATE_FIXED)
vint_dataresponder_request(STORE_STRONGHOLD_INFO_RESPONDER, "store_stronghold_populate_rewards", 0, STRONGHOLD_POPULATE_REWARDS)
--Set background for "bg_saints"
bg_saints_set_type(BG_TYPE_STRONGHOLD)
--Setup Button Hints
local hint_data = {
{CTRL_MENU_BUTTON_B, "MENU_BACK"},
}
Store_common_hint_bar:set_hints(hint_data)
Store_common_hint_bar:set_visible(true)
if game_is_active_input_gamepad() then
local hint_rotate_data = {
{CTRL_BUTTON_RS, "STORE_ZOOM_ROTATE"},
}
Store_common_rotate_hint:set_hints(hint_rotate_data)
Store_common_rotate_hint:set_visible(false)
end
if Game_platform == "PC" then
Mouse_input_tracker:subscribe(false)
local bg_image_h = vint_object_find("stronghold_image")
Stronghold_hint_bar_mouse_input_tracker = Vdo_input_tracker:new()
Store_common_hint_bar:add_mouse_inputs("store_stronghold", Stronghold_hint_bar_mouse_input_tracker)
Stronghold_hint_bar_mouse_input_tracker:subscribe(true)
Stronghold_full_screen_mouse_input_tracker = Vdo_input_tracker:new()
Stronghold_full_screen_mouse_input_tracker:add_mouse_input("mouse_click", "store_stronghold_button_a", 0, bg_image_h)
Stronghold_full_screen_mouse_input_tracker:subscribe(false)
end
-- Set Store Header colors
Store_header:set_color(COLOR_STORE_REWARDS_PRIMARY, COLOR_STORE_REWARDS_SECONDARY, COLOR_STORE_REWARDS_TERTIARY)
Store_header:set_visible(true)
--Store_header:enable_price_respect(true)
Store_header:push_title( nil, Store_title_name )
Active_list:set_highlight_color(COLOR_STORE_REWARDS_PRIMARY, COLOR_STORE_REWARDS_SECONDARY)
-- Everything that is not in the popup so we can fade it when the popup is active
Not_popup_grp = Vdo_base_object:new("not_popup_grp", 0, Store_common_doc_handle)
Detail_grp = Vdo_base_object:new("detail_group",0,Store_stronghold_doc_handle)
-- Setup purchase popup
Store_common_popup:set_visible(false)
Store_common_popup:set_color(COLOR_STORE_REWARDS_PRIMARY, COLOR_STORE_REWARDS_SECONDARY, COLOR_STORE_REWARDS_TERTIARY)
Store_common_popup:set_size(STORE_COMMON_LIST_SIZE, (LIST_BUTTON_HEIGHT * 5) + (LIST_BUTTON_SPACE * 5))
Store_common_popup:set_anchor(STORE_STRONGHOLD_POPUP_X,STORE_STRONGHOLD_POPUP_Y)
vint_set_property(Crib_title,"visible",false)
-- Pass the table data to the megalist vdo.
Menu_data = Store_stronghold_top_menu
-- Pass the table data to the megalist vdo.
store_stronghold_populate_list(Menu_data, Store_stronghold_current_menu_selection)
-- set up flyby input tracker
Stronghold_input_tracker = Vdo_input_tracker:new()
Stronghold_input_tracker:add_input("select", "store_stronghold_button_a", 100)
Stronghold_gang_h = vint_object_find("stronghold_gang", 0, Store_stronghold_doc_handle)
local detail_anim_h = vint_object_find("stronghold_detail_anim")
vint_apply_start_values(detail_anim_h)
store_unlock_controls()
end
function store_stronghold_load_complete(stronghold_icon_name)
-- Jason, this changed to stronghold_icon_name, which is a string
local gang_name = ""
if stronghold_icon_name == "Crib_3Count" then
Stronghold_id = THREE_COUNT
gang_name = "HUMAN_TEAM_LUCHADORES"
elseif stronghold_icon_name == "Crib_BDSM" then
Stronghold_id = BROTHEL
gang_name = "HUMAN_TEAM_MORNINGSTAR"
elseif stronghold_icon_name == "Crib_Nuke" then
Stronghold_id = NUKEPLANT
gang_name = "HUMAN_TEAM_DECKERS"
else
Stronghold_id = THREE_COUNT
gang_name = "HUMAN_TEAM_LUCHADORES"
end
vint_set_property(Stronghold_gang_h, "visible", true)
vint_set_property(Stronghold_gang_h, "text_tag", gang_name)
local image = Stronghold_image_data[Stronghold_id]
game_peg_load_with_cb("store_stronghold_bg_anim", 3, image[1],image[2],image[3])
end
-- Cleanup function called on document unload.
--
function store_stronghold_cleanup()
--unload the full screen images
local image = Stronghold_image_data[Stronghold_id]
game_peg_unload(image[1])
game_peg_unload(image[2])
game_peg_unload(image[3])
-- Some things need to be cleaned up right away when a store doc is unloading, particular disabled inputs which have
-- callbacks to the script that is unloading.
store_common_cleanup_current_store()
end
-- Called when this interface becomes the top one on the stack again.
--
function store_stronghold_gained_focus()
Store_common_current_highlight_color = COLOR_STORE_REWARDS_PRIMARY
-- Reset our header
--Store_header:clear_titles()
-- make background so it covers up the world
bg_saints_set_background(false)
Input_tracker:subscribe(true)
store_stronghold_enable_mouse(true)
-- Need to clear out menu and menu stacks
store_common_stack_clear_menu()
store_common_stack_clear_id()
store_common_stack_clear_index()
-- Pass the table data to the megalist vdo.
Menu_data = Store_stronghold_top_menu
-- Pass the table data to the megalist vdo.
store_stronghold_populate_list(Menu_data, Store_stronghold_current_menu_selection)
end
function store_stronghold_bg_anim()
Store_stronghold_in_anim = Vdo_anim_object:new("store_stronghold_slide_in_anim", 0, Store_common_doc_handle)
local twn = vint_object_find("end_event_twn_1",0,Store_common_doc_handle)
--vint_set_property(twn,"start_time",0)
--vint_set_property(twn,"start_value",500,-6)
--vint_set_property(twn,"end_value",-30,-6)
twn = vint_object_find("strong_main_anchor_twn",0,Store_common_doc_handle)
--vint_set_property(twn,"start_value",500,-95)
--vint_set_property(twn,"end_value",-30,-95)
vint_apply_start_values(Store_stronghold_in_anim.handle)
Store_stronghold_in_anim:play()
local detail_anim_h = vint_object_find("stronghold_detail_anim")
lua_play_anim(detail_anim_h, 0, Store_stronghold_doc_handle)
vint_apply_start_values(detail_anim_h)
store_stronghold_refresh_rewards()
local store_group = vint_object_find("screen_grp",0,Store_common_doc_handle)
vint_set_property(store_group,"visible",true)
end
function store_lock_controls()
Input_tracker:subscribe(false)
store_stronghold_enable_mouse(false)
end
function store_unlock_controls()
Input_tracker:subscribe(true)
store_stronghold_enable_mouse(true)
end
-- Called when player requests exiting store.
--
function store_stronghold_exit()
--we may not have to do a destructive action popup since we are going back to the crib menu
--[[Store_common_popup:populate_list(Yes_no_choices, 1, STORE_COMMON_LIST_SIZE, 2)
Store_common_popup:set_title("MENU_TITLE_WARNING")
Store_common_popup:set_text("STORE_EXIT_WARNING_BODY")
Store_common_popup:nav_enable(true, "store_stronghold_exit_final", "store_stronghold_popup_nav")
Not_popup_grp:set_alpha(.5)]]
store_lock_controls()
-- clear out the price
Store_header:set_price(nil)
local anim = vint_object_find("stronghold_detail_out_anim",0,Store_stronghold_doc_handle)
local twn = vint_object_find("new_tween1_1",0,Store_stronghold_doc_handle)
--set up the end event to pop the screen when the anim is done
vint_set_property(twn,"end_event","store_stronghold_anim_complete")
lua_play_anim(anim,0)
anim = vint_object_find("store_stronghold_slide_in_anim",0,Store_common_doc_handle)
twn = vint_object_find("end_event_twn_1",0,Store_common_doc_handle)
--vint_set_property(twn,"start_time",0)
--vint_set_property(twn,"start_value",-30,-6)
--vint_set_property(twn,"end_value",500,-6)
twn = vint_object_find("strong_main_anchor_twn",0,Store_common_doc_handle)
--vint_set_property(twn,"start_value",-30,-95)
--vint_set_property(twn,"end_value",500,-95)
lua_play_anim(anim,0)
end
function store_stronghold_anim_complete()
--force a screen pop to the crib menu
pop_screen()
end
--[[
-- No need for second exit (JMH 4/1/2011)
--
-- Called when player has responded to store exit confirmation dialog.
--
-- event: input response from the player
--
function store_stronghold_exit_final(event)
Store_common_popup:nav_enable(false, nil, nil)
-- The user hit the B button and is exiting
-- This is redundant to selecting "No" in the list
if event == "back" then
game_UI_audio_play("UI_Main_Menu_Nav_Back")
Not_popup_grp:set_alpha(1)
Detail_grp:set_alpha(1)
store_stronghold_enable_mouse(true)
return
end
game_UI_audio_play("UI_Main_Menu_Select")
-- Did we select yes? This assumes yes is the first item
if Store_common_popup:get_selected_data() ~= 1 then
Not_popup_grp:set_alpha(1)
Detail_grp:set_alpha(1)
store_stronghold_enable_mouse(true)
return
end
--Not_popup_grp:set_alpha(0)
local exit_anim = vint_object_find("stronghold_anim_out")
lua_play_anim(exit_anim)
-- exit the interface
pop_screen()
end
]]
-- Populate the active megalist menu, and hide the previous menu
--
-- list_data: this table contains the data to populate the megalist
-- current_index: the current index in the menu that's selected
--
function store_stronghold_populate_list(list_data, current_index)
Active_list:draw_items(list_data, current_index, STORE_COMMON_LIST_SIZE, 10, LIST_FONT_SCALE)
Active_list:set_visible(true)
if Game_platform == "PC" then
Mouse_input_tracker:remove_all()
Active_list:set_store("store_stronghold")
Active_list:add_mouse_inputs("store_common", Mouse_input_tracker)
Mouse_input_tracker:subscribe(true)
end
end
-- Clears the price and respect values from the store header.
--
function store_stronghold_header_revert(menu_data)
Store_header:set_price(nil)
Store_header:set_respect(nil)
end
-- Handles navigation of any popups
function store_stronghold_popup_nav(event, value)
if event == "nav_up" then
Store_common_popup.list:move_cursor(-1)
elseif event == "nav_down" then
Store_common_popup.list:move_cursor(1)
elseif event == "mouse_move" then
-- value contains the target_handle in this case
local new_index = Store_common_popup.list:get_button_index(value)
if new_index ~= 0 then
Store_common_popup.list:set_selection(new_index)
Store_common_popup.list:move_cursor(0, true)
end
else
--do nothing
end
end
-- Starts the flow of purchasing an upgrade
--
function store_stronghold_purchase_upgrade()
--get the current highlight index
local current_item = Active_list:get_selection()
Store_stronghold_current_menu_selection = current_item
--make a shortcut to the main data table
local data = Store_stronghold_top_menu[current_item]
if current_item > Store_stronghold_max_level + 1 then
Input_tracker:subscribe(false)
Store_common_popup:populate_list(Ok_choice, 1, STORE_COMMON_LIST_SIZE, 1)
Store_common_popup:set_title("MENU_TITLE_NOTICE")
Store_common_popup:set_text("MENU_STRONGHOLD_PREVIOUS_UPGRADE")
Store_common_popup:nav_enable(true, "store_stronghold_fail_msg", "store_stronghold_popup_nav")
Not_popup_grp:set_alpha(.5)
Detail_grp:set_alpha(.5)
store_stronghold_enable_mouse(false)
return
elseif Store_common_player_cash >= data.price and data.equipped == false then
local insert = { [0] = data.label, [1] = format_cash(data.price) }
local body = vint_insert_values_in_string("VCUST_PURCHASE_PROMPT", insert)
local heading = "MENU_TITLE_CONFIRM"
Input_tracker:subscribe(false)
Store_common_popup:populate_list(Yes_no_choices, 1, STORE_COMMON_LIST_SIZE, 2)
Store_common_popup:set_title(heading)
Store_common_popup:set_text(body)
Store_common_popup:nav_enable(true, "store_stronghold_upgrade_confirm", "store_stronghold_popup_nav")
Not_popup_grp:set_alpha(.5)
Detail_grp:set_alpha(.5)
store_stronghold_enable_mouse(false)
elseif not data.is_purchased then
Input_tracker:subscribe(false)
Store_common_popup:populate_list(Ok_choice, 1, STORE_COMMON_LIST_SIZE, 1)
Store_common_popup:set_title("MENU_TITLE_NOTICE")
Store_common_popup:set_text("HUD_SHOP_INSUFFICIENT_FUNDS")
Store_common_popup:nav_enable(true, "store_stronghold_fail_msg", "store_stronghold_popup_nav")
Not_popup_grp:set_alpha(.5)
Detail_grp:set_alpha(.5)
store_stronghold_enable_mouse(false)
end
end
function store_stronghold_fail_msg(event)
Store_common_popup:nav_enable(false, nil, nil)
Not_popup_grp:set_alpha(1)
Detail_grp:set_alpha(1)
game_UI_audio_play("UI_Main_Menu_Select")
store_stronghold_enable_mouse(true)
Input_tracker:subscribe(true)
end
function store_stronghold_upgrade_confirm(event)
Store_common_popup:nav_enable(false, nil, nil)
Not_popup_grp:set_alpha(1)
Detail_grp:set_alpha(1)
store_stronghold_enable_mouse(true)
Input_tracker:subscribe(true)
-- The user hit the B button and is exiting
-- This is redundant to selecting "No" in the list
if event == "back" then
game_UI_audio_play("UI_Main_Menu_Nav_Back")
return
end
--game_UI_audio_play("UI_Main_Menu_Select")
-- Did we select yes? This assumes yes is the first item
if Store_common_popup:get_selected_data() ~= 1 then
return
end
game_UI_audio_play("UI_Buy_Building_Screen")
--get the current highlight index
local current_item = Active_list:get_selection()
--make a shortcut to the main data table
local data = Store_stronghold_top_menu[current_item]
Store_stronghold_max_level = Store_stronghold_max_level + 1
--SET THE UPGRADE AS OWNED IN SCRIPT
data.equipped = true
data.is_purchased = true
data.price = 0
Store_stronghold_kill_list_mouse = true
if Mouse_input_tracker ~= nil then
Mouse_input_tracker:subscribe(false)
end
--if Hint_bar_mouse_input_tracker ~= nil then
--Hint_bar_mouse_input_tracker:subscribe(false)
--end
if Store_stronghold_current_menu_selection < 3 then
Store_stronghold_current_menu_selection = Store_stronghold_current_menu_selection + 1
end
local exit_anim = Vdo_anim_object:new("store_stronghold_purchase_anim", 0, Store_common_doc_handle)
vint_apply_start_values(exit_anim.handle)
exit_anim:play()
exit_anim = vint_object_find("stronghold_anim_out", 0, Store_stronghold_doc_handle)
vint_apply_start_values(exit_anim)
lua_play_anim(exit_anim, 0, Store_stronghold_doc_handle)
--Store_common_hint_bar:set_visible(false)
bg_saints_stronghold_drop_out()
--subtract player cash
--do player upgrades immediately.
--NOTE: we will do reward screens after the flyby, but we need to ensure the rewards are given
-- then begin fade that precedes the flyby
store_stronghold_game_purchase_upgrade()
--It looks like the chunk swap are quick so we should not need to have a load screen.
store_stronghold_setup_flyby()
end
--C code calls this after the gun wipe is complete
--Camera flyby begins and input processing is enabled (A to cancel flyby)
function store_stronghold_wipe_complete()
--start custom input for continue
Stronghold_input_tracker:subscribe(true)
Stronghold_hint_bar_mouse_input_tracker:subscribe(true)
Stronghold_full_screen_mouse_input_tracker:subscribe(true)
--show the continue hint
local hint_data = {
{CTRL_MENU_BUTTON_A, "COMPLETION_CONTINUE"},
}
Store_common_hint_bar:set_hints(hint_data)
--local bg_group = vint_object_find("bg_group")
--vint_set_property(bg_group,"visible",false)
--kill the header and the list
Store_header:set_visible(false)
Active_list:set_visible(false)
vint_set_property(Stronghold_gang_h, "visible", false)
--show the large purchased text
local stronghold_purchased_h = vint_object_find("stronghold_purchased")
vint_set_property(stronghold_purchased_h, "visible", true)
local exit_anim = Vdo_anim_object:new("store_stronghold_purchase_anim", 0, Store_common_doc_handle)
vint_apply_start_values(exit_anim.handle)
local detail_anim_h = vint_object_find("stronghold_purchase_anim")
lua_play_anim(detail_anim_h)
local anim = vint_object_find("store_stronghold_slide_in_anim", 0, Store_common_doc_handle)
local twn = vint_object_find("end_event_twn_1", anim)
vint_set_property(twn, "start_time", 5.0)
vint_set_property(twn, "end_event", "store_stronghold_hints_done")
vint_apply_start_values(anim)
vint_apply_start_values(Store_stronghold_in_anim.handle)
bg_saints_animate()
Store_stronghold_in_anim:play()
end
function store_stronghold_setup_flyby()
--kill normal input
Input_tracker:subscribe(false)
end
function store_stronghold_hints_done()
Store_stronghold_upgrades_ready = true
local anim = vint_object_find("store_stronghold_slide_in_anim", 0, Store_common_doc_handle)
local twn = vint_object_find("end_event_twn_1", anim)
vint_set_property(twn, "start_time", 0)
vint_set_property(twn, "end_event", nil)
end
--This is called when we want to stop flyby
--After this is called, kick off awards
function store_stronghold_button_a()
if Store_stronghold_upgrades_ready then
Store_stronghold_upgrades_ready = false
Store_stronghold_kill_list_mouse = false
Stronghold_full_screen_mouse_input_tracker:subscribe(false)
if Mouse_input_tracker ~= nil then
Mouse_input_tracker:subscribe(true)
end
--if Hint_bar_mouse_input_tracker ~= nil then
-- Hint_bar_mouse_input_tracker:subscribe(true)
--end
-- reset input tracker
Stronghold_input_tracker:subscribe(false)
Input_tracker:subscribe(true)
store_stronghold_upgrade_end_flyby()
store_lock_controls()
--Don't want to reset stronghold purchase screens yet. We'll hide that change behind
--the reward screens.
end
end
--reset stronghold store UI while on rewards screen
function store_stronghold_mid_awards_reset()
--enable input tracking
Input_tracker:subscribe(true)
--RESET UI HERE.
--hide the large purchased text
local stronghold_purchased_h = vint_object_find("stronghold_purchased")
vint_set_property(stronghold_purchased_h,"visible",false)
local bg_group = vint_object_find("bg_group")
vint_set_property(bg_group,"alpha",1.0)
local stronghold_line = vint_object_find("stronghold_line")
vint_set_property(stronghold_line,"alpha",1.0)
vint_set_property(Stronghold_gang_h, "visible", true)
Store_header:set_visible(true)
Active_list:set_visible(true)
-- Pass the table data to the megalist vdo.
store_stronghold_populate_list(Menu_data, Store_stronghold_current_menu_selection)
store_stronghold_refresh_rewards()
--Store_header:clear_titles()
--Store_header:push_title( nil, Store_title_name )
--set the new image
local bg_image_h = vint_object_find("stronghold_image")
vint_set_property( bg_image_h, "image", Stronghold_image_data[Stronghold_id][Store_stronghold_current_menu_selection])
local hint_data = {
{CTRL_MENU_BUTTON_B, "MENU_BACK"},
}
Store_common_hint_bar:set_hints(hint_data)
store_unlock_controls()
end
-- Refreshes the rewards list based on the current highlight
--
function store_stronghold_refresh_rewards()
--get the current highlight index
local current_item = Active_list:get_selection()
--make a shortcut to the main data table
local data = Store_stronghold_top_menu[current_item]
--set the cost of the upgrade
if data.price <= 0 or data.is_purchased then
Store_header:set_price(nil)
else
Store_header:set_price(data.price)
end
local reward_text_h = vint_object_find("stronghold_reward_label_1")
vint_set_property(reward_text_h, "visible", false)
--check if we have set rewards before
--if so kill everything
if #Rewards_data > 0 then
for i = 1, #Rewards_data do
vint_object_destroy( Rewards_data[i] )
end
Rewards_data = {}
end
--draw the new rewards strings
for i = 1, #data.rewards do
Rewards_data[i] = vint_object_clone(reward_text_h)
vint_set_property(Rewards_data[i],"visible",true)
vint_set_property(Rewards_data[i], "text_tag", data.rewards[i])
local x, y = vint_get_property( Rewards_data[i], "anchor")
vint_set_property(Rewards_data[i], "anchor", x, y + (i * REWARD_SPACING))
end
--set the new title
local title_h = vint_object_find("stronghold_title")
vint_set_property(title_h, "text_tag", data.label)
local bg_image_h = vint_object_find("stronghold_image")
vint_set_property( bg_image_h, "image", Stronghold_image_data[Stronghold_id][current_item])
end
function store_stronghold_populate_title(title_text)
Store_title_name = title_text
end
function store_stronghold_populate_data(label, is_purchased, price)
-- label = string value for the button and title
-- is_purchased = bool for whether or not the stronghold upgrade has been purchased
-- price = price of the upgrade
-- rewards = table of strings for the rewards the player will get
local current_index = #Store_stronghold_top_menu + 1
Store_stronghold_top_menu[current_index] =
{ label = label,
type = TYPE_BUTTON,
on_select = store_stronghold_purchase_upgrade,
id = current_index,
is_purchased = is_purchased,
equipped = is_purchased,
owned = true,
price = price,
on_nav = store_stronghold_refresh_rewards,
num_rewards = 0,
rewards = {}
}
if Store_stronghold_top_menu[current_index].equipped == true then
Store_stronghold_max_level = current_index
end
end
function store_stronghold_populate_rewards(upgrade_level, reward_text)
-- valid upgrade level
upgrade_level = upgrade_level + 1
local cur_top_menu = Store_stronghold_top_menu[upgrade_level]
if cur_top_menu == nil or reward_text == nil then
return
end
cur_top_menu.num_rewards = cur_top_menu.num_rewards + 1
cur_top_menu.rewards[cur_top_menu.num_rewards] = reward_text
end
--Menu Options...
-- =====================================
-- Mouse Specific Functions
-- =====================================
function store_stronghold_enable_mouse(enable)
if Game_platform == "PC" and enable ~= nil then
if Mouse_input_tracker ~= 0 then
Mouse_input_tracker:subscribe(enable)
end
if Stronghold_hint_bar_mouse_input_tracker ~= nil then
Stronghold_hint_bar_mouse_input_tracker:subscribe(enable)
end
end
end
function store_stronghold_mouse_click(event, target_handle)
local hint_index = Store_common_hint_bar:get_hint_index(target_handle)
if hint_index ~= 0 then
if Store_stronghold_upgrades_ready then
store_stronghold_button_a()
return
end
store_common_button_b()
end
end
function store_stronghold_mouse_move(event, target_handle)
-- Reset all highlights
Store_common_hint_bar:set_highlight(0)
-- Check if the mouse is over the hint bar buttons
local hint_index = Store_common_hint_bar:get_hint_index(target_handle)
if hint_index ~= 0 then
Store_common_hint_bar:set_highlight(hint_index, Store_common_current_highlight_color)
return
end
-- Check if the mouse is over a button on the mega list
if Store_stronghold_kill_list_mouse == false then
local old_index = Active_list:get_selection()
local new_index = Active_list:get_button_index(target_handle)
if new_index ~= 0 and new_index ~= old_index then
Active_list:set_selection(new_index)
Active_list:move_cursor(0, true)
-- If the item has a callback for navigation, do it (such as putting clothes on)
local data_item = Active_list:return_selected_data()
if data_item.on_nav ~= nil then
data_item.on_nav(data_item)
end
return
end
end
end
function store_stronghold_mouse_scroll(event, target_handle, mouse_x, mouse_y, scroll_lines)
end
function store_stronghold_mouse_drag(event, target_handle, mouse_x, mouse_y)
end
function store_stronghold_mouse_drag_release(event, target_handle, mouse_x, mouse_y)
end