Nombre de visites sur cette page : 5801 Score au progrank : 40 Note actuelle : 6.7/10 noté 1 fois Vous devez être connecté(e) pour noter (inscription).
Votre calculatrice doit posséder les chaines de caractères (Str) et Menu pour utiliser ce programme. Si vous avez une Graph 85 (SD), mettez-la à jour.Description :
Bonjour à tous,
Je vous présente mon nouveau projet de programmation: Donjon & Jambon
Il s'agit d'un petit jeu style donjon de Naheulbeuk, le jeu sera un jeux ou l'on vous met en situation et on vous donne plusieurs possibilités qui font varier le scénario en fonction de vos choix....
Le jeu sortira chapitre par chapitre et voici le chapitre 1 intitulé: A l'aventure compagnons
Vous pouvez considérer cette partie comme une version alpha
Voici les différentes informations sur le jeu
-il sera basé sur l'intégralité d'un donjon et sortira chapitre par chapitre
-il y aura possibilité de faire des tests comme dans les jeux de rôle papier (dès le chapitre 2)
-il y aura des combat avec un moteur que j'avais commencé et que je vais sortir du placard (dès le chapitre2)
-vous avez accès à un inventaire (dès le chapitre 2.. oui je sais ça fait beaucoup )
-vos choix peuvent influencer dramatiquement le scénario, j\'entends par là que des mauvais choix peuvent n'entrainent pas forcément un game over mais par exemple la mort de vos coéquipiers ou si vous les gênez trop ils peuvent vous laisser mourir voir même vous tuer de sang froid...
-vous pouvez aussi choisir votre race entre humain, elfe ou nain
Commandes
Cliquer pour enrouler
Pour les commandes tout est indiqué dans le jeu mais petit récapitulatif:
-F1 à F3 pour les choix
-F6 pour l'inventaire et les stats
-EXE pour valider
Variables utilisées
Cliquer pour enrouler
-Les 26 lettres
-La liste 20
-les pictures de 1 à 3
- Str 1
Sur ce je vous souhaite bon jeu et n'hésitez pas à me prévenir dans les commentaires ou pas MP si vous trouvez des défauts ou que vous trouvez une idée intéressante à ajouter
Avancement du jeu
Cliquer pour enrouler
Chapitre 1: A l'aventure compagnons
100%
Vous répariez des chaises en bois lorsque vous avez décider de quitter votre petit village pour partir à l'aventure et conquérir le légendaire donjon du jambon dont personne n'est jamais ressorti... Arriverez vous à convaincre vos compagnons afin qu'ils vous assistent dans votre quête ou les laisserez-vous mourir pour votre seul profit personnel... Trop de suspense
Chapitre 2
10%
Je vous invite à aller voir le projet dans le Forum pour avoir plus d'infos sur la progression
je suis en train de faire le chapitre 2 et je voudrai avoir votre avis car après tout c'est vous qui testerez le jeu (enfin je l'espère... ) préférez vous que je continue dans un univers de jeu de rôle avec des références au donjon de Naheulbeuk ou bien que je m'inspire complètement de l'univers et que je reprenne aussi fidèlement que possible cet univers en reproduisant les combats, le rencontre les salles...
"Le nain semble aprecier votre reponse". *apprécier (je corrige )
Le nain a écrit : Et merde, une gueule d'endive !
à peine le jeu a-t'il commencé que je m'éclate ! je ne vais pas tout citer parce que je vais spoiler sinon
Sinon : "domage que sa visée ne soit pas à la hauteur" : il y a deux "m" à dommage.
Autrement, j'ai fait exploser l'elfe, mais par la suite, je dis au nain de se casser, mais il dit qu'il veut rester pour emmerder l'elfe... petite incohérence !
Je vais rédiger le reste dans mon test !
Sinon, pour le contenu du programme :
Peu après le label 1 dans " 'CHAP1", tu écris ceci :
Cls
ViewWindow 1,127,0,1,63,0
Le viewwindow est inutile. Tu n'utilises que du texte et des pictures. Qu'importent les modifications du viewwindow dans ce cas, ou alors tu retires le "cls" car le viewwindow efface lui aussi l'écran !
Par la suite, je lis quelque chose que je redoutais ayant commencé :
Do
For 0→A To 100:Next
Text 50,70,"PRESS EXE"
For 0→A To 100:Next
Text 50,70," "
Getkey
Lpwhile Ans≠31
Et si tu regardes cette page, tu retrouveras ceci :
Le Grand Manitou a écrit : Isolez au maximum vos Getkey du reste du code. Certes, vous alourdissez vos programmes de quelques octets, mais votre programme gagne beaucoup en réactivité !
(vous remarquerez l'argument d'autorité pour appuyer mes dires !)
Effectivement, dans ton code il faut appuyer en continu sur [EXE] pour espérer sortir de la boucle !
Si tu veux VRAIMENT garder ton effet de clignotement ralenti, tu peux à la limite faire ceci :
Do
For 0→A To 100
Getkey⇒Break:Next
Text 50,70,"PRESS EXE"
For 0→A To 100
Getkey⇒Break:Next
Text 50,70," "
Lpwhile Ans≠31
Mais c'est un peu moche.
Sinon, fais plus simple :
Do
Text 50,70,"PRESS EXE"
Text 50,70," "
Lpwhile Getkey≠31
Tu auras un clignotement rapide, mais ça sera réactif et ça prend moins de place.
Bon, pour la suite du code, c'est fait de manière trèèèèès simple :
Text 1,1,"ligne 1"
Text 7,1,"ligne 2"
B=1⇒Text 13,1"Ligne 3 cas 1"
B=2⇒Text 13,1,"Ligne 3 cas 2"
etc.
Franchement, Gdubol... T'as pas envie de faire un moteur qui lit automatiquement une Str (chaîne) et n'avoir qu'à écrire :
B=1⇒"Ligne 3 cas 1"→Str 2
B=2⇒"Ligne 3 cas 2"→Str 2
"Ligne 1rLigne2r"+Str 2→Str 1
etc.
Prog "'TEXT"
?
Regarde, je t'ai concocté un moteur adapté à ce que tu veux faire, et qui est très simple. Je t'invite à prendre connaissance des fonctions suivantes pour comprendre : StrSrc( StrLeft( StrShift(
[b]Prog "'TEXT"[/b]
Str 1+"r"→Str 1
1→Z
Do
StrSrc(Str 1,"r")→A //on cherche le saut de ligne caractérisé par un "r" (ou un "θ", comme tu veux)
If A //Si A n'est pas nul : on a trouvé encore un "r"
Then Text 1+6Z,1,StrLeft(Str 1,A-1)
Isz Z
StrShift(Str 1,A→Str 1 //on "grignote" la chaîne par la gauche de A caractères.
IfEnd
LpWhile A //Tant qu'il y a des sauts de lignes à faire
Donc si tu veux mettre :
Text 1,1,"LE NAIN INSULTE"
Text 7,1,"L'ELFE DE MANIERE"
Text 13,1,"LEGENDAIRE !"
Il te suffit de faire :
"LE NAIN INSULTErL'ELFE DE MANIERErLEGENDAIRE"→Str 1
À la longue, tu vas économiser de la place, à toi de voir ! N'oublie cependant pas qu'une chaîne ne peut contenir que 255 caractères max !
Bon, je vais poster un petit test
Petite mise à jour qui aurai du être faite il y a longtemps: correction de bugs qui rendaient certaines choses illogiques, utilisation d'un moteur pour afficher le texte pour un gain de place non négligeable, et petite amélioration graphique au niveau du menu.
n'hésitez pas a me signaler les bugs que vous pourriez rencontrer ou si vous avez des améliorations à suggérer
Planète Casio est un site communautaire non affilié à Casio. Toute reproduction de Planète Casio, même partielle, est interdite.
Les programmes et autres publications présentes sur Planète Casio restent la propriété de leurs auteurs et peuvent être soumis à des licences ou copyrights.
CASIO est une marque déposée par CASIO Computer Co., Ltd