*Valentino's Random System 1

[Valentino]

Valentino's Random System

 

Descrizione

 

Dato che ho notato il lamentarsi del random di rpgmaker mi sono dato da fare XD
Questo script permette di rendere il random più random XD Cioe è stato creato per i messaggi, ma può avere anche altri utilizzi. In pratica lo script fa si che il valore ottenuto col random non sia mai il precedente (o se le scelte sono piu di due, anche il penultimo valore), il valore viene attribuito a una variabile del gioco e può essere utilizzata con gli eventi XD
Ah si, un valore prima di ripetersi, dovrà aspettare che vengano ottenuti tutti gli altri valori ^^
Il fatto dell'ultimo e del penultimo valore servono per quando si ridà la possibilità di ottenere tutti i valori, e quindi per evitare che venga un valore da poco ottenuto XD

 

Autore

 

Avon Valentino (Io)

 

Allegati

Demo Link:
VERS 1
http://www.mediafire...25hufmdfm9ox4j8
VERS 2
http://www.mediafire...fced0pd8b8s1x4c

Script:

VERSIONE 1, Valori sempre diversi
 

Spoiler

#Script creato da Valentino Avon, se lo usate, creditatemi ;)


#Spiegazione: Per ottenere l'effetto random, inserire come primo comando
#di un evento il commento "random", e un secondo commento come secondo
#comando: $game_map.events[ID_EVENTO].num(MIN,MAX)
#dove MIN e MAX sono due valori estremi (per rappresentare il numero di scelte)
#Per esempio se MIN è 1 e MAX è 4 l'evento prenderà tutti i valori tra 1 e 4
#compresi.
#Questo servirà per fare le condizioni nell'evento.
#Dopo i due commenti inserire un call script con scritto:
#$game_map.events[ID_EVENTO].random(ID_VARIABILE)
#con questo viene attivato il processo di random che determina un valore sempre
#diverso, e lo restituisce alla variabile definita da ID_VARIABILE.
#Successivamente si inseriscono tutte le condizioni SE riferite alla variabile
#per fare accadere quello che si vuol fare accadere XD

class Game_Event < Game_Character
	attr_accessor :numeri
	attr_accessor :backup
	
	alias random_initialize initialize
	def initialize(map_id, event)
		random_initialize(map_id, event)
		@numeri = []
		@backup = []
		@ultima = nil
		@penultima = nil
		@conto = 0
	end
	
	def set_num
		if @list[0].parameters[0] == "random"
			script = @list[1].parameters[0] #+ "n"
			result = eval(script)
		end
	end
	
	#impostare numeri
	def num(min,max)
		for i in min..max
			@numeri.push(i)
		end
		@backup = @numeri.dup
	end
	
	#random della variabile
	def random(var)
		@conto += 1
		if @numeri.empty?
			@numeri = @backup.dup
		end
		
		loop do
			n_1 = rand(@numeri.size)
			p1 = @numeri[n_1]
			$game_variables[var] = p1
			break if prob(var)
		end
		@numeri.delete($game_variables[var])
		@penultima = $game_variables[var] if @backup.size > 2 and @conto == 1
		@ultima = $game_variables[var] if @backup.size > 1 and @conto == 2
		if @backup.size == 2
			@ultima = $game_variables[var]
		end
		
		if @conto == 2
			@conto = 0
		end
		
		return $game_variables[var]
	end
	
	def prob(var)
		if @penultima == $game_variables[var] or @ultima == $game_variables[var]
			return false
		end
		return true
	end
end


class Game_Map
	alias events_setup setup
	def setup(map_id)
		events_setup(map_id)
		for i in @map.events.keys
			@events[i].set_num
		end
	end
end

 

VERSIONE 2, Valori ripetuti con una probabilita configurabile

 

Spoiler

#Script creato da Valentino Avon, se lo usate, creditatemi ;)


#Spiegazione: Per ottenere l'effetto random, inserire come primo comando
#di un evento il commento "random", e un secondo commento come secondo
#comando: $game_map.events[ID_EVENTO].num(MIN,MAX)
#dove MIN e MAX sono due valori estremi (per rappresentare il numero di scelte)
#Per esempio se MIN è 1 e MAX è 4 l'evento prenderà tutti i valori tra 1 e 4
#compresi.
#Questo servirà per fare le condizioni nell'evento.
#Dopo i due commenti inserire un call script con scritto:
#$game_map.events[ID_EVENTO].random(ID_VARIABILE)
#con questo viene attivato il processo di random che determina un valore sempre
#diverso, e lo restituisce alla variabile definita da ID_VARIABILE.
#Successivamente si inseriscono tutte le condizioni SE riferite alla variabile
#per fare accadere quello che si vuol fare accadere XD


