Bonjour, bonjour à tous, merci de votre lecture.    
 
Je manque d'inspiration pour implémenter mon programme.
 
C'est un système client/serveur qui partage une territoire où sont disposé des objets visibles et des objets invisible à la vue des autre utilisateurs.
 
L'objectif est de trouver les objets invisible en trouvant le minimum d'objets visibles.
 
La règles en gros.
  Tant que l'unité stratégique n'est pas détruite, on peu ajouter des armes et tirer dans la limite d'une charge maximum, si non la partie est perdu simplement.  
  Le point stratégique est un point invisible des joueurs alors que les armes le sont.
  Le point stratégique est placé au début de parti et on ne peut pas le déplacer, les armes sont déplaçable.
  Les armes restantes des unités stratégiques détruites sont ajouter à votre arsenal. On recherche les unités stratégique à la main ou à l'aide d'outils de recherches qu'il faudra gérer.  
 
Pour le moment, j'ai fait un bout de la fenêtre principale du client et j'attaque le flux informationnel.
 
Pour les information que j'ai à traiter j'ai défini quelque types dans le paquetage racine qui sera commun aux clients et au serveur.
 

with Ada.Containers.Vectors;
 
Generic
   Max_X_Coordonate : Float := 1024.0;
   Max_y_Coordonate : Float := 768.0;
   Index_Max        : positive := 1_000;
package Warborg is
 
   subtype X_Coordonate_Type is Float range 0.0..Max_X_Coordonate;
   subtype Y_Coordonate_Type is Float range 0.0..Max_Y_Coordonate;
 
   type Coordonates_Type is
      record
         X : X_Coordonate_Type := 0.0;
         Y : Y_Coordonate_Type := 0.0;
      end record;
   Default_Coordonates : constant Coordonates_Type := (0.0, 0.0);
 
   subtype Charge_Type is Float range 0.0..1.0;
 
   type Missil_Attributes_Type is
      record
         Source : Coordonates_Type := Default_Coordonates;
         Target : Coordonates_Type := Default_Coordonates;
         Charge : Charge_type      := Charge_Type'First;
      end record;
 
   type Missil_Type is
      record
         Missil_Attibutes : Missil_Attributes_Type;
      end record;
 
   type Missil_Vector_Index_Type is new Natural range 1..Index_Max;
 
   package Missils_Vectors is
      new Ada.Containers.Vectors(Missil_Vector_Index_Type, Missil_type, "=" );
 
   use Missils_Vectors;
 
   type Wopr_Attributes_Type is
      record
         Source : Coordonates_Type := Default_Coordonates;
         Target : Coordonates_Type := Default_Coordonates;
         Charge : Charge_type      := Charge_Type'Last;
      end record;
 
   type Wopr_Type is
      record
         Wopr_Attributes : Wopr_Attributes_Type;
         Missils         : Vector;
      end record;
 
end Warborg;

 
Pour réaliser ce programme, je compte exploiter un système de gestion de base de donnée.  
 
Alors, j'ai fait la cette bd de trois tables pour le moment :

CREATE TABLE `Users` (
  `User_Id` int(11) NOT NULL AUTO_INCREMENT,
  `Username` char(128) DEFAULT NULL,
  `Date` date DEFAULT NULL,
  `Password` char(32) DEFAULT NULL,
  PRIMARY KEY  (`User_Id`)
) ENGINE=MyISAM DEFAULT CHARSET=latin1

CREATE TABLE `Missils` (
  `Missil_Id` smallint(6) NOT NULL DEFAULT '0',
  `Wopr_Id` int(11) NOT NULL,
  `Lunched` tinyint(1) DEFAULT NULL,
  `X_Coordonate` double NOT NULL,
  `Y_Coordonate` double NOT NULL,
  `X_Target` double NOT NULL,
  `Y_Target` double NOT NULL,
  `Charge` double DEFAULT NULL,
  PRIMARY KEY  (`Missil_Id`,`Wopr_Id`),
  KEY `Wopr_Id` (`Wopr_Id`)
) ENGINE=MyISAM DEFAULT CHARSET=latin1

CREATE TABLE `Woprs` (
  `Wopr_Id` int(11) NOT NULL AUTO_INCREMENT,
  `User_Id` int(11) NOT NULL,
  `X_Coordonate` double NOT NULL,
  `Y_Coordonate` double NOT NULL,
  `Total_Charge` double DEFAULT NULL,
  `Charged` tinyint(1) DEFAULT '0',
  PRIMARY KEY  (`Wopr_Id`),
  KEY `User_Id` (`User_Id`)
) ENGINE=MyISAM DEFAULT CHARSET=latin1

Il manque les coordonnées de "target" dans la table Woprs
 
Je dois également réaliser un module de recherche automatique d'objet basé sur des algo de reche comme Ant Colony
Mon interface client est une carte du globe, et une liste cliquable de username pour afficher les objets visible par joueur.
 

 
Pour le moment le zoom macrche pas, parce que je sais pas paramétrer un adjustment de Scroll_Window
Dans les menu :  
File -> Quit ;  
Zoom -> zoom_in, zoom_out
Canvas -> effacer
Search -> Ant_colony, Ant_Colony_Conf
Missils -> Launch_All, Launch_One, Create_One, Create_Group, Config_Group
 
