Batch Index du Forum
S’enregistrerRechercherFAQMembresGroupesConnexion
Répondre au sujet Page 1 sur 1
Création Batch Convertisseur
Auteur Message
Répondre en citant
Message Création Batch Convertisseur 
Bonjour,

Voici un batch que j'ai commencé, mais en ce moment je manques de temps !
Alors si le coeur vous en dit .... Rolling Eyes



La première conversion fonctionne ( devises ), manque le rèste, y'a plus qu'à compléter.
Bien sur, je peux fournir quelques explications si besoin !

Code:

@echo off
title CONVERTISSEUR  ^|  By STRYK
mode con cols=80 lines=31 &color 1A


::                         Copyright © :  stryk@live.fr
::                      ----------------------------------

::      888888b.                     .d8888b.  888                     888
::      888  "88b                   d88P  Y88b 888                     888
::      888  .88P                   Y88b.      888                     888
::      8888888K.  888  888          "Y888b.   stryk@live.fr. 888  888 888  888
::      888  "Y88b 888  888             "Y88b. 888    888P"   888  888 888 .88P
::      888    888 888  888               "888 888    888     888  888 888888K
::      888   d88P Y88b 888         Y88b  d88P Y88b.  888     Y88b 888 888 "88b
::      8888888P"   "Y88888          "Y8888P"   "Y888 888      "Y88888 888  888
::                      888                                        888
::                 Y8b d88P                                   Y8b d88P
::                  "Y88P"                                     "Y88P"


:: Merci à : --------------------   www.batch.xoo.it/index.php   ----------------------

:: Pour plus de lisibilitée, je vous recommande l'éditeur de texte : NOTEPAD++
:: il "reconnait" le language batch et affiche des couleurs différentes pour les commandes, les variables, les index, etc...
:: Lien:   www.01net.com/telecharger/windows/Internet/editeur_de_site/fiches/29119.htm…

:MAIN_MENU_CONVERTISSEUR

cls
echo ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
echo            ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo            º                                                       º
echo            º             -----   CONVERTISSEUR   -----             º
echo            º                                                       º
echo            ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
echo.
echo.
echo                         Type de conversion … effectuer:
echo.
echo.
echo.
echo              [1] _ DEVISES                     [7] _ PRESSION
echo              [2] _ SUPERFICIE                  [8] _ TEMPERATURE
echo              [3] _ ENERGIE                     [9] _ DUREE
echo              [4] _ LONGUEUR                   [10] _ VITESSE
echo              [5] _ MASSE                      [11] _ VOLUME
echo              [6] _ PUISSANCE
echo.
echo                                [Q] _ QUITTER
echo.
echo.
set TYPE_OF_CONVERT=
set /p TYPE_OF_CONVERT= Votre choix \\:
if %TYPE_OF_CONVERT%==1 goto :RETRY_DEVISES
if %TYPE_OF_CONVERT%==2 goto :RETRY_SUPERFICIE
if %TYPE_OF_CONVERT%==3 goto :RETRY_ENERGIE
if %TYPE_OF_CONVERT%==4 goto :RETRY_LONGUEUR
if %TYPE_OF_CONVERT%==5 goto :RETRY_MASSE
if %TYPE_OF_CONVERT%==6 goto :RETRY_PUISSANCE
if %TYPE_OF_CONVERT%==7 goto :RETRY_PRESSION
if %TYPE_OF_CONVERT%==8 goto :RETRY_TEMPERATURE
if %TYPE_OF_CONVERT%==9 goto :RETRY_DUREE
if %TYPE_OF_CONVERT%==10 goto :RETRY_VITESSE
if %TYPE_OF_CONVERT%==11 goto :RETRY_VOLUME
if /i %TYPE_OF_CONVERT%==q goto :EXIT_BATCH
echo Choix invalide, patientez svp ...
@ping localhost -n 2 >nul
goto :MAIN_MENU_CONVERTISSEUR

::  ######################################################    DEVISES
:RETRY_DEVISES

set FIRST_TIME_A=TRUE
set FIRST_TIME_B=FALSE
set RETRY=

:UP_DEVISES

