Evocazioni!

[nomorehero]

Descrizione

 

 

Permette di creare ed utilizzare evocazioni

 

 

 

Autore

 

Tsukihime

 

 

 

Istruzioni per l'uso

Utilizzare

add_actor_summon(actor_id)

per creare un evocazione e

summon_battler(summon_id)

per evocarlo in battaglia.

 

 

=begin
==============================================================================
** Battle Summons
Author: Tsukihime
Version: 1.2
Date: May 18, 2012
------------------------------------------------------------------------------
** Change log
1.2 May 20
  -option to remove all actors when summon appears
  -actors will return when the summon disappears
1.1 May 19
  -Created summon scene/window
  -added summon command
  -summons are now treated as actors and level accordingly
1.0 May 18
  -Initial release
------------------------------------------------------------------------------
Summon battlers to fight for you!
==============================================================================
=end
$imported = {} if $imported.nil?
$imported["Tsuki_BattleSummon"] = true
#==============================================================================
# ** Configuration.
#==============================================================================
module Tsuki
 module Battle_Summon
# variable used to determine the number of turns summoned
Default_Summon_Turns = 5
Summon_Turn_Variable = 1
 
 
# Should the summon command be shown in battle?
Enable_Summon_Command = true
 
# party members leave when a summon appears
Summon_Only_Battle = true
 
# Monster Hunter add-on requires that script. It adds all captured monsters
# to your summon list rather than the party list.
Monster_Hunter_Addon = false
 end
end
#==============================================================================
# ** Rest of the Script
#==============================================================================
module DataManager

 class << self
alias tsuki_battle_summon_create_objects create_game_objects
alias tsuki_battle_summon_make_save_contents make_save_contents
alias tsuki_battle_summon_extract_save_contents extract_save_contents
 end

 def self.create_game_objects
tsuki_battle_summon_create_objects
$game_summons = Game_Summons.new
 end

 def self.make_save_contents
contents = tsuki_battle_summon_make_save_contents
contents[:summons]		= $game_summons
contents
 end

 def self.extract_save_contents(contents)
tsuki_battle_summon_extract_save_contents(contents)
$game_summons = contents[:summons]
 end
end

module BattleManager
 class << self
alias tsuki_battle_summon_turn_end turn_end
alias tsuki_battle_summon_gain_exp gain_exp
 end

 def self.turn_end
tsuki_battle_summon_turn_end
$game_party.update_summons
 end

 def self.gain_exp
tsuki_battle_summon_gain_exp
$game_party.summon_members.each do |summon|
  summon.gain_exp($game_troop.exp_total)
end
wait_for_message
 end
end
class Game_Summon < Game_Actor

 attr_reader :summon_id
 attr_accessor :summon_turns
 def initialize(actor_id, index)
super(actor_id)
@summon_id = index
@summon_turns = 0
@dupe = false
 end

 def can_dupe?
@dupe
 end

 def update_summon
@summon_turns -= 1
if @summon_turns <= 0
  $game_party.remove_summon(@summon_id)
end
 end

 def die
$game_party.remove_summon(@summon_id)
super
 end
end
class Game_Summons
 include Tsuki::Battle_Summon

 def initialize
@data = [nil]
@ids = [nil]
 end

 def [](summon_id)
@data[summon_id]
 end
 
 def summon_actor(id)
return if @ids.include?(id)
index = @data.size
summon = Game_Summon.new(id, index)
@data << summon
@ids << id
 end

 def summon(id)
return unless @data[id]
@data[id].summon_turns = [Default_Summon_Turns, $game_variables[summon_Turn_Variable]].max
@data[id].make_actions
 end

 def exist?(summon_id)
!@data[summon_id].nil?
 end


 def all_summons
@data[1..-1]
 end
end
class Game_Party < Game_Unit
 include Tsuki::Battle_Summon

 alias tsuki_battle_summon_initialize_party initialize
 def initialize
tsuki_battle_summon_initialize_party
@summons = []
 end

 alias tsuki_battle_summon_battle_members battle_members
 def battle_members
summons = summon_members
if Summon_Only_Battle
  summons.empty? ? tsuki_battle_summon_battle_members : summons
else
  members = tsuki_battle_summon_battle_members
  members.concat(summons)
end
 end

 def summon_members
@summons.collect {|id| $game_summons[id]}
 end

 def summon_battler(id)
