Veicoli Esplorabili

[Guest clyde]

Veicoli Esplorabili

Descrizione

Questo script permette di assegnare a ciascun veicolo una mappa che ne rappresenta l'interno.

 

Autore

Non voglio essere creditato

. Creditate tenseiten/seitensei e shaz per lo script su cui mi sono basato!

 

Allegati

Breve Demo

per chi avesse ancora dubbi su come funziona lo script. Ovviamente i bellissimi interni presenti nel progetto sono protetti da copyright e ho uno stuolo di avvocati pronti a dimostrarlo.

 

Istruzioni per l'uso

Istruzioni in testa allo script

 

 

 

#===============================================================================
# * Veicoli Esplorabili
#   Versione 1.0
#-------------------------------------------------------------------------------
# * Autore: Non voglio essere creditato
#===============================================================================
# BASATO SU:
#===============================================================================
# * Vehicle Interiors
#   Version 0.35b
#-------------------------------------------------------------------------------
# * Authored by: tenseiten/seitensei
# * With help from: shaz
#===============================================================================
#===============================================================================
=begin


.:Introduzione:.
Questo script permette di assegnare a ciascun veicolo una mappa che ne
rappresenta l'interno. Questo dovrebbe bastare a farvi venire in
mente gli infiniti utilizzi possibili (tutti copiati da Final Fantasy)


.:Istruzioni:.

- Imposta l'ID Mappa e le coordinate X/Y della mappa che fa da interno
per il veicolo.

- Crea un evento che riporta il giocatore nella world map
e lo forza a pilotare il veicolo col seguente codice:
$game_player.pilot_vehicle

- Per uscire dal veicolo e tornare sulla world map a piedi usa il codice:
$game_player.exit_vehicle


=end
#===============================================================================
#-------------------------------------------------------------------------------
# * Sezione Configurazione
#-------------------------------------------------------------------------------
module InterniVeicoli

 BOAT_ENABLED = true   # La barca ha gli interni?
 BOAT_MAP = 4		    # ID Mappa
 BOAT_MAP_X = 13		  # Coordinata X di ingresso
 BOAT_MAP_Y = 4			    # Coordinata Y di ingresso

 SHIP_ENABLED = true   # La nave ha gli interni?
 SHIP_MAP = 3		    # ID Mappa
 SHIP_MAP_X = 10		  # Coordinata X di ingresso
 SHIP_MAP_Y = 12		  # Coordinata Y di ingresso

 AIRSHIP_ENABLED = true  # L'aeronave ha gli interni?
 AIRSHIP_MAP = 2			    # ID Mappa
 AIRSHIP_MAP_X = 11	  # Coordinata X di ingresso
 AIRSHIP_MAP_Y = 4	    # Coordinata Y di ingresso
