Pour les joueurs d'échecs (et les matheux aussi) et pour tous en fait

Staple1600

XLDnaute Barbatruc
Re : Pour les joueurs d'échecs (et les matheux aussi) et pour tous en fait

Bonjour Gruick


Pour revenir sur l'échiquier

J'ai vu plusieurs exemples (pour indiquer les cases possibles/impossibles) en javascript (ainsi que pour afficher des solutions)

mais je n'arrive à traduire cela en VBA.



PS: je suis toujours zen sur ce forum
 

JYLL

Nous a quitté
Repose en paix
Re : Pour les joueurs d'échecs (et les matheux aussi) et pour tous en fait

Bonjour le Fil,

Je vois qu'il y a des nostalgiques des HP. J'ai commencé la programmation sur HP9815, HP9825 avec 8ko de mémoire et des cassettes poue enregistrer les programmes et les données. puis sont venues les HP9836 couleur avec possibilité de mettre juqu'à 16Mo de mémoire. Le language HPL ou Basic HP. Le HPL très concis comme langage et très performant avec appel de procédure. le HP basic appel et suprression de SUb en cours de déroulement de programme pour optimiser la mémoire si rare à cette époque. Pendant cette période j'ai jamais autant jouer du fer à souder pour réaliser les cablages des interfaces pour piloter les périphèriques. RS232, HPIB, GPIO, BCD au fait pourquoi RS232, tout simplement parce que c'est source de 232 emmerdements avec les branchements et la vitesse le nombre de bits de données de stop de strat parité paire ou impair 1/4 de bit suivant la vitesse etc. C'est vrai que le PC c'est plus simple. J'ai eu aussi mais j'ai oublié la référence des petit calculateur HP avec imprimante incorporée et enregistrement des programmes sur petites bandelettes magnétiques.

J'ai fait dernièrement des programmes sur ce type de machines pour récupérer des données, toujours dans le coup, le language est graver dans la tête. De plus pour les plus anciens, la connaissance de tous les caractères de contrôle pour les impression.

Le bonheur continue avec VB il y a tpoujours quelques chose à apprendre.

Bons souvenirs à tous et à la notation polonaise inverse.
 

Gruick

XLDnaute Accro
Re : Pour les joueurs d'échecs (et les matheux aussi) et pour tous en fait

Bonsoir à tous,

Ca me rappelle que j'ai aussi un Sharp PC1500 qui cause basic.
En ce qui concerne la solution, j'ai zieuté le programme et adapté en VBA, et ca marche ! ( même si je n'ai toujours pas compris les instructions citées précédemment)
J'en ai profité pour visualiser les 92 solutions sur l'échiquier.
livraison demain, sans mots de passe, ni programme caché.

A plus,
Gruick
 

Tibo

XLDnaute Barbatruc
Re : Pour les joueurs d'échecs (et les matheux aussi) et pour tous en fait

Bonjour Gruick,

Décidemment, nous avons été équipé avec le même matos.

J'ai également eu un PC 1500 (avec son imprimante), base de mon apprentissage du Basic.

Là aussi, j'ai passé des heures à retaper les listings qui paraissaient dans Hebdogiciel

Bonne soirée à toi

@+
 

Staple1600

XLDnaute Barbatruc
Re : Pour les joueurs d'échecs (et les matheux aussi) et pour tous en fait

Bonsoir à tous