#percentuale di probabilita che permette nel caso la ripetizione dello stesso messaggio
PROBABILITA = 10


class Game_Event < Game_Character
	attr_accessor :numeri
	
	alias random_initialize initialize
	def initialize(map_id, event)
		random_initialize(map_id, event)
		@numeri = []
		@ultima = nil
	end
	
	def set_num
		if @list[0].parameters[0] == "random"
			script = @list[1].parameters[0] #+ "n"
			result = eval(script)
		end
	end
	
	#impostare numeri
	def num(min,max)
		for i in min..max
			@numeri.push(i)
		end
	end
	
	#random della variabile
	def random(var)
		loop do
			n_1 = rand(@numeri.size)
			p1 = @numeri[n_1]
			$game_variables[var] = p1
			break if prob(var)
		end
		@ultima = $game_variables[var] if @numeri.size > 1
		return $game_variables[var]
	end
	
	def prob(var)
		if @ultima == $game_variables[var] and rand(100) >= PROBABILITA
			return false
		else
			return true
		end
	end
end


class Game_Map
	alias events_setup setup
	def setup(map_id)
		events_setup(map_id)
		for i in @map.events.keys
			@events[i].set_num
		end
	end
end

 

Istruzioni per l'uso

 

Trovate tutto all'interno dello script, se lo usate creditatemi

 

Bugs e Conflitti Noti

 

Non dovrebbero essercene... Per qualsiasi cosa contattatemi!

Modificato da Dilos, 27 April 2013 - 14:25 PM.
Script monoriga sistemato.

[Guardian of Irael]

Ah giusto il discorso random! XD
Bel lavoro, solo che anche così le probabilità son falsate (soprattutto il fatto che un numero deve farsi il giro del mondo prima di esser ripescato)...speravo fosse possibile creare proprio un random vero dove casualmente anche lo stesso numero può essere estratto due volte di seguito ma raramente... ;___ ;
^ ^

[Valentino]

Ah allora forse è piu semplice di quello che ho fatto XD
Cioe basterebbe verificare ogni volta l'ultima opzione e fare tipo
un random da 0 a 100 se è minore di 10 allora permette di ripetere senno fa
un altra frase XD

[Zosimos]

Mmh... a me lo script andrebbe bene così com'è, ma se tu riuscissi ad applicare il suggerimento di Guardian, sarei interessato a provarlo.

[Guardian of Irael]

Ah bene XD
Ci metti tutte e due le versioni sopra? :D
^ ^

[giver]

Così com'è potrebbero usarlo i niubbi per gestirsi un mazzo di carte (o roba del genere), se ho capito bene quello che state dicendo . . .

[Guardian of Irael]

Così com'è potrebbero usarlo i niubbi per gestirsi un mazzo di carte (o roba del genere), se ho capito bene quello che state dicendo . . .

Cioè?
Io vorrei vedere un random system fatto bene come quando prendo un sacchetto con dei numeri dentro e li estraggo...nulla di più!
^ ^

[Valentino]

Ecco fatto, inserite le 2 versioni ^^

"Piangendo perchè Aliuzz non li lascia un attimo di tregua ç_ç"

[Aliuzz96]

Bene,bene,stai ancora qua bigellonare,torna su messenger.XD

Ecco fatto, inserite le 2 versioni ^^

"Piangendo perchè Aliuzz non li lascia un attimo di tregua ç_ç"

ç________ç

Modificato da Aliuzz96, 28 November 2010 - 16:01 PM.

[Valentino]

"Frustato a sangue sulla schiena si ritira nel suo stanzino e comincia a scriptare" ç_ç

[giver]

@Guardian:
Se non vuoi un sacchetto della Tombola, questo script non va bene . . .
Mi è semplicemente parso di capire che molti niubbi abbiano difficoltà a gestire la non uscita dello stesso esemplare della stessa carta, durante un gioco di carte . . .

Comunque, il sistema usato da Valentino permette anche di bilanciare il fattore fortuna. Basta immaginare una serie di contendenti, ognuno con un random di questo tipo associato: se uno ottiene un esito basso, esso uscirà dai suoi possibili risultati successivi, aumentando le probabilità di ottenerne uno alto, finchè non si esauriscono gli esiti possibili . . .

Modificato da giver, 28 November 2010 - 16:04 PM.

[Guardian of Irael]

Se non vuoi un sacchetto della Tombola, questo script non va bene . . .
Mi è semplicemente parso di capire che molti niubbi abbiano difficoltà a gestire la non uscita dello stesso esemplare della stessa carta, durante un gioco di carte . . .

No, no non mi serve nulla in particolare XD, volevo solo vedere un random che non avesse problemi, visto che il discorso-random è stato fatto più volte per tutti i tool.
^ ^

[SIMO696]

