Batch Index du Forum
S’enregistrerRechercherFAQMembresGroupesConnexion
Répondre au sujet Page 1 sur 1
ANIMATION RIGOLOTE
Auteur Message
Répondre en citant
Message ANIMATION RIGOLOTE 
Hello,

C'est pas long et si ça peux vous donner des idées ... Wink

Code:

@echo off
:: \\ CODE SOURCE MOVE By STRYK
mode con cols=70 lines=25 &color 0C
set MOVE=1
set "YES= "
:UP
cls
if %MOVE%==1000000000 set "YES=VICTOIRE DE LA SOURIS !"
echo.
echo %MOVE%        -X-                 
echo %MOVE%       (o o)           
echo %MOVE%        (_)
echo.
echo %MOVE%%MOVE%%MOVE%%MOVE%      o
echo %MOVE%%MOVE%%MOVE%%MOVE%   ` /_\ '
echo %MOVE%%MOVE%%MOVE%%MOVE%  - (o o) -
echo %MOVE%%MOVE%%MOVE%%MOVE%     (_)
echo.
echo %MOVE%%MOVE%%MOVE%    _     _                           
echo %MOVE%%MOVE%%MOVE%  o' \,=./ `o           
echo %MOVE%%MOVE%%MOVE%     (o o)         
echo %MOVE%%MOVE%%MOVE%      (_)
echo.
echo %MOVE%%MOVE%     I         
echo %MOVE%%MOVE%     I.===.
echo %MOVE%%MOVE%     {}o o{}
echo %MOVE%%MOVE%       (_)               %YES%
echo.
echo %MOVE%%MOVE%%MOVE%%MOVE%%MOVE%   ()_()
echo %MOVE%%MOVE%%MOVE%%MOVE%%MOVE%   (o o)
echo %MOVE%%MOVE%%MOVE%%MOVE%%MOVE%    `o'
set "YES= "
if %MOVE%==1000000000 (
    @ping localhost -n 2 >nul
    set "OPERATEUR=/"
   )
if %MOVE%==1 set "OPERATEUR=*"
set /a MOVE=MOVE %OPERATEUR% 10
@ping localhost -n 1 >nul
goto :UP





______________________________________________________


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 animation amélioré 
bonjour stryk,

effectivement, ça m'a donné une idée.
Je me suis permis d'améliorer ton code pour cela.
dis moi ce que tu en pense.

a +

Code:
@echo off & color 0a & mode con: cols=90 lines=21 & color 0
set ba=0 & set ab=0 & set bc=0 & set bd=0 & set be=0
:a
cls
if %random:~0,1%==1 (set /a ba=ba+1 & set a=%a%ÿ)
if %random:~0,1%==1 (set /a ab=ab+1 & set b=%b%ÿ)
if %random:~0,1%==1 (set /a bc=bc+1 & set c=%c%ÿ)
if %random:~0,1%==1 (set /a bd=bd+1 & set d=%d%ÿ)
if %random:~0,1%==1 (set /a be=be+1 & set e=%e%ÿ)
if %ba%==50 (set aa=victoire de l'agneau)
if %ab%==50 (set bb=victoire du clown)
if %bc%==50 (set cc=victoire de la sauterelle)
if %bd%==50 (set dd=victoire du singe)
if %be%==50 (set ee=victoire de la sourie)
echo.
echo %a% -X-   %aa%
echo %a%(o o)
echo %a% (_)
echo.
echo %b% /°\   %bb%
echo %b%(o o)
echo %b% (_)
echo.
echo %c%\,=./  %cc%
echo %c%(o o)
echo %c% (_)
echo.
echo %d%.===.  %dd%
echo %d%{o o)
echo %d% (_)
echo.
echo %e%()_()  %ee%
echo %e%(o o)
echo %e% `o'
:goto
set /a goto=goto+1
if %goto%==20 (
 set goto=0
 goto end
 )
goto goto
:end
if %ba%==50 (pause>nul & exit)
if %ab%==50 (pause>nul & exit)
if %bc%==50 (pause>nul & exit)
if %bd%==50 (pause>nul & exit)
if %be%==50 (pause>nul & exit)
goto a




Dernière édition par Blouquin Eddy le Dim 17 Juin 2012 - 12:39; édité 2 fois

______________________________________________________
Le batch est mon joujou de tout les jours,
plus pour le loisir que pour le travail,
et avec j'apprend presque tout les jours,
comment programmer et le travailler,
pour avoir enfin un résultat cool.

Ed la poignée du 93 (^_^)
Yahoo Messenger MSN Skype
Répondre en citant
Message ANIMATION RIGOLOTE 
Yeah Okay Pas mal !!

Tu devrais faire des voitures de F1 avec une route Mr. Green