end
#-------------------------------------------------------------------------------
# * Fine Configurazione
#-------------------------------------------------------------------------------
class Game_Player < Game_Character
 #--------------------------------------------------------------------------
 # * Get on Vehicle (From Overmap)
 #   Intercept the player, and send them inside.
 #--------------------------------------------------------------------------
 alias control_vehicle get_on_vehicle
 def get_on_vehicle

   front_x = $game_map.round_x_with_direction(@x, @direction)
   front_y = $game_map.round_y_with_direction(@y, @direction)
   if $game_map.boat.pos?(front_x, front_y)
  if InterniVeicoli::BOAT_ENABLED
    #Save world map information
    @player_w_map = $game_map.map_id
    @player_w_x = @x
    @player_w_y = @y
    @vehicle_w_x = front_x
    @vehicle_w_y = front_y
    @used_vehicle = :boat
    @vehicle_phase = "boarded"
    #Now Teleport to the map set in config
    reserve_transfer(InterniVeicoli::BOAT_MAP, InterniVeicoli::BOAT_MAP_X, InterniVeicoli::BOAT_MAP_Y, @direction)
  else
    #Continue to normal function when not enabled
    @vehicle_type = :boat
    control_vehicle
  end
   end

   if $game_map.ship.pos?(front_x, front_y)
  if InterniVeicoli::SHIP_ENABLED
    #Save world map information
    @player_w_map = $game_map.map_id
    @player_w_x = @x
    @player_w_y = @y
    @vehicle_w_x = front_x
    @vehicle_w_y = front_y
    @used_vehicle = :ship
    @vehicle_phase = "boarded"
    #Now Teleport to the map set in config
    reserve_transfer(InterniVeicoli::SHIP_MAP, InterniVeicoli::SHIP_MAP_X, InterniVeicoli::SHIP_MAP_Y, @direction)
  else
    #Continue to normal function when not enabled
    @vehicle_type = :ship
    control_vehicle
  end
   end

   if $game_map.airship.pos?(@x, @y)
  if InterniVeicoli::AIRSHIP_ENABLED
    #Save world map information
    @player_w_map = $game_map.map_id
    @player_w_x = @x
    @player_w_y = @y
    @used_vehicle = :airship
    @vehicle_phase = "boarded"
    #Now Teleport to the map set in config
    reserve_transfer(InterniVeicoli::AIRSHIP_MAP, InterniVeicoli::AIRSHIP_MAP_X, InterniVeicoli::AIRSHIP_MAP_Y, @direction) # transfer to new map
  else
    #Continue to normal function when not enabled
    @vehicle_type = :airship
    control_vehicle
  end
   end
 end

 #--------------------------------------------------------------------------
 # * Pilot Vehicle (From Interior)
 #   Brings player back to the overmap to control the ship
 #--------------------------------------------------------------------------
 def pilot_vehicle
   # Save Interior Map Location
   @player_int_map = $game_map.map_id
   @player_int_x = @x
   @player_int_y = @y
   # Transfer to World Map
   if @used_vehicle == :airship || @vehicle_phase == "onboard"
  reserve_transfer(@player_w_map, @player_w_x, @player_w_y, @direction)
   else
  reserve_transfer(@player_w_map, @vehicle_w_x, @vehicle_w_y, @direction)
   end
   @vehicle_phase = "onboard"
   @vehicle_type = @used_vehicle
   control_vehicle
 end

 #--------------------------------------------------------------------------
 # * Leave Vehicle (From Overmap)
 #   Intercept the player, and end them inside
 #--------------------------------------------------------------------------
 alias abandon_vehicle get_off_vehicle
 def get_off_vehicle
   custom = false
   custom = true if @vehicle_type == :boat && InterniVeicoli::BOAT_ENABLED
   custom = true if @vehicle_type == :ship && InterniVeicoli::SHIP_ENABLED
   custom = true if @vehicle_type == :airship && InterniVeicoli::AIRSHIP_ENABLED
   if custom == true
  if abandon_vehicle
    @vehicle_phase = "landed"
    @player_w_map = $game_map.map_id
    @player_w_x = @x
    @player_w_y = @y
    case @vehicle_type
    when :boat
	  k = 0
    when :ship
	  k = 1
    when :airship
	  k = 2
    end
    @vehicle_w_x = $game_map.vehicles[k].x
    @vehicle_w_y = $game_map.vehicles[k].y
    reserve_transfer(@player_int_map, @player_int_x, @player_int_y, @direction)
  end
   else
  abandon_vehicle
   end
 end

 #--------------------------------------------------------------------------
 # * Exit Vehicle (From Interior)
 #   Returns the party to the overmap
 #--------------------------------------------------------------------------
 def exit_vehicle
   reserve_transfer(@player_w_map, @player_w_x, @player_w_y, @direction)
 end

end

 

 

 

Bugs e Conflitti Noti

N/D

 

Altri Dettagli

Dato che gli ultimi script da me postati sono stati considerati di dubbia utilità, ho deciso di prendere quel brutto anatroccolo che è lo script Vehicles Interiors di tenseiten/seitensei, e trasformarlo in un cigno. Il risultato è questo mio script semioriginale e di indubbia INUTILITA'.

