|
Nous allons créer quelques Variable et Switch, les voici:
Variable [0001:ArgentPossédé] : c'est le nbr d'argent que vous avez sur vous
[0002:Dépos] : correspond au nbre d'argent qu'il y a dans votre compte
[0003:nbr déposé] : correspond au nbr d'argent que vous voulez déposer
[0004:nbr retiré] : correspond au nbr d'argent que vous voulez retirer
[0005:interet] : correspond au nbr de fois que vous déposez de l'argent
Switch
[0001:compte ouvert] : sera utilisé quand vous ouvrirez votre compte.
<>Variable CH:[0001:ArgentPossédé]Set, Money# (On enregistre le nbre d'argent qu'on a sur nous)
(La Fork suivante c'est pour que votre compte double après un certain nbr de fois venu)
<>Fork Optn: Varbl:[0005:intéret]- 50 (vous pouvez mettre un autre nbr que 50, car ça correspond au nbr de fois qu'il faut venir)
<>Variable CH:[0001:Dépos] *, 2
<>Messg: Félicitation, votre compte banquaire a doublé !
: : Vous avez maintenant \V[0001] gils !
<>Variable CH:[0005:intéret]Set, 0 (On remet le conteur à zéro)
<>
:END Case (Fin de la Fork)
<>
Dessinez la carte de votre banque. Mettez y un Event avec l'image d'un banquier et avec Push Key. Créez 2 page dans votre Event: Première Page
<>Messg:Bonjour, voulez vous ouvrir un compte ?
<>Show Choice: Oui/Non
:[Oui]Case
<>Messg: C'est fait, vous avez un compte! Reparlez-moi pour l'utiliser.
<>Change Switch:[0001:Compte ouvert]- ON Set
:[Non] Case
<>Messg: Une autre fois peut-être.
:END Case
<>
Deuxième Page
Mettez le Switch:[0001:compte ouvert] comme Condition; mettez aussi une image de banquier et Push Key. Et comme d'hab, faites comme suit:
<>Variable CH:[0001:ArgentPossédé]Set, Money# (On enregistre le nbre d'argent qu'on a sur nous)
(La Fork suivante c'est pour que votre compte double après un certain nbr de fois venu)
<>Fork Optn: Varbl:[0005:intéret]- 50 (vous pouvez mettre un autre nbr que 50, car ça correspond au nbr de fois qu'il faut venir)
<>Variable CH:[0001:Dépos] *, 2
<>Messg: Félicitation, votre compte banquaire a doublé !
: : Vous avez maintenant \V[0001] gils !
<>Variable CH:[0005:intéret]Set, 0 (On remet le conteur à zéro)
<>
:END Case (Fin de la Fork)
<>Messg: Bienvenue dans notre Banque, que voulez-vous faire ?
<>Show Choice: Déposer de l'argent/Retirer de l'argent/Information/Partir
:[Déposer de l'argent] Case
<>Messg: Vous avez \V[0001] gils sur vous.
: :Déposer combien ?
<>Input Number: 6 Dg.[0003:nbr déposé] (6 Digits (Dg.) veux dire que vous pouvez mettre un nbre avec 6 zéro maxi)
(la Fork suivante c'est pour les interets, si vous déposez plus de 100 gils (nbre que vous pouvez changer), vous gagnez un point)
<>Fork Optn: Varbl[0003:nbr déposé]- 100abov
<>Varbl CH:[0005:intéret] +, 1
<>
:END Case
(Je vous explique la Fork suivante: Si le nbre que vous déposez est plus petit(ou égale) à l'argent que vous avez, ça marche; sinon vous ne déposé pas d'argent)
<>Fork Optn: Varbl[0003:nbr déposé]- V[0001]Less
<>Change Money: Money V[0003] Decr. (On vous enlève le nbre d'argent que vous avez déposé)
<>Variable CH:[0002:Dépos] +, Var.[0003]val. (On rajoute ce nbre dans votre compte)
<>Messg:Vous avez déposé \V[0003], ce qui fait \V[0002] gils en tout.
<>
:ELSE Case
<>Messg: Vous n'avez pas assez d'argent !
<>
:END Case
<>
:[Retirer de l'argent]Case
(C'est la même chose pour retirer de l'argent, mais en "sens inverse")
<>Messg: Vous avez \V[0002] gils sur votre compte.
: : Combien voulez-vous retirer ?
<>Input Number: 6 Dg.[0004:nbr retiré]
<>Fork Optn: Varbl[0004:nbr retiré]- V[0002]Less
<>Change Money: Money V[0004] Incr.
<>Variable CH:[0002:Dépos] -, Var.[0004]val.
<>Messg: Vous avez retiré \V[0004] gils
<>
:ELSE Case
<>Messg: Il n'y a pas autant d'argent sur votre compte!
<>
:END Case
<>
:[Information] Case
<>Messg: Chaque fois que vous déposé de l'argent, vous gagné 1 point. Si vous avez 50 point, nous doublons le contenu de votre compte ! (Mettez n'importe quel info sur votre banque)
<>
:[Partir] Case
<>Messg: À la prochaine
<> :END Case
<>
Vous vous demandez surement ce que voulent dire les truc comme \V[0001] ? En faite, si vous écrivez \V[0001], quand vous jouerez ça écrivera la valeur qu'il y a dans la variable 0001 !
Vous allez me dire qu'une banque comme ça, ça ne sert à rien ! Mais vous pouvez faire que si vous avez, par exemple 2000 gils dans votre compte, vous gagnez un objet rare. Ou bien vous pouvez transformer la banque en forge, mais vous déposerez du métal, et avec une certaine quantité de métal on peux faire des armes, boucliers etc..
Donc j'espère que vous trouverez une utilisation à ma banque.
|
|| |
|