return if !$game_summons.exist?(id) || (@summons.include?(id) && !$game_summons[id].can_dupe?)
$game_summons.summon(id)
@summons << id
 end
 def remove_summon(summon_id)
@summons.delete(summon_id)
 end

 def update_summons
summon_members.each {|summon| summon.update_summon}
 end

 def clear_summons
@summons = []
 end

 def on_battle_end
super
clear_summons
 end
end
class Game_Interpreter

 def add_actor_summon(actor_id)
$game_summons.summon_actor(actor_id)
 end
 
 def summon_battler(summon_id)
$game_party.summon_battler(summon_id)
 end
end
#==============================================================================
# ** Window_SummonList
#------------------------------------------------------------------------------
#  This window displays a list of party summons
#==============================================================================
class Window_SummonList < Window_Selectable
 #--------------------------------------------------------------------------
 # * Object Initialization
 #--------------------------------------------------------------------------
 def initialize(x, y, width, height)
super
@actor = nil
@data = []
select(0)
refresh
 end
 #--------------------------------------------------------------------------
 # * Set Category
 #--------------------------------------------------------------------------
 def actor=(actor)
return if @actor == actor
@actor = actor
refresh
self.oy = 0
 end
 #--------------------------------------------------------------------------
 # * Get Digit Count
 #--------------------------------------------------------------------------
 def col_max
return 2
 end

 def item_height
104
 end
 #--------------------------------------------------------------------------
 # * Get Number of Items
 #--------------------------------------------------------------------------
 def item_max
@data ? @data.size : 1
 end
 #--------------------------------------------------------------------------
 # * Get Item
 #--------------------------------------------------------------------------
 def item
@data && index >= 0 ? @data[index] : nil
 end
 #--------------------------------------------------------------------------
 # * Get Activation State of Selection Item
 #--------------------------------------------------------------------------
 def current_item_enabled?
enable?(@data[index])
 end

 def enable?(summon)
!$game_party.summon_members.include?(summon)
 end

 def include?(summon)
return false unless summon
return true
 end
 #--------------------------------------------------------------------------
 # * Create Item List
 #--------------------------------------------------------------------------
 def make_item_list
@data = $game_summons.all_summons.select {|item| include?(item) }
@data.push(nil) if include?(nil)
 end
 #--------------------------------------------------------------------------
 # * Restore Previous Selection Position
 #--------------------------------------------------------------------------
 def select_last
select(@data.index($game_party.last_item.object) || 0)
 end
 #--------------------------------------------------------------------------
 # * Draw Item
 #--------------------------------------------------------------------------
 def draw_item(index)
summon = @data[index]
if summon
  rect = item_rect(index)
  rect.width -= 4
  draw_summon_basic(summon, rect.x + 4, rect.y, enable?(summon))
  draw_actor_face(summon, rect.x + rect.width - 96, rect.y)
end
 end

 def draw_summon_name(summon, x, y, enabled, width = 112)
change_color(normal_color, enabled)
draw_text(x, y, width, line_height, summon.name)
 end

 def draw_summon_basic(summon, x, y, enabled=true, width=172)
return unless summon
text_width = text_size(summon.name).width
draw_summon_name(summon, x, y + line_height*0, enabled)
draw_actor_level(summon, x, y + line_height*1)
draw_actor_hp(summon, x, y + line_height*2)
draw_actor_mp(summon, x, y + line_height*3)
 end
 #--------------------------------------------------------------------------
 # * Update Help Text
 #--------------------------------------------------------------------------
 def update_help
@help_window.set_item(item)
 end
 #--------------------------------------------------------------------------
 # * Refresh
 #--------------------------------------------------------------------------
 def refresh
make_item_list
create_contents
draw_all_items
 end
end
class Window_BattleSummon < Window_SummonList

 def initialize(help_window, info_viewport)
y = 0
super(0, y, Graphics.width, info_viewport.rect.y - y)
self.visible = false
@help_window = help_window
@info_viewport = info_viewport
select(0)
 end

 def enable?(summon)
summon && !$game_party.summon_members.include?(summon)
 end
end

class Window_BattleStatus < Window_Selectable
 def content_height
$game_party.battle_members.size * line_height - standard_padding * 2
 end

 alias tsuki_battle_summon_status_refresh refresh
 def refresh
create_contents
tsuki_battle_summon_status_refresh
 end
end
class Scene_Summons  < Scene_MenuBase

 def start
super
create_summon_window
@summon_window.activate
 end

 def create_summon_window