D'apres que j'ai lu (mais j'ai pas tout compris) il y 12 solutions de bases

et les 92 solutions sont une variation de ces 12 solutions.

J'ai lu aussi plein de choses concernant le recursivité
(ou j'ai la attrapé une migraine)

Je voudrais savoir si ce qui est possible en javascript
l'est en VBA?

PS: personne parmi vous n'a utilisé un ATARI ST ou un MSX
(voire (j'ai honte) un Alice (rouge) de chez Thomson avec cassettes?)
 

JYLL

Nous a quitté
Repose en paix
Re : Pour les joueurs d'échecs (et les matheux aussi) et pour tous en fait

Re Bonsoir tout le monde,

ZX81, Oric Atmos, TO7-70, CPC Amstrad à cassette. La récursivité j'ai pratiqué, sur les Station de travail HP en Basic HP, il n'y avait pas la possiblité de faire le catalogue du disque avec tous les répertoires et sous répertoires. Alors, j'ai fait une procédure récursive qui le faisait très bien, ensuite je l'ai adaptée pour faire mes sauvegardes automatiquement. Pour le Fana de BasicHP il y a un produit HTbasic qui tourne sur PC et qui est distribuée par la société Bourbaky à Tournon (07) - Gare Valence. Pour les personnes qui auraient à porter des applications Basic HP vers PC c'est un vrai bonheur et 100 fois plus facile que VB. J'ai porté les programmes que j'ai dévellopé pendant des années en moins de deux mois sur PC et la vitesse d'exécution est fabuleuse. Il y a très peu de code à changer entre les deux version. Les chemins des fichiers et les adresses de périphèriques.
Si besoin me contacter.
Souvenirs, souvenirs.
 

Gruick

XLDnaute Accro
Re : Pour les joueurs d'échecs (et les matheux aussi) et pour tous en fait

Bonjour,
Comme promis, voici le programme
A plus,
Gruick
 

Pièces jointes

  • 8queens.xls
    40.5 KB · Affichages: 106
  • 8queens.xls
    40.5 KB · Affichages: 103
  • 8queens.xls
    40.5 KB · Affichages: 103

Staple1600

XLDnaute Barbatruc
Re : Pour les joueurs d'échecs (et les matheux aussi) et pour tous en fait

Bonjour Gruick

Et bravo

Maintenant il reste plus qu'à gérer les coups possibles/non possibles

Je pensais à une MFC (en VBA)

qui colorie quand on pose une dame

la ligne la colone et les diagonales de celle-ci

et également d'une autre couleur les cases impossibles.

Et également interdire de poser plus de 8 dames.

Je vais étudier ton code
pour comprendre comment tu as remplacer la fonction SWAP

Bonne journée et encore merci

PS:
J'ai essayé une MFC basique
La formule est:
=A1="D"
cela colorie uniquement la cellule contenant D
Comment colorier la ligne et la colonne?
 
Dernière édition:

Gruick

XLDnaute Accro
Re : Pour les joueurs d'échecs (et les matheux aussi) et pour tous en fait

Merci pour ton bravo, mais félicitations pour le sujet aussi.
Pour le coloriage, tu peux peut-être t'inspirer de la routine de jeu pur et simple, qui examine chaque case d'influence de la Queen, pour colorier les cases interdites, et laisser les autres vierges.
Le jeu "guidé" perdra de son intérêt.
A plus,
Gruick
 

Staple1600

XLDnaute Barbatruc
Re : Pour les joueurs d'échecs (et les matheux aussi) et pour tous en fait

Re

Dans ce cas on pourrait faire un mode Options
avec Cases possibles/Impossibles affichées
et sans

Dans l'exemple (javascript) dont je m'inspire

Quand on pose une dame, toutes les cases couvertes par la dame
contiennent un point (police WingDings)

Je essayer de suivre ta suggestion

et merci encore.
 

wilfried_42

XLDnaute Barbatruc
Re : Pour les joueurs d'échecs (et les matheux aussi) et pour tous en fait

bonjour à tous

je ne comprends pas comment on peut avoi plusieurs discours differents

je te cite apres que tu aies mis un mot de passe sur ton VBA
Quel interet de livrer mon module aux autres forumeurs?

voici ton discours sur les protections :

https://www.excel-downloads.com/threads/masquer-une-feuille-et-la-rendre-inaccessible.73695/

prendrais tu les ormeurs pour des i.............

personnellemnt je suis heureux d'etre idiot, quand je remarque les personnes qui se prennent pour des savants..........
 

Staple1600

XLDnaute Barbatruc
Re : Pour les joueurs d'échecs (et les matheux aussi) et pour tous en fait

Rebonjour Wilfried

EDITION:
Pour ceux qui veulent se détendre avec les échecs
Voici le cavalier d'Euler (en flash et en français)
polygraphe
Bon amusement
 
Dernière édition:

Excel_lent

XLDnaute Impliqué
Re : Pour les joueurs d'échecs (et les matheux aussi) et pour tous en fait

Salut à tous,

Voilà une adaptation d'un programme en
Basic que j'avais mis en place il y a fort longtemps (le siècle passé ) !
Je me suis contenté de le transformer pour l’affichage des couleurs des cases disponibles ou pas.
La programmation mérite certainement d’être améliorée mais l’idée que j’ai suivie est très spéciale.
Je vais la reprendre pour essayer de résoudre le problème par l’étude des directions possibles après chaque coup.

Bon WE et @+
 

Pièces jointes

  • Dames1.zip
    25.3 KB · Affichages: 65

Excel_lent

XLDnaute Impliqué
Re : Pour les joueurs d'échecs (et les matheux aussi) et pour tous en fait

Re,

Désolé pour cette mauvaise manipulation.
Le bon fichier est le suivant.
@+
 

Pièces jointes

  • Dames0.zip
    24.4 KB · Affichages: 74

Staple1600

XLDnaute Barbatruc
Re : Pour les joueurs d'échecs (et les matheux aussi) et pour tous en fait

Bonsoir


Merci Excel_Lent de ta contribution.

Je vais regarder de plus pres ta solution et essayer de comprendre


Je te souhaite ainsi qu'a tous un bon weekend pascal
 

Statistiques des forums

Discussions
312 581
Messages
2 089 916
Membres
104 304
dernier inscrit
halo palo