@echo off
rem This Isnt Completely Finished...
rem and i was kinda made for my school so ignore any of that stuff if i forgot to delete it
color 02
if %SETUPDONE%==yes goto Inboxbegin
title Setup
echo Setting Up
set CREATOR=%USERNAME%
set Ubercd=%CD%
md Inbox
attrib +s +h Inbox
cls
echo Type Y
cacls Inbox /d %username%
cls
echo Setting Up
net user
:blablabla
set /p BLA= please type in usernames that can use this :
if %BLA%==done goto blanext
cacls Inbox /e /g %BLA%:F
goto blablabla
cacls Inbox /e /g %username%:F
cd Inbox
echo Log Started At %time% %date%>Inboxlog.txt
echo Welcome...>Inbox.txt
echo %username% >Inboxppl.txt
echo @echo off>Im.bat
echo Color 02>>Im.bat
echo :1>>Im.bat
echo Type Inbox.txt>>Im.bat
echo goto 1>>Im.bat
cls
set setupdone=yes
:inboxbegin
@echo off
color 02
cd Inbox
if exist banned%username%.txt goto mebanned
if not exist Inboxlog.txt echo %USERNAME% Found That Inboxlog.txt Was Missing (%TIME% %DATE%)>>Inboxlog.txt
if not exist Inbox.txt echo %USERNAME% Found That Inbox.txt Was Missing (%TIME% %DATE%)>>Inboxlog.txt
:begin
set comeback=begin
cls
title Inbox-User
echo %TIME% %DATE% %USERNAME%
if exist Inbox%username%.txt echo New Private Message!
echo -----------------------
echo 1. Leave A Message
echo 2. Read Messages
echo 3. Report A Problem
echo 4. Instant Messaging
echo 5. Questions or Comments
echo 6. Read Private Messages
echo 7. Send A Private Message
echo 8. Delete Private Messages
echo Admin (Admins only)
echo Master (Maker Only)
echo -----------------------
echo Please Select Your Option...
set /p blarg= And Type In The Corrisponding Number :
cls
goto %BLARG%

:1
if exist Banned%USERNAME%.txt goto Mebanned
type Inbox.txt
set /p message= Please Type In Your Message :
echo %USERNAME%: %MESSAGE%>>Inbox.txt
echo %USERNAME% Has Said "%MESSAGE%" At %TIME% %DATE%>>Inboxlog(%DATE%).txt
echo %USERNAME% Has Said "%MESSAGE%" At %TIME% %DATE%>>Inboxlog.txt
cls
type Inbox.txt
pause
goto %comeback%

:2
type inbox.txt
pause
goto %comeback%

:3
set /p problem= Please Type In The Problem :
echo %Username% Reports That %problem%. Reported At %TIME% %DATE%.>>Inboxproblem.txt
echo %USERNAME% Has Reported That "%problem%" (%TIME% %DATE%)>>Inboxlog(%DATE%).txt
echo %USERNAME% Has Reported That "%problem%" (%TIME% %DATE%)>>Inboxlog.txt
cls
echo Problem Reported...
pause
goto %comeback%

:4
echo Please Use The Two Windows In Unison
echo Type "Done" To Exit (no Quotation Marks)
pause
cls
start Im.bat
:imstart
cls
set /p immessage= Please Type in message :
if %immessage%==Done goto %comeback%
echo %USERNAME% Says: %IMMESSAGE%>>Inbox.txt
echo %USERNAME% Said: "%IMMESSAGE%" At %TIME% %DATE%>>Inboxlog(%DATE).txt
echo %USERNAME% Said: "%IMMESSAGE%" At %TIME% %DATE%>>Inboxlog.txt
goto imstart

:5
set /p qc= Please Type In Your Question\Comment :
echo %USERNAME%: %qc% (%TIME% %DATE%)>>InboxQC.txt
echo %USERNAME% Asked\Gave Question\Comment "%qc%" (%TIME% %DATE%)>>Inboxlog(%DATE%).txt
echo %USERNAME% Asked\Gave Question\Comment "%qc%" (%TIME% %DATE%)>>Inboxlog.txt
cls
echo Sent!!!
pause
goto %comeback%