width = Graphics.width
height = Graphics.height
@summon_window = Window_SummonList.new(0, 0, width, height)
@summon_window.set_handler(:cancel, method(:return_scene))
 end
end
class Scene_Battle < Scene_Base

 alias :battle_summon_create_battle_windows :create_all_windows
 def create_all_windows
battle_summon_create_battle_windows
create_summon_window
 end

 def create_summon_window
@summon_window = Window_BattleSummon.new(@help_window, @info_viewport)
@summon_window.set_handler(:ok,	 method(:on_summon_ok))
@summon_window.set_handler(:cancel, method(:on_summon_cancel))
 end

 alias battle_summon_actor_command_window create_actor_command_window
 def create_actor_command_window
battle_summon_actor_command_window
@actor_command_window.set_handler(:summon, method(:command_summon))
 end

 def command_summon
activate_summon_window
 end

 def on_summon_ok
summon = @summon_window.item
$game_party.summon_battler(summon.summon_id)
@status_window.refresh
@summon_window.hide
next_command
 end

 def on_summon_cancel
@summon_window.hide
@actor_command_window.activate
 end

 def activate_summon_window
@summon_window.refresh
@summon_window.show.activate
 end
end
class Window_ActorCommand < Window_Command

 alias tsuki_battle_summon_actor_commands make_command_list
 def make_command_list
tsuki_battle_summon_actor_commands
add_summon_command if Tsuki::Battle_Summon::Enable_Summon_Command
 end

 def add_summon_command
add_command("Summon", :summon)
 end
end
#==============================================================================
# ** Update menu scene to add option
#==============================================================================
class Window_MenuCommand < Window_Command
 #--------------------------------------------------------------------------
 # * Add arena command to List
 #--------------------------------------------------------------------------
 alias tsuki_summons_commands add_main_commands
 def add_main_commands
tsuki_summons_commands
add_command("Summons", :summons)
 end
end
class Scene_Menu < Scene_MenuBase
 #--------------------------------------------------------------------------
 # * Add arena handler
 #--------------------------------------------------------------------------
 alias tsuki_summons_command_window create_command_window
 def create_command_window
tsuki_summons_command_window
@command_window.set_handler(:summons, method(:command_summons))
 end

 def command_summons
SceneManager.call(Scene_Summons)
 end
end
#==============================================================================
# ** Compatibility mods
#==============================================================================
if Tsuki::Battle_Summon::Monster_Hunter_Addon
 if $imported["Tsuki_MonsterHunter"]
module Monster_Hunter

  def self.create_game_actor(actor_id)
	return if $BTEST
	$game_summons.summon_actor(actor_id)
  end
end
 else
msgbox("Monster Hunter must placed above this script")
 end
end

 

 

 

Bugs e Conflitti Noti

N/A

Sullo script si accenna anche alla possibile interazione con un altro script, tale Monster Hunter, su cui sto ancora indagando.

 

Enjoy

 

(NB.: Non ho ancora capito bene come funziona a dire il vero... O meglio, non ho ancora capito dove inserire i call script... Se riuscite a deluciarmi...)

Edited May 22, 2012 by nomorehero

[espert]

Ottimo script!

A me, personalmente non serve, ma hai fatto bene a segnalarlo, in quanto il VX Ace conta ancora pochi script decenti sul web.

[Guardian of Irael]

Il template che hai seguito è un po' risicato! XD Dividilo e presentalo per bene! Soprattutto i crediti in grassetto ben visibili! ^ ^

Buono script per il resto, mi pare fossero state chieste le evocazioni! ^ ^

[nomorehero]

A dire il vero mi sono limitato a copiaincollare lo script... i dont spikko inglish veri uell e se ci metto mano faccio danno!

[Dilos]

nomorehero http://www.montagnaforum.com/images/smilies/2010/azz.png, Guardian intende il template del topic, cioè lo schema che hai seguito, devi dividere mettendo Autore, Descrizione, Script ecc. come titoloni e poi metterci il testo sotto...(guarda gli altri script postati per vedere lo schema esatto :smile:)

 

Per il funzionamento:

Il primo Call Script:

add_actor_summon(actor_id)

va inserito in un evento quando il pg impara l' evocazione, quindi si specifica nell' ID, l' ID dell' eroe (evocazione) da impostare.

poi si utilizza tramite evento comune in battaglia:

summon_battler(summon_id)

per evocare l' eroe "imparato" durante il game, ovviamente specificando lo stesso ID.

 

