Accueil
Rechercher
Dernières images
S'enregistrer
Connexion
Aider RPG SocrateConnexion
Meilleurs posteurs
| Yosura (252) |
| |||
| L'homme sans visage (225) |
| |||
| The Best of Maker (196) |
| |||
| okaya (103) |
| |||
| kilari (26) |
| |||
| apocalypse (8) |
| |||
| Shaymin (6) |
| |||
| EM!R'Ald (4) |
| |||
| yojoqc (3) |
| |||
| fandbz13 (3) |
|
Horloge Socratienne
Nombre de Visiteurs
Derniers sujets
[Partenaire] Super RPG
Sam 24 Jan 2009 - 0:38 par L\'homme sans visage
Voici le site de nôtre ami The Best of Maker.
Il parle de RPG maker (vous l'aurez sûrement devinez
) :
Super RPG
Il parle de RPG maker (vous l'aurez sûrement devinez
) :Super RPG
Commentaires: 0
Lutter contre le SPAM
Grande map
2 participants
RPG Socrate :: Général :: Scripts :: Carte
Page 1 sur 1
Grande map
par okaya Ven 27 Fév 2009 - 15:47
Ouvrez l'éditeur de script ( F11 ) et faites un nouveau script au dessus de "Main", nommez le "Big Map" et collez le code ci-dessous
- Code:
#==============================================================================
# ** EJ Big Map
#------------------------------------------------------------------------------
# EJ
# Version 1
# 2005 April 9
#==============================================================================
#--------------------------------------------------------------------------
# * SDK Log Script
#--------------------------------------------------------------------------
SDK.log('EJ Big Map', 'EJ', 1, '2005-04-09')
#--------------------------------------------------------------------------
# * Begin SDK Enable Test
#--------------------------------------------------------------------------
if SDK.state('EJ Big Map') == true
class Game_Temp
attr_accessor :map_changed
attr_accessor :player_transferring2
end
class Game_Map
alias ej_bmap_g_map_setup_load setup_load
alias ej_bmap_g_map_setup_events setup_events
#------------------------------------------------------------------------
attr_accessor :big_map
attr_accessor :a_width
attr_accessor :a_height
attr_accessor :a_tl
attr_accessor :a_tc
attr_accessor :a_tr
attr_accessor :a_cl
attr_accessor :a_cr
attr_accessor :a_bl
attr_accessor :a_bc
attr_accessor :a_br
#------------------------------------------------------------------------
BIG_MAP_ID = 1
#------------------------------------------------------------------------
def setup_load
# load the map
ej_bmap_g_map_setup_load
@a_width = @map.width
@a_height = @map.height
# get the area settings
b_name = name.split
if b_name[0] != 'BM'
@big_map = false
return
end
if @big_map != true
$game_temp.map_changed = true
end
@big_map = true
@a_tl = b_name[1].to_i
@a_tc = b_name[2].to_i
@a_tr = b_name[3].to_i
@a_cl = b_name[4].to_i
@a_cr = b_name[5].to_i
@a_bl = b_name[6].to_i
@a_bc = b_name[7].to_i
@a_br = b_name[8].to_i
# load the empty map
@map = load_data(sprintf('Data/Map%03d.rxdata', BIG_MAP_ID))
#top left map
map_b = load_data(sprintf('Data/Map%03d.rxdata', @a_tl))
for z in 0..2
for y in 0..@a_height - 1
for x in 0..@a_width - 1
@map.data[x, y, z] = map_b.data[x, y, z]
end
end
end
#top map
map_b = load_data(sprintf('Data/Map%03d.rxdata', @a_tc))
for z in 0..2
for y in 0..@a_height - 1
for x in 0..@a_width - 1
@map.data[x + @a_width, y, z] = map_b.data[x, y, z]
end
end
end
#top right map
map_b = load_data(sprintf('Data/Map%03d.rxdata', @a_tr))
for z in 0..2
for y in 0..@a_height - 1
for x in 0..@a_width - 1
@map.data[x + (@a_width * 2), y, z] = map_b.data[x, y, z]
end
end
end
#center left map
map_b = load_data(sprintf('Data/Map%03d.rxdata', @a_cl))
for z in 0..2
for y in 0..@a_height - 1
for x in 0..@a_width - 1
@map.data[x, y + @a_height, z] = map_b.data[x, y, z]
end
end
end
#center map
map_b = load_data(sprintf('Data/Map%03d.rxdata', @map_id))
for z in 0..2
for y in 0..@a_height - 1
for x in 0..@a_width - 1
@map.data[x + @a_width, y + @a_height, z] = map_b.data[x, y, z]
end
end
end
#events
@map.events = map_b.events
@map.encounter_list = map_b.encounter_list
@map.encounter_step = map_b.encounter_step
#center right map
map_b = load_data(sprintf('Data/Map%03d.rxdata', @a_cr))
for z in 0..2
for y in 0..@a_height - 1
for x in 0..@a_width - 1
@map.data[x + (@a_width * 2), y + @a_height, z] = map_b.data[x, y, z]
end
end
end
#bottom left map
map_b = load_data(sprintf('Data/Map%03d.rxdata', @a_bl))
for z in 0..2
for y in 0..@a_height - 1
for x in 0..@a_width - 1
@map.data[x, y + (@a_height * 2), z] = map_b.data[x, y, z]
end
end
end
#bottom map
map_b = load_data(sprintf('Data/Map%03d.rxdata', @a_bc))
for z in 0..2
for y in 0..@a_height - 1
for x in 0..@a_width - 1
@map.data[x + @a_width, y+ (@a_height * 2), z] = map_b.data[x, y, z]
end
end
end
#bottom right map
map_b = load_data(sprintf('Data/Map%03d.rxdata', @a_br))
for z in 0..2
for y in 0..@a_height - 1
for x in 0..@a_width - 1
@map.data[x + (@a_width * 2), y +(@a_height * 2), z] = map_b.data[x, y, z]
end
end
end
end
#----------------------------------------------------------------------
def setup_events
ej_bmap_g_map_setup_events
for event in @events.values
event.moveto(event.x + @a_width, event.y + @a_height)
end
end
#----------------------------------------------------------------------
def name
return $map_infos[@map_id]
end
end
class Game_Player < Game_Character
alias ej_bmap_g_player_update update
alias ej_bmap_g_player_moveto moveto
#------------------------------------------------------------------------
def update
if $game_map.big_map == true
unless moving?
if @x == $game_map.a_width and @direction == 4
#left
unless $game_temp.player_transferring and
$game_temp.message_window_showing and
$game_temp.transition_processing
$game_temp.player_transferring = true
$game_temp.player_transferring2 = true
$game_temp.player_new_map_id = $game_map.a_cl
$game_temp.player_new_x = @x + $game_map.a_width
$game_temp.player_new_y = @y
$game_temp.transition_processing = false
end
elsif @y == $game_map.a_height and @direction == 8
#up
unless $game_temp.player_transferring and
$game_temp.message_window_showing and
$game_temp.transition_processing
$game_temp.player_transferring = true
$game_temp.player_transferring2 = true
$game_temp.player_new_map_id = $game_map.a_tc
$game_temp.player_new_x = @x
$game_temp.player_new_y = @y + $game_map.a_height
$game_temp.transition_processing = false
end
elsif @x == ($game_map.a_width*2)-1 and @direction == 6
#right
unless $game_temp.player_transferring and
$game_temp.message_window_showing and
$game_temp.transition_processing
$game_temp.player_transferring = true
$game_temp.player_transferring2 = true
$game_temp.player_new_map_id = $game_map.a_cr
$game_temp.player_new_x = @x - $game_map.a_width
$game_temp.player_new_y = @y
$game_temp.transition_processing = false
end
elsif @y == ($game_map.a_height*2)-1 and @direction == 2
#down
unless $game_temp.player_transferring and
$game_temp.message_window_showing and
$game_temp.transition_processing
$game_temp.player_transferring = true
$game_temp.player_transferring2 = true
$game_temp.player_new_map_id = $game_map.a_bc
$game_temp.player_new_x = @x
$game_temp.player_new_y = @y - $game_map.a_height
$game_temp.transition_processing = false
end
end
end
end
ej_bmap_g_player_update
end
#----------------------------------------------------------------------
def moveto(x,y)
if $game_temp.map_changed == true
ej_bmap_g_player_moveto(x + $game_map.a_width, y + $game_map.a_height)
$game_temp.map_changed = false
else
ej_bmap_g_player_moveto(x, y)
end
end
end
class Scene_Map
alias ej_bmap_s_map_transfer_player transfer_player
#------------------------------------------------------------------------
def transfer_player
if $game_temp.player_transferring2
$game_temp.player_transferring = false
$game_temp.player_transferring2 = false
$game_map.setup($game_temp.player_new_map_id)
$game_player.moveto($game_temp.player_new_x, $game_temp.player_new_y)
#$game_map.update
@spriteset.dispose
@spriteset = Spriteset_Map.new
$game_map.autoplay
else
ej_bmap_s_map_transfer_player
end
end
end
class Scene_Title
alias ej_bmap_s_title_main main
#------------------------------------------------------------------------
def main
$map_infos = load_data('Data/MapInfos.rxdata')
for key in $map_infos.keys
$map_infos[key] = $map_infos[key].name
end
ej_bmap_s_title_main
end
end
#--------------------------------------------------------------------------
# * End SDK Enable Test
#--------------------------------------------------------------------------
end # End SDK Check
okaya- Secrétaire Général
-
Nombre de messages : 103
Age : 26
Localisation : BOULOGNE-BILLANCOURT
Avertissement :
Points : 7589
Date d'inscription : 09/01/2009
Re: Grande map
par L\'homme sans visage Ven 27 Fév 2009 - 17:56
Euh, juste une question...
A quoi set-il ?
A quoi set-il ?
L\'homme sans visage- Empereur Suprême
-
Nombre de messages : 225
Localisation : Mais c'est quoi ct'e question !
Avertissement :
Points : 12831
Date d'inscription : 26/11/2008 -
RPG Socrate :: Général :: Scripts :: Carte
Page 1 sur 1
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum|
|
|
» parodie des jeux pokemon
» Rpg maker xp
» Présentation de kaplio0777
» me presenté
» créer un jeu de rôle
» se presenter
» Serment du Juge actuel
» Le Réseau Social - Parodie de la BA de The Social Network