On se log en entrant un hostname pour la connection au serveur.
 
Voila alors, selon votre inspiration, déjà, est-ce que j'ai bon ?
Que faire pour pas me planter ?
 
Sympa de participer à ce topic !    
 
Help !  

Bonjour,
Voici l'avancement du projet : Warborg-0.0.0c.tar.gz
J'ai un problème avec les item afficher dans le canevas, je souhaiterait pouvoir en déplacer certain et pas d'autre ou pas du tout. J'avais cru que Set_Auto_Layout permetait de fixer cette friture, mais là, ça marche pas. Bref, je partage les source au cas ou vous auriez envi de participer.
Reste pas mal de boulot. toute les requêtes SQL et les algo de recherche et encore un bout d'interface graphique.
Good luck.

Bonjour, j'ai réussi à compiler sur Windows, mais le client ne fonctionne pas.
En effet, à l'ouverture de la fenêtre de création du du premier objet, Windows indique que le programme ne répond pas.
Voici les sources des programmes : Warborg-0.0.1b.tar.gz
Et les binaires pour Windows : Warborg_Winbin-0.0.1b.zip
 
Que j'ai compilé avec Gnat 2011 et GtkAda par la ligne de commande suivante :

 
Voilà, je cherche le moyen de faire fonctionner mon programme sur Windows, alors que sur Gnu/Linux, ça fonctionne.
Merci pour votre aide.

ça marche pas
ça affiche pas la carte
Si je laisse latitude -90 et longitude -180 ça freeze
au mieux ça peut afficher Wopr dans un carré rouge mais après ça plante.
 
Je peux pas t'aider en Ada    

 
Je viens de m'apercevoir que je n'ai réviser que la moitié du code dans la dernière version et bien que je ne sache pas pourquoi ça plante, je peux encore apporter une amélioration.
 
Merci d'avoir testé et du retour.

Voilà, ça rejoue avec Warborg-0.0.2d.zip sur MS Windows et Gnu/Linux, des bug tout de même à l'autodestruction de missilles, entre autre probablement.

OOlalah, il manque encore la charge dans la saisie d'un missile.  

Sources Warborg-0.0.2e.tar.gz
 
Image

 
 

Pour l'image de fond qui n'est pas affichée, j'ai regardé pourquoi
Dans ton source, tu utilises "./background4" donc si on lance tes binaires en étant pas dans le répertoire où il y a ton background c'est cuit.
Avec Qt on a une variable qui s'appelle applicationDirPath() c'est magique
 
Passé ce problème, après login et choix de latitude et longitude, ça fait wizzzzz
Pango:ERRORbuild/buildd-pango1.0_1.28.3-1+squeeze2-i386-T6e3dv/pango1.0-1.28.3/pango/pango-layout.c:3739:pango_layout_check_lines: assertion failed: (!layout->log_attrs)
Abandon

 
Tu peux me dire quelles version de sources tu as utilisé ?

Warborg-0.0.2g

Ok, alors, chez moi ça fonctionne, peut-être as- tu un processeur plus rapide que le mien et que Gtk ne digère pas la fréquence de rafraîchissement. il faudrait peut-être placer un court délai d'attente entre la ligne 2093 et 2094 et peut-être un également entre la ligne 2095 et 2096 avec l'instruction Ada suivante :

delay 0.1;

 
Tu peux tester ça pour moi ?

Dans le fichier src/lib/Warborg/warborg-xborg.adb
 
Pardon.

ok ça a l'air de passer pour cette partie là. toujours le freeze avec latitude -90 et longitude -180
Mais heuuu. ton pc c'est un boulier? Parce que ma bécane a quand même un bon 5-6 ans

Ah ça c'est pas normal, je vais regarder.

10 ans le miens.  

 
Fixé dans la version 0.0.2h
 
Merci GrosBoc  

J'ai oublié de mettre un ou deux délay là ou ça en aurait besoin.

warborg_server.adb:16:06: file "warborg.ads" not found dans la 0.0.2h
 
il y a un problème de droit avec les répertoires

 
Merci GrosBoc, je suis un âne.
Y a pas que ça comme erreur dans la version 0.0.2h,, il y a une erreur dans warborg-database.adb également.
J'ai uploader la version 0.0.2i sur Sourceforge.
 
Merci encore GrosBoc, vraiment désolé.

Bonjour, c'est encore moi.
Vous allez bien ?
 
 
J'ai uploadé, la version 0.0.0j donc qui recorrige les la correction du bug à l'affichage des item à la position par défaut, de la version 0.0.2h ; J'avais tronqué les coordonnée vers zéro, à "la position absolue". Dans la version 0.0.2i la troncation est faite à l'affichage. Ce qui permet de conserver la précision du facteur de détection lié à la charge, que vous pouvez modifier dans les entrées Launch_One, et Launch_All de SGBD dans warborg-database.adb, qui est actuellement fixé à 2.5.
 