Edited May 9, 2012 by clyde

[Holy87]

L'autore sei tu, ma non vuoi essere creditato, o si chiama proprio così? XD

Perchè nel primo caso è meglio sempre sapere chi ringraziare, tanto puoi dirlo comunque di non essere creditato.

[Guest clyde]

L'autore sei tu, ma non vuoi essere creditato, o si chiama proprio così? XD

Perchè nel primo caso è meglio sempre sapere chi ringraziare, tanto puoi dirlo comunque di non essere creditato.

Non sai quanta gente non pensa che il mio nome sta a sinistra e finisce per non creditarmi come voluto! Comunque grazie al tuo commento mi sono ricordato che il mio script è (molto) basato su un altro, i cui autori andrebbero dunque creditati.

Edited May 9, 2012 by clyde

[Guardian of Irael]

Questo è un po' cattivo come script! Preferisco il metodo ad eventi così da far loro imparare un po' D:

^ ^

[Guest clyde]

Beh, questa ad eventi mi pare impossibile.

[Guardian of Irael]

Mmmh se ho capito quello che fa lo script... non ho provato, ma dovrebbe essere fattibile perchè c'è la condizione se veicolo è guidato, poi altra condizione con tasto premuto, ti salvi le coordinate di posizione ed usi il sali/scendi veicolo! ^ ^

[Guest clyde]

Mmmh se ho capito quello che fa lo script... non ho provato, ma dovrebbe essere fattibile perchè c'è la condizione se veicolo è guidato, poi altra condizione con tasto premuto, ti salvi le coordinate di posizione ed usi il sali/scendi veicolo! ^ ^

No, lo script intercetta quando sali/scendi dal veicolo e invece di metterti subito al comando del veicolo ti fa sempre passare prima per l'interno del veicolo. L'esempio che hai fatto tu, invece, è riproducibile ad eventi.

[Guardian of Irael]

Ah ecco appena sali vai dentro al veicolo e poi devi dar conferma al apitano per partire! ^ ^

[Logum]

Non è malaccio...perchè non ci metti anche la possibilità di entrare nella mappa del veicolo anche quando non sei vicino a un punto di attracco? Esempio: sei in mezzo al mare, premi JHCK, e ti entra nella mappa...così che ci si può fare una chiacchieratina con party o cose varie che magari uno decide di sistemarsi...stile fainal fantasi sei!

[Kingartur2]

mmm....

teletrasporti il veicolo che stai usando di fronte all'eroe(mi raccomando per di fronte si intende che l'eroe guarda il veicolo rispetto alla sua direzione) e poi fai:

$game_player.get_on_vehicle

[Guest clyde]

Gollum smettila di copiare Final Fantasy!

Gollum intendeva dire che mentre stai viaggiando a bordo del tuo veicolo premi un tasto e ti ritrovi dentro a complottare coi tuoi eroi (stile Final Fantasy [n]).

[Kingartur2]

Chiedo venia per non aver mai giocato a FF6.

[Logum]

Per [n] intendeva un ipotetico final fantasy di qualsiasi numero xD questa oppizzione c'è a tutti (almeno credo)

[Lusianl]

Lo trovo un ottimo script.

Ma alla fine come si fa per il viaggio?C'è una scelta multipla?Entra nel veicolo o viaggia con il veicolo?

[Guardian of Irael]

@Lusianl:

- Crea un evento che riporta il giocatore nella world map

e lo forza a pilotare il veicolo col seguente codice:

$game_player.pilot_vehicle

 

^ ^

[Ichika Strize]

Ottimo script, clyde! Lo trovo davvero utile, grazie :3

Ci stai letteralmente riempiendo di script utili e carini *-*

[Guest clyde]