Bello mi serviva proprio grazie valentino XD

[Zosimos]

A me per esempio va benissimo per alcuni dialoghi random, che il giocatore potrebbe voler esplorare in tutte le sue possibilità senza doversi sorbire per 5 volte la stessa cosa.
Certo, non è un random puro. Ma se fosse un random puro, ogni volta CIASCUN valore dovrebbe avere le medesime possibilità di uscire, esattamente come i dadi o la roulette.

[SIMO696]

si ma per i dialoghi la versione 1 come dici tu e' perfetta...

Modificato da SIMO696, 28 November 2010 - 21:19 PM.

[Valentino]

A me per esempio va benissimo per alcuni dialoghi random, che il giocatore potrebbe voler esplorare in tutte le sue possibilità senza doversi sorbire per 5 volte la stessa cosa.
Certo, non è un random puro. Ma se fosse un random puro, ogni volta CIASCUN valore dovrebbe avere le medesime possibilità di uscire, esattamente come i dadi o la roulette.

Ho messo la versione 2 perchè succeda che tutte le opzioni di messaggio possano uscire, ma la probabilità che esca la stessa di quella precedente è di default il 10 percento ^^


@SIMO696
Grazie mille! ^^

Modificato da Valentino, 28 November 2010 - 22:00 PM.

[Amos_MHF]

Non si potrebbe effettuare uno pseudo-random tramite il time del sistema?
In C faccio così, non so se possa essere fattibile in Ruby, ma mi pare di aver visto da qualche parte uno script che utilizzava l'orologio del sistema al posto del timer interno del gioco.

[Sleeping Leonhart]

Si, volendo si può usare un fattore tempo, facendo una cosa del tipo

<div class="de1"><span class="br0">(</span><span class="br0">(</span><span class="kw3">rand</span><span class="br0">(</span>valore<span class="br0">)</span> <span class="sy0">+</span> <span class="br0">(</span><span class="kw4">Time</span>.<span class="me1">now</span>.<span class="me1">sec</span> <span class="sy0">*</span> valore <span class="sy0">/</span> <span class="nu0">60.0</span><span class="br0">)</span><span class="br0">)</span> <span class="sy0">/</span> <span class="nu0">2</span><span class="br0">)</span>.<span class="me1">ceil</span></div></div></td></tr></table>

cioè prendo i secondi dell'orologio di sistema e li metto in rapporto al valore random che voglio ottenere, poi faccio la media con un valore random ottenuto nel modo classico del ruby. Purtroppo però l'unità più piccola a disposizione è il secondo anche se dovrebbe bastare a rendere le cose un po più random.

[Guardian of Irael]

Uh perfetto, si può giocare con l'orologio di sistema allora! ^ ^
C'è anche qualche altro valore su cui ci si può poggiare, che non sia lungo come il secondo...ad esempio sul 2k si poteva associare un qualcosa ai battiti dei midi...sì, una cosa del genere, non ricordo; possibilità di fare qualcosa di simile? :3
^ ^

[Testament]

Guardian, come saprai avevo affrontato l'argomento (avevo pure aperto un topic un anno fa circa) dato che in Pocket Quest tutto si basa sul caso ed era brutto vedere filate di numeri. Col battito di midi e altri fattori pseudo casuali (i soldi, i pv ecc, ma non sono cose che cambiano rapidamente) avevo ottenuto una distribuzione abbastanza omogenea su un campione di 120 lanci da 1 a 6 ce n'erano 19-21 per cifra, solo che non si evitavano comunque robe tipo 6 6 6 1 1 1 2 2 1 che poi venivano compensate col tempo da altre filate di numeri.

Pensai ad un modo "pesato", solo che era complicatino da fare anche perché varia da range a range, mentro io tendo a sviluppare un numero random abbastanza grosso e poi farci il modulo su quello che mi serve per ottenere numeri da 0 a quello che mi serve.

Il metodo, magari implementabile tramite script in maniera molto più veloce, consisteva in questo:

poniamo di volere numeri da 1 a 4 e di tirare la random su valori da 1 a 100.

divido le fasce di probabilità, se la random rende
da 1 a 25 allora 1
da 26 a 50 allora 2
da 51 a 75 allora 3
da 76 a 100 allora 4

fissando un valore di scarto del 2% decido

se esce l'1 calo la sua probabilità di 6% e aumento quella di 2,3 e 4 del 2% ciascuno

quindi da 25 25 25 25 passo a 19 27 27 27

riesce 1 calo e aumento

13 29 29 29

esce il 3

15 31 23 31 ecc

in questo modo man mano che un numero si ripete, la sua probabilità di uscita cala e aumenta quella degli altri.

Solo che nemmeno così si risolvono le filate dello stesso numero, quindi risolsi in un altro modo.