Voilà, je cherche un avis sur l'évolution du jeu, la conception, les information pertinente, l'utilité d'une fonction auto-matique d'exploration de crate.
 
Merci pour vos retours.
 
Ne vous attaché pas trop au code, je vais tout réécrire d'ici la fin de l'année.

 
Idéalement dans un langage pratiqué par plus de 0.00000000001% de la population, ça aiderait pour participer ...

 
Non.

si

Je vais uploader la version 0.0.2k, parce que j'ai fait une bêtise encore.

  Non. C'est non, j'écris avec Ada.

Moi je me dis que ça pourrait être bien comme jeu, mais j'ai toujours pas réussi à l'utiliser    
Pis alors je vais te dire, je vais pas apprendre Ada
On en trouve où de l'Ada d'ailleurs?

Je comprend, je viens de corriger une erreur importante avec la version 0.0.2k  

Je l'apprend pour toi.

Dans ariane 5. Le TGV, je sais pas où encore, mais à plein d'endroit.

Salut,
 
Le programme fonctionne sur Gnu/Linux, mais j'ai grave des problème sur Windows.

Je pensais avoir compris le jeu (une sorte de démineur) mais en fait non, j'ai pas compris.
 
 
Sinon, en cliquant sur le nom d'un autre joueur, crash total:
Gdk:ERRORbuild/buildd-gtk+2.0_2.20.1-2-i386-TNeM25/gtk+2.0-2.20.1/gdk/gdkregion-generic.c:1112:miUnionNonO: assertion failed: (r->x1 < r->x2)
Abandon
 

Le but est d'explorer une carte à la recherche des bases stratégiques des autres joueur. Ca va pas plus loin.
 

Sur Gnu/Linux, avec la version 0.1.1e, j'ai pas cette erreur.
Donc pas la peine de s'acharner.
Par contre j'ai écris une autre version "extra", si tu veux tester pour voir si ça fonctionne mieux.
Moi, mon problème n'a pas disparu sur Windows même avec cette version dont voici les sources : Warborg-extra.tar.gz
 
Merci en tout cas GrosBoc.    

J'ai tout de même uploadé sur sourceforge la version classique 0.1.3a qui apporte une ou deux correction.
 
Merci à tous.

 
C'est ce que j'utilise.

Utilise la 0.2.x.
C'est la version extra corrigé, fonctionnant sur GNU/LInux, et pas sur MS Windows  
 
D'ailleurs je me demande comment on fait un soft pareil en réalité.
Gtk me casse les bonbon.

Salutations,
 
J'ai trouvé comment faire pour que le programme fonctionne sur MS Windows autant que sur Gnu/Linux.
Donc, on reprend les source de la version 0.1.x et on colle quelques instructions magique dans warborg_client.
 
Voilà, good luck !

Re, comme je sais que vous êtes nobreux à vous intéresser à ce projet, je viens rapidement vous informer que le jeu ne fonctionne toujours pas sur MS Window... Je ne sais que faire de plus pour que ça fonctionne.
 
Merci pour votre patience.

LA dernière version de Warborg est dispo sur Sourceforge. dans ma signature.
Et vous pouvez vous connecter : ici
 
Si vous souhaitez démarrer un serveur vous même
 
Usage : ./uniborg Xborg "un nom" train.txt
 
train txt est un fichier d'initialization du réseau de neurone de traitement du langage naturel.
En suite il faux attendre que l'apprentissage se termine, consulter l'utilisation CPU.
 
Pour Xborg, par défaut d'argument, Xborg affiche l'usage.
 
edit, le programme utilise les port 5874 à 5878 inclus.

Salutations les meilleurs.
 
Je m'aperçois six moi plus tard que ce que je souhaite réaliser ne l'est pas, a priori, avec Gtk.
Du coup, je pense laisser tomber l'interface graphique pour me tourner vers une solution en mode text.
Et si vous avez un avis sur la question, je serait heureux d'en discuter.
Aussi, si vous souhaitez participer, n'hésitez pas à m'écrire.
Merci de l'intérêt que vous portez à ce sujet.

Bonjour, salutations.
 
Finalement, j'allais dire, mais non, je dis pas que c'est terminé mais, j'ai persévéré avec GtkAda et pour le moment, je tiens le coup.
 
Donc à présent nous en sommes à la version 2012-1.0.5a ; On utilise plus que 2 port, enfin, le 5872 pour le client-serveur et 5873 pour le call back mais il faut mettre votre machine en DMZ sur votre routeur. Mais de façon, j'ai pas fournis le binaire ad'hoc. Donc un port 5872.
 
J'ai produit deux paquet un pour Windows et un pour Gnu/Linux, dispo sur mon site (en signature) et le serveur de test est en marche sur le même nom de domaine.
 
Good Luck, enfin, je suis pas loin.