Mi trovo di fronte l'ostacolo più stupido e insormontabile mai riscontrato in uno script. Spero di risolverlo a breve e avrete una versione dello script completamente rinnovata e molto più carina e personalizzabile. Se non lo risolvo giuro qui, in questo post, che mi ritiro dal making.

[Holy87]

Se vuoi posso darti una mano.

[Logum]

What's the matter?

[Guest clyde]

Mi vergognavo ad aprire il mio primo topic di richiesta di aiuto! Adesso sono fuori casa, quindi il codice non posso fornirlo. Il mio grande cruccio è questo. Sono in mezzo al codice dello script. Ho il player in una mappa, e lo voglio far comparire in un'altra mappa a bordo di un veicolo, per far vedere l'azione di discesa. Devo trasferire il player, farlo salire a bordo con get_on_vehicle. Naturalmente devo nascondere l'inghippo mandando a nero lo schermo. Solitamente userei un Graphics.fadeout, ma in mezzo c'è reserve_transfer che ridisegna lo schermo e rovina l'effetto. A questo punto ho pensato a Graphics.freeze, ma il maledetto ignora il Graphics.fadeout e quando chiamo Graphics.transition l'immagine di partenza è la mappa senza fadeout. Di nuovo effetto rovinato dalla mappa che fa capolino in mezzo al fade. Terza opzione, penso al fadeout di Game_Screen. Chiamo $game_map.screen.start_fadeout, ma devo ottenere subito la transizione, e per far questo devo usare il metodo duration.times { Fiber.yield } utilizzato anche dall'interprete (ricordo che Graphics.update non posso usarlo sia che uso Graphics.fadeout sia che uso Graphics.freeze). Questo funziona sempre tranne in un punto, dove restituisce l'errore dovuto al fatto di trovarsi nel root Fiber. Non conosco abbastanza il Fiber da cavarci troppo le mani, e non mi vengono altre soluzioni di due righe.

[Logum]

Perchè non metti tonalità nero, fai quello che devi fare, ripristino tonalità? Così salti fade e cose varie ed è bello che risolto...sempre se ho capito bene, poi io lo spiego ad "eventi" che andrebbero trasposti in script.

[Guest clyde]

Perchè non metti tonalità nero, fai quello che devi fare, ripristino tonalità? Così salti fade e cose varie ed è bello che risolto...sempre se ho capito bene, poi io lo spiego ad "eventi" che andrebbero trasposti in script.

Ripeto, in mezzo c'è reserve transfer che ridisegna lo schermo. La mappa viene ricaricata con tutti i dispose che ne conseguono. Paradossalmente ad eventi è la cosa più immediata del mondo. Purtroppo il Fiber è una novità per ruby e soprattutto per me. E oggi sono troppo stanco e poco lucido per lottarci.

[Holy87]

Il problema è che ti focalizzi di più su vari stratagemmi invece di arrivare alla radice della questione. Classe Game_Vehicle, metodo update_airship_altitude. Modificalo in modo da farla atterrare all'istante quando serve. Modifiando gli altri metodi nella classe ti verrà ancora più facile.

[Guest clyde]

Stavo cercando di mantenere i metodi originali intatti, comunque non hai centrato il punto. E oggi rivedendo con più attenzione comincio a credere che questo errore sia più strano del previsto. Innanzitutto, ammetto che Fiber sfugge ancora al mio controllo. Il comando Fiber yield ritorna al "parente" che ha chiamato il fiber. È intuitivo che il comando non possa essere usato nel root fiber, poichè questi non ha parenti. Ma non capisco come mai all'interno di una stessa classe dovrebbe dare errore in un solo punto. Comunque ho provato tutti i modi possibili per ovviare al problema del teletrasporto da effettuare al buio, e solo adesso mi sono accorto che l'immagine che fa capolino nel mio Graphics.transition fra nero e nuova mappa, non è un freeze della vecchia mappa, ma un freeze della nuova. O.o la situazione è: sto pilotando il veicolo. Arrivo alla terraferma e premo invio per scendere. Se il punto di atterraggio è valido, intercetto la normale procedura di discesa a terra. Con un giro di codice mando lo schermo a nero, il player scende dal veicolo e lo teletrasporto nella mappa dell'interno veicolo, lo schermo torna normale. Qui il metodo funziona. A questo punto il player decide di scendere dal veicolo. Schermo a nero, trasporto il player a terra lo faccio salire a bordo, riporto al normale lo schermo e lo faccio scendere davanti agli occhi dell'utente. Se non fosse che durante "Apri Schermo" fa capolino quell'inquietante fermoimmagine!

