Win3x.Org
http://www.win3x.org/win3board/

Gauvain OS
http://www.win3x.org/win3board/viewtopic.php?f=69&t=3245		 Page 4 sur 31
Auteur :  corwintirnanog [ 09 sept. 2007 12:16 ]
Sujet du message : 
Exactement! Il y a différents romans sur ce sujet, dont "Le pendule de Foucauld" de Umberto Eco.
Auteur :  victornement [ 16 sept. 2007 21:24 ]
Sujet du message : 
Voici la sortie de gauvain Béta operationnelle 1

Beta car elle n'est pas completement achever, operationnelle car elle peut lancer des programmes.

Elle est composé d'un cdrom et d'une disquette.
Vous mettaient la disquette, vous allumez le pc, vous choisissez de formater ou d'installer, puis vous avez gauvain sur votre PC !
Alors, il y a un DOS 6.22 avec le disquette complementaire + clavier AZERTY + CD-ROM IDE + Quick Basic et le tout dans le dossier com et sys et MS-QB.
Il integre qb4 et gauvain. Gauvain demmare automatiquement et peut lancer des taches, il s'agit de la derniere compilation (mais j'ai dut supprimer prg2 qui permettait de gerer les theme depuis l'interface).
Donc pour le menu, les themes, les chemin d'accés, vous devraient modifier les fichiers systemes a la main.
C'est heureusement facile (voir ci dessous).

Donc vous pouvez avoir le disquette ici :
http://victornement.free.fr/telechargement/gvn_install/gvn_dsk.IMA
http://victornement.free.fr/telechargement/gvn_install/gvn_cdrm.iso

________________________

Pour la configuration voici la documentation :
http://victornement.free.fr/documentation-gvn.htm
(je suis en traint de la faire il est est probable que ce soir elle soit en ligne)

Voici la doc :
http://gauvain.ath.cx/doc.htm

Tient, si sa vous interesse, MS a encore était condamné pour monopole abusif :lol:
Auteur :  corwintirnanog [ 18 sept. 2007 12:47 ]
Sujet du message : 
Rectification: Ce n'est pas encore, c'est juste l'appel concernant un jugement précédent et une affaire vieille de 10 ans.
Si il fallait condamner tous les monopoles il y aurait du boulot, et en plus là c'est assez curieux car les plaignant sont des boîtes Américaines qui ne peuvent faire condamner Microsoft aux Etats-Unis parce qu'il n'y a pas là bas de loi aussi sévère qu'en Europe.

J'aimerais aussi qu'on me dise ce que ça va apporter de concret au consommateur mouton qui va acheter son PC dans un supermarché.
Rien...
Si c'est un mouton il va de toute façon faire plein d'anneries et il ira pleurnicher à l'abus de position dominante, ou au matériel dangereux ou à la responsabilité de l'état.
Ce jugement c'est pour moi surtout l'indication d'une société de plus en plus interventionniste dans la vie privée et des gens de moins en moins critiques sauf pour demander encore plus d'interventionnisme d'état ou de super état

. 1984, quoi 1984, où ça 1984?
http://fr.wikipedia.org/wiki/1984_%28roman%29
Auteur :  victornement [ 18 sept. 2007 20:01 ]
Sujet du message : 
Effectivement le consommateur s'en fout. Je suis d'accord.

... MAIS :

Le site gauvain.ath.cx est terminé !
> http://gauvain.ath.cx

Les habituelles critiques sont bienvenues :lol:.
Il est validé au http://validator.w3.org et respecte alors les standards.


