Calculateur de fluide - Historique des versions

Liios : -Saut de lignes

2012-02-24T04:47:55Z

-Saut de lignes

Liios : +Balise

2012-02-24T04:46:44Z

+Balise

Taiko le 7 février 2012 à 09:17

2012-02-07T09:17:18Z

Taiko le 7 février 2012 à 09:16

2012-02-07T09:16:59Z

Liios : Catégorie

2012-01-26T00:26:37Z

Catégorie

Liios : Page créée avec « Le script suivant calcul le fluide que vous rapporte vos sorts par scénario (en cL) selon la formule suivante : fluide rapporté par un sort = 10 + X/4 où X est le coût... »

2012-01-26T00:26:12Z

Page créée avec « Le script suivant calcul le fluide que vous rapporte vos sorts par scénario (en cL) selon la formule suivante : fluide rapporté par un sort = 10 + X/4 où X est le coût... »

Nouvelle page

Le script suivant calcul le fluide que vous rapporte vos sorts par scénario (en cL) selon la formule suivante : fluide rapporté par un sort = 10 + X/4 où X est le coût du sort.

Le script fait automatiquement l'arrondi nécessaire pour que la quantité exprimée sont un multiple de 5. Par exemple un sort à 150 cL rapporte 50 cL de fluide par scénario.

Indiquez bien le nombre de sorts que vous possédez et remplissez correctement le tableau en vous méfiant du décalage des index. Ici j'ai pris mon personnage en exemple.

Attention : vérifiez bien le script avant de l'utiliser, des scripts malintentionnés peuvent endommager votre machine.

==Script==

Const Coeur_de_Terre = 100

Const Nb_sort = 14

reDim Sort(Nb_sort)

Sort(0) = 2

Sort(1) = 2

Sort(2) = 100

Sort(3) = 100

Sort(4) = 2

Sort(5) = 2

Sort(6) = 100

Sort(7) = 100

Sort(8) = 2

Sort(9) = 2

Sort(10) = 2

Sort(11) = 2

Sort(12) = 100

Sort(13) = 160

Fluide = 0

For i = 0 to (Nb_sort - 1)

Fluide = Fluide + Calc(Sort(i))

Next

MsgBox(Coeur_de_Terre + Fluide)

Function Calc(X)

if x > 150 then

x = 150

end if

Base = 10

Add = X\4

Ret = Add mod 5

Var = x/4 mod 5

if Var >= 2 then

Calc = Base + Add - Ret + 5

else
Calc = Base + Add - Ret

end if

End Function

← Version précédente		Version du 7 février 2012 à 09:17
Ligne 87 :		Ligne 87 :
	End Function		End Function

−	[[Catégorie:Autre ~~non-officiels~~]]	+	[[Catégorie:Autre]]

← Version précédente		Version du 7 février 2012 à 09:16
Ligne 1 :		Ligne 1 :
−	Le script suivant calcul le fluide que vous rapporte vos sorts par scénario (en cL) selon la formule suivante : fluide rapporté par un sort = 10 + X/4 où X est le coût du sort.	+	Le script visual basic suivant calcul le fluide que vous rapporte vos sorts par scénario (en cL) selon la formule suivante : fluide rapporté par un sort = 10 + X/4 où X est le coût du sort.

	Le script fait automatiquement l'arrondi nécessaire pour que la quantité exprimée sont un multiple de 5. Par exemple un sort à 150 cL rapporte 50 cL de fluide par scénario.		Le script fait automatiquement l'arrondi nécessaire pour que la quantité exprimée sont un multiple de 5. Par exemple un sort à 150 cL rapporte 50 cL de fluide par scénario.

← Version précédente		Version du 26 janvier 2012 à 00:26
Ligne 86 :		Ligne 86 :

	End Function		End Function
		+
		+	[[Catégorie:Autre non-officiels]]

@@ Ligne 10 : / Ligne 10 : @@
 <pre>
 Const Coeur_de_Terre = 100
 Const Nb_sort = 14
 reDim Sort(Nb_sort)
 Sort(0) = 2
 Sort(1) = 2
 Sort(2) = 100
 Sort(3) = 100
 Sort(4) = 2
 Sort(5) = 2
 Sort(6) = 100
 Sort(7) = 100
 Sort(8) = 2
 Sort(9) = 2
 Sort(10) = 2
 Sort(11) = 2
 Sort(12) = 100
 Sort(13) = 160
 Fluide = 0
 For i = 0 to (Nb_sort - 1)
 	Fluide = Fluide + Calc(Sort(i))
 Next
 MsgBox(Coeur_de_Terre + Fluide)
 Function Calc(X)
 	if x > 150 then
 		x = 150
 	end if
 	Base = 10
 	Add = X\4
 	Ret = Add mod 5
 	Var = x/4 mod 5
 	if Var >=  2 then
 		Calc = Base + Add - Ret + 5
 	else
 		Calc = Base + Add - Ret
 	end if
 End Function
 </pre>
 [[Catégorie:Autre]]