- 注册时间
- 2004-3-5
- 最后登录
- 2016-1-1
⑧专业
赋予你第五自由
- 积分
- 108021
|
发表于 2006-1-29 22:57:19
|
显示全部楼层
使用事件的话...很麻烦,这里建议使用脚本
(注释会是乱码,不用理会)
来源:
http://www4.big.or.jp/~fukuyama/
作者E-MAIL:
fukuyama@alles.or.jp
- # ▼▲▼ XRXS13. Train_Actor ▼▲▼
- # by fukuyama
- # ●透明状態用スイッチ設定
- # true だとスイッチ制御を行う
- # TRAIN_ACTOR_TRANSPARENT_SWITCH = true
- TRAIN_ACTOR_TRANSPARENT_SWITCH = false
- # ●透明状態用スイッチ番号
- # この番号のスイッチがONだと透明になる
- TRAIN_ACTOR_TRANSPARENT_SWITCHES_INDEX = 20
- # ●アクターの最大数
- # 将来的に多人数パーティが出来るようになったら…
- TRAIN_ACTOR_SIZE_MAX = 4
- # 定数
- #InputDOWN = 2 # この辺はちゃんと定数あった…
- #InputLEFT = 4
- #InputRIGHT = 6
- #InputUP = 8
- DOWN_LEFT = 1
- DOWN_RIGHT = 3
- UP_LEFT = 7
- UP_RIGHT = 9
- JUMP = 5
- class Game_Party_Actor Game_Character
- def initialize
- super()
- @through = true
- end
- def setup(actor)
- # キャラクターのファイル名と色相を設定
- if actor != nil
- @character_name = actor.character_name
- @character_hue = actor.character_hue
- else
- @character_name =
- @character_hue = 0
- end
- # 不透明度と合成方法を初期化
- @opacity = 255
- @blend_type = 0
- end
- def screen_z(height = 0)
- if $game_player.x == @x and $game_player.y == @y
- return $game_player.screen_z(height) - 1
- end
- super(height)
- end
- #--------------------------------------------------------------------------
- # ● 下に移動
- # turn_enabled その場での向き変更を許可するフラグ
- #--------------------------------------------------------------------------
- def move_down(turn_enabled = true)
- # 下を向く
- if turn_enabled
- turn_down
- end
- # 通行可能な場合
- if passable(@x, @y, InputDOWN)
- # 下を向く
- turn_down
- # 座標を更新
- @y += 1
- end
- end
- #--------------------------------------------------------------------------
- # ● 左に移動
- # turn_enabled その場での向き変更を許可するフラグ
- #--------------------------------------------------------------------------
- def move_left(turn_enabled = true)
- # 左を向く
- if turn_enabled
- turn_left
- end
- # 通行可能な場合
- if passable(@x, @y, InputLEFT)
- # 左を向く
- turn_left
- # 座標を更新
- @x -= 1
- end
- end
- #--------------------------------------------------------------------------
- # ● 右に移動
- # turn_enabled その場での向き変更を許可するフラグ
- #--------------------------------------------------------------------------
- def move_right(turn_enabled = true)
- # 右を向く
- if turn_enabled
- turn_right
- end
- # 通行可能な場合
- if passable(@x, @y, InputRIGHT)
- # 右を向く
- turn_right
- # 座標を更新
- @x += 1
- end
- end
- #--------------------------------------------------------------------------
- # ● 上に移動
- # turn_enabled その場での向き変更を許可するフラグ
- #--------------------------------------------------------------------------
- def move_up(turn_enabled = true)
- # 上を向く
- if turn_enabled
- turn_up
- end
- # 通行可能な場合
- if passable(@x, @y, InputUP)
- # 上を向く
- turn_up
- # 座標を更新
- @y -= 1
- end
- end
- #--------------------------------------------------------------------------
- # ● 左下に移動
- #--------------------------------------------------------------------------
- def move_lower_left
- # 向き固定でない場合
- unless @direction_fix
- # 右向きだった場合は左を、上向きだった場合は下を向く
- @direction = (@direction == InputRIGHT InputLEFT @direction == InputUP InputDOWN @direction)
- end
- # 下→左、左→下 のどちらかのコースが通行可能な場合
- if (passable(@x, @y, InputDOWN) and passable(@x, @y + 1, InputLEFT)) or
- (passable(@x, @y, InputLEFT) and passable(@x - 1, @y, InputDOWN))
- # 座標を更新
- @x -= 1
- @y += 1
- end
- end
- #--------------------------------------------------------------------------
- # ● 右下に移動
- #--------------------------------------------------------------------------
- def move_lower_right
- # 向き固定でない場合
- unless @direction_fix
- # 左向きだった場合は右を、上向きだった場合は下を向く
- @direction = (@direction == InputLEFT InputRIGHT @direction == InputUP InputDOWN @direction)
- end
- # 下→右、右→下 のどちらかのコースが通行可能な場合
- if (passable(@x, @y, InputDOWN) and passable(@x, @y + 1, InputRIGHT)) or
- (passable(@x, @y, InputRIGHT) and passable(@x + 1, @y, InputDOWN))
- # 座標を更新
- @x += 1
- @y += 1
- end
- end
- #--------------------------------------------------------------------------
- # ● 左上に移動
- #--------------------------------------------------------------------------
- def move_upper_left
- # 向き固定でない場合
- unless @direction_fix
- # 右向きだった場合は左を、下向きだった場合は上を向く
- @direction = (@direction == InputRIGHT InputLEFT @direction == InputDOWN InputUP @direction)
- end
- # 上→左、左→上 のどちらかのコースが通行可能な場合
- if (passable(@x, @y, InputUP) and passable(@x, @y - 1, InputLEFT)) or
- (passable(@x, @y, InputLEFT) and passable(@x - 1, @y, InputUP))
- # 座標を更新
- @x -= 1
- @y -= 1
- end
- end
- #--------------------------------------------------------------------------
- # ● 右上に移動
- #--------------------------------------------------------------------------
- def move_upper_right
- # 向き固定でない場合
- unless @direction_fix
- # 左向きだった場合は右を、下向きだった場合は上を向く
- @direction = (@direction == InputLEFT InputRIGHT @direction == InputDOWN InputUP @direction)
- end
- # 上→右、右→上 のどちらかのコースが通行可能な場合
- if (passable(@x, @y, InputUP) and passable(@x, @y - 1, InputRIGHT)) or
- (passable(@x, @y, InputRIGHT) and passable(@x + 1, @y, InputUP))
- # 座標を更新
- @x += 1
- @y -= 1
- end
- end
- attr_writer :move_speed
- end
- module Train_Actor_Spriteset_Map_Module
- def setup_actor_character_sprites?
- return @setup_actor_character_sprites_flag != nil
- end
- def setup_actor_character_sprites(characters)
- if !setup_actor_character_sprites?
- index_game_player = 0
- @character_sprites.each_index do |i|
- if @character_sprites[i].character.instance_of?(Game_Player)
- index_game_player = i
- break
- end
- end
- for character in characters.reverse
- @character_sprites.unshift(
- Sprite_Character.new(@viewport1, character)
- )
- end
- @setup_actor_character_sprites_flag = true
- end
- end
- end
- module Train_Actor_Scene_Map_Module
- def setup_actor_character_sprites(characters)
- @spriteset.setup_actor_character_sprites(characters)
- end
- end
- module Train_Actor_Game_Party_Module
- def set_transparent_actors(transparent)
- @transparent = transparent
- end
- def setup_actor_character_sprites
- if @characters == nil
- @characters = []
- for i in 1 ... TRAIN_ACTOR_SIZE_MAX
- @characters.push(Game_Party_Actor.new)
- end
- end
- for i in 1 ... TRAIN_ACTOR_SIZE_MAX
- @characters[i - 1].setup(actors[i])
- end
- if $scene.instance_of?(Scene_Map)
- $scene.setup_actor_character_sprites(@characters)
- end
- end
- def update_party_actors
- setup_actor_character_sprites
- transparent = $game_player.transparent
- if transparent == false
- if TRAIN_ACTOR_TRANSPARENT_SWITCH
- transparent = $game_switches[TRAIN_ACTOR_TRANSPARENT_SWITCHES_INDEX]
- end
- end
- for character in @characters
- character.transparent = transparent
- character.move_speed = $game_player.move_speed
- character.update
- end
- end
- def moveto_party_actors( x, y )
- setup_actor_character_sprites
- for character in @characters
- character.moveto( x, y )
- end
- if @move_list == nil
- @move_list = []
- end
- move_list_setup
- end
- def move_party_actors
- if @move_list == nil
- @move_list = []
- move_list_setup
- end
- @move_list.each_index do |i|
- if @characters[i] != nil
- case @move_list[i].type
- when Input::DOWN
- @characters[i].move_down(@move_list[i].args[0])
- when Input::LEFT
- @characters[i].move_left(@move_list[i].args[0])
- when Input::RIGHT
- @characters[i].move_right(@move_list[i].args[0])
- when Input::UP
- @characters[i].move_up(@move_list[i].args[0])
- when DOWN_LEFT
- @characters[i].move_lower_left
- when DOWN_RIGHT
- @characters[i].move_lower_right
- when UP_LEFT
- @characters[i].move_upper_left
- when UP_RIGHT
- @characters[i].move_upper_right
- when JUMP
- @characters[i].jump(@move_list[i].args[0],@move_list[i].args[1])
- end
- end
- end
- end
- class Train_Actor_Move_List_Element
- def initialize(type,args)
- @type = type
- @args = args
- end
- def type() return @type end
- def args() return @args end
- end
- def move_list_setup
- for i in 0 .. TRAIN_ACTOR_SIZE_MAX
- @move_list[i] = nil
- end
- end
- def add_move_list(type,*args)
- @move_list.unshift(Train_Actor_Move_List_Element.new(type,args)).pop
- end
- def move_down_party_actors(turn_enabled = true)
- move_party_actors
- add_move_list(Input::DOWN,turn_enabled)
- end
- def move_left_party_actors(turn_enabled = true)
- move_party_actors
- add_move_list(Input::LEFT,turn_enabled)
- end
- def move_right_party_actors(turn_enabled = true)
- move_party_actors
- add_move_list(Input::RIGHT,turn_enabled)
- end
- def move_up_party_actors(turn_enabled = true)
- move_party_actors
- add_move_list(Input::UP,turn_enabled)
- end
- def move_lower_left_party_actors
- move_party_actors
- add_move_list(DOWN_LEFT)
- end
- def move_lower_right_party_actors
- move_party_actors
- add_move_list(DOWN_RIGHT)
- end
- def move_upper_left_party_actors
- move_party_actors
- add_move_list(UP_LEFT)
- end
- def move_upper_right_party_actors
- move_party_actors
- add_move_list(UP_RIGHT)
- end
- def jump_party_actors(x_plus, y_plus)
- move_party_actors
- add_move_list(JUMP,x_plus, y_plus)
- end
- end
- module Train_Actor_Game_Player_Module
- def update
- $game_party.update_party_actors
- super
- end
- def moveto( x, y )
- $game_party.moveto_party_actors( x, y )
- super( x, y )
- end
- def move_down(turn_enabled = true)
- if passable?(@x, @y, Input::DOWN)
- $game_party.move_down_party_actors(turn_enabled)
- end
- super(turn_enabled)
- end
- def move_left(turn_enabled = true)
- if passable?(@x, @y, Input::LEFT)
- $game_party.move_left_party_actors(turn_enabled)
- end
- super(turn_enabled)
- end
- def move_right(turn_enabled = true)
- if passable?(@x, @y, Input::RIGHT)
- $game_party.move_right_party_actors(turn_enabled)
- end
- super(turn_enabled)
- end
- def move_up(turn_enabled = true)
- if passable?(@x, @y, Input::UP)
- $game_party.move_up_party_actors(turn_enabled)
- end
- super(turn_enabled)
- end
- def move_lower_left
- # 壓仺嵍丄嵍仺壓 偺偳偪傜偐偺僐乕僗偑捠峴壜擻側応崌\\n if (passable?(@x, @y, Input::DOWN) and passable?(@x, @y + 1, Input::LEFT)) or
- (passable?(@x, @y, Input::LEFT) and passable?(@x - 1, @y, Input::DOWN))
- $game_party.move_lower_left_party_actors
- end
- super
- end
- def move_lower_right
- # 壓仺塃丄塃仺壓 偺偳偪傜偐偺僐乕僗偑捠峴壜擻側応崌\\n if (passable?(@x, @y, Input::DOWN) and passable?(@x, @y + 1, Input::RIGHT)) or
- (passable?(@x, @y, Input::RIGHT) and passable?(@x + 1, @y, Input::DOWN))
- $game_party.move_lower_right_party_actors
- end
- super
- end
- def move_upper_left
- # 忋仺嵍丄嵍仺忋 偺偳偪傜偐偺僐乕僗偑捠峴壜擻側応崌\\n if (passable?(@x, @y, Input::UP) and passable?(@x, @y - 1, Input::LEFT)) or
- (passable?(@x, @y, Input::LEFT) and passable?(@x - 1, @y, Input::UP))
- $game_party.move_upper_left_party_actors
- end
- super
- end
- def move_upper_right
- # 忋仺塃丄塃仺忋 偺偳偪傜偐偺僐乕僗偑捠峴壜擻側応崌\\n if (passable?(@x, @y, Input::UP) and passable?(@x, @y - 1, Input::RIGHT)) or
- (passable?(@x, @y, Input::RIGHT) and passable?(@x + 1, @y, Input::UP))
- $game_party.move_upper_right_party_actors
- end
- super
- end
- def jump(x_plus, y_plus)
- # 怴偟偄嵗昗傪寁嶼
- new_x = @x + x_plus
- new_y = @y + y_plus
- # 壛嶼抣偑 (0,0) 偺応崌偐丄僕儍儞僾愭偑捠峴壜擻側応崌\\n if (x_plus == 0 and y_plus == 0) or passable?(new_x, new_y, 0)
- $game_party.jump_party_actors(x_plus, y_plus)
- end
- super(x_plus, y_plus)
- end
-
- # -----------------------------------------------
- # move_speed 傪奜偐傜尒傟傞傛偆偵
- # -----------------------------------------------
- attr_reader :move_speed
- end
- class Game_Party
- include Train_Actor_Game_Party_Module
- end
- class Game_Player
- include Train_Actor_Game_Player_Module
- end
- class Spriteset_Map
- include Train_Actor_Spriteset_Map_Module
- end
- class Scene_Map
- include Train_Actor_Scene_Map_Module
- end
- # Train_Actor
复制代码 |
|