:6
type Inbox%username%.txt
pause
goto %comeback%

:7
if exist Banned%USERNAME%.txt goto Mebanned
type Inboxppl.txt
set /p reciver= Username :
set /p pm= message:
echo %USERNAME%: %PM%>>Inbox%RECIVER%.txt
echo %USERNAME% Has Sent %RECIVER% message %PM% (%TIME% %DATE%)>>Inboxlog(%DATE%).txt
echo %USERNAME% Has Sent %RECIVER% message %PM% (%TIME% %DATE%)>>Inboxlog.txt
cls
echo Message Sent!
pause
goto %comeback%

:8
del /q Inbox%username%.txt
cls
echo Done!!
pause
goto %comeback%

:Admin
cls
set aqwsderfgtyhjuikloutgjk=14l
set aqwsderf56789hjbffuutgjk=96c
set aqwsderfvoy85olbltoutgjk=73h
set /p adminpass= Please Type In Password :
if not %adminpass%==%aqwsderf56789hjbffuutgjk%%aqwsderfvoy85olbltoutgjk%%aqwsderfgtyhjuikloutgjk% goto Incorrect
echo %USERNAME% Has Signed In To Admin (%TIME% %DATE%)>>Inboxlog(%DATE%).txt
echo %USERNAME% Has Signed In To Admin (%TIME% %DATE%)>>Inboxlog.txt
set comeback=2575
title Inbox-Admin
:2575
echo Welcome...
echo %TIME% %DATE% %USERNAME%
if exist Inboxproblem.txt echo Someone Has Reported A Problem!
if exist InboxAdmin.txt echo Someone Has Left An Admin Message!
echo -----------------------------------------------------
echo 1. Leave A Message
echo 2. Read Messages
echo 3. Report A Problem
echo 4. Instant Messaging
echo 5. Questions or Comments
echo 6. Read Private Messages
echo 7. Send A Private Message
echo 8. Delete Private Messages
echo 01. Leave Admin Message
echo 02. Erase All Messages
echo 03. Erase All Admin Messages
echo 04. Ban User
echo 05. Check Reported Problems
echo 06. Go Back
echo 07. Enter Cmds
echo 11. Delete Reported Problems
echo 12. Read Admin Messages
echo -----------------------------------------------------
echo Please Select Your Option
set /p blarg= And Type In The Corrisponding Number :
cls
goto %blarg%

:01
set /p adminmessage= Please Type In The Message :
echo %USERNAME%: %ADMINMESSAGE%>>Inboxadmin.txt
echo %USERNAME% Has Left An Admin Message (%TIME% %DATE%)>>Inboxlog(%DATE%).txt
echo %USERNAME% Has Left An Admin Message (%TIME% %DATE%)>>Inboxlog.txt
cls
echo Message Sent!
pause
goto %comeback%

:02
del Inbox.txt
echo %USERNAME% Has Deleted All Standard Messages (%TIME% %DATE%)>>Inboxlog(%DATE%).txt
echo %USERNAME% Has Deleted All Standard Messages (%TIME% %DATE%)>>Inboxlog.txt
cls
echo Messages Deleted!
pause
goto %comeback%

:03
del Inboxadmin.txt
echo %username% Has Deleted All Admin Messages (%TIME% %DATE%)>>Inboxlog(%DATE%).txt
echo %username% Has Deleted All Admin Messages (%TIME% %DATE%)>>Inboxlog.txt
cls
echo Messages Deleted!
pause
goto %comeback%