[BuddyTroller]

Scusate il necropost, ma volevo ricordare a questo script che lo odio ancora.

EDIT:
Ok, problem solved in 2 secondi dopo 2 anni.

 

#===============================================================================
# * Veicoli Esplorabili
#   Versione 1.0
#-------------------------------------------------------------------------------
# * Autore: Non voglio essere creditato
#===============================================================================
# BASATO SU:
#===============================================================================
# * Vehicle Interiors
#   Version 0.35b
#-------------------------------------------------------------------------------
# * Authored by: tenseiten/seitensei
# * With help from: shaz
#===============================================================================
#===============================================================================

=begin

.:Introduzione:.
Questo script permette di assegnare a ciascun veicolo una mappa che ne
rappresenta l'interno.


.:Istruzioni:.

-Per ogni veicolo, imposta qui nello script l'ID mappa e le coordinate 
  dell'interno.
-Nell'interno, posiziona un evento che permetta di pilotare il veicolo con:
  $game_player.pilot_vehicle
-Nell'interno, posiziona un evento che permetta di uscire dal veicolo con:
  $game_player.exit_vehicle

=end

#-------------------------------------------------------------------------------
# * Sezione Configurazione
#-------------------------------------------------------------------------------
module InterniVeicoli
 
  BOAT_ENABLED = true # La barca ha gli interni?
  BOAT_MAP = 4		    # ID Mappa
  BOAT_MAP_X = 13		  # Coordinata X di ingresso
  BOAT_MAP_Y = 4			# Coordinata Y di ingresso

  SHIP_ENABLED = true # La nave ha gli interni?
  SHIP_MAP = 3		    # ID Mappa
  SHIP_MAP_X = 10		  # Coordinata X di ingresso
  SHIP_MAP_Y = 12		  # Coordinata Y di ingresso

  AIRSHIP_ENABLED = true  # L'aeronave ha gli interni?
  AIRSHIP_MAP = 2			    # ID Mappa
  AIRSHIP_MAP_X = 11	    # Coordinata X di ingresso
  AIRSHIP_MAP_Y = 4	      # Coordinata Y di ingresso
  
end
#-------------------------------------------------------------------------------
# * Fine Configurazione
#-------------------------------------------------------------------------------