Comunque utile script, bravo. :smile:

Edited May 22, 2012 by Dilos

[nomorehero]

ah, ok... procedo!

[Dilos]

No ma scusa...che cavolo hai fatto...hai levato lo script e hai impasticciato tutto...ce la facciamo a fare un topic ordinato?

[Guardian of Irael]

Sì, è rimasto qualche pezzo di codice scoperto, sistemato! ^ ^

[Dilos]

Sì, è rimasto qualche pezzo di codice scoperto, sistemato! ^ ^

Io lo vedo come prima, e non c' è più lo script! Sto impazzendo? :unsure:

[Guardian of Irael]

No, aspetta, mi sono accorto dopo! XD

Stiamo parlando per MP di problemi col template! ^ ^

[nomorehero]

A posto... spero. diamine, oggi non ci sono con la testa...

[Dilos]

No, aspetta, mi sono accorto dopo! XD

Stiamo parlando per MP di problemi col template! ^ ^

Ah ecco. http://server80.chatexpert.it/admin/emoticons/1_penso.gif

Bene, finalmente il mistero del template assassino stà per essere svelato! Secondo me è proprio il template che è compromesso nella formattazione quando viene copiato dagli utenti.

 

EDIT: nomorehero, ora è a posto...XD (ti direi anche di distinguere i colori dei titoli da quelli dei testi ma non te lo dico sennò non finiamo più XDXD)

Edited May 22, 2012 by Dilos

[Guest clyde]

Frequentando lo stesso forum di tsukihime, mi sento di chiedere che i suoi script non vengano pubblicati. È un neofita del making e l'ho visto postare solo script non funzionanti, idee di script la cui realizzazione delega ad altri, o script ricavati ritagliandoli da script maggiori realizzati da altri.

[nomorehero]

Ah, non ne avevo idea...

[Dilos]

Frequentando lo stesso forum di tsukihime, mi sento di chiedere che i suoi script non vengano pubblicati. È un neofita del making e l'ho visto postare solo script non funzionanti, idee di script la cui realizzazione delega ad altri, o script ricavati ritagliandoli da script maggiori realizzati da altri.

Mmm...stai quindi dicendo che lo script non è suo? http://www.montagnaforum.com/images/smilies/2010/pensieroso.gif

Bisogna sempre verificare prima di postare.

Edited May 22, 2012 by Dilos

[Guardian of Irael]

Mmmh... va bene allora in caso oscuriamo questo topic, ok? E chiudiamo! ^ ^

[nomorehero]

Perfetto! e pensare che ho fatto tanta fatica poer templarlo... :unsure:

[Logum]

Perchè non si testa prima il funzionamento e nel caso si mette Autore: da definire? Perchè sarebbe un vero peccato per coloro che hanno interesse allo script!

[Guardian of Irael]

In effetti sarebbe meglio... clyde sapresti ritrovare qualche autore o dirci da dove nasce questo script, se funziona bene, ecc... ?

^ ^

[Dilos]

Perfetto! e pensare che ho fatto tanta fatica poer templarlo... :unsure:

Ah-Ah-AH. Ti servirà per le prossime volte almeno, ora hai imparato la lezione. XD

---

Stavo per scrivere "Close this damned topic!", ma poi ho letto gli ultimi due post, ehm...già ginoclyde, trovaci l' autore! Hai fatto 30, fai 31!

Edited May 22, 2012 by Dilos

[Guest clyde]

Prendete le mie parole come voci di corridoio. Per ora il tipo risulta pulito anche nell'altro forum e non vedo i presupposti per chiudere il tipic solo sulla mia parola. Vedo se riesco a trovare la fonte.

[Guardian of Irael]

Sì, per ora lasciamolo, vedi se riesci a darci qualche info in più e poi decidiamo se modificare od annichilire! ^ ^

[Pokèmaker]

Nello script è citato il monster hunter add-on.

Tale add-on non è altro che un collegamento con questo script:

http://www.rpgmakervxace.net/topic/3905-monster-hunter/

Che permette di "evocare" i mostri catturati.

[Guardian of Irael]

Citato? Nel senso che son comunque compatibili o manca un pezzo? ^ ^

[Pokèmaker]

Citato? Nel senso che son comunque compatibili o manca un pezzo? ^ ^

Son compatibili

 

No, non è necropost, dico qualcosa che sarà utile per chi in futuro vorrà usare lo script