PS: Ce site est situé sur mon serveur et n'est pas accesible la nuit
Auteur :  corwintirnanog [ 18 sept. 2007 21:04 ]
Sujet du message : 
Mais Gauvain OS version 1, ça existe vraiment? (je ne vois rien à télécharger aussi bien avec K-Meleon 1.1.2 qu'avec IE5)
Auteur :  victornement [ 18 sept. 2007 21:22 ]
Sujet du message : 
victornement a écrit :
Voici la sortie de gauvain Béta operationnelle 1

Beta car elle n'est pas completement achever, operationnelle car elle peut lancer des programmes.

Elle est composé d'un cdrom et d'une disquette.
Vous mettaient la disquette, vous allumez le pc, vous choisissez de formater ou d'installer, puis vous avez gauvain sur votre PC !
Alors, il y a un DOS 6.22 avec le disquette complementaire + clavier AZERTY + CD-ROM IDE + Quick Basic et le tout dans le dossier com et sys et MS-QB.
Il integre qb4 et gauvain. Gauvain demmare automatiquement et peut lancer des taches, il s'agit de la derniere compilation (mais j'ai dut supprimer prg2 qui permettait de gerer les theme depuis l'interface).
Donc pour le menu, les themes, les chemin d'accés, vous devraient modifier les fichiers systemes a la main.
C'est heureusement facile (voir ci dessous).
( c'etait deja poster ici, mais j'avais pas mit sur le site )
Auteur :  corwintirnanog [ 18 sept. 2007 22:14 ]
Sujet du message : 
Le floppy marche mais l'ISO ne démarre pas sur mon QEMU:
FATAL: Could not read from boot disk


Quand j'essaye de l'ouvrir avec 7-zip, il ne s'ouvre pas, ce qui veut dire que ce n'est pas un ISO standard.

Qu'est ce qui peut se passer?
Auteur :  victornement [ 30 oct. 2007 10:22 ]
Sujet du message :  Victornement Gauvain OS 1.1
Gauvain OS

Cette nouvelle version à deux avantage visible :
-Le fichier gauvain.sys à desormais une réélle synthaxe.
-La bimap de demmarage a changer et est réellement plus réussie.

Mais le code aussi à été revu :
-Il affichera certaines erreur
-Il comporte une sub MsgBox(Texte$,Titre$)
-il comporte une sub WriteIcone(Icone As integer,X as integer,Y as integer)

Malheuresement, ces deux ameliorations ne sont pas visible et je ne les utilise pas (la fonction MsgBox bugge un peu et je ne l'utilise pas car les seules applications que l'on peut lui trouver pour le moment ammereait a faire une boucle infinie de fonction qui en appelle une autre et qui appelle cette derniere etc...)
La sub writeIcone... n'affiche quant à elle aucune icone pour le moment (je suis en train de la réaliser, ensuite il me faudra seulement créé les outils de configuration).

Donc goto :

http://victornement.free.fr/telechargement/gvn_install/gvn_dsk_1.1.IMA
http://victornement.free.fr/telechargement/gvn_install/GVN_CDRM_1.1.ISO

Et je rappelle la presence de http://gauvain.ath.cx (j'ai mis des captures d'ecran)

Et petite question ? Quelqu'un l'à t'il déjà essayer gauvain ?
Auteur :  Vorro [ 30 oct. 2007 12:08 ]
Sujet du message : 
Non jamais essayé.
Une question : D'où t'es venu le nom de Gauvain, ça fait drôlement bizzare ce nom d'OS ?
Auteur :  victornement [ 30 oct. 2007 12:18 ]
Sujet du message : 
Gauvain est un chevalier, ancien ami de lancelot du lac. Il est bon, loyal, et tres bon chevalier.
D'ailleur, sur le logo officiel, il y a un chevalier.
victornement a écrit :
Horreur !
Je n'arrive plus a compiler Gauvain.exe !
QB4 m'affiche un message d'erreur !
Voici les sources :
http://victornement.free.fr/win3x/gauvain.zip

( Attention a bien créé C:\gauvain.sys ! )

Aide ?? :cry: :cry:
Aï..j'ai compris l'erreur que j'avais faites. Il s'agit que sa fait sa dés que j'utilise les numerotation des lignes... ben si j'avais su sa avant de supprimer une bonne centaine de ligne... j'aurai pu simplement faire un gosub avec une ettiquette au lieu d'un goto avec un numero. :? :oops: :cry:

Petit souci :
J'ai créé un jeu ou une balle ricoche sur les paroi de l'ecran et avec une barre, il faut l'empecher de tomber.
Voici le code :
Code : Tout sélectionner
DECLARE SUB MoveBarre (Sens AS INTEGER, Incr AS INTEGER)
DECLARE SUB MoveBalle ()
TYPE TpSens
   X AS INTEGER
   Y AS INTEGER
END TYPE
TYPE TpBalle
   X AS INTEGER
   Y AS INTEGER
END TYPE
DIM SHARED Sens AS TpSens
DIM SHARED Balle AS TpBalle
DIM SHARED Position AS INTEGER
DIM SHARED ImageBarre(400) AS INTEGER
DIM SHARED FuturTmp AS LONG
CONST Gauche = 0
CONST Droite = 1
Balle.X = 2
Balle.Y = 2
Sens.X = 20
Sens.Y = 20
FuturTmp = TIMER + 0.5
SCREEN 7
FOR A = 1 TO 5
   FOR B = 1 TO 80
      READ Couleur
      PSET (B, A), Couleur
   NEXT
NEXT
GET (1, 1)-(80, 5), ImageBarre
CLS
PUT (0, 195), ImageBarre
DO
Key$ = INKEY$
Temps = TIMER
IF Key$ = CHR$(0) + CHR$(75) THEN CALL MoveBarre(Gauche, 10)
IF Key$ = CHR$(0) + CHR$(77) THEN CALL MoveBarre(Droite, 10)
IF TIMER = FuturTmp THEN CALL MoveBalle
LOOP UNTIL Key$ = CHR$(27)

DATA 10,00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00
DATA 00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00,10
DATA 10,00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00
DATA 00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00,10
DATA 10,00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,10,00,10,00,10,00,10,00,10,00,10,10,00,10,00

SUB MoveBalle
FuturTmp = TIMER + 0.5
Balle.X = Balle.X + Sens.X
Balle.Y = Balle.Y + Sens.Y

IF Balle.X < 2 THEN
   Balle.X = 2
   Sens.X = 20
ELSEIF Balle.Y < 2 THEN
   Balle.Y = 2
   Sens.Y = 20
ELSEIF Balle.X > 318 THEN
   Balle.X = 318
   Sens.X = -20
ELSEIF Balle.Y > 198 THEN
IF Balle.X > Position AND Balle.X < Position + 80 THEN
Balle.Y = 198
Sens.Y = -20
ELSE
PRINT "Game Over"
END
END IF
END IF

CLS
CIRCLE (Balle.X, Balle.Y), 4
PUT (Position, 195), ImageBarre
END SUB

SUB MoveBarre (Sens AS INTEGER, Incr AS INTEGER)
SELECT CASE Sens
   CASE Gauche
      Position = Position - Incr
   CASE Droite
      Position = Position + Incr
END SELECT
IF Sens = Gauche AND Position < 0 THEN Position = 0
IF Sens = Droite AND Position + 80 >= 320 THEN Position = 240
CLS
PUT (Position, 195), ImageBarre
CIRCLE (Balle.X, Balle.Y), 4
END SUB
Donc tout les 0.5 secondes, la balle devrait avancer (elle s'incremente de la variable Sens.X et Sens.Y).

Mais a ce niveau :
Citation :
DO
Key$ = INKEY$
Temps = TIMER
IF Key$ = CHR$(0) + CHR$(75) THEN CALL MoveBarre(Gauche, 10)
IF Key$ = CHR$(0) + CHR$(77) THEN CALL MoveBarre(Droite, 10)
IF TIMER = FuturTmp THEN CALL MoveBalle
LOOP UNTIL Key$ = CHR$(27)
Timer est impréci et il ne passe pas directement (d'apres ce que je conclut) de 1000.444 à 1000.445 mais de 1000.444 à 1000.447 par exemple (je rappel que c'est des suppositions) et il me faudrait alors arrondir seulement au 1 er chiffre apres la virgule, or, il n'existe aucune fonction d'arrondissage apres la virgule dans QB, seulement une fonction (CINT) pour transformer un DECIMAL en ENTIER.
Donc voici ma question : comment arrondir pour ne guarder qu'un chiffre apres la virgule ?
Page 4 sur 31 Fuseau horaire sur UTC+02:00
Développé par phpBB® Forum Software © phpBB Limited
Traduction française officielle © Qiaeru