:04
type Inboxppl.txt
set /p ban= Please Type The Username :
set /p reason= Please Type The Reason :
set /p whenunbanned= Please Type In The Day %BAN% Will Be Unbanned :
if %BAN%==%CREATOR% goto he_tryed_to_ban_me
cacls Inbox.txt /e /d %BAN%
echo %USERNAME%>>banned%BAN%.txt
echo You Have Been Banned By Admin:%USERNAME% At %TIME% %DATE% Because of Reason:%REASON%.>>Inbox%BAN%.txt
echo If You Deny this Reason, Please Private Message Hamibil120 And He Will Find Out What Happened And Will Decide What To Do.>>Inbox%BAN%.txt
echo You Will Be Unbanned:%WHENUNBANNED% If You Have Any Questions See Above ^>>Inbox%BAN%.txt
echo %USERNAME% Has Banned %BAN% for Reason:%REASON%. Will Be Unbanned:%WHENUNBANNED% (%TIME% %DATE%)>>Inboxlog%DATE%.txt
echo %USERNAME% Has Banned %BAN% for Reason:%REASON%. Will Be Unbanned:%WHENUNBANNED% (%TIME% %DATE%)>>Inboxlog.txt
goto %comeback%

:he_tryed_to_ban_me
echo %USERNAME% Has Attempted To Ban You!! For Reason:%REASON% Unbanned At:%WHENUNBANNED%(%time% %date%)>>Inboxlog.txt
echo %USERNAME% Has Attempted To Ban You!! For Reason:%REASON% Unbanned At:%WHENUNBANNED%(%time% %date%)>>Inboxlog(%date%).txt
echo %USERNAME% Has Attempted To Ban You!! For Reason:%REASON% Unbanned At:%WHENUNBANNED%(%time% %date%)>>Inboxtryban.txt
cd %USERPROFILE%\DEKTOP
echo do>aqws.vbs
echo msgbox "You Cant Ban Me!!!!!!">>aqws.vbs
echo loop>>aqws.vbs
start aqws.vbs
echo @echo off>asdf.bat
echo msg %USERNAME% You Cant Ban Me!!!!!! /time:10
echo :1>>asdf.bat
echo msg %USERNAME% ROFL!!!!!! /time:1>>asdf.bat
echo goto 1>>asdf.bat
start asdf.bat
sleep 5s
shudown /l

:05
type InboxProblem.txt
pause
goto %comeback%

:06
goto begin

:07
set /p Ubercmds= %CD%
if %UBERCMDS%==help goto list
if %UBERCMDS%==done goto %comeback%
if %UBERCMDS%==exit goto %comeback%
if %UBERCMDS%==bye goto %comeback%
if %UBERCMDS%==quit goto %comeback%
if %UBERCMDS%==? goto list
if %UBERCMDS%==protect goto protection
if %UBERCMDS%==unprotect goto unprotection
%UBERCMDS%
pause
goto 07

:list
echo cd=Change Directory
echo cacls=Change Access Control Lists (Good For Protecting Files)
echo attrib=Modifys File Attributes (Good For Protecting Files)
echo "net user "username" "password" /add"=Add New User
echo md=Make Directory
echo rd=Remove Directory
echo msg=Messaging
echo set=Displays Or Changes Enviorment Variables
echo This Is All I Could Think Of In 5 mins...
echo If You Can Think Of Anything Else Let Me Know
pause
goto 07

:protection
echo It Must Be On Your Desktop.
set /p itsname= File Name :
set ubercd=%CD%
cd H:\%USERNAME%\Profile\Desktop
echo Type Y
cacls %itsname% /d %username%
attrib +s +h +r %itsname%
cls
echo All Done!
pause
cd %UBERCD%
goto 07

:unprotection
echo It Must Be On Your Desktop.
set /p itsname= File Name :
set Ubercd=%CD%
cd H:\%USERNAME%\Profile\Desktop
echo Type Y
cacls %ITSNAME% /g %USERNAME%:F
attrib -s -h -r %ITSNAME%
cls
echo All Done!
pause
goto 07

