*Random enemy parameters

[Kingartur2]

Random Enemy Parameters

Descrizione

Permette di rendere variabili tutti i parametri dei mostri indicati di un valore da sse stessi indicato

Autore

Kingartur2

 

Allegati

N/A

Istruzioni per l'uso

 

#===============================================================
# Kingartur2 - script
# Data : 16/11/2009
# Versione : 1.0
#===============================================================
# Configurazione
#===============================================================
module Random_Enemy
	#===============================================================
	# Enemy_id = [id_nemico, id_nemico, ......]
	# id_nemico = id dei nemici che avranno la loro
	# caratteristiche randomizzate
	#===============================================================
	Enemy_id = [1]
	#===============================================================
	#===============================================================
	# Max_Value = { id_nemico => value }
	# id_nemico = id del nemico specificato prima
	# value = valore massimo di inflazione che indica i
	# massimi punti che puo perdere/guadagnare
	# in ogni statistica
	#===============================================================
	Max_Value = {
	1=>10
	}
	#===============================================================
	#==============================================================
	# FINE CONFIGURAZIONE
	#===============================================================
end
$randomizable = {} if $randomizable == nil
$randomizable["enemy"] = true
class Game_Enemy < Game_Battler
	alias lol initialize
	def initialize(troop_id, member_index)
		lol(troop_id, member_index)
		if Random_Enemy::Enemy_id.include?(@enemy_id)
			random_hp
			random_sp
		end
	end
	def random_hp
		r = rand(100)
		a = @hp
		case r
		when 0...49
			@hp = a - rand(Random_Enemy::Max_Value[@enemy_id])
		when 51...100
			@hp = a + rand(Random_Enemy::Max_Value[@enemy_id])
		when 50
			@hp = a
		end
	end
	def random_sp
		r = rand(100)
		a = @sp
		case r
		when 0...49
			@sp = a - rand(Random_Enemy::Max_Value[@enemy_id])
		when 51...100
			@sp = a + rand(Random_Enemy::Max_Value[@enemy_id])
		when 50
			@sp = a
		end
	end
	def random_str
		r = rand(100)
		a = $data_enemies[@enemy_id].str
		case r
		when 0...49
			return a - rand(Random_Enemy::Max_Value[@enemy_id])
		when 51...100
			return a + rand(Random_Enemy::Max_Value[@enemy_id])
		when 50
			return a
		end
	end
	def random_dex
		r = rand(100)
		a = $data_enemies[@enemy_id].dex
		case r
		when 0...49
			return a - rand(Random_Enemy::Max_Value[@enemy_id])
		when 51...100
			return a + rand(Random_Enemy::Max_Value[@enemy_id])
		when 50
			return a
		end
	end
	def random_agi
		r = rand(100)
		a = $data_enemies[@enemy_id].agi
		case r
		when 0...49
			return a - rand(Random_Enemy::Max_Value[@enemy_id])
		when 51...100
			return a + rand(Random_Enemy::Max_Value[@enemy_id])
		when 50
			return a
		end
	end
	def random_int
		r = rand(100)
		a = $data_enemies[@enemy_id].int
		case r
		when 0...49
			return a - rand(Random_Enemy::Max_Value[@enemy_id])
		when 51...100
			return a + rand(Random_Enemy::Max_Value[@enemy_id])
		when 50
			return a
		end
	end
	def random_atk
		r = rand(100)
		a = $data_enemies[@enemy_id].atk
		case r
		when 0...49
			return a - rand(Random_Enemy::Max_Value[@enemy_id])
		when 51...100
			return a + rand(Random_Enemy::Max_Value[@enemy_id])
		when 50
			return a
		end
	end
	def random_pdef
		r = rand(100)
		a = $data_enemies[@enemy_id].pdef
		case r
		when 0...49
			return a - rand(Random_Enemy::Max_Value[@enemy_id])
		when 51...100
			return a + rand(Random_Enemy::Max_Value[@enemy_id])
		when 50
			return a
		end
	end
	def random_mdef
		r = rand(100)
		a = $data_enemies[@enemy_id].mdef
		case r
		when 0...49
			return a - rand(Random_Enemy::Max_Value[@enemy_id])
		when 51...100
			return a + rand(Random_Enemy::Max_Value[@enemy_id])
		when 50
			return a
		end
	end
	def random_eva
		r = rand(100)
		a = $data_enemies[@enemy_id].eva
		case r
		when 0...49
			return a - rand(Random_Enemy::Max_Value[@enemy_id])
		when 51...100
			return a + rand(Random_Enemy::Max_Value[@enemy_id])
		when 50
			return a
		end
	end
	def p?
		return Random_Enemy::Enemy_id.include?(@enemy_id)
	end
	def base_str
		if not p?
			return $data_enemies[@enemy_id].str
		else
			return random_str
		end
	end
	def base_dex
		if not p?
			return $data_enemies[@enemy_id].dex
		else
			return random_dex
		end
	end
	def base_agi
		if not p?
			return $data_enemies[@enemy_id].agi
		else
			return random_agi
		end
	end
	def base_int
		if not p?
			return $data_enemies[@enemy_id].int
		else
			return random_int
		end
	end
	def base_atk
		if not p?
			return $data_enemies[@enemy_id].atk
		else
			return random_atk
		end
	end
	def base_pdef
		if not p?
			return $data_enemies[@enemy_id].pdef
		else
			return random_pdef
		end
	end
	def base_mdef
		if not p?
			return $data_enemies[@enemy_id].mdef
		else
			return random_mdef
		end
	end
	def base_eva
		if not p?
			return $data_enemies[@enemy_id].eva
		else
			return random_eva
		end
	end
end

 

Bugs e Conflitti Noti

N/A

Edited April 26, 2013 by Dilos
Script monoriga sistemato.

[nihil-omen]

Figo!