______________________________________________________


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
Répondre en citant
Message animation amélioré 
c'est l'idée que j'ai eu.
j'avais plutôt pensée à des chevaux animées Razz , mais des voitures, c'est plus simple. Smile




______________________________________________________
Le batch est mon joujou de tout les jours,
plus pour le loisir que pour le travail,
et avec j'apprend presque tout les jours,
comment programmer et le travailler,
pour avoir enfin un résultat cool.

Ed la poignée du 93 (^_^)
Yahoo Messenger MSN Skype
Répondre en citant
Message ANIMATION RIGOLOTE 
Hello Stryk Cool ,

Une petite amélioration du code pour passer le temps ^^.
Histoire de mettre un peu de couleurs en batch Wink
Pour les F1 on verra plus tard Mr. Green

@_+

Code:
@echo off
if not exist batbox.exe call :batbox
title course
color 0f
mode con cols=130 lines=24
for %%A in (ba,ab,bc,bd,be) do set %%A=0
for %%B in (a,b,c,d,e,aa,bb,cc,dd,ee) do set %%B=
cls
call :course_txt
goto depart
:courses_1_1
if %random:~0,1%==1 (
 set /a ba+=1
 set "a=%a% "
 )
if %random:~0,1%==1 (
 set /a ab+=1
 set "b=%b% "
 )
if %random:~0,1%==1 (
 set /a bc+=1
 set "c=%c% "
 )
if %random:~0,1%==1 (
 set /a bd+=1
 set "d=%d% "
 )
if %random:~0,1%==1 (
 set /a be+=1
 set "e=%e% "
 )
:depart
batbox /g 1 1 /c 0x0a /d "%a% -X-
batbox /g 1 2 /c 0x0a /d "%a%(o o)
batbox /g 1 3 /c 0x0a /d "%a% (_)
if %ba%==100 batbox /g 0 21 /d "Victoire de l'agneau" /g 0 22&pause&goto menu
batbox /g 1 5 /c 0x0b /d "%b% /°\
batbox /g 1 6 /c 0x0b /d "%b%(o o)
batbox /g 1 7 /c 0x0b /d "%b% (_)
if %ab%==100 batbox /g 0 21 /d "Victoire du clown" /g 0 22&pause&goto menu
batbox /g 1 9 /c 0x0c /d "%c%\,=./
batbox /g 1 10 /c 0x0c /d "%c%(o o)
batbox /g 1 11 /c 0x0c /d "%c% (_)
if %bc%==100 batbox /g 0 21 /d "Victoire de la sauterelle" /g 0 22&pause&goto menu
batbox /g 1 13 /c 0x0d /d "%d%.===.
batbox /g 1 14 /c 0x0d /d "%d%{o o)
batbox /g 1 15 /c 0x0d /d "%d% (_)
if %bd%==100 batbox /g 0 21 /d "Victoire du singe" /g 0 22&pause&goto menu
batbox /g 1 17 /c 0x0e /d "%e%()_()
batbox /g 1 18 /c 0x0e /d "%e%(o o)
batbox /g 1 19 /c 0x0e /d "%e% `o'
if %be%==100 batbox /g 0 21 /d "Victoire de la sourie" /g 0 22&pause&goto menu
set /a ba+=1
set "a=%a% "
set /a ab+=1
set "b=%b% "
set /a bc+=1
set "c=%c% "
set /a bd+=1
set "d=%d% "
set /a be+=1
set "e=%e% "
goto courses_1_1

:course_txt
echo ________________________________________________________________________________________________________________________________
echo                                                                                                          Û Û Û
echo                                                                                                           Û Û
echo                                                                                                          Û Û Û
echo      -     -     -     -     -     -     -     -     -     -     -     -     -     -     -     -     -    Û Û    -     -     -
echo                                                                                                          Û Û Û
echo                                                                                                           Û Û
echo                                                                                                          Û Û Û
echo      -     -     -     -     -     -     -     -     -     -     -     -     -     -     -     -     -    Û Û    -     -     -
echo                                                                                                          Û Û Û
echo                                                                                                           Û Û
echo                                                                                                          Û Û Û
echo      -     -     -     -     -     -     -     -     -     -     -     -     -     -     -     -     -    Û Û    -     -     -
echo                                                                                                          Û Û Û
echo                                                                                                           Û Û
echo                                                                                                          Û Û Û
echo      -     -     -     -     -     -     -     -     -     -     -     -     -     -     -     -     -    Û Û    -     -     -
echo                                                                                                          Û Û Û
echo                                                                                                           Û Û
echo                                                                                                          Û Û Û
echo ________________________________________________________________________________________________________________________________
goto :eof

