[RMXP] Transición al Cambiar de Mapa

por YoshiGM el Dom Oct 17, 2010 9:21 pm

Código:: #SISTEMA DE TRANSICCIÓN AL CAMBIAR EL MAPA DE ÁNEMUS #primera y única propiedad editable con scripts #indica si antes de hacer la transición almapa pasará al negro. MNM = true class Interpreter # ------------------------------------ def command_201 if $game_temp.player_transferring or $game_temp.message_window_showing or $game_temp.transition_processing return false end $game_temp.player_transferring = true if @parameters[0]== 0 $game_temp.player_new_map_id = @parameters[1] $game_temp.player_new_x = @parameters[2] $game_temp.player_new_y = @parameters[3] $game_temp.player_new_direction = @parameters[4] else $game_temp.player_new_map_id = $game_variables[@parameters[1]] $game_temp.player_new_x = $game_variables[@parameters[2]] $game_temp.player_new_y = $game_variables[@parameters[3]] $game_temp.player_new_direction = @parameters[4] end @index += 1 if @parameters[5] == 0 #Graphics.freeze $game_temp.transition_processing = true #$game_temp.transition_name = "" end return false end end class Scene_Map def transfer_player $game_temp.player_transferring = false if $game_map.map_id != $game_temp.player_new_map_id $game_map.setup($game_temp.player_new_map_id) end $game_player.moveto($game_temp.player_new_x, $game_temp.player_new_y) case $game_temp.player_new_direction when 2 $game_player.turn_down when 4 $game_player.turn_left when 6 $game_player.turn_right when 8 $game_player.turn_up end $game_player.straighten $game_map.update if $trans == nil $trans = "" end if $trans == "" if MNM Graphics.freeze @spriteset.dispose Graphics.transition(10) Graphics.freeze @spriteset = Spriteset_Map.new Graphics.transition(10) else Graphics.freeze @spriteset.dispose @spriteset = Spriteset_Map.new Graphics.transition(20) end else @trans2 = $trans if FileTest.exist?("Graphics/Transitions/"+@trans2+"-.png") @trans2 += "-" end if MNM Graphics.freeze @spriteset.dispose Graphics.transition(10, "Graphics/Transitions/"+$trans) Graphics.freeze @spriteset = Spriteset_Map.new Graphics.transition(10, "Graphics/Transitions/"+@trans2) else Graphics.freeze @spriteset.dispose @spriteset = Spriteset_Map.new Graphics.transition(20, "Graphics/Transitions/"+$trans) end end $trans = "" $game_map.autoplay Graphics.frame_reset Input.update end end

Hay que añadirlo arriba de MAIN y para probarlo pongan el comando teletransportar y ya sera el efecto ;)

por picoro el Dom Oct 31, 2010 8:15 pm

O.o esta genial.. Se agradece el aporte :D

[RMXP] Transición al Cambiar de Mapa

[RMXP] Transición al Cambiar de Mapa

Re: [RMXP] Transición al Cambiar de Mapa