gerkrt

RPGXP - ENG - Betatester Diary

Sep 14th, 2011
282
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Ruby 49.28 KB | None | 0 0
  1. #==============================================================================
  2. # Betatester Diary
  3. # By gerkrt / gerrtunk
  4. # Version: 1
  5. # License: GPL, credits
  6. #==============================================================================
  7.  
  8. =begin
  9.  
  10. ------- INTRODUCTION ----------
  11.  
  12. This script allows you to keep a diary of the player's actions in the game
  13. with the purpose of being able to analyze the betatester playthrough.
  14.  
  15. For this purpose the script gives you three tools:
  16.  
  17. 1-Game-Journal: The information is saved the current game, as
  18. the configuration and type you choose. This journal keep a new entry every
  19. once you call it with a call script.
  20.  
  21. 2 Save-Journal: This saves the save number, playing time and
  22. additional information. It is updated every time you save automatically.
  23.  
  24. 3-Write other data: Here you could enter values of variables or switches of
  25. within the game, for example, an indicator of % completed game. Scripts that are also
  26. compatible.
  27.  
  28. ------ MAKE A GAME LOG ---------
  29.  
  30. 1-At the beginning of your project, calls this script: $ game_party.start_diary
  31. This creates the initial file and a header with information about your project.
  32. Also create the save file, but until you save it will be empty.
  33.  
  34. 2-To add information to the file you have several options. This script lets you
  35. many configuration possibilities, it would be very long writing illegible
  36. skills of the characters each time, but instead, may be well
  37. write three times throughout the game.
  38.  
  39.   a) $game_party.simple("Chapter title", 1). This script call writes
  40.   a more condensed version of the total of the departure information: date, time,
  41.   money, steps, current map, names, kinds and levels of the characters.
  42.  
  43.   Need two arguments: "Title of chapter" Here I write
  44.   the title that allows you to differentiate each entry
  45.  
  46.   1: This argument allows you to choose if you want to save the information for all
  47.   characters (value 1) or only the actual group (value 0). This means that if you call
  48.   $game_party.simple ("Chapter title", 1) will tell you only the group.
  49.  
  50.   b)$game_party.complex("Chapter title", 1). This method can record all
  51.   group information.
  52.   The first two arguments are the same as in the simple.
  53.   You can set what you want to write about the characters in  call
  54.   complex, from its attributes, equipment or skills, as well as objects.
  55.   But this is defined in the configuration.
  56.  
  57.   c) $game_party.total("Chapter title", 1) This show absolutely all
  58.   information. Even so, you can define all or group.
  59.  
  60. 3-At the end of your project, calls this script: $game_party.end_diary
  61. This creates a header for the daily final.
  62.  
  63.  
  64. ------SAVE-LOG---------
  65.  
  66. To save the log you have just selected the option Record_saves.
  67. Default it is on.
  68. You should also keep in mind that you need to do to call  start__diary to create
  69. the file.
  70.  
  71. ------OTHER DATA STORAGE---------
  72.  
  73. $game_party.my_data
  74. This will save the information you fill in the configuration
  75.  
  76. To display event variables (due in the order in which they write):
  77.  
  78. Game_variables.push ([ID variable, "Description"])
  79.  
  80. To display switches (due in the order in which they write):
  81.  
  82. Game_switches.push ([ID switch, "Description"])
  83.  
  84. This will be added to the game log with a differentiator, but nothing else extra.
  85.  
  86. ----OTHER TIPS-----
  87.  
  88. a) To write long titles can use the following script as the basis for all:
  89.  
  90. t = "Long Tree FoDext"
  91. $game_party.total(t, 0)
  92.  
  93. b) To edit settings:
  94.  
  95. "Texts": You must put the words in quotes, if you delete will fail.
  96. true / false: It means On or Off. Active/Inactive
  97.  
  98. c) Default options:
  99.  
  100. There are defaults for each type of argument in the calls, so they arent mandatory.
  101. If you dont put the number ($game_party.complex("Chapter title") it will be like it
  102. was a 0.
  103. If you dont put the title ($game_party.complex("Chapter title") it will use the title
  104. default.
  105. Also you can use without any.
  106.  
  107. ------ CONFIGURATION ---------
  108.  
  109. Game_title: Title Game
  110.  
  111. Game_version: Your version
  112.  
  113. Game_autor: The author
  114.  
  115. Save_record_name: The name of the file where you save game-log
  116.  
  117. Diary_name: The name of the file where you save-log
  118.  
  119. Note: The version will be added to the name to improve it.
  120.  
  121. Random_file_name: This option adds a small random value to the name of the game.
  122. What is the point? Well, imagine that you're dealing with a lot of these
  123. files. If it all were the same it will be very difficult to work with them in a
  124. folder. Version also is added, improving the identification:
  125. 05D-675 487-Betatester Diary.txt
  126. 05D-675 487-Save Record.txt
  127.  
  128. Note: The random name is created when you run start_diary and will be maintained
  129. throughout the game, saved. But if the player starts a new game it will change.
  130.  
  131. Compact_style: It aims to show the greatest things in a few lines. Could be
  132. less readable than normal.
  133.  
  134. Upcase_titles: This option makes all the titles are processed letters
  135. capitalization, increasing their visibility.
  136.  
  137. Record_saves_actors: If you want the save log  to show
  138. information about the characters or not.
  139.  
  140. Record_saves_all_actors: If the information will be of all characters or not.
  141.  
  142. Write_actor_equipment: Writes equipment in complex call.
  143.  
  144. Write_actor_skills: Writes skills in complex call.
  145.  
  146. Write_actor_parameters: Writes parameters in complex call.
  147.  
  148. Write_items: Writes items in complex call.
  149.  
  150. Introductory_note: You can write an initial text
  151.  
  152. End_diary_note: Allows you to write a final text
  153.  
  154. Start_diary_title: Define the first title game
  155.  
  156. End_diary_title: Define the last title game
  157.  
  158. My_data_title: Define the title of your data
  159.  
  160. Save_name: The name of the titles of each saved game.
  161.  
  162. -----------COMPATIBILITY----------
  163.  
  164. In case of errors, especially with the saved, can provide off
  165. modification to this with the option: Modify_save. Disabling will make you lose
  166. the option to create the save-log.
  167.  
  168. Another option is to disable the Game_System with this modification:
  169. Modify_game_system
  170. Disabling will make you lose the option random_filename
  171.  
  172. =end
  173.  
  174. module Wep
  175.  
  176.   # Vocabulary and information
  177.   Game_title = "Alderhast"
  178.   Game_version = "0.5z"
  179.   Game_autor = "Wep"
  180.   File_name = "Diary.txt"
  181.   Save_record_name = "Record.txt"
  182.   Default_title = "Defaul title"
  183.   End_diary_note = "Good night"
  184.   Start_diary_title = "GAME START"
  185.   End_diary_title = "GAME END"
  186.   My_data_title = "MY EXTRA DATA"
  187.   Introductory_note = "Welcome!"
  188.   Save_name = "Save"
  189.  
  190.   # Save-log config
  191.   Record_saves = true
  192.   Record_saves_all_actors = false
  193.   Record_saves_actors = true
  194.  
  195.   # Game-log config
  196.   Write_actor_parameters = true
  197.   Write_actor_skills = true
  198.   Write_actor_equipment = true
  199.   Write_items = true
  200.  
  201.   # General config
  202.   Random_file_name = true
  203.   Upcase_titles = true
  204.   Compact_style = true
  205.  
  206.   # Compatibality
  207.   Modify_save = true
  208.   Modify_game_system = true
  209.  
  210.   # My extra data
  211.   Game_variables = []
  212.   Game_switches = []
  213.   Game_variables.push([1, "% completed game"])
  214.   Game_switches.push([1, "Lime king killed"])
  215.   Game_switches.push([2, "I survived the hard dungeon"])
  216. end
  217.  
  218. class Game_Party
  219.  
  220.   #--------------------------------------------------------------------------
  221.   # * My_Data
  222.   #  Writes the creator game variables and switches
  223.   #--------------------------------------------------------------------------
  224.   def my_data
  225.     # Make the filename
  226.     if Wep::Random_file_name and Wep::Modify_game_system
  227.       filename = Wep::Game_version+"-"+$game_system.random_filename+"-"+Wep::File_name
  228.     else
  229.       filename = Wep::Game_version+"-"+Wep::File_name
  230.     end
  231.     estado = open(filename, "a")
  232.     estado.write("\n------------------------------------------\n")
  233.     estado.write("||||"+Wep::My_data_title+"||||")
  234.     estado.write("\n------------------------------------------\n")    
  235.     # Write system time
  236.     date = "\nDate: "
  237.     date+= estado.mtime.to_s
  238.    # If uses normal style
  239.    if not Wep::Compact_style
  240.     # Writes game variables descriptions and values
  241.     for var in Wep::Game_variables
  242.       estado.write(var[1]+": "+$game_variables[var[0]].to_s+"\n")
  243.     end
  244.     estado.write ("\n")
  245.     for var in Wep::Game_switches
  246.        estado.write(var[1]+": "+$game_switches[var[0]].to_s+"\n")
  247.     end
  248.   # If uses compact style
  249.   else
  250.     # Writes game variables descriptions and values
  251.     for var in Wep::Game_variables
  252.       estado.write(var[1]+": "+$game_variables[var[0]].to_s+"\n")
  253.     end
  254.     estado.write ("\n")
  255.     for var in Wep::Game_switches
  256.        estado.write(var[1]+": "+$game_switches[var[0]].to_s+"\n")
  257.     end    
  258.   end
  259.     estado.write ("\n")
  260.     estado.close
  261.   end
  262.  
  263.   #--------------------------------------------------------------------------
  264.   # * Record_Save
  265.   #  Writes the save record
  266.   #--------------------------------------------------------------------------
  267.   def record_save
  268.     # Load mapinfo for map name
  269.     mapinfos = load_data("Data/MapInfos.rxdata")
  270.     # Make the filename
  271.     if Wep::Random_file_name and Wep::Modify_game_system
  272.       filename = Wep::Game_version+"-"+$game_system.random_filename+"-"+Wep::Save_record_name
  273.     else
  274.       filename = Wep::Game_version+"-"+Wep::Save_record_name
  275.     end
  276.     estado = open(filename, "a")
  277.     estado.write("------------------------------------------\n")
  278.     estado.write("||||"+Wep::Save_name+" "+($game_system.save_count+1).to_s+"||||")
  279.     estado.write("\n------------------------------------------\n")    
  280.     # Write time
  281.     @total_sec = Graphics.frame_count / Graphics.frame_rate
  282.     hour = @total_sec / 60 / 60
  283.     min = @total_sec / 60 % 60
  284.     sec = @total_sec % 60
  285.     text = sprintf("%02d:%02d:%02d", hour, min, sec)
  286.     tiempo = "\nPlaytime: "
  287.     tiempo+= text
  288.     estado.write(tiempo)
  289.     # Write money
  290.     money = ". Money: "
  291.     money += $game_party.gold.to_s
  292.     estado.write(money)
  293.     # Write actual map(and name)
  294.     estado.write(". Map: "+$game_map.map_id.to_s+" ("+mapinfos[$game_map.map_id].name+")\n")
  295.   if  Wep::Record_saves_actors
  296.    if Wep::Record_saves_all_actors == false
  297.     for actor in $game_party.actors
  298.       estado.write("\n"+actor.name+" ("+$data_classes[actor.class_id].name+") Nv"+actor.level.to_s+"\n")
  299.     end
  300.    else
  301.  
  302.     for i in 1...$data_actors.size
  303.       estado.write("\n"+$game_actors[i].name+" ("+$data_classes[$game_actors[i].class_id].name+") Nv"+$game_actors[i].level.to_s+"\n")
  304.     end
  305.    
  306.    end
  307.   end
  308.   estado.write ("\n")
  309.   estado.close
  310.  end
  311.  
  312.   #--------------------------------------------------------------------------
  313.   # * Start_Diary
  314.   #  Creates the file and write a header
  315.   #--------------------------------------------------------------------------  
  316.   def start_diary
  317.     # Make the filename
  318.     if Wep::Random_file_name and Wep::Modify_game_system
  319.       $game_system.random_filename = rand(999999).to_s
  320.       filename = Wep::Game_version+"-"+$game_system.random_filename+"-"+Wep::Save_record_name
  321.     else
  322.       filename = Wep::Game_version+"-"+Wep::Save_record_name
  323.     end
  324.     file = open(filename, "w+")
  325.     file.close
  326.     if Wep::Random_file_name and Wep::Modify_game_system
  327.       filename = Wep::Game_version+"-"+$game_system.random_filename+"-"+Wep::File_name
  328.     else
  329.       filename = Wep::Game_version+"-"+Wep::File_name
  330.     end
  331.     estado = open(filename, "w+")
  332.     estado.write("------------------------------------------\n")
  333.     estado.write("||||"+Wep::Start_diary_title+"||||")
  334.     estado.write("\n------------------------------------------\n")    
  335.     estado.write("Title: "+Wep::Game_title+"\n")
  336.     estado.write("Autor: "+Wep::Game_autor+"\n")
  337.     estado.write("Version: "+Wep::Game_version+"\n")
  338.     date = "\Date: "
  339.     date+= estado.mtime.to_s+"\n"
  340.     estado.write(date)
  341.     estado.write("Autor introduction: "+Wep::Introductory_note+"\n\n")
  342.     estado.close
  343.   end
  344.  
  345.   #--------------------------------------------------------------------------
  346.   # * End_Diary
  347.   #  Write ending info
  348.   #--------------------------------------------------------------------------    
  349.   def end_diary
  350.     # Make the filename
  351.     if Wep::Random_file_name and Wep::Modify_game_system
  352.       filename = Wep::Game_version+"-"+$game_system.random_filename+"-"+Wep::File_name
  353.     else
  354.       filename = Wep::Game_version+"-"+Wep::File_name
  355.     end
  356.     estado = open(filename, "a")
  357.     estado.write("------------------------------------------\n")
  358.     estado.write("||||"+Wep::End_diary_title+"||||")
  359.     estado.write("\n------------------------------------------\n")    
  360.     estado.write("Title: "+Wep::Game_title+"\n")
  361.     estado.write("Autor: "+Wep::Game_autor+"\n")
  362.     estado.write("Version: "+Wep::Game_version+"\n")
  363.     date = "\Date: "
  364.     date+= estado.mtime.to_s+"\n"
  365.     estado.write(date)
  366.     estado.write("End note: "+Wep::End_diary_note+"\n")
  367.     estado.close
  368.   end
  369.  
  370.   #--------------------------------------------------------------------------
  371.   # * Simple call
  372.   #  Writes simplified information
  373.   #     title: text to write in a identifing header
  374.   #     all_actors: write all or group
  375.   #--------------------------------------------------------------------------  
  376.   def simple(title=Wep::Default_title,all_actors=1)
  377.     # Check for upcase conversion
  378.     if Wep::Upcase_titles
  379.       title.upcase!
  380.     end
  381.     # Load mapinfo for map name
  382.     mapinfos = load_data("Data/MapInfos.rxdata")
  383.     # Make the filename
  384.     if Wep::Random_file_name and Wep::Modify_game_system
  385.       filename = Wep::Game_version+"-"+$game_system.random_filename+"-"+Wep::File_name
  386.     else
  387.       filename = Wep::Game_version+"-"+Wep::File_name
  388.     end
  389.    
  390.     estado = open(filename, "a")
  391.     estado.write("------------------------------------------\n")
  392.     estado.write("||||"+title+"||||")
  393.     estado.write("\n------------------------------------------\n")    
  394.     # Writes System time
  395.     date = "\nDate: "
  396.    
  397.     date+= estado.mtime.to_s
  398.     estado.write(date)
  399.     # Write time
  400.     @total_sec = Graphics.frame_count / Graphics.frame_rate
  401.     hour = @total_sec / 60 / 60
  402.     min = @total_sec / 60 % 60
  403.     sec = @total_sec % 60
  404.     text = sprintf("%02d:%02d:%02d", hour, min, sec)
  405.     tiempo = "\nPlaytime: "
  406.     tiempo+= text
  407.     estado.write(tiempo)
  408.    # If uses normal style
  409.    if not Wep::Compact_style
  410.     # Write money
  411.     money = "\nMoney: "
  412.     money += $game_party.gold.to_s
  413.     estado.write(money)
  414.     # Write steps
  415.     estado.write("\nSteps: "+$game_party.steps.to_s)
  416.     # Write actual map(and name)
  417.     estado.write(".\n Map: "+$game_map.map_id.to_s+" ("+mapinfos[$game_map.map_id].name+")")
  418.   # If uses compact style
  419.   else
  420.     # Write money
  421.     money = "\nMoney: "
  422.     money += $game_party.gold.to_s
  423.     estado.write(money)
  424.     # Write steps
  425.     estado.write(". Steps: "+$game_party.steps.to_s)
  426.     # Write actual map(and name)
  427.     estado.write(". Map: "+$game_map.map_id.to_s+" ("+mapinfos[$game_map.map_id].name+")")
  428.    end
  429.     # Write actors
  430.     estado.write ("\n")
  431.    # If its only for the actual group
  432.    if all_actors == 1
  433.     for actor in $game_party.actors
  434.      # If uses normal style
  435.      if not Wep::Compact_style
  436.       estado.write ("-----------------\n")
  437.       estado.write(actor.name)
  438.       estado.write ("\n---------------\n")      
  439.       estado.write($data_classes[actor.class_id].name)
  440.       estado.write ("\nNv ")
  441.       estado.write(actor.level)
  442.       estado.write ("\n")  
  443.      # If uses compact style
  444.      else
  445.       estado.write("\n"+actor.name+" ("+$data_classes[actor.class_id].name+") Nv"+actor.level.to_s+"\n")
  446.      end
  447.    end
  448.    
  449.   # If its for all actors
  450.   else
  451.     for i in 1...$data_actors.size
  452.      # If uses normal style
  453.      if not Wep::Compact_style
  454.       estado.write ("-----------------\n")
  455.       estado.write(actor.name)
  456.       estado.write ("\n---------------\n")    
  457.       estado.write($data_classes[$game_actors[i].class_id].name)
  458.       estado.write ("\nNv ")
  459.       estado.write($game_actors[i].level)
  460.       estado.write ("\n")  
  461.      # If uses compact style
  462.      else
  463.       estado.write("\n"+$game_actors[i].name+" ("+$data_classes[$game_actors[i].class_id].name+") Nv"+$game_actors[i].level.to_s+"\n")
  464.      end
  465.     end
  466.    
  467.   end
  468.     estado.write ("\n")
  469.     estado.close
  470.   end
  471.  
  472.   #--------------------------------------------------------------------------
  473.   # * Total call
  474.   #  Writes all information
  475.   #     title: text to write in a identifing header
  476.   #     all_actors: write all or group
  477.   #--------------------------------------------------------------------------  
  478.   def total(title=Wep::Default_title,all_actors=0)
  479.     # Check for upcase conversion
  480.     if Wep::Upcase_titles
  481.       title.upcase!
  482.     end
  483.     # Load mapinfo for map name
  484.     mapinfos = load_data("Data/MapInfos.rxdata")
  485.     # Make the filename
  486.     if Wep::Random_file_name and Wep::Modify_game_system
  487.       filename = Wep::Game_version+"-"+$game_system.random_filename+"-"+Wep::File_name
  488.     else
  489.       filename = Wep::Game_version+"-"+Wep::File_name
  490.     end
  491.     estado = open(filename, "a")
  492.     estado.write("------------------------------------------\n")
  493.     estado.write("||||"+title+"||||")
  494.     estado.write("\n------------------------------------------\n")    
  495.     # Write system time
  496.     date = "\nDate: "
  497.     date+= estado.mtime.to_s
  498.     estado.write(date)
  499.    
  500.     # Write time
  501.     @total_sec = Graphics.frame_count / Graphics.frame_rate
  502.     hour = @total_sec / 60 / 60
  503.     min = @total_sec / 60 % 60
  504.     sec = @total_sec % 60
  505.    
  506.     text = sprintf("%02d:%02d:%02d", hour, min, sec)
  507.     tiempo = "\nPlaytime: "
  508.     tiempo+= text
  509.     estado.write(tiempo)
  510.    # If uses normal style
  511.    if not Wep::Compact_style
  512.     # Write money
  513.     money = "\nMoney: "
  514.     money += $game_party.gold.to_s
  515.     estado.write(money)
  516.     # Write steps
  517.     estado.write("\nSteps: "+$game_party.steps.to_s)
  518.     # Write actual map(and name)
  519.     estado.write("\nMap: "+$game_map.map_id.to_s+" ("+mapinfos[$game_map.map_id].name+")")
  520.    # If uses compact style
  521.    else
  522.     # Write money
  523.     money = "\nMoney: "
  524.     money += $game_party.gold.to_s
  525.     estado.write(money)
  526.     # Write steps
  527.     estado.write(". Steps: "+$game_party.steps.to_s)
  528.     # Write actual map(and name)
  529.     estado.write(". Map: "+$game_map.map_id.to_s+" ("+mapinfos[$game_map.map_id].name+")")
  530.    end
  531.  
  532.     # Write actors
  533.     estado.write ("\n\n")
  534.    # If its only for the actual group
  535.    if all_actors == 1
  536.     actor_id = 1
  537.     for actor in $game_party.actors
  538.      # If uses normal style
  539.      if not Wep::Compact_style
  540.       # Write actor basic Info
  541.       estado.write ("\n---------------\n")
  542.       estado.write(actor.name)
  543.       estado.write ("\n---------------\n")    
  544.       estado.write($data_classes[actor.class_id].name)
  545.       estado.write ("\nNv ")
  546.       estado.write(actor.level)
  547.       estado.write ("\n")  
  548.      # If uses compact style
  549.      else
  550.       # Write actor basic Info
  551.       estado.write("\n------------------------\n"+actor.name+" ("+$data_classes[actor.class_id].name+") Nv"+actor.level.to_s+"\n------------------------\n")
  552.     end
  553.    
  554.       # Write actor equipment (check if equipped)
  555.       if true
  556.       estado.write("\n\nEquipment:\n\n")
  557.      
  558.       if $game_actors[actor_id].weapon_id != 0
  559.         estado.write("  "+$data_system.words.weapon)
  560.         estado.write(": ")
  561.         estado.write($data_weapons[$game_actors[actor_id].weapon_id].name)
  562.         estado.write("\n")
  563.       else
  564.         estado.write("  "+$data_system.words.weapon)
  565.         estado.write(": ")
  566.         estado.write("\n")
  567.       end
  568.      
  569.       if $game_actors[actor_id].armor1_id != 0
  570.         estado.write("  "+$data_system.words.armor1)
  571.         estado.write(": ")
  572.         estado.write($data_armors[$game_actors[actor_id].armor1_id].name)
  573.         estado.write("\n")
  574.       else
  575.         estado.write("  "+$data_system.words.armor1)
  576.         estado.write(": ")
  577.         estado.write("\n")
  578.       end  
  579.      
  580.       if $game_actors[actor_id].armor2_id != 0
  581.         estado.write("  "+$data_system.words.armor2)
  582.         estado.write(": ")
  583.         estado.write($data_armors[$game_actors[actor_id].armor2_id].name)
  584.         estado.write("\n")
  585.       else
  586.         estado.write("  "+$data_system.words.armor2)
  587.         estado.write(": ")
  588.         estado.write("\n")
  589.       end    
  590.      
  591.       if $game_actors[actor_id].armor3_id != 0
  592.         estado.write("  "+$data_system.words.armor3)
  593.         estado.write(": ")
  594.         estado.write($data_armors[$game_actors[actor_id].armor3_id].name)
  595.         estado.write("\n")
  596.       else
  597.         estado.write("  "+$data_system.words.armor3)
  598.         estado.write(": ")
  599.         estado.write("\n")
  600.       end
  601.      
  602.       if $game_actors[actor_id].armor4_id != 0
  603.         estado.write("  "+$data_system.words.weapon)
  604.         estado.write(": ")
  605.         estado.write($data_armors[$game_actors[actor_id].armor4_id].name)
  606.         estado.write("\n")
  607.       else
  608.         estado.write("  "+$data_system.words.armor4)
  609.         estado.write(": ")
  610.         estado.write("\n")
  611.       end
  612.     end
  613.    
  614.     # Write actor parameters
  615.     if true
  616.      # If uses normal style
  617.      if not Wep::Compact_style
  618.       estado.write ("\n\nParameters:\n\n  HP ")      
  619.       estado.write($game_actors[actor_id].hp)
  620.       estado.write("\\")
  621.       estado.write($game_actors[actor_id].maxhp)
  622.       estado.write("\n  SP ")
  623.       estado.write($game_actors[actor_id].sp)
  624.       estado.write("\\")
  625.       estado.write($game_actors[actor_id].maxsp)
  626.       estado.write( "\n  Str ")        
  627.       estado.write($game_actors[actor_id].base_str)
  628.       estado.write("\n  Dex ")  
  629.       estado.write($game_actors[actor_id].base_dex)
  630.       estado.write("\n  Agi ")
  631.       estado.write($game_actors[actor_id].base_agi)
  632.       estado.write("\n  Int ")
  633.       estado.write($game_actors[actor_id].base_int)
  634.       estado.write("\n  PDef ")
  635.       estado.write($game_actors[actor_id].base_pdef)
  636.       estado.write("\n  MDef ")
  637.       estado.write($game_actors[actor_id].base_mdef)
  638.       estado.write("\n  Atk ")
  639.       estado.write($game_actors[actor_id].base_atk)
  640.       estado.write("\n  Eva ")
  641.       estado.write($game_actors[actor_id].base_eva)
  642.       estado.write("\n")
  643.      # If uses compact style
  644.      else
  645.       estado.write ("\n\nParameters:\n\n  HP ")      
  646.       estado.write($game_actors[actor_id].hp)
  647.       estado.write("\\")
  648.       estado.write($game_actors[actor_id].maxhp)
  649.       estado.write(". SP ")
  650.       estado.write($game_actors[actor_id].sp)
  651.       estado.write("\\")
  652.       estado.write($game_actors[actor_id].maxsp)
  653.       estado.write( "\n  Str ")        
  654.       estado.write($game_actors[actor_id].base_str)
  655.       estado.write(". Dex ")  
  656.       estado.write($game_actors[actor_id].base_dex)
  657.       estado.write(". Agi ")
  658.       estado.write($game_actors[actor_id].base_agi)
  659.       estado.write("\n  Int ")
  660.       estado.write($game_actors[actor_id].base_int)
  661.       estado.write(". PDef ")
  662.       estado.write($game_actors[actor_id].base_pdef)
  663.       estado.write(". MDef ")
  664.       estado.write($game_actors[actor_id].base_mdef)
  665.       estado.write("\n  Atk ")
  666.       estado.write($game_actors[actor_id].base_atk)
  667.       estado.write(". Eva ")
  668.       estado.write($game_actors[actor_id].base_eva)
  669.       estado.write("\n")
  670.      end
  671.     end
  672.    
  673.      # Write actor skills  
  674.      if true
  675.       estado.write("\nSkills:\n\n  ")  
  676.       # If uses normal style
  677.       if not Wep::Compact_style
  678.       for i in 0...$game_actors[actor_id].skills.size        
  679.          skill = $data_skills[$game_actors[actor_id].skills[i]]
  680.         if skill != nil
  681.             estado.write(skill.name+"\n  ")
  682.         end
  683.       end
  684.      # If uses compact style
  685.      else
  686.       c=0
  687.       for i in 0...$game_actors[actor_id].skills.size
  688.         skill = $data_skills[$game_actors[actor_id].skills[i]]
  689.         if skill != nil
  690.           if c == 0
  691.             estado.write(skill.name+". ")    
  692.             c += 1
  693.           elsif c == 1
  694.             estado.write(skill.name+"\n  ")
  695.             c = 0
  696.           end
  697.          
  698.       end
  699.      
  700.      end
  701.    
  702.    end
  703.      
  704.     end
  705.  
  706.    
  707.    
  708.    
  709.    
  710.    
  711.     estado.write("\n")
  712.     actor_id += 1
  713.   end
  714.      
  715.   # If is for all actors
  716.   else
  717.     for i in 1...$data_actors.size
  718.       actor_id = i
  719.       actor = $game_actors[i]
  720.      # If uses normal style
  721.      if not Wep::Compact_style
  722.       # Write actor basic Info
  723.       estado.write ("\n---------------\n")
  724.       estado.write(actor.name)
  725.       estado.write ("\n---------------\n")    
  726.       estado.write($data_classes[actor.class_id].name)
  727.       estado.write ("\nNv ")
  728.       estado.write(actor.level)
  729.       estado.write ("\n")  
  730.      # If uses compact style
  731.      else
  732.       # Write actor basic Info
  733.       estado.write("\n------------------------\n"+actor.name+" ("+$data_classes[actor.class_id].name+") Nv"+actor.level.to_s+"\n------------------------\n")
  734.     end
  735.    
  736.       # Write actor equipment (check if equipped)
  737.       if true
  738.       estado.write("\n\nEquipment:\n\n")
  739.      
  740.       if $game_actors[actor_id].weapon_id != 0
  741.         estado.write("  "+$data_system.words.weapon)
  742.         estado.write(": ")
  743.         estado.write($data_weapons[$game_actors[actor_id].weapon_id].name)
  744.         estado.write("\n")
  745.       else
  746.         estado.write("  "+$data_system.words.weapon)
  747.         estado.write(": ")
  748.         estado.write("\n")
  749.       end
  750.      
  751.       if $game_actors[actor_id].armor1_id != 0
  752.         estado.write("  "+$data_system.words.armor1)
  753.         estado.write(": ")
  754.         estado.write($data_armors[$game_actors[actor_id].armor1_id].name)
  755.         estado.write("\n")
  756.       else
  757.         estado.write("  "+$data_system.words.armor1)
  758.         estado.write(": ")
  759.         estado.write("\n")
  760.       end  
  761.      
  762.       if $game_actors[actor_id].armor2_id != 0
  763.         estado.write("  "+$data_system.words.armor2)
  764.         estado.write(": ")
  765.         estado.write($data_armors[$game_actors[actor_id].armor2_id].name)
  766.         estado.write("\n")
  767.       else
  768.         estado.write("  "+$data_system.words.armor2)
  769.         estado.write(": ")
  770.         estado.write("\n")
  771.       end    
  772.      
  773.       if $game_actors[actor_id].armor3_id != 0
  774.         estado.write("  "+$data_system.words.armor3)
  775.         estado.write(": ")
  776.         estado.write($data_armors[$game_actors[actor_id].armor3_id].name)
  777.         estado.write("\n")
  778.       else
  779.         estado.write("  "+$data_system.words.armor3)
  780.         estado.write(": ")
  781.         estado.write("\n")
  782.       end
  783.      
  784.       if $game_actors[actor_id].armor4_id != 0
  785.         estado.write("  "+$data_system.words.weapon)
  786.         estado.write(": ")
  787.         estado.write($data_armors[$game_actors[actor_id].armor4_id].name)
  788.         estado.write("\n")
  789.       else
  790.         estado.write("  "+$data_system.words.armor4)
  791.         estado.write(": ")
  792.         estado.write("\n")
  793.       end
  794.     end
  795.    
  796.     # Write actor parameters
  797.     if true
  798.      # If uses normal style
  799.      if not Wep::Compact_style
  800.       estado.write ("\n\nParameters:\n\n  HP ")      
  801.       estado.write($game_actors[actor_id].hp)
  802.       estado.write("\\")
  803.       estado.write($game_actors[actor_id].maxhp)
  804.       estado.write("\n  SP ")
  805.       estado.write($game_actors[actor_id].sp)
  806.       estado.write("\\")
  807.       estado.write($game_actors[actor_id].maxsp)
  808.       estado.write( "\n  Str ")        
  809.       estado.write($game_actors[actor_id].base_str)
  810.       estado.write("\n  Dex ")  
  811.       estado.write($game_actors[actor_id].base_dex)
  812.       estado.write("\n  Agi ")
  813.       estado.write($game_actors[actor_id].base_agi)
  814.       estado.write("\n  Int ")
  815.       estado.write($game_actors[actor_id].base_int)
  816.       estado.write("\n  PDef ")
  817.       estado.write($game_actors[actor_id].base_pdef)
  818.       estado.write("\n  MDef ")
  819.       estado.write($game_actors[actor_id].base_mdef)
  820.       estado.write("\n  Atk ")
  821.       estado.write($game_actors[actor_id].base_atk)
  822.       estado.write("\n  Eva ")
  823.       estado.write($game_actors[actor_id].base_eva)
  824.       estado.write("\n")
  825.      # If uses compact style
  826.      else
  827.       estado.write ("\n\nParameters:\n\n  HP ")      
  828.       estado.write($game_actors[actor_id].hp)
  829.       estado.write("\\")
  830.       estado.write($game_actors[actor_id].maxhp)
  831.       estado.write(". SP ")
  832.       estado.write($game_actors[actor_id].sp)
  833.       estado.write("\\")
  834.       estado.write($game_actors[actor_id].maxsp)
  835.       estado.write( "\n  Str ")        
  836.       estado.write($game_actors[actor_id].base_str)
  837.       estado.write(". Dex ")  
  838.       estado.write($game_actors[actor_id].base_dex)
  839.       estado.write(". Agi ")
  840.       estado.write($game_actors[actor_id].base_agi)
  841.       estado.write("\n  Int ")
  842.       estado.write($game_actors[actor_id].base_int)
  843.       estado.write(". PDef ")
  844.       estado.write($game_actors[actor_id].base_pdef)
  845.       estado.write(". MDef ")
  846.       estado.write($game_actors[actor_id].base_mdef)
  847.       estado.write("\n  Atk ")
  848.       estado.write($game_actors[actor_id].base_atk)
  849.       estado.write(". Eva ")
  850.       estado.write($game_actors[actor_id].base_eva)
  851.       estado.write("\n")
  852.      end
  853.     end
  854.    
  855.      # Write actor skills  
  856.      if true
  857.       estado.write("\nSkills:\n\n  ")  
  858.       # If uses normal style
  859.       if not Wep::Compact_style
  860.       for i in 0...$game_actors[actor_id].skills.size        
  861.          skill = $data_skills[$game_actors[actor_id].skills[i]]
  862.         if skill != nil
  863.             estado.write(skill.name+"\n  ")
  864.         end
  865.       end
  866.      # If uses compact style
  867.      else
  868.       c=0
  869.       for i in 0...$game_actors[actor_id].skills.size
  870.         skill = $data_skills[$game_actors[actor_id].skills[i]]
  871.         if skill != nil
  872.           if c == 0
  873.             estado.write(skill.name+". ")    
  874.             c += 1
  875.           elsif c == 1
  876.             estado.write(skill.name+"\n  ")
  877.             c = 0
  878.           end
  879.          
  880.       end
  881.      
  882.      end
  883.    
  884.    end
  885.      
  886.     end
  887.  
  888.     estado.write("\n")
  889.    
  890.   end
  891.      
  892.   end
  893.     estado.write ("\n")
  894.    
  895.  
  896.     # Write normal style      
  897.     if not Wep::Compact_style
  898.      # Write actor items
  899.      if true
  900.       estado.write("--------------\nInventary:\n--------------\n  ")  
  901.       estado.write("\nItems:\n\n  ")  
  902.       c=0
  903.       for i in 1...$data_items.size
  904.         if $game_party.item_number(i) > 0
  905.           estado.write($data_items[i].name+": "+$game_party.item_number(i).to_s+"\n  ")
  906.         end
  907.       end
  908.      # Write actor weapons
  909.       estado.write("\nWeapons:\n\n  ")
  910.       c=0
  911.       for i in 1...$data_weapons.size
  912.         if $game_party.weapon_number(i) > 0
  913.           estado.write($data_weapons[i].name+": "+$game_party.weapon_number(i).to_s+"\n  ")
  914.         end
  915.       end
  916.      # Write actor armors
  917.       estado.write("\nArmors:\n\n  ")
  918.       c=0
  919.       for i in 1...$data_armors.size
  920.         if $game_party.armor_number(i) > 0
  921.           estado.write($data_armors[i].name+": "+$game_party.armor_number(i).to_s+"\n  ")
  922.         end
  923.       end
  924.     end
  925.    
  926.    # Write compact style
  927.    else
  928.  
  929.      # Write items
  930.      if true
  931.       estado.write("--------------\nInventary:\n--------------\n  ")  
  932.       estado.write("\nItems:\n\n  ")  
  933.       c=0
  934.       for i in 1...$data_items.size
  935.         if $game_party.item_number(i) > 0
  936.           if c == 0
  937.             estado.write($data_items[i].name+": "+$game_party.item_number(i).to_s+". ")            
  938.             c += 1
  939.           elsif c == 1  
  940.             estado.write($data_items[i].name+": "+$game_party.item_number(i).to_s+"\n  ")
  941.           end
  942.         end
  943.       end
  944.      # Write weapons
  945.       estado.write("\nWeapons:\n\n  ")
  946.       c=0
  947.       for i in 1...$data_weapons.size
  948.         if $game_party.weapon_number(i) > 0
  949.           if c == 0
  950.             estado.write($data_weapons[i].name+": "+$game_party.weapon_number(i).to_s+". ")            
  951.             c += 1
  952.           elsif c == 1  
  953.             estado.write($data_weapons[i].name+": "+$game_party.weapon_number(i).to_s+"\n  ")
  954.           end        
  955.         end
  956.       end
  957.      # Write armors
  958.       estado.write("\n\nArmors:\n\n  ")
  959.       c=0
  960.       for i in 1...$data_armors.size
  961.         if $game_party.armor_number(i) > 0
  962.           if c == 0
  963.             estado.write($data_armors[i].name+": "+$game_party.armor_number(i).to_s+". ")            
  964.             c += 1
  965.           elsif c == 1  
  966.             estado.write($data_armors[i].name+": "+$game_party.armor_number(i).to_s+"\n  ")
  967.           end
  968.         end
  969.       end
  970.     end    
  971.      
  972.      
  973.      
  974.      
  975.    end
  976.       estado.write ("\n")
  977.       estado.close
  978.   end
  979.  
  980.    
  981. end
  982.  
  983.  
  984.  
  985.  
  986.   #--------------------------------------------------------------------------
  987.   # * Complex call
  988.   #  Writes complex information(configured)
  989.   #     title: text to write in a identifing header
  990.   #     all_actors: write all or group
  991.   #--------------------------------------------------------------------------  
  992.   def complex(title=Wep::Default_title,all_actors=0)
  993.     # Check for upcase conversion
  994.     if Wep::Upcase_titles
  995.       title.upcase!
  996.     end
  997.     # Load mapinfo for map name
  998.     mapinfos = load_data("Data/MapInfos.rxdata")
  999.     # Make the filename
  1000.     if Wep::Random_file_name and Wep::Modify_game_system
  1001.       filename = Wep::Game_version+"-"+$game_system.random_filename+"-"+Wep::File_name
  1002.     else
  1003.       filename = Wep::Game_version+"-"+Wep::File_name
  1004.     end
  1005.     estado = open(filename, "a")
  1006.     estado.write("------------------------------------------\n")
  1007.     estado.write("||||"+title+"||||")
  1008.     estado.write("\n------------------------------------------\n")    
  1009.     # Write system time
  1010.     date = "\nDate: "
  1011.     date+= estado.mtime.to_s
  1012.     estado.write(date)
  1013.    
  1014.     # Write time
  1015.     @total_sec = Graphics.frame_count / Graphics.frame_rate
  1016.     hour = @total_sec / 60 / 60
  1017.     min = @total_sec / 60 % 60
  1018.     sec = @total_sec % 60
  1019.    
  1020.     text = sprintf("%02d:%02d:%02d", hour, min, sec)
  1021.     tiempo = "\nPlaytime: "
  1022.     tiempo+= text
  1023.     estado.write(tiempo)
  1024.    # If uses normal style
  1025.    if not Wep::Compact_style
  1026.     # Write money
  1027.     money = "\nMoney: "
  1028.     money += $game_party.gold.to_s
  1029.     estado.write(money)
  1030.     # Write steps
  1031.     estado.write("\nSteps: "+$game_party.steps.to_s)
  1032.     # Write actual map(and name)
  1033.     estado.write("\nMap: "+$game_map.map_id.to_s+" ("+mapinfos[$game_map.map_id].name+")")
  1034.    # If uses compact style
  1035.    else
  1036.     # Write money
  1037.     money = "\nMoney: "
  1038.     money += $game_party.gold.to_s
  1039.     estado.write(money)
  1040.     # Write steps
  1041.     estado.write(". Steps: "+$game_party.steps.to_s)
  1042.     # Write actual map(and name)
  1043.     estado.write(". Map: "+$game_map.map_id.to_s+" ("+mapinfos[$game_map.map_id].name+")")
  1044.    end
  1045.  
  1046.     # Write actors
  1047.     estado.write ("\n\n")
  1048.    # If its only for the actual group
  1049.    if all_actors == 1
  1050.     actor_id = 1
  1051.     for actor in $game_party.actors
  1052.      # If uses normal style
  1053.      if not Wep::Compact_style
  1054.       # Write actor basic Info
  1055.       estado.write ("\n---------------\n")
  1056.       estado.write(actor.name)
  1057.       estado.write ("\n---------------\n")    
  1058.       estado.write($data_classes[actor.class_id].name)
  1059.       estado.write ("\nNv ")
  1060.       estado.write(actor.level)
  1061.       estado.write ("\n")  
  1062.      # If uses compact style
  1063.      else
  1064.       # Write actor basic Info
  1065.       estado.write("\n------------------------\n"+actor.name+" ("+$data_classes[actor.class_id].name+") Nv"+actor.level.to_s+"\n------------------------\n")
  1066.     end
  1067.    
  1068.       # Write actor equipment (check if equipped)
  1069.       if Wep::Write_actor_equipment
  1070.       estado.write("\n\nEquipment:\n\n")
  1071.      
  1072.       if $game_actors[actor_id].weapon_id != 0
  1073.         estado.write("  "+$data_system.words.weapon)
  1074.         estado.write(": ")
  1075.         estado.write($data_weapons[$game_actors[actor_id].weapon_id].name)
  1076.         estado.write("\n")
  1077.       else
  1078.         estado.write("  "+$data_system.words.weapon)
  1079.         estado.write(": ")
  1080.         estado.write("\n")
  1081.       end
  1082.      
  1083.       if $game_actors[actor_id].armor1_id != 0
  1084.         estado.write("  "+$data_system.words.armor1)
  1085.         estado.write(": ")
  1086.         estado.write($data_armors[$game_actors[actor_id].armor1_id].name)
  1087.         estado.write("\n")
  1088.       else
  1089.         estado.write("  "+$data_system.words.armor1)
  1090.         estado.write(": ")
  1091.         estado.write("\n")
  1092.       end  
  1093.      
  1094.       if $game_actors[actor_id].armor2_id != 0
  1095.         estado.write("  "+$data_system.words.armor2)
  1096.         estado.write(": ")
  1097.         estado.write($data_armors[$game_actors[actor_id].armor2_id].name)
  1098.         estado.write("\n")
  1099.       else
  1100.         estado.write("  "+$data_system.words.armor2)
  1101.         estado.write(": ")
  1102.         estado.write("\n")
  1103.       end    
  1104.      
  1105.       if $game_actors[actor_id].armor3_id != 0
  1106.         estado.write("  "+$data_system.words.armor3)
  1107.         estado.write(": ")
  1108.         estado.write($data_armors[$game_actors[actor_id].armor3_id].name)
  1109.         estado.write("\n")
  1110.       else
  1111.         estado.write("  "+$data_system.words.armor3)
  1112.         estado.write(": ")
  1113.         estado.write("\n")
  1114.       end
  1115.      
  1116.       if $game_actors[actor_id].armor4_id != 0
  1117.         estado.write("  "+$data_system.words.weapon)
  1118.         estado.write(": ")
  1119.         estado.write($data_armors[$game_actors[actor_id].armor4_id].name)
  1120.         estado.write("\n")
  1121.       else
  1122.         estado.write("  "+$data_system.words.armor4)
  1123.         estado.write(": ")
  1124.         estado.write("\n")
  1125.       end
  1126.     end
  1127.    
  1128.     # Write actor parameters
  1129.     if Wep::Write_actor_parameters
  1130.      # If uses normal style
  1131.      if not Wep::Compact_style
  1132.       estado.write ("\n\nParameters:\n\n  HP ")      
  1133.       estado.write($game_actors[actor_id].hp)
  1134.       estado.write("\\")
  1135.       estado.write($game_actors[actor_id].maxhp)
  1136.       estado.write("\n  SP ")
  1137.       estado.write($game_actors[actor_id].sp)
  1138.       estado.write("\\")
  1139.       estado.write($game_actors[actor_id].maxsp)
  1140.       estado.write( "\n  Str ")        
  1141.       estado.write($game_actors[actor_id].base_str)
  1142.       estado.write("\n  Dex ")  
  1143.       estado.write($game_actors[actor_id].base_dex)
  1144.       estado.write("\n  Agi ")
  1145.       estado.write($game_actors[actor_id].base_agi)
  1146.       estado.write("\n  Int ")
  1147.       estado.write($game_actors[actor_id].base_int)
  1148.       estado.write("\n  PDef ")
  1149.       estado.write($game_actors[actor_id].base_pdef)
  1150.       estado.write("\n  MDef ")
  1151.       estado.write($game_actors[actor_id].base_mdef)
  1152.       estado.write("\n  Atk ")
  1153.       estado.write($game_actors[actor_id].base_atk)
  1154.       estado.write("\n  Eva ")
  1155.       estado.write($game_actors[actor_id].base_eva)
  1156.       estado.write("\n")
  1157.      # If uses compact style
  1158.      else
  1159.       estado.write ("\n\nParameters:\n\n  HP ")      
  1160.       estado.write($game_actors[actor_id].hp)
  1161.       estado.write("\\")
  1162.       estado.write($game_actors[actor_id].maxhp)
  1163.       estado.write(". SP ")
  1164.       estado.write($game_actors[actor_id].sp)
  1165.       estado.write("\\")
  1166.       estado.write($game_actors[actor_id].maxsp)
  1167.       estado.write( "\n  Str ")        
  1168.       estado.write($game_actors[actor_id].base_str)
  1169.       estado.write(". Dex ")  
  1170.       estado.write($game_actors[actor_id].base_dex)
  1171.       estado.write(". Agi ")
  1172.       estado.write($game_actors[actor_id].base_agi)
  1173.       estado.write("\n  Int ")
  1174.       estado.write($game_actors[actor_id].base_int)
  1175.       estado.write(". PDef ")
  1176.       estado.write($game_actors[actor_id].base_pdef)
  1177.       estado.write(". MDef ")
  1178.       estado.write($game_actors[actor_id].base_mdef)
  1179.       estado.write("\n  Atk ")
  1180.       estado.write($game_actors[actor_id].base_atk)
  1181.       estado.write(". Eva ")
  1182.       estado.write($game_actors[actor_id].base_eva)
  1183.       estado.write("\n")
  1184.      end
  1185.     end
  1186.    
  1187.      # Write actor skills  
  1188.      if Wep::Write_actor_skills
  1189.       estado.write("\nSkills:\n\n  ")  
  1190.       # If uses normal style
  1191.       if not Wep::Compact_style
  1192.       for i in 0...$game_actors[actor_id].skills.size        
  1193.          skill = $data_skills[$game_actors[actor_id].skills[i]]
  1194.         if skill != nil
  1195.             estado.write(skill.name+"\n  ")
  1196.         end
  1197.       end
  1198.      # If uses compact style
  1199.      else
  1200.       c=0
  1201.       for i in 0...$game_actors[actor_id].skills.size
  1202.         skill = $data_skills[$game_actors[actor_id].skills[i]]
  1203.         if skill != nil
  1204.           if c == 0
  1205.             estado.write(skill.name+". ")    
  1206.             c += 1
  1207.           elsif c == 1
  1208.             estado.write(skill.name+"\n  ")
  1209.             c = 0
  1210.           end
  1211.          
  1212.       end
  1213.      
  1214.      end
  1215.    
  1216.    end
  1217.      
  1218.     end
  1219.  
  1220.    
  1221.    
  1222.    
  1223.    
  1224.    
  1225.     estado.write("\n")
  1226.     actor_id += 1
  1227.   end
  1228.      
  1229.   # If is for all actors
  1230.   else
  1231.     for i in 1...$data_actors.size
  1232.       actor_id = i
  1233.       actor = $game_actors[i]
  1234.      # If uses normal style
  1235.      if not Wep::Compact_style
  1236.       # Write actor basic Info
  1237.       estado.write ("\n---------------\n")
  1238.       estado.write(actor.name)
  1239.       estado.write ("\n---------------\n")    
  1240.       estado.write($data_classes[actor.class_id].name)
  1241.       estado.write ("\nNv ")
  1242.       estado.write(actor.level)
  1243.       estado.write ("\n")  
  1244.      # If uses compact style
  1245.      else
  1246.       # Write actor basic Info
  1247.       estado.write("\n------------------------\n"+actor.name+" ("+$data_classes[actor.class_id].name+") Nv"+actor.level.to_s+"\n------------------------\n")
  1248.     end
  1249.    
  1250.       # Write actor equipment (check if equipped)
  1251.       if Wep::Write_actor_equipment
  1252.       estado.write("\n\nEquipment:\n\n")
  1253.      
  1254.       if $game_actors[actor_id].weapon_id != 0
  1255.         estado.write("  "+$data_system.words.weapon)
  1256.         estado.write(": ")
  1257.         estado.write($data_weapons[$game_actors[actor_id].weapon_id].name)
  1258.         estado.write("\n")
  1259.       else
  1260.         estado.write("  "+$data_system.words.weapon)
  1261.         estado.write(": ")
  1262.         estado.write("\n")
  1263.       end
  1264.      
  1265.       if $game_actors[actor_id].armor1_id != 0
  1266.         estado.write("  "+$data_system.words.armor1)
  1267.         estado.write(": ")
  1268.         estado.write($data_armors[$game_actors[actor_id].armor1_id].name)
  1269.         estado.write("\n")
  1270.       else
  1271.         estado.write("  "+$data_system.words.armor1)
  1272.         estado.write(": ")
  1273.         estado.write("\n")
  1274.       end  
  1275.      
  1276.       if $game_actors[actor_id].armor2_id != 0
  1277.         estado.write("  "+$data_system.words.armor2)
  1278.         estado.write(": ")
  1279.         estado.write($data_armors[$game_actors[actor_id].armor2_id].name)
  1280.         estado.write("\n")
  1281.       else
  1282.         estado.write("  "+$data_system.words.armor2)
  1283.         estado.write(": ")
  1284.         estado.write("\n")
  1285.       end    
  1286.      
  1287.       if $game_actors[actor_id].armor3_id != 0
  1288.         estado.write("  "+$data_system.words.armor3)
  1289.         estado.write(": ")
  1290.         estado.write($data_armors[$game_actors[actor_id].armor3_id].name)
  1291.         estado.write("\n")
  1292.       else
  1293.         estado.write("  "+$data_system.words.armor3)
  1294.         estado.write(": ")
  1295.         estado.write("\n")
  1296.       end
  1297.      
  1298.       if $game_actors[actor_id].armor4_id != 0
  1299.         estado.write("  "+$data_system.words.weapon)
  1300.         estado.write(": ")
  1301.         estado.write($data_armors[$game_actors[actor_id].armor4_id].name)
  1302.         estado.write("\n")
  1303.       else
  1304.         estado.write("  "+$data_system.words.armor4)
  1305.         estado.write(": ")
  1306.         estado.write("\n")
  1307.       end
  1308.     end
  1309.    
  1310.     # Write actor parameters
  1311.     if Wep::Write_actor_parameters
  1312.      # If uses normal style
  1313.      if not Wep::Compact_style
  1314.       estado.write ("\n\nParameters:\n\n  HP ")      
  1315.       estado.write($game_actors[actor_id].hp)
  1316.       estado.write("\\")
  1317.       estado.write($game_actors[actor_id].maxhp)
  1318.       estado.write("\n  SP ")
  1319.       estado.write($game_actors[actor_id].sp)
  1320.       estado.write("\\")
  1321.       estado.write($game_actors[actor_id].maxsp)
  1322.       estado.write( "\n  Str ")        
  1323.       estado.write($game_actors[actor_id].base_str)
  1324.       estado.write("\n  Dex ")  
  1325.       estado.write($game_actors[actor_id].base_dex)
  1326.       estado.write("\n  Agi ")
  1327.       estado.write($game_actors[actor_id].base_agi)
  1328.       estado.write("\n  Int ")
  1329.       estado.write($game_actors[actor_id].base_int)
  1330.       estado.write("\n  PDef ")
  1331.       estado.write($game_actors[actor_id].base_pdef)
  1332.       estado.write("\n  MDef ")
  1333.       estado.write($game_actors[actor_id].base_mdef)
  1334.       estado.write("\n  Atk ")
  1335.       estado.write($game_actors[actor_id].base_atk)
  1336.       estado.write("\n  Eva ")
  1337.       estado.write($game_actors[actor_id].base_eva)
  1338.       estado.write("\n")
  1339.      # If uses compact style
  1340.      else
  1341.       estado.write ("\n\nParameters:\n\n  HP ")      
  1342.       estado.write($game_actors[actor_id].hp)
  1343.       estado.write("\\")
  1344.       estado.write($game_actors[actor_id].maxhp)
  1345.       estado.write(". SP ")
  1346.       estado.write($game_actors[actor_id].sp)
  1347.       estado.write("\\")
  1348.       estado.write($game_actors[actor_id].maxsp)
  1349.       estado.write( "\n  Str ")        
  1350.       estado.write($game_actors[actor_id].base_str)
  1351.       estado.write(". Dex ")  
  1352.       estado.write($game_actors[actor_id].base_dex)
  1353.       estado.write(". Agi ")
  1354.       estado.write($game_actors[actor_id].base_agi)
  1355.       estado.write("\n  Int ")
  1356.       estado.write($game_actors[actor_id].base_int)
  1357.       estado.write(". PDef ")
  1358.       estado.write($game_actors[actor_id].base_pdef)
  1359.       estado.write(". MDef ")
  1360.       estado.write($game_actors[actor_id].base_mdef)
  1361.       estado.write("\n  Atk ")
  1362.       estado.write($game_actors[actor_id].base_atk)
  1363.       estado.write(". Eva ")
  1364.       estado.write($game_actors[actor_id].base_eva)
  1365.       estado.write("\n")
  1366.      end
  1367.     end
  1368.    
  1369.      # Write actor skills  
  1370.      if Wep::Write_actor_skills
  1371.       estado.write("\nSkills:\n\n  ")  
  1372.       # If uses normal style
  1373.       if not Wep::Compact_style
  1374.       for i in 0...$game_actors[actor_id].skills.size        
  1375.          skill = $data_skills[$game_actors[actor_id].skills[i]]
  1376.         if skill != nil
  1377.             estado.write(skill.name+"\n  ")
  1378.         end
  1379.       end
  1380.      # If uses compact style
  1381.      else
  1382.       c=0
  1383.       for i in 0...$game_actors[actor_id].skills.size
  1384.         skill = $data_skills[$game_actors[actor_id].skills[i]]
  1385.         if skill != nil
  1386.           if c == 0
  1387.             estado.write(skill.name+". ")    
  1388.             c += 1
  1389.           elsif c == 1
  1390.             estado.write(skill.name+"\n  ")
  1391.             c = 0
  1392.           end
  1393.          
  1394.       end
  1395.      
  1396.      end
  1397.    
  1398.    end
  1399.      
  1400.     end
  1401.  
  1402.     estado.write("\n")
  1403.    
  1404.   end
  1405.      
  1406.   end
  1407.     estado.write ("\n")
  1408.    
  1409.  
  1410.     # Write normal style      
  1411.     if not Wep::Compact_style
  1412.      # Write actor items
  1413.      if Wep::Write_items
  1414.       estado.write("--------------\nInventary:\n--------------\n  ")  
  1415.       estado.write("\nItems:\n\n  ")  
  1416.       c=0
  1417.       for i in 1...$data_items.size
  1418.         if $game_party.item_number(i) > 0
  1419.           estado.write($data_items[i].name+": "+$game_party.item_number(i).to_s+"\n  ")
  1420.         end
  1421.       end
  1422.      # Write actor weapons
  1423.       estado.write("\nWeapons:\n\n  ")
  1424.       c=0
  1425.       for i in 1...$data_weapons.size
  1426.         if $game_party.weapon_number(i) > 0
  1427.           estado.write($data_weapons[i].name+": "+$game_party.weapon_number(i).to_s+"\n  ")
  1428.         end
  1429.       end
  1430.      # Write actor armors
  1431.       estado.write("\nArmors:\n\n  ")
  1432.       c=0
  1433.       for i in 1...$data_armors.size
  1434.         if $game_party.armor_number(i) > 0
  1435.           estado.write($data_armors[i].name+": "+$game_party.armor_number(i).to_s+"\n  ")
  1436.         end
  1437.       end
  1438.     end
  1439.    
  1440.    # Write compact style
  1441.    else
  1442.  
  1443.      # Write items
  1444.      if Wep::Write_items
  1445.              estado.write("--------------\nInventary:\n--------------\n  ")  
  1446.       estado.write("\nItems:\n\n  ")  
  1447.       c=0
  1448.       for i in 1...$data_items.size
  1449.         if $game_party.item_number(i) > 0
  1450.           if c == 0
  1451.             estado.write($data_items[i].name+": "+$game_party.item_number(i).to_s+". ")            
  1452.             c += 1
  1453.           elsif c == 1  
  1454.             estado.write($data_items[i].name+": "+$game_party.item_number(i).to_s+"\n  ")
  1455.           end
  1456.         end
  1457.       end
  1458.      # Write weapons
  1459.       estado.write("\nWeapons:\n\n  ")
  1460.       c=0
  1461.       for i in 1...$data_weapons.size
  1462.         if $game_party.weapon_number(i) > 0
  1463.           if c == 0
  1464.             estado.write($data_weapons[i].name+": "+$game_party.weapon_number(i).to_s+". ")            
  1465.             c += 1
  1466.           elsif c == 1  
  1467.             estado.write($data_weapons[i].name+": "+$game_party.weapon_number(i).to_s+"\n  ")
  1468.           end        
  1469.         end
  1470.       end
  1471.      # Write armors
  1472.       estado.write("\n\nArmors:\n\n  ")
  1473.       c=0
  1474.       for i in 1...$data_armors.size
  1475.         if $game_party.armor_number(i) > 0
  1476.           if c == 0
  1477.             estado.write($data_armors[i].name+": "+$game_party.armor_number(i).to_s+". ")            
  1478.             c += 1
  1479.           elsif c == 1  
  1480.             estado.write($data_armors[i].name+": "+$game_party.armor_number(i).to_s+"\n  ")
  1481.           end
  1482.         end
  1483.       end
  1484.     end    
  1485.      
  1486.      
  1487.      
  1488.      
  1489.    end
  1490.       estado.write ("\n")
  1491.       estado.close
  1492.   end
  1493.  
  1494.  
  1495.  
  1496.  
  1497. # Check for compatibality option
  1498. if Wep::Modify_save
  1499.  
  1500.  class Scene_Save < Scene_File
  1501.   #--------------------------------------------------------------------------
  1502.   # * Decision Processing
  1503.   #--------------------------------------------------------------------------
  1504.   alias diary_on_decision on_decision
  1505.   def on_decision(filename)
  1506.     $game_party.record_save
  1507.     diary_on_decision(filename)
  1508.   end
  1509.  end
  1510. end
  1511.  
  1512. # Check for compatibality option
  1513. if Wep::Modify_game_system
  1514.  
  1515.  class Game_System
  1516.   attr_accessor :random_filename
  1517.   alias bd_initialize initialize
  1518.   def initialize
  1519.     @random_filename = 0    
  1520.     bd_initialize
  1521.   end
  1522.  end
  1523. end
Advertisement
Add Comment
Please, Sign In to add comment