# =============================================================================
# TheoAllen - Reverse Input Control
# Version : 1.0
# Contact : www.rpgmakerid.com (or) http://theolized.blogspot.com
# (This script documentation is written in informal indonesian language)
# =============================================================================
($imported ||= {})[:Theo_ReverseInput] = true
# =============================================================================
# Change Logs:
# -----------------------------------------------------------------------------
# 2014.02.13 - Finished script
# =============================================================================
=begin

  Perkenalan :
  Script ini bisa ngebikin movement player jadi terbalik
  
  Cara penggunaan :
  Pasang script ini di bawah material namun di atas main
  Gunakan script call seperti ini untuk nyettingnya
  
  Input.reverse = true
  Input.reverse = false
  
  Inget, untuk nulisin Input, huruf I harus gede ~
  
  Terms of use :
  Credit gw, TheoAllen. Kalo semisal u bisa ngedit2 script gw trus jadi lebih
  keren, terserah. Ane bebasin. Asal ngga ngeklaim aja. Kalo semisal mau
  dipake buat komersil, jangan lupa, gw dibagi gratisannya.  

=end
# =============================================================================
# Tidak ada konfigurasi
# =============================================================================
class << Input
  attr_accessor :reverse
  
  def reverse_dir4
    case theo_reverse_dir4
    when 0
      return 0
    when 2
      return 8
    when 4
      return 6
    when 6
      return 4
    when 8
      return 2
    end
  end
  
  alias theo_reverse_dir4 dir4
  def dir4
    reverse ? reverse_dir4 : theo_reverse_dir4
  end
  
  def reverse_dir8
    case theo_reverse_dir8
    when 0
      return 0
    when 1
      return 9
    when 2
      return 8
    when 3
      return 7
    when 4
      return 6
    when 6
      return 4
    when 7
      return 3
    when 8
      return 2
    when 9
      return 1
    end
  end
  
  alias theo_reverse_dir8 dir8
  def dir8
    reverse ? reverse_dir8 : theo_reverse_dir8
  end
  
end