cls
echo ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
echo            ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo            º                                                       º
echo            º                -----   DEVISES   -----                º
echo            º                                                       º
echo            ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
echo.
echo                                 1 _ Euros
echo.
echo                                 2 _ Dollar US
echo.
echo                                 3 _ Livre Sterling
echo.
echo                                 4 _ Yen
echo.
echo                                 5 _ Franc Suisse
echo.
echo.

if %FIRST_TIME_A%==TRUE (
    set FIRST_TIME_A=FALSE
    set DEVISE_A=
    set /p DEVISE_A= Choisissez la devise … convertir  :   
    goto :UP_DEVISES
    )
   
if %FIRST_TIME_B%==FALSE (
    set FIRST_TIME_B=TRUE
    set DEVISE_B=
    set /p DEVISE_B=  … convertir en  :   
    goto :UP_DEVISES
   )

if %FIRST_TIME_B%==TRUE (
    set SELECT=
    set /p SELECT= Montant … convertir  :   
    )

:: X 10000

if %DEVISE_A%==1 (
    set AV=Euros
    if %DEVISE_B%==2 (
    set /a RESULT = %SELECT% * 13972
    set DEV=Dollars
    goto :RESULT_DEVISES
    )
    if %DEVISE_B%==3 (
    set /a RESULT = %SELECT% * 8591
    set DEV=Livres
    goto :RESULT_DEVISES
   )
    if %DEVISE_B%==4 (
    set /a RESULT = %SELECT% * 1331018
    set DEV=Yens
    goto :RESULT_DEVISES
   )
    if %DEVISE_B%==5 (
    set /a RESULT = %SELECT% * 15158
    set DEV=Francs Suisse
    goto :RESULT_DEVISES
   )
 )

if %DEVISE_A%==2 (
    set AV=Dollars
    if %DEVISE_B%==1 (
    set /a RESULT = %SELECT% * 7157
    set DEV=Euros
    goto :RESULT_DEVISES
    )
    if %DEVISE_B%==3 (
    set /a RESULT = %SELECT% * 6149
    set DEV=Livres
    goto :RESULT_DEVISES
   )
    if %DEVISE_B%==4 (
    set /a RESULT = %SELECT% * 952651
    set DEV=Yens
    goto :RESULT_DEVISES
   )
    if %DEVISE_B%==5 (
    set /a RESULT = %SELECT% * 10863
    set DEV=Francs Suisse
    goto :RESULT_DEVISES
   )
 )

if %DEVISE_A%==3 (
    set AV=Livres
    if %DEVISE_B%==1 (
    set /a RESULT = %SELECT% * 11639
    set DEV=Euros
    goto :RESULT_DEVISES
    )
    if %DEVISE_B%==2 (
    set /a RESULT = %SELECT% * 16262
    set DEV=Dollars
    goto :RESULT_DEVISES
   )
    if %DEVISE_B%==4 (
    set /a RESULT = %SELECT% * 1549184
    set DEV=Yens
    goto :RESULT_DEVISES
   )
    if %DEVISE_B%==5 (
    set /a RESULT = %SELECT% * 17642
    set DEV=Francs Suisse
    goto :RESULT_DEVISES
   )
 )

if %DEVISE_A%==4 (
    set AV=Yens
    if %DEVISE_B%==1 (
    set /a RESULT = %SELECT% * 75
    set DEV=Euros
    goto :RESULT_DEVISES
    )
    if %DEVISE_B%==2 (
    set /a RESULT = %SELECT% * 104
    set DEV=Dollars
    goto :RESULT_DEVISES
   )
    if %DEVISE_B%==3 (
    set /a RESULT = %SELECT% * 64
    set DEV=Livres
    goto :RESULT_DEVISES
   )
    if %DEVISE_B%==5 (
    set /a RESULT = %SELECT% * 113
    set DEV=Francs Suisse
    goto :RESULT_DEVISES
   )
 )

if %DEVISE_A%==5 (
    set AV=Francs Suisse
    if %DEVISE_B%==1 (
    set /a RESULT = %SELECT% * 6597
    set DEV=Euros
    goto :RESULT_DEVISES
    )
    if %DEVISE_B%==2 (
    set /a RESULT = %SELECT% * 9204
    set DEV=Dollars
    goto :RESULT_DEVISES
   )
    if %DEVISE_B%==3 (
    set /a RESULT = %SELECT% * 5667
    set DEV=Livres
    goto :RESULT_DEVISES
   )
    if %DEVISE_B%==4 (
    set /a RESULT = %SELECT% * 878075
    set DEV=Yens
    goto :RESULT_DEVISES
   )
 )

