irpg Community
8-Dir Movement - Printable Version

+- irpg Community (https://irpg.in.th)
+-- Forum: irpg Fabella RPG Maker Academia (https://irpg.in.th/forum-4.html)
+--- Forum: RGSS and JS Showcase (https://irpg.in.th/forum-26.html)
+--- Thread: 8-Dir Movement (/thread-181.html)

8-Dir Movement - LuZi - 07-04-2012

8-Dir Movement

สคริปต์เขียนโดย : JV Master
ลิงค์ต้นฉบับ : http://www.rpgmakervxace.net/topic/269-8-dir-move/

รายละเอียด :
ทำให้เพลเยอร์สามารถควบคุมทิศทางการเดินบนแมพได้ 8ทิศทาง และสนับสนุนรูปแบบ Charset แบบทะแยงมุม

วิธีการใช้งาน :
ให้ใส่สคริปต์ลงไป แล้วแก้IDของสวิตช์ให้เข้ากับเกมของเรา สวิตช์นี้เอาไว้ใช้เปิด/ปิด โหมดเดินเฉียง หรือใส่ ID 0ไปก็ได้ ถ้าอยากให้มันเดิน8ทิศตลอด
ไม่เอาเฉียงเลย ให้แก้ suffix (ชื่อต่อ) ของไฟล์ถ้าจำเป็น แล้วเราก็เอาsuffixนี้ไปใช้ในชื่อไฟล์ตัวละครที่เป็นแบบนี้ เช่น "Arshes[8dir].png"

รูปแบบของตัวละครที่เดินแบบ 8ทิศเป็นแบบในภาพ
[Image: 1zgagxw.png]


โค๊ดสคริปต์
Code:
#==============================================================================
# 8 Dir Move                                                  JV Master Script
#------------------------------------------------------------------------------
# Make player move in 8 dir, supports diagonal pattern.
#==============================================================================

module JvScripts
  module Dirs8
    
    Switch = 0               # Switch id for toggle 4/8 dir, 0 if always 8 dir
    DiagonalSuffix = "_di"   # Suffix for 8 dir charsets
                             # 8 dir charsets include in the first char
                             # the orthogonal and in the second the diagonal
  end
end

#==============================================================================
# Game CharacterBase
#==============================================================================
class Game_CharacterBase
  
  def move_diagonal(horz, vert)
    @move_succeed = diagonal_passable?(x, y, horz, vert)
    if @move_succeed
      @x = $game_map.round_x_with_direction(@x, horz)
      @y = $game_map.round_y_with_direction(@y, vert)
      @real_x = $game_map.x_with_direction(@x, reverse_dir(horz))
      @real_y = $game_map.y_with_direction(@y, reverse_dir(vert))
      increase_steps
    end
    if diagonal_charset?
      set_direction_diagonal(horz, vert)
    else
      set_direction(horz) if @direction == reverse_dir(horz)
      set_direction(vert) if @direction == reverse_dir(vert)
    end
  end
  
  def set_direction(d)
    if !@direction_fix && d != 0
      @direction = d
      @character_index = 0 if diagonal_charset?
    end
    @stop_count = 0
  end
  
  def set_direction_diagonal(horz, vert)
    if !@direction_fix && horz != 0 && vert != 0
      if horz == 4 && vert == 2
        @direction = 2
      elsif horz == 4 && vert == 8
        @direction = 4
      elsif horz == 6 && vert == 2
        @direction = 6
      elsif horz == 6 && vert == 8
        @direction = 8
      end
      
      @character_index = 1
    end
    @stop_count = 0
  end
  
  def diagonal_charset?
    true if @character_name.include?(JvScripts::Dirs8::DiagonalSuffix)
  end
end

#==============================================================================
# Game Player
#==============================================================================
class Game_Player < Game_Character
  def move_by_input
    return if !movable? || $game_map.interpreter.running?
    if JvScripts::Dirs8::Switch > 0
      if $game_switches[JvScripts::Dirs8::Switch] == true
        case Input.dir8
        when 2, 4, 6, 8
          move_straight(Input.dir4)
        when 1
          move_diagonal(4, 2)
        when 3
          move_diagonal(6, 2)
        when 7
          move_diagonal(4, 8)
        when 9
          move_diagonal(6, 8)
        end
      else
        move_straight(Input.dir4) if Input.dir4 > 0
      end
    else
      if Input.dir8 > 0
        case Input.dir8
        when 2, 4, 6, 8
          move_straight(Input.dir4)
        when 1
          move_diagonal(4, 2)
        when 3
          move_diagonal(6, 2)
        when 7
          move_diagonal(4, 8)
        when 9
          move_diagonal(6, 8)
        end
      end
    end
  end
end
#==============================================================================