:batbox
For %%b In (
    "4D5A80000100000004001000FFFF0000400100000000000040000000000000"
    "0000000000000000000000000000000000000000000000000000000000800000"
    "000E1FBA0E00B409CD21B8014CCD21546869732070726F6772616D2063616E6E"
    "6F742062652072756E20696E20444F53206D6F64652E0D0A2400000000000000"
    "00504500004C01010001B1D54F0000000000000000E0000F010B010145000400"
    "0000040000000000000010000000100000001000000000400000100000000200"
    "000100000000000000040000000000000000200000000200005FFC0000030000"
    "0100100000001000000000010000000000000000001000000000000000000000"
    "0040120000AE0100000000000000000000000000000000000000000000000000"
    "0000000000000000000000000000000000000000000000000000000000000000"
    "0000000000000000000000000000000000000000000000000000000000000000"
    "000000000000000000000000000000000000000000000000002E666C61740000"
    "001A040000001000000004000000020000000000000000000000000000600000"
    "E000000000000000000000000000000000000000000000000000000000000000"
    "0000000000000000000000000000000000000000000000000000000000000000"
    "0000000000000000000000000000000000000000000000000000000000000000"
    "0068FE1340006A0068FE13400068F213400068EE134000FF158C1340006AF5FF"
    "15B8124000A3FA1340006AF6FF15B8124000A3F6134000E8DA010000803B2F0F"
    "85E50100004331C08A030C203C6B74583C670F848A0000003C63742D3C610F84"
    "C30000003C660F84DC0000003C640F84F80000003C6D0F84060100003C770F84"
    "76010000E9A1010000E8880100006A006A0053FF159813400050FF35FA134000"
    "FF15C0124000EB8F6A5F53FF159C13400085C0740EFF159413400085C00F8474"
    "FFFFFFFF15881340003DE0000000750BFF158813400005FF00000050FF159013"
    "4000E82F0100006A006A0053FF1598134000A302144000E81A0100006A006A00"
    "53FF1598134000C1E010010502144000FF3502144000FF35FA134000FF15C412"
    "4000E910FFFFFFE8EA0000006A006A0053FF159813400050683D124000FF1584"
    "134000E9EFFEFFFFE8C90000006A006A0053FF15981340006A0050FF35FA1340"
    "00FF15D0124000E9CBFEFFFFE8A5000000536831124000FF1584134000E9B5FE"
    "FFFF6A18FF35F6134000FF15BC12400068FE1340006A016806144000FF35F613"
    "4000FF15C8124000833DFE1340000074D166833D061440000275C7830D161440"
    "0002833D161440000275B78B3D0A14400089FEC1EF1081E6FFFF0000A10E1440"
    "000305161440005057566834124000FF1584134000E93DFEFFFFE8170000006A"
    "006A0053FF159813400050FF15CC124000E921FEFFFF8305F2134000048B1DF2"
    "1340008B1B85DB7401C36A00FF159013400025730025643A25643A2564002563"
    "006413000000000000000000007C120000841300009812000000000000000000"
    "0088120000B812000000000000000000000000000000000000000000004D5356"
    "4352542E444C4C00004B45524E454C33322E444C4C00000000D8120000E81200"
    "00FA1200001413000030130000441300004C13000000000000D8120000E81200"
    "00FA1200001413000030130000441300004C1300000000000000004765745374"
    "6448616E646C6500000000536574436F6E736F6C654D6F646500000000536574"
    "436F6E736F6C6554657874417474726962757465000000536574436F6E736F6C"
    "65437572736F72506F736974696F6E0000000052656164436F6E736F6C65496E"
    "70757441000000536C656570000000536574436F6E736F6C65446973706C6179"
    "4D6F646500A4130000AE130000B8130000C8130000D0130000DA130000E41300"
    "0000000000A4130000AE130000B8130000C8130000D0130000DA130000E41300"
    "000000000000007072696E7466000000005F6765746368000000005F5F676574"
    "6D61696E6172677300000065786974000000005F6B6268697400000000737472"
    "746F6C0000000073747263687200000000000000000000000000000000000000"
    "00"
) Do >> "batbox.ex_" (Echo.For b=1 To len^(%%b^) Step 2
Echo WScript.StdOut.Write Chr^(Clng^("&H"^&Mid^(%%b,b,2^)^)^) : Next)
Cscript /b /e:vbs "batbox.ex_" > "batbox.exe"
Del "batbox.ex_" >nul 2>&1
goto :eof





______________________________________________________
Le batch est mon joujou de tout les jours,
plus pour le loisir que pour le travail,
et avec j'apprend presque tout les jours,
comment programmer et le travailler,
pour avoir enfin un résultat cool.

Ed la poignée du 93 (^_^)
Yahoo Messenger MSN Skype
Message ANIMATION RIGOLOTE 


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