class Game_Player < Game_Character
  #--------------------------------------------------------------------------
  # * Get on Vehicle (From Overmap)
  #   Intercept the player, and send them inside.
  #--------------------------------------------------------------------------
  alias control_vehicle get_on_vehicle
  def get_on_vehicle
 
    front_x = $game_map.round_x_with_direction(@x, @direction)
    front_y = $game_map.round_y_with_direction(@y, @direction)
    
    if $game_map.boat.pos?(front_x, front_y)
      if InterniVeicoli::BOAT_ENABLED
        #Save world map information
        @player_w_map = $game_map.map_id
        @player_w_x = @x
        @player_w_y = @y
        @vehicle_w_x = front_x
        @vehicle_w_y = front_y
        @used_vehicle = :boat
        @vehicle_phase = "boarded"
        #Now Teleport to the map set in config
        reserve_transfer(InterniVeicoli::BOAT_MAP, InterniVeicoli::BOAT_MAP_X, InterniVeicoli::BOAT_MAP_Y, @direction)
      else
        #Continue to normal function when not enabled
        @vehicle_type = :boat
        control_vehicle
      end
    end

    if $game_map.ship.pos?(front_x, front_y)
      if InterniVeicoli::SHIP_ENABLED
        #Save world map information
        @player_w_map = $game_map.map_id
        @player_w_x = @x
        @player_w_y = @y
        @vehicle_w_x = front_x
        @vehicle_w_y = front_y
        @used_vehicle = :ship
        @vehicle_phase = "boarded"
        #Now Teleport to the map set in config
        reserve_transfer(InterniVeicoli::SHIP_MAP, InterniVeicoli::SHIP_MAP_X, InterniVeicoli::SHIP_MAP_Y, @direction)
      else
        #Continue to normal function when not enabled
        @vehicle_type = :ship
        control_vehicle
      end
    end

    if $game_map.airship.pos?(@x, @y)
      if InterniVeicoli::AIRSHIP_ENABLED
        #Save world map information
        @player_w_map = $game_map.map_id
        @player_w_x = @x
        @player_w_y = @y
        @used_vehicle = :airship
        @vehicle_phase = "boarded"
        #Now Teleport to the map set in config
        reserve_transfer(InterniVeicoli::AIRSHIP_MAP, InterniVeicoli::AIRSHIP_MAP_X, InterniVeicoli::AIRSHIP_MAP_Y, @direction) # transfer to new map
      else
        #Continue to normal function when not enabled
        @vehicle_type = :airship
        control_vehicle
      end
    end
  end

  #--------------------------------------------------------------------------
  # * Pilot Vehicle (From Interior)
  #   Brings player back to the overmap to control the ship
  #--------------------------------------------------------------------------
  def pilot_vehicle
    
    # Save Interior Map Location
    @player_int_map = $game_map.map_id
    @player_int_x = @x
    @player_int_y = @y
    
    # Transfer to World Map
    if @used_vehicle == :airship || @vehicle_phase == "onboard"
      reserve_transfer(@player_w_map, @player_w_x, @player_w_y, @direction)
    else
      reserve_transfer(@player_w_map, @vehicle_w_x, @vehicle_w_y, @direction)
    end
    @vehicle_phase = "onboard"
    @vehicle_type = @used_vehicle
    control_vehicle
  end

  #--------------------------------------------------------------------------
  # * Leave Vehicle (From Overmap)
  #   Intercept the player, and end them inside
  #--------------------------------------------------------------------------
  alias abandon_vehicle get_off_vehicle
  def get_off_vehicle
    custom = false
    custom = true if @vehicle_type == :boat && InterniVeicoli::BOAT_ENABLED
    custom = true if @vehicle_type == :ship && InterniVeicoli::SHIP_ENABLED
    custom = true if @vehicle_type == :airship && InterniVeicoli::AIRSHIP_ENABLED
    if custom == true
      if vehicle.land_ok?(@x, @y, @direction)
          set_direction(2) if in_airship?
          @followers.synchronize(@x, @y, @direction)
          vehicle.get_off
          unless in_airship?
            force_move_forward
            @transparent = false
          end
          @vehicle_getting_off = true
          @move_speed = 4
          @through = false
          make_encounter_count
          @followers.gather
        end
        @vehicle_getting_off
        if vehicle.land_ok?(@x, @y, @direction)
          @player_w_map = $game_map.map_id
          @player_w_x = @x
          @player_w_y = @y
          reserve_transfer(@player_int_map, @player_int_x, @player_int_y, @direction) # transfer to new map
        end
    else
      abandon_vehicle
    end
  end

  #--------------------------------------------------------------------------
  # * Exit Vehicle (From Interior)
  #   Returns the party to the overmap
  #--------------------------------------------------------------------------
  def exit_vehicle
    reserve_transfer(@player_w_map, @player_w_x, @player_w_y, @direction)
  end

end

 

 

Edited March 2, 2014 by BuddyTroller