TI Prizee
Bienvenue sur TI-Prizee, le forum des TI z80 !

Nous vous invitons à vous inscrire ou à vous connecter si vous êtes déjà membre.

Bonne journée !

Taquin

Voir le sujet précédent Voir le sujet suivant Aller en bas

Taquin

Message par m@thieu41 le Mer 28 Aoû - 13:07

Bonjour à tous!

Voici un petit programme de casse tête pour vos occuper pendant vos cours inutile (et comme on sait tous qu'il y en a un paquet... Wink )

JTAQUIN

Les règles: Comme le taquin, vous devez déplacer les "cases" de 1 à F afin de les trier dans le bon ordre.

Utilisez les flèches directionnelles pour déplacer la case vide, et annul pour quitter.

Comme le générateurs d'aléatoires ne peut pas savoir si le jeu est réalisable ou pas (il l'est dans 50% des cas sinon), vous pouvez le résoudre de 2 façons:

Code:
1 2 3 4
5 6 7 8
9 A B C
D E F 

ou:
  1 2 3
4 5 6 7
8 9 A B
C D E F
En prime, je propose le prgmCNOMBRE  qui permet de convertir un nombre stocké dans Rép en Chaine, qui remplacera le nombre dans Rép.

Voici le code:

Code:
prgm JTAQUIN

{1,5,9,13->L1
Liste>matr(Rép,Rép+1,Rép+2,Rép+3,[B] //Rép=Ans en anglais, [B] est à choisir dans l'onglet matrice
Liste>matr(L1+1,L1+2,L1+3,L1+4,[C]
1->[C](4,4
" 123456789ABCDEF->Chaine0 //str0 en anglais
[B]->[A]
Lbl 1
EffEcr
Remplir(0,[A] //Fill en anglais il me semble
For(theta,-16,-1 //theta c'est [alpha]+3
Repeat non([A](A,B
.25entAléat(4,19->B
1+4partDec(B->A //fpart en anglais
partEnt(B->B //int en anglais
End
-theta->[A](A,B
Output(A+2,B+6,sous-Chaine(Chaine0,Rép,1 //souschaine = sub en anglais
End
EffVar ERepeat [A]=[B] ou [A]=[C] ou k=45 //EffVar = DelVar en anglais
Repeat K
CodeTouche->K
End
A+(K=34)-(K=25
min(4,max(1,Rép->C
B+(K=26)-(K=24
min(4,max(1,Rép->D
If A-C ou B-Rép
Then
E+1->E
Output(1,1,E
[A](C,D->[A](A,B
Output(A+2,B+6,sous-Chaine(Chaine0,Rép,1
1->[A](C,D
Output(C+2,D+6," //Un espace
C->A
D->B
End
End
If K-45
Then
E
prgmCNOMBRE //voire le code à la fin
Pause "FINI EN "+Rép+" COUPS!
End
Menu("REJOUER?","OUI",1,"NON",2
Lbl 2
EffVar Str0EffVar L1EffVar [B]EffVar [C]EffVar [A] //Pas obligatoire, mais ça libère de la mémoire (merci à Wistaro pour sa remarque, voir plus bas)
EffEcr
"MATHIEU41


prgmCNOMBRE //(converti le nombre passé en argument par Rép en une chaine de caratère, stockée dans Rép)
{0,Rép->L2
{0,1->L1
RégLin(ax+b) Y9
Equ>Caine(Y9,Chaine9
sous-chaine(chaine9,1,longueur(chaine9)-3
Un petit screen Wink



Et des liens de téléchargement:
Le prgm JTAQUIN: mediafire.com download/e0j9dz530cmr25x/JTAQUIN.8xp
Et CNOMBRE: mediafire.com download/4j8dvczbk4dvryv/CNOMBRE.8xp

Voilà!
Bon jeu! Smile

m@thieu41
Débutant
Débutant

Sexe : Masculin
Réputation : 0
Messages : 7
Points de messages : 3173

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Informations

Message par Clément.7 le Sam 23 Nov - 18:35

Je tiens à rappeler que mettre ce code est un peu inutile, ce forum porte uniquement sur les TI-83 Plus et supérieures.

Si vous mettez des codes, mettez-les en Spoiler !

EDIT : J'en profite également pour dire que le Cloud TI-Prizee est désormais en ligne, vous pouvez l'utiliser pour éviter les pubs.

Cordialement.


Dernière édition par Clément.7 le Sam 23 Nov - 18:37, édité 1 fois (Raison : Ajout d'informations supplémentaires)

_________________
Bonjour Invité, tu as posté 0 messages sur le forum !


Me contacter
avatar
Clément.7
Argent 4
Argent 4

Sexe : Masculin
Réputation : 0
Messages : 53
Points de messages : 3356
Centre(s) d'intérêt(s) : Faire connaître la programmation sur TI z80, partager des jeux, discuter, ...

Localisation : Près de Nantes
Emploi/loisirs : Programmation / Jeux vidéos

Voir le profil de l'utilisateur http://ti-prizee.forumactif.org

Revenir en haut Aller en bas

Re: Taquin

Message par m@thieu41 le Ven 18 Avr - 21:26

En quoi le code est il inutile?
Le Ti-Basic 83 est compatible 83+ (dans ce sens, dans l'autre pas toujours).
Et pourquoi utiliser une balise spoiler plutot que code?

m@thieu41
Débutant
Débutant

Sexe : Masculin
Réputation : 0
Messages : 7
Points de messages : 3173

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: Taquin

Message par Clément.7 le Lun 21 Avr - 16:53

Ce que je veut dire, c'est qu'il serait plus judicieux de joindre directement le .8xp dans ton message (en uploadant via le cloud ti-prizee) pour que tout le monde puisse le télécharger et le transférer à sa TI.

Pour les codes, les mettre dans un spoiler permet d'aérer le message plutôt que d'avoir directement un bloc de code qui n'intéresse pas forcément tout le monde...

_________________
Bonjour Invité, tu as posté 0 messages sur le forum !


Me contacter
avatar
Clément.7
Argent 4
Argent 4

Sexe : Masculin
Réputation : 0
Messages : 53
Points de messages : 3356
Centre(s) d'intérêt(s) : Faire connaître la programmation sur TI z80, partager des jeux, discuter, ...

Localisation : Près de Nantes
Emploi/loisirs : Programmation / Jeux vidéos

Voir le profil de l'utilisateur http://ti-prizee.forumactif.org

Revenir en haut Aller en bas

Re: Taquin

Message par m@thieu41 le Dim 11 Mai - 11:06

Ben... quoi qu'il en soit ça peut être intéressant de voir le code d'un prgm, peu importe pour quel modèle il est destiné d'ailleurs (le ti basic 83 est presque le même que celui 83+)...

Et j'ai mis les 8xp dès le début Wink

m@thieu41
Débutant
Débutant

Sexe : Masculin
Réputation : 0
Messages : 7
Points de messages : 3173

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: Taquin

Message par Contenu sponsorisé


Contenu sponsorisé


Revenir en haut Aller en bas

Voir le sujet précédent Voir le sujet suivant Revenir en haut


 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum