89 lines
2.0 KiB
Plaintext
89 lines
2.0 KiB
Plaintext
-- CharacterNameSaves - Nitpicker's Modpack
|
|
-- Last modified: 2021.07.26
|
|
-- https://github.com/Ishmaeel/NitpickerModpack
|
|
local base_user_name = nil
|
|
|
|
local fs = getFS()
|
|
|
|
local function actor_character_name()
|
|
return db.actor:character_name()
|
|
end
|
|
|
|
local function news(str)
|
|
printf("# " .. str)
|
|
end
|
|
|
|
if d and d.news then
|
|
news = d.news
|
|
end
|
|
|
|
function on_game_start()
|
|
if new_name then
|
|
news("not compatible with 'new_name.script'.")
|
|
return
|
|
end
|
|
|
|
RegisterScriptCallback("on_game_load", on_game_load)
|
|
|
|
base_user_name = _G.user_name
|
|
_G.user_name = actor_character_name
|
|
end
|
|
|
|
function on_game_load()
|
|
rename_saves()
|
|
end
|
|
|
|
function rename_saves()
|
|
-- This forces a refresh of file system cache I guess.
|
|
fs:file_list_open_ex("$game_saves$", bit_or(FS.FS_ListFiles, FS.FS_RootOnly), "*")
|
|
|
|
local user_save = fs:update_path('$game_saves$', base_user_name() .. " - autosave")
|
|
local char_save = fs:update_path('$game_saves$', actor_character_name() .. " - autosave")
|
|
|
|
local level_name = level.name()
|
|
if level_name then
|
|
local level_title = game.translate_string(level_name)
|
|
if level_title then
|
|
level_title = string.lower(level_title:gsub("[()]", ""))
|
|
char_save = char_save .. " - " .. level_title
|
|
end
|
|
end
|
|
|
|
rename_save(user_save, char_save)
|
|
|
|
return true
|
|
end
|
|
|
|
function rename_save(first, second)
|
|
local ready = check(first, ".scop") and check(first, ".scoc")
|
|
|
|
if not ready then
|
|
news("Autosave not found.")
|
|
return
|
|
end
|
|
|
|
rename(first, second, ".scop")
|
|
rename(first, second, ".scoc")
|
|
|
|
printf("# Renaming %s -> %s", first, second)
|
|
|
|
local done = check(second, ".scop") and check(second, ".scoc")
|
|
|
|
news(done and "Autosave updated." or "Autosave update failed.")
|
|
end
|
|
|
|
function check(first, ext)
|
|
first = first .. ext
|
|
|
|
local exists = fs:exist(first) and true or false
|
|
|
|
return exists
|
|
end
|
|
|
|
function rename(first, second, ext)
|
|
first = first .. ext
|
|
second = second .. ext
|
|
|
|
fs:file_rename(first, second, true)
|
|
end
|