Chaos Project

class Game_Actor < Game_Battler
  def state_probability(state_id)
    if $data_states[state_id].nonresistance
      return 100
    else
      rank = $data_classes[@class_id].state_ranks[state_id]
      return [0,100,80,60,40,20,0][rank]
    end
  end
end
class Window_StatusItem < Window_Base
	def draw_status_resistances
		@pages = []; lines = []; @spacing = 24
		AFFINITIES[:states_shown].each do |i|
			state = $data_states[i].name
			state.each {|line| lines << line}
		end		
		page_numbers = (lines.size / 22) + 1
		page_numbers.times {|i| @pages[i] = lines[i*22, 22]}			
		states_text
	end
	def states_text 
		contents.clear
		draw_background
		draw_status_header(:states_title)
		draw_states_list
	end
	def draw_states_list
		dx = 48; dy = 48; dw = calc_ele_width(AFFINITIES[:states_shown])
		page = @pages[@page_number - 1]
		page.each_index do |i| 
			rect = item_rect(i)	
			dx2 = rect.x += dx; rect.y += dy
			next if page[i].nil?
			begin
				draw_icon(page[i], rect.x, rect.y)
			rescue
			end			
			contents.font.color = normal_color; contents.font.size = Font.default_size
			rect.x += 26; rect.width += dw+20
			contents.draw_text(rect, page[i])
			contents.font.color = rank_colour(@actor.state_probability(i))
			resist = sprintf("%d%%", @actor.state_probability(i))
			contents.font.size = 16
			contents.draw_text(dx2+dx+44+dw, rect.y, 60, 24, resist, 2)			
		end
		page_footer
	end
	def rank_colour(amount)
		if amount > 100;   AFFINITIES[:rank_colour][:srank]
		elsif amount > 80; AFFINITIES[:rank_colour][:arank]
		elsif amount > 60; AFFINITIES[:rank_colour][:brank]
		elsif amount > 40; AFFINITIES[:rank_colour][:crank]
		elsif amount > 20; AFFINITIES[:rank_colour][:drank]
		elsif amount > 0;  AFFINITIES[:rank_colour][:erank]
		else AFFINITIES[:rank_colour][:frank]
		end
	end
	def calc_state_width(states)
		return $game_temp.status_st_width if !$game_temp.status_st_width.nil?
		n = 0
		states.each do |state_id|
			next if $data_states[state_id].nil?
			n = [n, contents.text_size($data_states[state_id].name).width].max
		end
		$game_temp.status_st_width = n
		return n
	end
end