Seuls les membres ayant 30 points peuvent parler sur le chat.

Forum Casio - Projets de programmation


Index du Forum » Projets de programmation » Les puzzles de Simon Tatham
Zezombye En ligne Rédacteur Points: 1715 Défis: 13 Message

Les puzzles de Simon Tatham

Posté le 06/10/2018 18:55

Si quelqu'un veut bien, ce serait sympa de recréer ces puzzles en basic (voire en C si c'est pas possible) :

https://www.chiark.greenend.org.uk/~sgtatham/puzzles/


Hackcell En ligne Membre Points: 1364 Défis: 11 Message

Citer : Posté le 06/10/2018 19:04 | #


on a un topic gentiment créé pour ca
https://www.planet-casio.com/Fr/forums/topic15234-3-La,Boite,a,Idees,!.html
Massena En ligne Rédacteur Points: 1381 Défis: 6 Message

Citer : Posté le 06/10/2018 19:36 | #


La vache y'a du boulot pour celui qui s'y met
Peace was never an option. - Untitled goose game, 2019
Kikoodx En ligne Membre Points: 2186 Défis: 11 Message

Citer : Posté le 17/10/2018 12:55 | #


J'aime beaucoup Twiddle (et il n'est pas trop complexe à coder je pense), je vais peut être essayer d'en faire une petite version
Par contre je vais devoir m'intéresser au mode graphique

Ajouté le 17/10/2018 à 14:53 :
Pas la peine finalement ! Plein de Locate !
La version Lite est théoriquement fonctionnelle, problème : je n'arrive pas à résoudre le puzzle

Ajouté le 20/10/2018 à 20:03 :
Voilà, je mets le code ici si ça intéresse quelqu'un (quand je serais sur mon PC je l'uploaderai sous CeCILL)
Twiddle 3×3
Youaip c'est en brut.
Locate 20,1,"…"
File2
9→Dim List1
For 1→A To 9
Do
RanInt#(1,9
LpWhile List1[Ans
Next
Si
List1→List2
If G=72
Then List2[4→List1[5
List2[5→List1[8
List2[7→List1[4
List2[8→List1[7
IfEnd
If G=52
Then List2[5→List1[6
List2[6→List1[9
List2[8→List1[5
List2[9→List1[8
IfEnd
If G=74
Then List2[1→List1[2
List2[2→List1[5
List2[4→List1[1
List2[5→List1[4
IfEnd
If G=54
Then List2[2→List1[3
List2[3→List1[6
List2[6→List1[5
List2[5→List1[2
IfEnd
For 1→A To 3
For 1→B To 3
Locate 3B+5,2A,List1[B+3(A-1
Next
Next
Locate 20,1,"?"
Do
Getkey→G
LpWhile Not G
While Getkey
WhileEnd
Locate 20,1,"…"
0→R
For 1→A To 9
A≠List1[A⇒1→R
Next
LpWhile R
File1
ClrTxt
"Congratz !"

2+2=5
Perdu
Drak Hors ligne Rédacteur Points: 1925 Défis: 40 Message

Citer : Posté le 21/10/2018 10:32 | #


Cela semble assez simple. Cool !
Eon the Dragon : version 1.2
Let's have a look!
Marre de ces RPGs qui t'imposent des classes, des compétences et des sorts ? Crée tes propres capacités sur Eon the Dragon ! Des monstres, des dragons et des combats aussi épiques que difficiles t'attendent !
Un RPG unique et immense t'attend ! Joue dès maintenant à Aventura, le Royaume Poudingue !
Vous aussi, soyez swag et rejoignez Planète Casio !

LienAjouter une imageAjouter une vidéoAjouter un lien vers un profilAjouter du codeCiterAjouter un spoiler(texte affichable/masquable par un clic)Ajouter une barre de progressionItaliqueGrasSoulignéAfficher du texte barréCentréJustifiéPlus petitPlus grandPlus de smileys !
Cliquez pour épingler Cliquez pour détacher Cliquez pour fermer
Alignement de l'image: Redimensionnement de l'image (en pixel):
Afficher la liste des membres
Pour coloriser votre code, cliquez ici.
Sinon cliquez sur le bouton ci-dessous.
:bow: :cool: :good: :love: ^^
:omg: :fusil: :aie: :argh: :mdr:
:boulet2: :thx: :champ: :whistle: :bounce:
valider
 :)  ;)  :D  :p
 :lol:  8)  :(  :@
 0_0  :oops:  :grr:  :E
 :O  :sry:  :mmm:  :waza:
 :'(  :here:  ^^  >:)

Σ π θ ± α β γ δ Δ σ λ
Veuillez donner la réponse en chiffre
Vous devez activer le Javascript dans votre navigateur pour pouvoir valider ce formulaire.

Si vous n'avez pas volontairement désactivé cette fonctionnalité de votre navigateur, il s'agit probablement d'un bug : contactez l'équipe de Planète Casio.

Planète Casio v42 © créé par Neuronix et Muelsaco 2004 - 2020 | Il y a 101 connectés | Nous contacter | Qui sommes-nous ? | Licences et remerciements

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