Mousecmd menu batch

Résolu/Fermé

agent_gbracoune - 2 août 2020 à 16:05
agent_gbracoune - 2 août 2020 à 19:57

Bonjour,j'aimerai que l'on m'aide parce que je ne comprend pas ultra bien le batch je vous donne le code et si vous pourrais m'aider a changer juste le nom du hide 3seconds ou l'autre truc pour en faire un mod menu svp.

A voir également:

Mousecmd menu batch
Menu déroulant excel - Guide
Fichier batch - Guide
Menu démarrer windows 11 - Guide
Canon quick menu - Télécharger - Utilitaires
Menu demarrer - Guide

1 réponse

Réponse 1 / 1

agent_gbracoune
2 août 2020 à 19:57

@echo off
color 2

mode con:cols=80 lines=25
rem CenterSelf
set FGcol=10
rem ChangeColor %FGcol% 0
rem PrintBoxAt 12 31 3 20 2
rem ChangeColor 0 %FGcol%

rem Wait 30
REM COPY FILES HERE

rem ShadeBoxAt 13 32 1 2 2

rem Wait 30
REM COPY MORE FILES HERE

rem ShadeBoxAt 13 34 1 2 2

rem Wait 30
REM COPY MORE FILES HERE

rem ShadeBoxAt 13 36 1 2 2

rem Wait 30
REM COPY MORE FILES HERE

rem ShadeBoxAt 13 38 1 2 2

rem Wait 30
REM COPY MORE FILES HERE

rem ShadeBoxAt 13 40 1 2 2

rem Wait 30
REM COPY MORE FILES HERE

rem ShadeBoxAt 13 42 1 2 2

rem Wait 30
REM COPY MORE FILES HERE

rem ShadeBoxAt 13 44 1 2 2

rem Wait 30
REM COPY MORE FILES HERE

rem ShadeBoxAt 13 46 1 2 2

rem Wait 30
REM COPY MORE FILES HERE

rem ShadeBoxAt 13 48 1 2 2

rem ClearColor
rem Locate 25 1
pause

REM - MouseCMD Menu example
mode con:cols=80 lines=25
rem CenterSelf
:MenuBG
set BGcol=1
set BGcheck=[X]
rem ChangeColor 7 %BGcol%
cls
:Menu
rem Paintscreen %BGcol%
rem ChangeColor 7 %BGcol%
rem PrintBox 20 44 2
rem PrintBox 16 38 %BGcol%
rem PrintCenter Main Menu 7 11 %BGcol%
rem ChangeColor 9 0
rem Locate 10 32
rem PrintColor 1) cacher dans 3 sec 11 %BGcol%
rem Locate 12 32
rem PrintColor 2) test aleatoire 11 %BGcol%
rem Locate 14 32
rem PrintColor 3) Exit 11 %BGcol%
rem PrintCenter %BGcheck% Draw Background color 17 15 %BGcol%
rem ChangeColor 10 %BGcol%
rem MouseCMD 32,10,48,10 32,12,45,12 32,14,38,14 29,17,29,17
if %result%==1 goto HideTest
if %result%==2 goto RandomTest
if %result%==3 goto EndTest
if %result%==4 goto ClearBG
REM Keep Menu if invalid input
goto Menu

:ClearBG
if %BGcol%==0 goto MenuBG
set BGcol=0
set BGcheck=[ ]
rem ChangeColor 7 %BGcol%
cls
goto Menu

:HideTest
rem Locate 10 32
rem PrintColor 2) fermer dans 3 seconde 11 15
rem Wait 200
rem HideSelf
cls
rem Wait 3000
rem ShowSelf
goto Menu

:RandomTest
rem Locate 12 32
rem PrintColor 2) test aléatoire 11 15
rem Wait 200
set myAddVar=0
:TestLoop
cls
rem Add %myAddVar% 1
set myAddVar=%result%
rem GenRandom 15
rem PaintScreen %result%
rem PrintCenter Color=%result% ( %myAddVar% of 10 ) 12 15 %result%
rem Wait 400
if %myAddVar%==10 goto Menu
goto TestLoop

:EndTest
rem Locate 14 32
rem PrintColor 3) continuer 11 15
rem Wait 200
rem Paintscreen 1
rem ChangeColor 7 1
rem PrintBox 16 36 2
rem Wait 25
cls
rem PrintBox 12 28 2
rem Wait 25
cls
rem PrintBox 8 20 1
rem Wait 25
cls
rem PrintBox 4 12 1
rem Wait 25
cls

Pause

Discussions similaires

les entrées et les sortées

echo off qu'est ce que c'est ?

Faire une attente sous dos (batch)

mon ordi marque press the esc key for startup menu

Discussions similaires

Newsletters