Script

class Game_Character

  def ride_down(turn_enabled = true)
    if $PokemonGlobal.ride
      if turn_enabled
        turn_down
      elsif passable?(@x, @y, 2)
        return if pbLedge(0,1)
        return if pbEndSurf(0,1)
      turn_down
      @y += 1
      increase_steps
      elsif !check_event_trigger_touch(@x, @y+1)
        if !@bump_se || @bump_se<=0
          pbSEPlay("bump"); @bump_se=10
        end
      end
    end
  end

  def ride_left(turn_enabled = true)
    if $PokemonGlobal.ride
      if turn_enabled
        turn_left
      elsif passable?(@x, @y, 4)
        return if pbLedge(-1,0)
        return if pbEndSurf(-1,0)
      turn_left
      @x -= 1
      increase_steps
      elsif !check_event_trigger_touch(@x-1, @y)
        if !@bump_se || @bump_se<=0
          pbSEPlay("bump"); @bump_se=10
        end
      end
    end
  end

  def ride_right(turn_enabled = true)
    if $PokemonGlobal.ride
      if turn_enabled
        turn_right
      elsif passable?(@x, @y, 6)
        return if pbLedge(1,0)
        return if pbEndSurf(1,0)
      turn_right
      @x += 1
      increase_steps
      elsif !check_event_trigger_touch(@x+1, @y)
        if !@bump_se || @bump_se<=0
          pbSEPlay("bump"); @bump_se=10
        end
      end
    end
  end

  def ride_up(turn_enabled = true)
    if $PokemonGlobal.ride
      if turn_enabled
        turn_up
      elsif passable?(@x, @y, 8)
        return if pbLedge(0,-1)
        return if pbEndSurf(0,-1)
      turn_up
      @y -= 1
      increase_steps
      elsif !check_event_trigger_touch(@x, @y-1)
        if !@bump_se || @bump_se<=0
          pbSEPlay("bump"); @bump_se=10
        end
      end
    end
  end
end