Ruby Quellcode

#Call Script zum ändern der aktuellen Party-ID:
#  $game_system.reputation_group = ID
#Call Script in einem CB zum Abfragen der Werte
#  (n muss hier ersetzt werden duch 0 für den Level der Fraktion oder 1 für die Punkte)
#  $game_system.reputation[$game_system.reputation_group][n] (>/</>=/<=/==) 0
#Call Script zum Hinzufügen einer Fraktion:
#  f = "Fraktionsname"
#  x = $game_system.reputation_group
#  a = [Stufe (erste Stufe = 0), Punkte]
#  $game_system.reputation[x][f] = a
# Call Script zum ändern der Punkte einer Fraktion:
#  a = ["Fraktionsname", Punkteerhöhung (negative Zahl für Verringerung)]
#  $game_system.add_reputation(a)
 
class Scene_Reputation
 
  Fraktionen = ["Doofköppe", "Hanswürste", "Kuhle Schwule", "Tanzbären"]
 
  # ["Name", Farbe (Color.new(Rot, Grün, Blau)), Punkte]
  Stufen = [["Todfeinde", Color.new(0, 0, 0), 10000],
        	["Hasserfüllt", Color.new(255, 0, 0), 5000],
        	["Feindselig", Color.new(140, 50, 0), 200]
        	]
  # Anzahl der Spielergruppen
  Playergroups = 2
 
end
 
class Game_System
  attr_accessor :reputation
  attr_accessor :reputation_group
  alias_method :sdunhabguidiogudfasguidbasfgibasdf, :initialize
  def initialize
	sdunhabguidiogudfasguidbasfgibasdf
	@reputation = Array.new(Scene_Reputation::Playergroups) {|n| Hash.new}
	@reputation_group = 0
  end
  def add_reputation(array)
	id = $game_system.reputation_group
	key = array[0]
	n = array[1]
	return if !@reputation[id].has_key?(key)
	array = @reputation[id][key]
	array[1] += n
	if array[1] > Scene_Reputation::Stufen[array[0]][2]
  	array[1] = 0
  	array[0] = [array[0]+1, Scene_Reputation::Stufen.size-1].min
	elsif array[1] < 0
  	array[0] = [array[0]-1, 0].max
  	array[1] = Scene_Reputation::Stufen[array[0]][2]+array[1]
	end
  end
end
 
class Scene_Reputation
 
  def main
	@spriteset = Spriteset_Map.new
	@window = Window_Reputation.new
	Graphics.transition
	until $scene != self
  	Graphics.update
  	Input.update
  	update
	end
	Graphics.freeze
	@spriteset.dispose
	@window.dispose
  end
 
  def update
	@window.update
	if Input.trigger?(Input::B)
  	$game_system.se_play($data_system.cancel_se)
  	$scene = Scene_Menu.new(7)
	end
  end
 
end
 
class Window_Reputation < Window_Base
 
  def initialize
	super(65, 0, 510, 480)
	self.back_opacity = 155
	@windows = []
	refresh
  end
 
  def refresh
	@windows.each {|i| i.dispose}
	@windows = []
	self.contents.dispose if self.contents.is_a?(Bitmap) and !self.contents.disposed?
	hash = $game_system.reputation[$game_system.reputation_group]
	h = hash.size*32
	if h == 0
  	self.contents = Bitmap.new(width-32, 64)
  	b = make_ueberschrift
  	self.contents.blt(0, 0, b, b.rect)
  	return
	end
	self.contents = Bitmap.new(width-32, h+64)
	b = make_ueberschrift
	self.contents.blt(0, 0, b, b.rect)
	y = 0
	for i in Scene_Reputation::Fraktionen
  	if hash.has_key?(i)
    	draw_item(i, hash[i][0], hash[i][1], (y*35)+64)
    	y += 1
  	end
	end
	@max_scroll = [self.contents.height-448, 0].max
  end
 
  def dispose
	super
	@windows.each {|i| i.dispose}
  end
 
  def draw_item(name, level, punkte, y)
	array = Scene_Reputation::Stufen[level]
	# Name
	rect = Rect.new(0, y, 170, 32)
	self.contents.draw_text(rect, name, 1)
	# Stufe
	rect = Rect.new(340, y, 170, 32)
	self.contents.draw_text(rect, array[0], 1)
	# Balken
	b = create_balken(array[1], punkte, array[2])
	self.contents.blt(170, y+4, b, b.rect)
	add_window(Rect.new(0, y, self.width, 32))
  end
 
  def create_balken(color, punkte, maxpunkte)
	bitmap = Bitmap.new(170, 24)
	bitmap.fill_rect(bitmap.rect, Color.new(0,0,0))
	s = 3
	bitmap.fill_rect(s, s, bitmap.width-s*2, bitmap.height-s*2, Color.new(0,0,0,0))
	w = bitmap.width-s*2
	percent = punkte.to_f / maxpunkte
	w_perc = (w*percent).round
	bitmap.fill_rect(Rect.new(s, s, w_perc, bitmap.height-s*2), color)
	string = "#{punkte} / #{maxpunkte}"
	bitmap.draw_text(bitmap.rect, string, 1)
	[0, bitmap.width-1].each {|x| [0, bitmap.height-1].each {|y| bitmap.set_pixel(x, y, Color.new(0,0,0,0))}}
	bitmap
  end
 
  def update
	super
	speed = 3
	if Input.press?(2)
  	self.oy = [self.oy-speed, 0].max
	elsif Input.press?(8)
  	self.oy = [self.oy+speed, @max_scroll].min
	end
  end
 
  def make_ueberschrift
	bitmap = Bitmap.new(width-32, 64)
	bitmap.font.size = 35
	bitmap.draw_text(bitmap.rect, "Ansehen in Gérennia", 1)
	bitmap
  end
 
  def add_window(rect)
	x, y, w, h = rect.x+16+self.x, rect.y+16+self.y, rect.width-32, rect.height
	w = Window_Base.new(x,y,w,h)
	w.back_opacity = 0
	@windows << w
  end
 
end