Batch Programs Thread.

[Sky Ninja]

It still just flashes for me, but I think that it's because choice doesn't work on XP.
Anyway, I made a batch program that generates a random level name for the game SRB2. Someone else made a similar program, but in C++.

Code: [Select]

::Batch file designed by Sky Ninja
@echo off
set base=none
set sec=none
color 1f
title SRB2 Level Name Generator
:start:
cls
set /a g=(%random% %%15)+1
if %g% equ 1 set base=Green
if %g% equ 2 set base=Glowing
if %g% equ 3 set base=Egg
if %g% equ 4 set base=Clover
if %g% equ 5 set base=Lunar
if %g% equ 6 set base=Radiant
if %g% equ 7 set base=Hidden
if %g% equ 8 set base=Flaming
if %g% equ 9 set base=Frozen
if %g% equ 10 set base=Dark
if %g% equ 11 set base=Sandy
if %g% equ 12 set base=Final
if %g% equ 13 set base=Lost
if %g% equ 14 set base=Fatal
if %g% equ 15 set base=Weapons
set /a h=(%random% %%10)+1
if %h% equ 1 set sec=Hill
if %h% equ 2 set sec=Shrine
if %h% equ 3 set sec=Factory
if %h% equ 4 set sec=Base
if %h% equ 5 set sec=City
if %h% equ 6 set sec=Field
if %h% equ 7 set sec=Dunes
if %h% equ 8 set sec=Mountain
if %h% equ 9 set sec=Core
if %h% equ 10 set sec=Attack
echo. Your level is...
echo %base% %sec% Zone>>"C:\Documents and Settings\%username%\My Documents\LevelNameGen.txt"
echo. %base% %sec% Zone
echo. 
echo. Generate another? (y/n)
Set /p yn= :
if %yn% equ y goto start
if %yn% equ n exit

[fireballs]

inspired by devcom i made a file explorer.

Code: [Select]

@echo off
mode con lines=20 cols=60
:start
cls
echo you are here: %CD%
echo.
echo.Up?            -W
echo.Open?          -A
echo.Search?        -S
echo.Enter address? -D
echo.Quit           -Q
echo.CMD?           -Z
echo.rename?        -R
echo.copy?          -c
choice /c "WADQSRZC">Nul
if errorlevel 8 goto C
if errorlevel 7 goto Z
if errorlevel 6 goto R
if errorlevel 5 goto S
if errorlevel 4 goto Q
if errorlevel 3 goto D
if errorlevel 2 goto A
if errorlevel 1 goto W
echo error!!!
pause
exit

:C
echo.
set /p OR=what do you want to copy?
if "%OR%"=="back" goto start
set /p nom= where to?
copy %OR% %nom%
goto start

:D
echo.
set /p add=where do you want to go?
if "%add%"=="back" goto start
cd %add%
goto start

:W
cd..
goto start

:A
echo.
dir /a:-d /b
echo.
set /p add=what do you want to run?
if "%add%"=="back" goto start
start "" %add%
goto start

:Q
echo bye
exit

:S
set /p OR=where do you want to search?
if "%OR%"=="back" goto start
set /p add=what do you want to search for?
where /R %OR% "%add%"
pause
goto start

:R
set /p OR=what would you like to rename?
if "%OR%"=="back" goto start
set /p nom=rename to what?
ren %OR% %nom%
goto start

:Z
set /p add=%CD%^>
if "%add%"=="back" goto start
%add%
pause
goto start


[devcom]

ok ive attached file and should work for all now even on xp

EDIT:
try now

[recovering disk space -- attachment deleted by admin]

[Sky Ninja]

Nope. Choice in not recognised as a valid win32 application. It tries to work, but choice is uncompatable.

[devcom]

c'mon guys post your 'things'

[fireballs]

... you want to see my 'thing'... usually i'd wait until after the first date but seeing as you asked so politely....

FB

[devcom]

... you want to see my 'thing'... usually i'd wait until after the first date but seeing as you asked so politely....

lol

here is link to my file ex should work on XP to now

http://www.computerhope.com/forum/index.php?action=dlattach;topic=59426.0;attach=5360

[fireballs]

I can't get the file ex to work. I am using vista but it just displays a message blinks then displays the same message like it's in a loop.

I still prefer my version

FB

[macdad-]

add a colon between the /C and the wsdafjo on this line like this

Code: [Select]

choice /C:wsdafjo >nul

[devcom]

thats imposible becouse ive copied.exe choice from windows\system32 so it should work normal, and better that pressing for ex. a and then enter each time

and about that colon it works for me without and well i will add it in future scripts

[fireballs]

after putting in .../c:w... i get an error on this line:

for /F "delims=? skip=%nnum%" %%L in ('dir /B /A:D %cd%') do (
cd %%L
goto CD
)

saying

" was unexpected at this time.

FB

[macdad-]

huh....the only prob i had was the blinking on the choice command and the colon solved the prob. I have Windows 2000 Pro but i didnt have a problem on that line.

[devcom]

try to change

Code: [Select]

if %cnum% equ 1 (
for /F "delims=?" %%L in ('dir /B /A:D %cd%') do (
cd %%L
goto CD
)
)to

Code: [Select]

if %cnum% leq 1 (
for /F "delims=?" %%L in ('dir /B /A:D %cd%') do (
cd %%L
goto CD
)
)
i think you are trying to go in higher dir when there isnt higher dir

[fireballs]

at least mine works 

FB

[Sky Ninja]

Choice doesn't work on XP.

Microsoft Windows 2000 and Windows XP users who have batch files that utilize the choice command should modify the batch file to use the MS-DOS set command.