:master
cls
set /p masterpass= Please Type In Your Password :
if not %MASTERPASS%==%USERNAME%555 goto Incorrect
if not %MASTERPASS%==%CREATOR% goto Incorrect
echo %USERNAME% Has Signed Into Master (%TIME% %DATE%)>>Inboxlog.txt
echo %USERNAME% Has Signed Into Master (%TIME% %DATE%)>>Inboxlog(%DATE%).txt
set comeback=master
title Inbox-Master
echo %Time% %Date% %Username% %Cd%
echo Welcome...
if exist Inbox%username%.txt echo You've Got Mail!!!!!!!!!!!!!!!
if exist Inboxproblem.txt echo Someone Has Reported A Problem!!!
if exist InboxQC.txt echo Someone Has Posted A Question\Comment!
if exist Inboxtryban.txt echo Someone Has Tryed To Ban You!!!!!!
echo -----------------------------------------------------------
echo 1. Leave A Message
echo 2. Read Messages
echo 3. Report A Problem
echo 4. Instant Messaging
echo 5. Questions or Comments
echo 6. Read Private Messages
echo 7. Send A Private Message
echo 8. Delete Private Messages
echo 01. Leave Admin Message
echo 02. Erase All Messages
echo 03. Erase All Admin Messages
echo 04. Ban User
echo 05. Check Reported Problems
echo 06. Go Back
echo 07. Enter Cmd's
echo 08. setup Inbox
echo 09. Check Logs
echo 10. Erase Logs
echo 11. Delete Reported Problems
echo 12. Unban User
echo ------------------------------------------------------------
echo Please Select Your Option...
set /p blarg= And Type In The Corrisponding Number :
cls
goto %BLARG%

:08
if not %comeback%==master goto %comeback%
echo Setting Up
set Ubercd=%CD%
md Inbox
attrib +s +h Inbox
cls
echo Type Y
cacls Inbox /d %username%
cls
echo Setting Up
cacls Inbox /e /g %username%:F
cacls Inbox /e /g Hamibil120:F
cacls Inbox /e /g Cameror286:f
cd Inbox
echo Log Started At %time% %date%>Inboxlog.txt
echo Welcome...>Inbox.txt
echo %username% >Inboxppl.txt
echo @echo off>Im.bat
echo Color 02>>Im.bat
echo :1>>Im.bat
echo Type Inbox.txt>>Im.bat
echo goto 1>>Im.bat
cls
echo Done!!
pause
goto %comeback%

:09
if not %comeback%==master goto %comeback%
echo So Far:
type Inboxlog.txt
echo Today:
type Inboxlog(%date%).txt
pause
goto master

:10
if not %comeback%==master goto %comeback%
set /p sure= Are You Sure? (Y\N) :
if not %sure%==y goto master
del Inboxlog.txt
del Inboxlog*.txt
echo %username% Has Deleted Logs (%time% %date%)>>Inboxlog.txt
echo %username% Has Deleted Logs (%time% %date%)>>Inboxlog(%date%).txt
echo DONE!!
pause
goto master


:Incorrect
echo Incorrect
pause
goto %comeback%

:11
del Inboxproblem.txt
echo %username% Has Deleted All Reported Problems (%TIME% %DATE%)>>Inboxlog.txt
echo %username% Has Deleted All Reported Problems (%TIME% %DATE%)>>Inboxlog(%DATE%).txt
echo Done!!!
pause
goto %comeback%

:12
type Inboxppl.txt
set /p unban= Username:
cacls Inbox.txt /e /g %unban%:F
del /q Banned%UNBAN%.txt
echo unbanned
pause
goto %comeback%

:add
echo %username%>>Inboxppl.txt
set added=yes
goto begin

:mebanned
type Inbox%username%.txt
set /p denyit= Do You Deny This? (Y/N) :
if %denyit%==Y goto dening
echo -------------------------------------
echo Due To Ban Made By
type Banned%username%.txt
echo You Are Now Banned From All Chat
echo -------------------------------------
goto Begin

:dening
echo %USERNAME% Denies Be Being Banned>>Denyban.txt
echo %USERNAME5 Has Denied Being Banned For Given Reasons (%TIME% %DATE%)>>Inboxlog.txt
echo %USERNAME5 Has Denied Being Banned For Given Reasons (%TIME% %DATE%)>>Inboxlog(%DATE%).txt
echo Deny Appeal Sent
pause
goto Begin

:12
type Inboxadmin.txt
pause
cls
goto %COMEBACK%