Save Data(font etc...)

[Illusion]

Create a new script and name it Module_SaveData
#-----------------------------------------------------------------------------
#¸.•'´¯)¸,ø¤``¤ø,¸ (´¨`··•·SaveData module ; Illusion·•·´¨`) ¸,ø¤``¤ø,¸(¯`'•.¸· ·
# ∂Ħ∫ДΔ|}-{_') (Version 0.5) ('_}-{|ΔД∫Ħ∂
#-----------------------------------------------------------------------------
module SaveData
Fonts = ['Tahoma', 'Pokemon RS', 'Curlz MT', 'Bradley Hand ITC', 'Comic Sans MS']
Sizes = [16, 18, 20, 22, 24, 26]
Font_index = 4
Size_index = 3
module_function
#-----------------------------------------------------------------------------
#¸.•'´¯)¸,ø¤``¤ø,¸ (´¨`··•·Save Font·•·´¨`) ¸,ø¤``¤ø,¸(¯`'•.¸· ·
#-----------------------------------------------------------------------------
def savefont
file = File.open("Font.txt", "wb")
file.write("Font Name: #{$fontname}\nFont Size: #{$fontsize}\nIf you have problems with the font change these lines.")
file.close
end
#-----------------------------------------------------------------------------
#¸.•'´¯)¸,ø¤``¤ø,¸ (´¨`··•·Load Font·•·´¨`) ¸,ø¤``¤ø,¸(¯`'•.¸· ·
#-----------------------------------------------------------------------------
def loadfont
if FileTest.exist?("Font.txt")
data = IO.readlines("Font.txt")
data[0] = data[0].chomp("\n")
data[1] = data[1].delete("Font Size: ").to_i
data[0][0...11] = ""
$defaultfonttype = $fontface = $fontname = Font.default_name = data[0]
$fontsize = $defaultfontsize = $fontsize = Font.default_size data[1]
end
end
#-----------------------------------------------------------------------------
#¸.•'´¯)¸,ø¤``¤ø,¸ (´¨`··•·Auto Save·•·´¨`) ¸,ø¤``¤ø,¸(¯`'•.¸· ·
#-----------------------------------------------------------------------------
def autosave
file = File.open("autosave.rxdata", "wb")
Marshal.dump($game_system, file)
Marshal.dump($game_switches, file)
Marshal.dump($game_variables, file)
Marshal.dump($game_self_switches, file)
Marshal.dump($game_screen, file)
Marshal.dump($game_actors, file)
Marshal.dump($game_party, file)
Marshal.dump($game_troop, file)
Marshal.dump($game_map, file)
Marshal.dump($game_player, file)
Marshal.dump($pkmn, file)
@bgm = $game_system.playing_bgm
Marshal.dump(@bgm, file)
file.close
end
#-----------------------------------------------------------------------------
#¸.•'´¯)¸,ø¤``¤ø,¸ (´¨`··•·Auto Load·•·´¨`) ¸,ø¤``¤ø,¸(¯`'•.¸· ·
#-----------------------------------------------------------------------------
def autoload(map = 0)
if FileTest.exist?("autosave.rxdata")
file = File.open("autosave.rxdata", "rb")
$game_system = Marshal.load(file)
$game_switches = Marshal.load(file)
$game_variables = Marshal.load(file)
$game_self_switches = Marshal.load(file)
$game_screen = Marshal.load(file)
$game_actors = Marshal.load(file)
$game_party = Marshal.load(file)
$game_troop = Marshal.load(file)
$game_map = Marshal.load(file)
$game_player = Marshal.load(file)
$pkmn = Marshal.load(file)
@bgm = Marshal.load(file)
$game_party.refresh
$game_map.update
if map == 1
$game_party.refresh
$game_map.update
$game_system.bgm_play(@bgm)
$scene = Scene_Map.new()
elsif map == 2
Graphics.freeze
$scene = Info.new('Loaded from autosave file.', @bgm)
end
file.close
end
end
#-----------------------------------------------------------------------------
#¸.•'´¯)¸,ø¤``¤ø,¸ (´¨`··•·Save·•·´¨`) ¸,ø¤``¤ø,¸(¯`'•.¸· ·
#-----------------------------------------------------------------------------
def save(filename = 'Save1.rxdata', vars = ['$game_system', '$game_switches',
'$game_variables', '$game_self_switches', '$game_screen', '$game_actors',
'$game_party', '$game_troop', '$game_map', '$game_player'])
file = File.open(filename, "wb")
for i in 0...vars.length
eval('Marshal.dump('+vars[i]+', file)')
end
file.close
end
#-----------------------------------------------------------------------------
#¸.•'´¯)¸,ø¤``¤ø,¸ (´¨`··•·Load·•·´¨`) ¸,ø¤``¤ø,¸(¯`'•.¸· ·
#-----------------------------------------------------------------------------
def load(filename = 'Save1.rxdata', vars = ['$game_system', '$game_switches',
'$game_variables', '$game_self_switches', '$game_screen', '$game_actors',
'$game_party', '$game_troop', '$game_map', '$game_player'])
if FileTest.exist?("Font.txt")
file = File.open("Font.txt", "rb")
for i in 0...vars.length
eval(vars[i]+'= Marshal.load(file)')
end
file.close
end
end
end
Then in Main add this(Just before Graphics.freeze):
unless FileTest.exist?('Font.txt')
$defaultfonttype = $fontface = $fontname = SaveData::Fonts[SaveData::Font_index]
$fontsize = $defaultfontsize = $fontsize = SaveData::Sizes[SaveData::Size_index]
else
SaveData.loadfont
end
SaveData.savefont
This will make other users able to change the game font if their computer does'nt have the desired font.
To change the default font or size change these lines:
Fonts = ['Tahoma', 'Pokemon RS', 'Curlz MT', 'Bradley Hand ITC', 'Comic Sans MS']
Sizes = [16, 18, 20, 22, 24, 26]
Font_index = 4
Size_index = 3
If Font index equals 0 then the default font will be Tahoma.This is because Tahoma is the first name in the variable Fonts.
To save the game at any stage do SaveData.autosave and to save SaveData.autoload.
Illusion