@ECHO OFF                                              
SET cserror=
SET csmenu=
SET cstime=1
SET csday=m,t,w,th,f,s,su
SET csreturn=Loop
GOTO mainscreen
:Loop
ECHO  ³
ECHO  ³ Defrag will start at %cstime%:00am
ECHO  ³
ECHO  ³ Choose a Defragmentation Option:
ECHO  ³  1) Schedules Daily Defragmentation
ECHO  ³  2) Schedules Weekly Defragmentation
ECHO  ³
ECHO  ³  C) Change Hour
ECHO  ³  V) View Current AT Schedules
ECHO  ³  Q) Quit
SET /P csmenu= ÀÄ+
IF NOT '%csmenu%'=='' SET csmenu=%csmenu:~0,1%
IF '%csmenu%'=='1' GOTO Daily
IF '%csmenu%'=='2' GOTO Weekly
IF '%csmenu%'=='c' GOTO Changemain
IF '%csmenu%'=='v' GOTO Currentat
IF '%csmenu%'=='q' GOTO End
GOTO mainscreen

:Currentat
SET csreturn=Viewat
GOTO mainscreen
:Viewat
ECHO  ³
ECHO  ³ Current Scheduled Tasks:
ECHO  ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄij
%windir%\system32\at.exe
pause
SET csreturn=Loop
GOTO mainscreen

:Changemain
SET csreturn=Changetime
GOTO mainscreen
:Changetime
ECHO  ³
ECHO  ³ Choose Hour (Between 1am to 9am):
SET /P cstime= ÀÄ+
IF NOT '%cstime%'=='' SET cstime=%cstime:~0,1%
IF '%cstime%'=='1' set csreturn=Loop
IF '%cstime%'=='2' set csreturn=Loop
IF '%cstime%'=='3' set csreturn=Loop
IF '%cstime%'=='4' set csreturn=Loop
IF '%cstime%'=='5' set csreturn=Loop
IF '%cstime%'=='6' set csreturn=Loop
IF '%cstime%'=='7' set csreturn=Loop
IF '%cstime%'=='8' set csreturn=Loop
IF '%cstime%'=='9' set csreturn=Loop
IF '%cstime%'=='q' GOTO End
GOTO mainscreen

:Weekly
set csreturn=atweekly
goto mainscreen
:atweekly
ECHO  ³
ECHO  ³ Choose Day of Week (m,t,w,th,f,s,su):
SET /P csday= ÀÄ+
IF '%csday%'=='m' set csreturn=Weekly2
IF '%csday%'=='t' set csreturn=Weekly2
IF '%csday%'=='w' set csreturn=Weekly2
IF '%csday%'=='th' set csreturn=Weekly2
IF '%csday%'=='f' set csreturn=Weekly2
IF '%csday%'=='s' set csreturn=Weekly2
IF '%csday%'=='su' set csreturn=Weekly2
IF '%csday%'=='q' GOTO End
Goto mainscreen

:Weekly2
%windir%\system32\at.exe %cstime%:00am /every:%csday% defrag -f c:
Goto End

:Daily
%windir%\system32\at.exe %cstime%:00am /every:m,t,w,th,f,s,su defrag -f c:
Goto End

:mainscreen
cls
ECHO  ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
ECHO  ³± Simple Scheduled Defragmentation ±³
ECHO  ³±                                  ±³
ECHO  ³±     **USE AT YOUR OWN RISK**     ±³
ECHO  ³±     **FOR USE WITH XP ONLY**     ±³
ECHO  ³±                                  ±³
ECHO  ³±  http://www.durantcomputers.com  ±³
ECHO  ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
GOTO %csreturn%
:End
%windir%\system32\at.exe
pause