cls
echo Au moins une valeurs est incorrecte
echo.
echo Patientez svp .....
@ping localhost -n 3 >nul
goto :RETRY_DEVISES

:RESULT_DEVISES

cls
echo.
echo.

echo %SELECT% %AV%  =  %RESULT:~0,-4%,%RESULT:~-4% %DEV%

echo.
echo.
echo.

set /p RETRY= Recommencer ? [O]ui [N]on :
if /i %RETRY%==o goto :RETRY_DEVISES
if /i %RETRY%==n goto :EXIT_BATCH


::  ######################################################    SUPERFICIE
:RETRY_SUPERFICIE

::  ######################################################    ENERGIE
:RETRY_ENERGIE

::  ######################################################    LONGUEUR
:RETRY_LONGUEUR

::  ######################################################    MASSE
:RETRY_MASSE

::  ######################################################    PUISSANCE
:RETRY_PUISSANCE

::  ######################################################    PRESSION
:RETRY_PRESSION

::  ######################################################    TEMPERATURE
:RETRY_TEMPERATURE

::  ######################################################    DUREE
:RETRY_DUREE

::  ######################################################    VITESSE
:RETRY_VITESSE

::  ######################################################    VOLUME
:RETRY_VOLUME



:EXIT_BATCH
cls
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
echo            ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo            º                                                       º
echo            º                -----   Bye Bye   -----                º
echo            º                                                       º
echo            ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
echo.

@ping localhost -n 3 >nul





______________________________________________________


L'ignorance est un fléau qui engendre la haine et la mort
La connaissance est une arme qui surpasse toutes les autres
Partagez votre savoir, sinon il sera perdu à jamais
Message Publicité 
PublicitéSupprimer les publicités ?


Répondre en citant
Message Hello 
Hello super idée, c'est vraiment utile ce genre de convertisseur, merci =), et je peus aider Very Happy Mais faut me fournir des explications et des sites qui expliques par combien il faut multipliez et tout ^^




______________________________________________________
Rapelez vous que un clique pour vous peu avoir fait travailler pendent des heures et des heures une personne =) ou plusieurs :d
Répondre en citant
Message Création Batch Convertisseur 
Bonjour,

rien à dire bien ! je peux aider bien sur lol




______________________________________________________


Répondre en citant
Message Création Batch Convertisseur 
Hello, cool déja 2 réponses, merci les gars Okay

Donc, si vous avez essayé le choix 1 ( le seul qui est écrit ), surprise, le résultat s'affiche avec des décimales !!
Je trouvais ca sympa jusqu'à ce que je saches que l'invite de commande ne sais pas gérer des nombres trop grands:
Avec un résultat supérieur à 32 bits, celui-ci sera erroné , pas cool donc !!

Or, pour afficher des nombres décimaux dans mon (notre) batch, je multiplie par 1000 ou 10000 les valeurs de départ et
je "découpe" ensuite ce nombre et je place une virgule au milieux !!

Ce qui n'est pas trop génant pour des valeurs aux ordres de grandeurs proches, mais tres compliqué à doser pour
les autres cas, par exemple pour convertir des yens en euros.

Sinon, en fait, je manques surtout de temps pour aller à la pèche aux taux de conversion !
Pour l'info, je comptait me servir de l'application de conversion de mon GSM ( nokia navigator) pour les taux.
Application que j'ai d'ailleur copié pour les types de conversions.

Pour l'écriture du code, je prends le pc quand je déscends fumer un clope... Razz ça suffit en général !
Dès que j'ai un moment, je place des commentaires sur le code ...




______________________________________________________


L'ignorance est un fléau qui engendre la haine et la mort
La connaissance est une arme qui surpasse toutes les autres
Partagez votre savoir, sinon il sera perdu à jamais
Message Création Batch Convertisseur 


Montrer les messages depuis:
Répondre au sujet Page 1 sur 1
  



Index | créer un forum | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation
Copyright 2008 - 2016 // Batch