├── .gitattributes ├── .gitignore ├── Batch.getComputerName.bat ├── Batch_Chat.bat ├── LICENSE.txt ├── README.md ├── colous.exe ├── crypt.exe ├── madplay.exe ├── original batch chat ├── Chat-Alpha_1.9.2.bat ├── README.md └── colous.exe └── ping.mp3 /.gitattributes: -------------------------------------------------------------------------------- 1 | # Auto detect text files and perform LF normalization 2 | * text=auto 3 | 4 | # Custom for Visual Studio 5 | *.cs diff=csharp 6 | *.sln merge=union 7 | *.csproj merge=union 8 | *.vbproj merge=union 9 | *.fsproj merge=union 10 | *.dbproj merge=union 11 | 12 | # Standard to msysgit 13 | *.doc diff=astextplain 14 | *.DOC diff=astextplain 15 | *.docx diff=astextplain 16 | *.DOCX diff=astextplain 17 | *.dot diff=astextplain 18 | *.DOT diff=astextplain 19 | *.pdf diff=astextplain 20 | *.PDF diff=astextplain 21 | *.rtf diff=astextplain 22 | *.RTF diff=astextplain 23 | -------------------------------------------------------------------------------- /.gitignore: -------------------------------------------------------------------------------- 1 | ################# 2 | ## Eclipse 3 | ################# 4 | 5 | *.pydevproject 6 | .project 7 | .metadata 8 | bin/ 9 | tmp/ 10 | *.tmp 11 | *.bak 12 | *.swp 13 | *~.nib 14 | local.properties 15 | .classpath 16 | .settings/ 17 | .loadpath 18 | 19 | # External tool builders 20 | .externalToolBuilders/ 21 | 22 | # Locally stored "Eclipse launch configurations" 23 | *.launch 24 | 25 | # CDT-specific 26 | .cproject 27 | 28 | # PDT-specific 29 | .buildpath 30 | 31 | 32 | ################# 33 | ## Visual Studio 34 | ################# 35 | 36 | ## Ignore Visual Studio temporary files, build results, and 37 | ## files generated by popular Visual Studio add-ons. 38 | 39 | # User-specific files 40 | *.suo 41 | *.user 42 | *.sln.docstates 43 | 44 | # Build results 45 | 46 | [Dd]ebug/ 47 | [Rr]elease/ 48 | x64/ 49 | build/ 50 | [Bb]in/ 51 | [Oo]bj/ 52 | 53 | # MSTest test Results 54 | [Tt]est[Rr]esult*/ 55 | [Bb]uild[Ll]og.* 56 | 57 | *_i.c 58 | *_p.c 59 | *.ilk 60 | *.meta 61 | *.obj 62 | *.pch 63 | *.pdb 64 | *.pgc 65 | *.pgd 66 | *.rsp 67 | *.sbr 68 | *.tlb 69 | *.tli 70 | *.tlh 71 | *.tmp 72 | *.tmp_proj 73 | *.log 74 | *.vspscc 75 | *.vssscc 76 | .builds 77 | *.pidb 78 | *.log 79 | *.scc 80 | 81 | # Visual C++ cache files 82 | ipch/ 83 | *.aps 84 | *.ncb 85 | *.opensdf 86 | *.sdf 87 | *.cachefile 88 | 89 | # Visual Studio profiler 90 | *.psess 91 | *.vsp 92 | *.vspx 93 | 94 | # Guidance Automation Toolkit 95 | *.gpState 96 | 97 | # ReSharper is a .NET coding add-in 98 | _ReSharper*/ 99 | *.[Rr]e[Ss]harper 100 | 101 | # TeamCity is a build add-in 102 | _TeamCity* 103 | 104 | # DotCover is a Code Coverage Tool 105 | *.dotCover 106 | 107 | # NCrunch 108 | *.ncrunch* 109 | .*crunch*.local.xml 110 | 111 | # Installshield output folder 112 | [Ee]xpress/ 113 | 114 | # DocProject is a documentation generator add-in 115 | DocProject/buildhelp/ 116 | DocProject/Help/*.HxT 117 | DocProject/Help/*.HxC 118 | DocProject/Help/*.hhc 119 | DocProject/Help/*.hhk 120 | DocProject/Help/*.hhp 121 | DocProject/Help/Html2 122 | DocProject/Help/html 123 | 124 | # Click-Once directory 125 | publish/ 126 | 127 | # Publish Web Output 128 | *.Publish.xml 129 | *.pubxml 130 | 131 | # NuGet Packages Directory 132 | ## TODO: If you have NuGet Package Restore enabled, uncomment the next line 133 | #packages/ 134 | 135 | # Windows Azure Build Output 136 | csx 137 | *.build.csdef 138 | 139 | # Windows Store app package directory 140 | AppPackages/ 141 | 142 | # Others 143 | sql/ 144 | *.Cache 145 | ClientBin/ 146 | [Ss]tyle[Cc]op.* 147 | ~$* 148 | *~ 149 | *.dbmdl 150 | *.[Pp]ublish.xml 151 | *.pfx 152 | *.publishsettings 153 | 154 | # RIA/Silverlight projects 155 | Generated_Code/ 156 | 157 | # Backup & report files from converting an old project file to a newer 158 | # Visual Studio version. Backup files are not needed, because we have git ;-) 159 | _UpgradeReport_Files/ 160 | Backup*/ 161 | UpgradeLog*.XML 162 | UpgradeLog*.htm 163 | 164 | # SQL Server files 165 | App_Data/*.mdf 166 | App_Data/*.ldf 167 | 168 | ############# 169 | ## Windows detritus 170 | ############# 171 | 172 | # Windows image file caches 173 | Thumbs.db 174 | ehthumbs.db 175 | 176 | # Folder config file 177 | Desktop.ini 178 | 179 | # Recycle Bin used on file shares 180 | $RECYCLE.BIN/ 181 | 182 | # Mac crap 183 | .DS_Store 184 | 185 | 186 | ############# 187 | ## Python 188 | ############# 189 | 190 | *.py[co] 191 | 192 | # Packages 193 | *.egg 194 | *.egg-info 195 | dist/ 196 | build/ 197 | eggs/ 198 | parts/ 199 | var/ 200 | sdist/ 201 | develop-eggs/ 202 | .installed.cfg 203 | 204 | # Installer logs 205 | pip-log.txt 206 | 207 | # Unit test / coverage reports 208 | .coverage 209 | .tox 210 | 211 | #Translations 212 | *.mo 213 | 214 | #Mr Developer 215 | .mr.developer.cfg 216 | -------------------------------------------------------------------------------- /Batch.getComputerName.bat: -------------------------------------------------------------------------------- 1 | @ECHO OFF 2 | title Batch.getComputerName - by Nabakin 3 | mode con cols=60lines=4 4 | echo. 5 | echo Hello, your computer name is "%computername%"! 6 | echo. 7 | pause >NUL -------------------------------------------------------------------------------- /Batch_Chat.bat: -------------------------------------------------------------------------------- 1 | @echo off 2 | ::Is win XP? 3 | ver | findstr "Windows XP" 4 | cls 5 | if %ERRORLEVEL% == 1 set winxp=true 6 | ::Check to see if the network has been setup yet 7 | if not exist "%appdata%\Batch_Chat" goto net 8 | ::Saves the directory of the chat 9 | set cdd=%cd% 10 | ::Specifies the room you are in 11 | set room=Lobby 12 | ::Checks for the messages arguement for the messages window 13 | if "%1" == "messages" goto messagesstart 14 | ::Checks for the reset argument to reset the batch chat 15 | if "%1" == "-reset" goto resetstart 16 | title Batch Chat - v1.2 17 | goto config 18 | 19 | ::Adds required files to data directory 20 | :config 21 | cd "%appdata%\Batch_Chat" 22 | if not exist "colous.exe" ( 23 | cd "%cdd%" 24 | xcopy "colous.exe" "%appdata%\Batch_Chat" 25 | cd "%appdata%\Batch_Chat" 26 | ) 27 | cd "%appdata%\Batch_Chat" 28 | if not exist "crypt.exe" ( 29 | cd "%cdd%" 30 | xcopy "crypt.exe" "%appdata%\Batch_Chat" 31 | cd "%appdata%\Batch_Chat" 32 | ) 33 | goto start 34 | 35 | :start 36 | ::Some display settings... 37 | color F0 38 | mode con cols=40lines=10 39 | ::Preparing to save data 40 | cd "%appdata%\Batch_Chat" 41 | ::Checking to see if you have already set your username and other settings, if so skips this part 42 | if exist "settings.bat" goto chat 43 | ::Asks for you to enter your name to be used for chatting 44 | echo. 45 | echo What is your name? 46 | echo. 47 | set /p name=">" 48 | ::If special network drive config exists 49 | set networkdrive=Z: 50 | if exist "networkdrive.bat" call "networkdrive.bat" 51 | ::Adds your username and other data into the chat drive 52 | if exist "%networkdrive%\users\%name%" ( 53 | cls 54 | echo. 55 | echo %name% is taken. 56 | echo. 57 | pause >NUL 58 | goto start 59 | ) 60 | if not exist "%networkdrive%\users\%name%" mkdir "%networkdrive%\users\%name%" 61 | ::Creates chat file 62 | if not exist "%networkdrive%\chat.crm" echo > "%networkdrive%\chat.crm" 63 | if exist "networkdrive.bat" del /F "networkdrive.bat" 64 | ::Sets the place where it is supposed to be 65 | set presection=chat 66 | goto load 67 | 68 | ::Methods 69 | 70 | :load 71 | ::Puts your name and rank in a file for future use 72 | echo set name=%name%> "in.bat" 73 | echo set rank=Guest>> "in.bat" 74 | echo set networkdrive=%networkdrive%>> "in.bat" 75 | crypt -encrypt -key "7;;d;ss;9&*((*302!)_-!@#(021" -infile "in.bat" -outfile "settings.bat">NUL 76 | del /F "in.bat" 77 | goto %presection% 78 | 79 | :decryptsettings 80 | cd "%appdata%\Batch_Chat" 81 | crypt -decrypt -key "7;;d;ss;9&*((*302!)_-!@#(021" -infile "settings.bat" -outfile "out.bat">NUL 82 | call "out.bat" 83 | del /F "out.bat" 84 | goto %presection% 85 | 86 | :sendmsg 87 | crypt -decrypt -key "&492((@$*9Hfyibni#*9n8034-=_)r9" -infile "%networkdrive%\chat.crm" -outfile "%appdata%\Batch_Chat\chatout.crm">NUL 88 | echo %sendmessage%>> "%appdata%\Batch_Chat\chatout.crm" 89 | del /F "%networkdrive%\chat.crm" 90 | crypt -encrypt -key "&492((@$*9Hfyibni#*9n8034-=_)r9" -infile "%appdata%\Batch_Chat\chatout.crm" -outfile "%networkdrive%\chat.crm">NUL 91 | del /F "%appdata%\Batch_Chat\chatout.crm" 92 | goto %presection% 93 | 94 | 95 | 96 | 97 | 98 | :chat 99 | ::Resets the directory to the files 100 | cd "%cdd%" 101 | ::Starts the messages window 102 | start Batch_Chat.bat messages 103 | ::Assures that you are in the Data folder 104 | cd "%appdata%\Batch_Chat" 105 | ::Calls the latest variables from the user data files 106 | set presection=chatcall 107 | goto decryptsettings 108 | :chatcall 109 | ::Remake user folder 110 | mkdir "%networkdrive%\users\%name%" 111 | ::Resize window 112 | mode con cols=80lines=20 113 | ::Reverts back to the Data directory 114 | cd "%appdata%\Batch_Chat" 115 | cls 116 | title Batch Chat - %room% 117 | echo Lobby 118 | echo. 119 | echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= 120 | ::Decrypts and prints chat to the screen and sets the last line to a variable 121 | crypt -decrypt -key "&492((@$*9Hfyibni#*9n8034-=_)r9" -infile "%networkdrive%\chat.crm" -outfile "%appdata%\Batch_Chat\outloop.crm">NUL 122 | for /f "tokens=1,2,3 delims=" %%a IN ("%appdata%\Batch_Chat\outloop.crm") DO (colous Writesec "%%a"&set check=%%a)>NUL 123 | del /F "%appdata%\Batch_Chat\outloop.crm" 124 | ::Saves the last line to another variable 125 | set old=%check% 126 | goto loop 127 | 128 | :loop 129 | ::Assures that you are in the Data folder 130 | cd "%appdata%\Batch_Chat" 131 | ::Checks to see if a file is there so that it can excute a certain command 132 | if exist "%networkdrive%\users\%name%\cls.dat" goto cls 133 | ::Checks if command to quit has been made 134 | if exist "%networkdrive%\users\%name%\quit.dat" rmdir /S /Q "%networkdrive%\users\%name%"&exit 135 | ::Prints history to screen 136 | if exist "%networkdrive%\users\%name%\history.dat" goto history 137 | ::Decrypts and prints chat to the screen and sets the last line to a variable 138 | crypt -decrypt -key "&492((@$*9Hfyibni#*9n8034-=_)r9" -infile "%networkdrive%\chat.crm" -outfile "%appdata%\Batch_Chat\outloop.crm">NUL 139 | for /f "usebackq tokens=1,2,3 delims=" %%a IN (`if exist "%appdata%\Batch_Chat\outloop.crm" type "%appdata%\Batch_Chat\outloop.crm"`) DO (set check=%%a) 140 | if exist "%appdata%\Batch_Chat\outloop.crm" del /F "%appdata%\Batch_Chat\outloop.crm" 141 | ::Checks to see if the last line has changed (a new message has been sent) if it has then it prints it to the screen, makes the directory the files, sets it as the new old variable, and plays a tune if a file isn't there 142 | if NOT "%check%" == "%old%" ( 143 | colous Writesec "%check%" 144 | set old=%check% 145 | cd "%cdd%" 146 | if not exist "%networkdrive%\users\%name%\ping.dat" ( 147 | madplay -Q ping.mp3 148 | ) else ( 149 | del /F "%networkdrive%\users\%name%\ping.dat" 150 | ) 151 | ) 152 | goto loop 153 | 154 | 155 | 156 | 157 | 158 | :net 159 | ::Seting up the network drive 160 | title Network Setup 161 | cls 162 | echo. 163 | echo Press 1 to setup. After 164 | echo pressing 1 follow the 165 | echo instructions. Press 166 | echo 3 to reset all data. 167 | echo. 168 | echo 1.) Setup as host 169 | echo 2.) Setup as client 170 | echo 3.) Reset 171 | echo 4.) Exit 172 | echo. 173 | ::Checks to see if there needs to be a different setup for a diff OS 174 | if winxp == true goto winxpsetup 175 | choice /c 1234>NUL 176 | if "%ERRORLEVEL%" == "1" goto setup 177 | if "%ERRORLEVEL%" == "2" goto hostchange 178 | if "%ERRORLEVEL%" == "3" goto resetstart 179 | if "%ERRORLEVEL%" == "4" exit 180 | goto net 181 | :winxpsetup 182 | set /p step="> " 183 | if "%step%" == "1" goto setup 184 | if "%step%" == "2" goto hostchange 185 | if "%step%" == "3" goto resetstart 186 | if "%step%" == "4" exit 187 | goto net 188 | 189 | :setup 190 | cls 191 | echo. 192 | echo Do you have a pre-existing network 193 | echo drive on which you wish to host the 194 | echo chat? [Y/N] 195 | echo. 196 | set /p answer="> " 197 | if /I "%answer%" == "Y" goto setupnet 198 | if /I "%answer%" == "N" goto setup1 199 | goto setup 200 | 201 | ::Instructions to setup sharing for the network drive 202 | :setup1 203 | if not exist "C:\chat" mkdir "C:\chat" 204 | if not exist "C:\chat\users" mkdir "C:\chat\users" 205 | cls 206 | echo. 207 | echo This part you have to do 208 | echo manually: 209 | echo. 210 | echo 1.) Goto your "C" drive 211 | echo 2.) Right-click on the 212 | echo "chat" folder 213 | echo 3.) Click "Properties" 214 | echo 4.) Click "Sharing" at the 215 | echo top of the new window. 216 | echo 5.) Click "Share" 217 | echo 6.) Click the down arrow and 218 | echo select "Everyone" 219 | echo 7.) Click "Add" 220 | echo 8.) A new line should appear, 221 | echo with "Everyone" to the left. 222 | echo 9.) On the right of that line 223 | echo click the down arrow. 224 | echo 10.) Select "Read/Write" 225 | echo 11.) Click "Share" at the bottom 226 | echo of the window. 227 | echo 12.) if prompted accept administrator 228 | echo access. 229 | echo 13.) Exit out of everything. 230 | echo. 231 | echo Press Enter to Continue. 232 | pause >NUL 233 | goto setup2 234 | 235 | :setup2 236 | ::Creates the network drive 237 | net use Z: \\%computername%\chat 238 | ::Creates the Data folder 239 | if not exist "%appdata%\Batch_Chat" mkdir "%appdata%\Batch_Chat" 240 | cls 241 | echo. 242 | echo Setup completed! 243 | echo. 244 | echo Press Enter to exit. 245 | echo. 246 | pause >NUL 247 | exit 248 | 249 | :setupnet 250 | cls 251 | echo. 252 | echo What is the directory of 253 | echo the network drive where 254 | echo you want to store the chat? 255 | echo. 256 | echo Ex: Z:\chat folder\foo 257 | echo. 258 | set /p networkdrive="> " 259 | if not exist "%networkdrive%" goto drivenot 260 | if not exist "%networkdrive%\users" mkdir "%networkdrive%\users" 261 | if not exist "%appdata%\Batch_Chat" mkdir "%appdata%\Batch_Chat" 262 | echo set networkdrive=%networkdrive%> "%appdata%\Batch_Chat\networkdrive.bat" 263 | goto setupnetcomplete 264 | 265 | :drivenot 266 | cls 267 | echo. 268 | echo "%networkdrive%" does not exist. 269 | echo. 270 | echo Press Enter to return. 271 | pause >NUL 272 | goto setupnet 273 | 274 | :setupnetcomplete 275 | cls 276 | echo. 277 | echo Setup completed! 278 | echo. 279 | echo Press Enter to exit. 280 | echo. 281 | pause >NUL 282 | exit 283 | 284 | :: RESET 285 | 286 | :stepreset 287 | ::Remove data directory 288 | rmdir /S /Q "%appdata%\Batch_Chat" 289 | ::Disconnect network drive 290 | net use Z: /delete /y 291 | ::Delete shared folder 292 | rmdir /S /Q "C:\chat" 293 | cls 294 | echo. 295 | echo Reset complete! 296 | echo. 297 | echo Press Enter to Return. 298 | echo. 299 | pause >NUL 300 | goto net 301 | 302 | :resetstart 303 | title Batch Chat - Reset 304 | cls 305 | echo. 306 | echo If you continue this will remove all settings and 307 | echo chat data from your computer, thus allowing you 308 | echo to restart the Batch Chat fresh due to any errors. 309 | echo. 310 | echo Do you want to continue? [Y/N] 311 | echo. 312 | set /p resetinput=">" 313 | if /I "%resetinput%" == "Y" goto stepreset 314 | if /I "%resetinput%" == "N" goto net 315 | goto resetstart 316 | 317 | 318 | :: MESSAGES 319 | 320 | :messagesstart 321 | ::Going back to the Data folder 322 | cd "%appdata%\Batch_Chat" 323 | ::Calling variables 324 | set presection=messagestartcall 325 | goto decryptsettings 326 | :messagestartcall 327 | ::Sends a joining message to the chat 328 | set presection=joinmsg 329 | set sendmessage=[16]%TIME:~0,2%:%TIME:~3,2% [10]%name% [9]has joined 330 | goto sendmsg 331 | :joinmsg 332 | echo chat>> "%networkdrive%\users\%name%\ping.dat" 333 | goto messages 334 | 335 | :messages 336 | ::Display settings 337 | color F0 338 | mode con cols=30lines=2 339 | title Messages 340 | ::Still setting the Data folder 341 | cd "%appdata%\Batch_Chat" 342 | ::Goes to your ranks commands 343 | goto msg%rank% 344 | 345 | 346 | 347 | 348 | :msgAdmin 349 | cls 350 | ::Prompts for users input 351 | set /p message=Say: 352 | ::Checks to see if the msg is a command 353 | if /I "%message%" == "/clsfile" echo > "%networkdrive%\chat.crm"&&goto msg%rank% 354 | if /I "%message%" == "/say" goto say 355 | goto commandsDirector 356 | :inheritAdmin 357 | ::If the msg is not a command it is a msg so it sends it into the chat 358 | set presection=adminMessage 359 | set sendmessage=[16]%TIME:~0,2%:%TIME:~3,2% [09]%rank% [0]%name%: [0]%message% 360 | goto sendmsg 361 | :adminMessage 362 | echo chat> "%networkdrive%\users\%name%\ping.dat" 363 | goto msgAdmin 364 | 365 | :msgDirector 366 | cls 367 | ::Prompts for users input 368 | set /p message=Say: 369 | ::Checks to see if the msg is a command 370 | :commandsDirector 371 | goto commandsModerator 372 | :inheritDirector 373 | ::If the msg is not a command it is a msg so it sends it into the chat 374 | set presection=directorMessage 375 | set sendmessage=[16]%TIME:~0,2%:%TIME:~3,2% [12]%rank% [0]%name%: [0]%message% 376 | goto sendmsg 377 | :directorMessage 378 | echo chat> "%networkdrive%\users\%name%\ping.dat" 379 | goto msgDirector 380 | 381 | :msgModerator 382 | cls 383 | ::Prompts for users input 384 | set /p message=Say: 385 | ::Checks to see if the msg is a command 386 | :commandsModerator 387 | goto commandsOperator 388 | :inheritModerator 389 | ::If the msg is not a command it is a msg so it sends it into the chat 390 | set presection=moderatorMessage 391 | set sendmessage=[16]%TIME:~0,2%:%TIME:~3,2% [13]%rank% [0]%name%: [0]%message% 392 | goto sendmsg 393 | :moderatorMessage 394 | echo chat> "%networkdrive%\users\%name%\ping.dat" 395 | goto msgModerator 396 | 397 | :msgOperator 398 | cls 399 | ::Prompts for users input 400 | set /p message=Say: 401 | ::Checks to see if the msg is a command 402 | :commandsOperator 403 | goto commandsGuest 404 | :inheritOperator 405 | ::If the msg is not a command it is a msg so it sends it into the chat 406 | set presection=operatorMessage 407 | set sendmessage=[16]%TIME:~0,2%:%TIME:~3,2% [14]%rank% [0]%name%: [0]%message% 408 | goto sendmsg 409 | :operatorMessage 410 | echo chat> "%networkdrive%\users\%name%\ping.dat" 411 | goto msgOperator 412 | 413 | :msgGuest 414 | cls 415 | ::Prompts for users input 416 | set /p message=Say: 417 | ::Checks to see if the msg is a command 418 | :commandsGuest 419 | if /I "%message%" == "/afk" ( 420 | echo hshsfks >> "%networkdrive%\users\%name%\ping.dat" 421 | set presection=messages 422 | set sendmessage=[05] %name% is afk 423 | goto sendmsg 424 | ) 425 | if /I "%message%" == "/back" ( 426 | echo hshsfks >> "%networkdrive%\users\%name%\ping.dat" 427 | set presection=messages 428 | set sendmessage=[05] %name% is back 429 | goto sendmsg 430 | ) 431 | if /I "%message%" == "/list" ( 432 | mode con cols=30lines=10 433 | echo. 434 | dir /B /P "%networkdrive%\users" 435 | echo. 436 | pause >NUL 437 | goto messages 438 | ) 439 | if /I "%message%" == "/history" echo hshsfks >> "%networkdrive%\users\%name%\history.dat"&goto messages 440 | if /I "%message%" == "/me" goto me 441 | goto commandsHater 442 | :inheritGuest 443 | ::If the msg is not a command it is a msg so it sends it into the chat 444 | set presection=guestMessage 445 | set sendmessage=[16]%TIME:~0,2%:%TIME:~3,2% [15]%rank% [0]%name%: [0]%message% 446 | goto sendmsg 447 | :guestMessage 448 | echo chat> "%networkdrive%\users\%namfe%\ping.dat" 449 | goto msgGuest 450 | 451 | :msgHater 452 | cls 453 | ::Prompts for users input 454 | set /p message=Say: 455 | ::Checks to see if the msg is a command 456 | :commandsHater 457 | if /I "%message%" == "/host" goto hostchange 458 | if /I "%message%" == "/help" goto helpMain 459 | if /I "%message%" == "/cls" echo hshsfks >> "%networkdrive%\users\%name%\cls.dat"&goto messages 460 | if /I "%message%" == "/quit" goto quit 461 | if /I "%message%" == "/q" goto quit 462 | if /I "%message:~0,1%" == "/" goto notCommand 463 | goto inherit%rank% 464 | :inheritHater 465 | ::If the msg is not a command it is a msg so it sends it into the chat 466 | set presection=haterMessage 467 | set sendmessage=[16]%TIME:~0,2%:%TIME:~3,2% [04]%rank% [0]%name%: [0]%message% 468 | goto sendmsg 469 | :haterMessage 470 | echo chat> "%networkdrive%\users\%name%\ping.dat" 471 | goto msgHater 472 | 473 | 474 | 475 | 476 | :hostchange 477 | mode con cols=40lines=15 478 | cls 479 | echo. 480 | echo There are two ways to connect 481 | echo to other chats. 1 is to only 482 | echo chat with people on your router 483 | echo (LAN) or 2 use a Virtual LAN 484 | echo network, program such as 485 | echo Hamachi. For 1 you only need 486 | echo the persons computer name, like 487 | echo Bobjoe-PC. For 2 you need their 488 | echo Virtual LAN IP. 489 | echo. 490 | echo Press Enter to input one of these 491 | echo two things, or exit. 492 | echo. 493 | pause >NUL 494 | goto hostchange2 495 | 496 | :hostchange2 497 | cls 498 | echo. 499 | echo Enter "computer name" or 500 | echo Virtual LAN IP. 501 | echo. 502 | echo type "exit" to Exit. 503 | echo. 504 | set /p push="> " 505 | if "%push%" == "exit" goto messages 506 | if "%push%" == "" goto hostchange 507 | if not exist "\\%push%\chat" goto hostchange 508 | net use Z: /DELETE /y 509 | cls 510 | net use Z: \\%push%\chat 511 | if exist "Z:\users\%name%" rmdir /S /Q "Z:\users\%name%" 512 | if exist "%appdata%\Batch_Chat\settings.bat" del /F "%appdata%\Batch_Chat\settings.bat" 513 | goto hostchange3 514 | 515 | :hostchange3 516 | ::Creates the Data folder 517 | if not exist "%appdata%\Batch_Chat" mkdir "%appdata%\Batch_Chat" 518 | cls 519 | echo. 520 | echo You are now connected to their chat! 521 | echo Press enter to restart the chat! 522 | echo. 523 | pause >NUL 524 | cd "%cdd%" 525 | taskkill /f /fi "WINDOWTITLE eq Batch Chat - %room% 526 | exit 527 | 528 | :helpMain 529 | mode con cols=45lines=10 530 | cls 531 | echo. 532 | echo What would you like to do? 533 | echo. 534 | echo 1.) View all of the commands? 535 | echo 2.) View your commands? 536 | echo 3.) Exit 537 | echo. 538 | if winxp == true goto winxphelpMain 539 | choice /c 123>NUL 540 | if "%ERRORLEVEL%" == "1" mode con cols=45lines=20&goto helpCommandsAll 541 | if "%ERRORLEVEL%" == "2" mode con cols=45lines=20&goto helpYour%rank% 542 | if "%ERRORLEVEL%" == "3" goto messages 543 | goto helpMain 544 | :winxphelpMain 545 | set /p helpMain=">" 546 | if "%helpMain%" == "1" goto helpCommandsAll 547 | if "%helpMain%" == "2" goto helpYour%rank% 548 | if "%helpMain%" == "3" goto messages 549 | goto helpMain 550 | 551 | :helpCommandsAll 552 | cls 553 | echo. 554 | echo All of the commands: 555 | set tempRank=%rank% 556 | set rank=All 557 | goto helpAdmin 558 | :helpInheritAll 559 | set rank=%tempRank% 560 | set tempRank="" 561 | echo. 562 | echo Press enter to return 563 | echo. 564 | pause >NUL 565 | goto helpMain 566 | 567 | :helpYourAdmin 568 | cls 569 | echo. 570 | echo Your commands are: 571 | :helpAdmin 572 | echo /clsfile - Clears the chat file 573 | echo /say - Prints server message 574 | goto helpDirector 575 | :helpInheritAdmin 576 | echo. 577 | echo Press enter to return 578 | echo. 579 | pause >NUL 580 | goto helpMain 581 | 582 | :helpYourDirector 583 | cls 584 | echo. 585 | echo Your commands are: 586 | :helpDirector 587 | goto helpModerator 588 | :helpInheritDirector 589 | echo. 590 | echo Press enter to return 591 | echo. 592 | pause >NUL 593 | goto helpMain 594 | 595 | :helpYourModerator 596 | cls 597 | echo. 598 | echo Your commands are: 599 | :helpModerator 600 | goto helpOperator 601 | :helpInheritModerator 602 | echo. 603 | echo Press enter to return 604 | echo. 605 | pause >NUL 606 | goto helpMain 607 | 608 | :helpYourOperator 609 | cls 610 | echo. 611 | echo Your commands are: 612 | :helpOperator 613 | goto helpGuest 614 | :helpInheritOperator 615 | echo. 616 | echo Press enter to return 617 | echo. 618 | pause >NUL 619 | goto helpMain 620 | 621 | :helpYourGuest 622 | cls 623 | echo. 624 | echo Your commands are: 625 | :helpGuest 626 | echo /afk - Says you've gone afk 627 | echo /back - Says you're back 628 | echo /list - Lists players online 629 | echo /me - Say stuff about yourself 630 | echo /history - Loads chat history 631 | goto helpHater 632 | :helpInheritGuest 633 | echo. 634 | echo Press enter to return 635 | echo. 636 | pause >NUL 637 | goto helpMain 638 | 639 | :helpYourHater 640 | cls 641 | echo. 642 | echo Your commands are: 643 | :helpHater 644 | echo /help - Lists all commands 645 | echo /host - Changes the host computer to a 646 | echo LAN/Virtual LAN IP 647 | echo /cls - Clears your screen of previous text 648 | echo /quit or q - Quits the chat properly 649 | goto helpInherit%rank% 650 | :helpInheritHater 651 | echo. 652 | echo Press enter to return 653 | echo. 654 | pause >NUL 655 | goto helpMain 656 | 657 | :cls 658 | cls 659 | echo Lobby 660 | echo. 661 | echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= 662 | del /F "%networkdrive%\users\%name%\cls.dat" 663 | goto loop 664 | 665 | :notCommand 666 | mode con cols=40lines=8 667 | title Invalid Command 668 | cls 669 | echo. 670 | echo "%message%" is an invalid command 671 | echo. 672 | echo Press Enter to exit. 673 | pause >NUL 674 | goto messages 675 | 676 | :quit 677 | echo chat> "%networkdrive%\users\%name%\ping.dat" 678 | echo hshsfks >> "%networkdrive%\users\%name%\quit.dat" 679 | set presection=quitMessage 680 | set sendmessage=[16]%TIME:~0,2%:%TIME:~3,2% [10]%name% [9]has left 681 | goto sendmsg 682 | :quitMessage 683 | exit 684 | 685 | :say 686 | cls 687 | set /p say="> " 688 | echo chat> "%networkdrive%\users\%name%\ping.dat" 689 | set presection=messages 690 | set sendmessage=[19] CONSOLE: %say% 691 | goto sendmsg 692 | 693 | :me 694 | cls 695 | set /p me="> " 696 | echo chat> "%networkdrive%\users\%name%\ping.dat" 697 | set presection=messages 698 | set sendmessage=[05] * %name% %me% 699 | goto sendmsg 700 | 701 | :history 702 | cls 703 | echo Lobby 704 | echo. 705 | echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= 706 | crypt -decrypt -key "&492((@$*9Hfyibni#*9n8034-=_)r9" -infile "%networkdrive%\chat.crm" -outfile "%appdata%\Batch_Chat\hisout.crm">NUL 707 | for /f "usebackq tokens=1,2,3 delims=" %%a IN (`type "%appdata%\Batch_Chat\hisout.crm"`) DO (colous Writesec "%%a"&set check=%%a) 708 | del /F "%appdata%\Batch_Chat\hisout.crm" 709 | del /F "%networkdrive%\users\%name%\history.dat" 710 | goto loop -------------------------------------------------------------------------------- /LICENSE.txt: -------------------------------------------------------------------------------- 1 | MIT License 2 | 3 | Copyright (c) 2017 Blake Wyatt 4 | 5 | Permission is hereby granted, free of charge, to any person obtaining a copy 6 | of this software and associated documentation files (the "Software"), to deal 7 | in the Software without restriction, including without limitation the rights 8 | to use, copy, modify, merge, publish, distribute, sublicense, and/or sell 9 | copies of the Software, and to permit persons to whom the Software is 10 | furnished to do so, subject to the following conditions: 11 | 12 | The above copyright notice and this permission notice shall be included in all 13 | copies or substantial portions of the Software. 14 | 15 | THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR 16 | IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, 17 | FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE 18 | AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER 19 | LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, 20 | OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE 21 | SOFTWARE. 22 | -------------------------------------------------------------------------------- /README.md: -------------------------------------------------------------------------------- 1 | ![chat preview](http://i.imgur.com/6S5f1Qh.png) 2 | 3 | Batch_Chat - v1.1 4 | ========== 5 | 6 | A chat made in Batch of all things. 7 | This chat was first created in 2011-2012 when I started 8 | to get interested in programming. Now it's 2014, and for no logical reason, 9 | I have started to improve it. It cannot communicate over the internet directly, 10 | it can only send messages locally on your network. BUT you can use Hamachi 11 | or a similar program to chat over the internet. 12 | 13 | ### Features: 14 | - Local Area Network (LAN) chat 15 | - Support for Virtual LAN IP's 16 | - Group chat 17 | - Colors (via colous binary) 18 | - Sound notification 19 | - Quick start 20 | - Help and command inheritance (for future ranks) 21 | - Argument -reset to reset all data 22 | - File encryption (very weak, look below for more info) 23 | 24 | ### Commands: 25 | - /afk - Says you've gone afk 26 | - /back - Says you're back 27 | - /cls - Clears your screen of previous text 28 | - /clsfile - Clears the chat file 29 | - /help - Lists all commands and their description 30 | - /history - Loads chat history 31 | - /host - Changes the host computer to a 32 | LAN/Virtual LAN IP 33 | - /list - Lists players online 34 | - /me - Say stuff about yourself 35 | - /quit or q - Quits the chat properly 36 | (PLEASE USE THIS OR ELSE /list IS USELESS!) 37 | - /say - Prints server message 38 | 39 | [Command gallery](http://imgur.com/a/JeTJm) 40 | 41 | 42 | 43 | 44 | 45 | ### Plans: 46 | - ~~Add custom network drive/custom setup~~ 47 | - ~~Add file encryption with crypt binary~~ 48 | - Add rooms 49 | - Add legitimate ranks 50 | - Add an update system (eh, might as well) 51 | - Add encryption command 52 | - Add more creative, fun, enjoyable commands 53 | - Add custom commands 54 | - Add encryption in the portion of the 55 | Batch_Chat itself where it actually 56 | encrypts the chat to stop possible 57 | decryption from viewing sourcecode. 58 | - Review chat bugs and delay due to encryption 59 | 60 | 61 | 62 | 63 | 64 | ### Compatible with: 65 | - Windows 66 | - Wine 67 | - DOSBox (if I remember correctly) 68 | 69 | ### Quick Instructions: 70 | 1. run "Batch_Chat.bat" 71 | 2. follow the onscreen instructions (tip: you need a host before there can be a client) 72 | 3. run Batch Chat again 73 | 4. type "/q" into the "Messages" window that comes up 74 | 5. run Batch Chat again and everything should be working well. You can now send messages using the Messages window 75 | 76 | Note: when connecting to a host, you may need to be authenticated. 77 | For example, my computer has a username and password, so client computers had to put 78 | in my username and password beforehand in order to connect. A good sign you need to 79 | authenticate is if the Batch Chat keeps asking you to input the host computer's name. 80 | To authenticate, open File Explorer and click Network on the left to view your Network Connections. 81 | Find the host computer and try to double-click it. It should prompt you with a login 82 | if it is required. After that, you should be able to see the shared "chat" folder. 83 | If you do, you are all set. 84 | 85 | There is a way to remove the restrictions though so no one needs your computer's 86 | username and password. To do this open the "Network and Sharing Center" on the left 87 | click "Change advanced sharing settings". Click the dropdown for "All Networks" then 88 | click "Turn off password protected sharing" and turn on "Public folder sharing". 89 | 90 | Note 2: if you wish to connect to a host over VLAN (like using Hamachi), then you 91 | should go ahead and set up as a host and once the chat is working correctly, use the 92 | "/host" command to switch to a VLAN host. 93 | 94 | Note 3: if you are having trouble figuring out your computer name, I have created a 95 | Batch file to help you out. On the host computer, open "Batch.getComputerName.bat", 96 | use the name it gives and you should be good. 97 | 98 | Lastly, if you have any problems, just open up an issue and I'll be happy to help you. 99 | 100 | 101 | 102 | 103 | ### Color codes: 104 | 105 | To use color codes while chatting, simply type "[<insert color code>]<my text>". 106 | So, for example, I could type "[12]Hello [5]world[12]!" to send a message 107 | that looks like this: 108 | 109 | ![color code example](http://i.imgur.com/BirW5sj.png) 110 | 111 | Here's a key for the color codes: 112 | 113 | ![colous color codes](http://i.imgur.com/705yk3s.png) 114 | 115 | 116 | 117 | 118 | 119 | ### File encryption: 120 | 121 | The file encryption I implemented on this is *extremely* weak. Not that I expect 122 | highly sensitive material to be sent using my horrible Batch Chat, it's just the 123 | bare minimum to prevent users who aren't familiar with programming from giving 124 | themselves a higher rank (if a ranking system is ever implemented) or changing 125 | what people say. People can clear the chat log unfortunately, but 126 | nothing too devious. 127 | 128 | If you want to make it harder for people to decrypt the chat, you can do two 129 | things. 1, you can change the encryption/decryption key from the default key that 130 | I use to a different one. And 2, it is possible to store the chat in an exe file. 131 | That way the encryption/decryption key isn't as accessible. For more info, 132 | look into [this](http://www.f2ko.de/en/b2e.php) program. 133 | -------------------------------------------------------------------------------- /colous.exe: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/xNul/batch-chat/8e8f72ea913ba20aef0f11eb5c72bfca83528870/colous.exe -------------------------------------------------------------------------------- /crypt.exe: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/xNul/batch-chat/8e8f72ea913ba20aef0f11eb5c72bfca83528870/crypt.exe -------------------------------------------------------------------------------- /madplay.exe: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/xNul/batch-chat/8e8f72ea913ba20aef0f11eb5c72bfca83528870/madplay.exe -------------------------------------------------------------------------------- /original batch chat/Chat-Alpha_1.9.2.bat: -------------------------------------------------------------------------------- 1 | @echo off 2 | set col1=0 3 | set col2=7 4 | if "%1" == "msgingrmsg" goto msgingrmsg 5 | if "%1" == "msgingsmsg" goto msgingsmsg 6 | if "%1" == "msgingr" goto msgingr 7 | if "%1" == "msgings" goto msgings 8 | if "%1" == "plist" goto plistsep 9 | if "%1" == "messages" goto rankident 10 | if not exist "%appdata%\Batch_Chat" goto net 11 | goto nonad 12 | :nonad 13 | title Batch Chat 14 | color %col1%%col2% 15 | if not exist "%appdata%\Batch_Chat" mkdir "%appdata%\Batch_Chat" 16 | set cddefault=%cd% 17 | set fileversion=Alpha_1.9.2 18 | set version=Alpha 1.9.2 19 | goto okaygo 20 | :net 21 | if not exist "C:\chat" mkdir "C:\chat" 22 | title Network ERROR 23 | cls 24 | echo. 25 | echo Your network drive has 26 | echo not yet been setup, 27 | echo press 1 for the first 28 | echo step. After pressing 1 29 | echo and following the 30 | echo instructions, press enter 31 | echo and press 2. Note: pressing 32 | echo 3 will reset this process. 33 | echo Then your done! 34 | echo. 35 | echo 1.) Step 1 36 | echo 2.) Step 2 37 | echo 3.) Reset 38 | echo 4.) Exit 39 | echo. 40 | choice /c 1234 >NUL 41 | if %ERRORLEVEL% == 1 goto step1 42 | if %ERRORLEVEL% == 2 goto step2 43 | if %ERRORLEVEL% == 3 goto stepreset 44 | if %ERRORLEVEL% == 4 exit 45 | goto net 46 | 47 | :step1 48 | cls 49 | echo. 50 | echo This part you have to do 51 | echo manually: 52 | echo. 53 | echo 1.) Goto your "C" drive 54 | echo 2.) Right-click on the 55 | echo "chat" folder 56 | echo 3.) Click "Properties" 57 | echo 4.) Click "Sharing" at the 58 | echo top of the new window. 59 | echo 5.) Click "Share" 60 | echo 6.) Click the down arrow and 61 | echo select "Everyone" 62 | echo 7.) Click "Add" 63 | echo 8.) A new line should appear, 64 | echo with "Everyone" to the left. 65 | echo 9.) On the right of that line 66 | echo click the down arrow. 67 | echo 10.) Select "Read/Write" 68 | echo 11.) Click "Share" at te bottom 69 | echo of the window. 70 | echo 12.) if prompted accept administrator 71 | echo access. 72 | echo 13.) Exit out of everything. 73 | echo. 74 | echo Press Enter to Continue. 75 | pause >NUL 76 | goto step12 77 | 78 | :step12 79 | cls 80 | echo. 81 | echo Step 1 completed! 82 | echo. 83 | echo Press Enter to Return to the Menu. 84 | echo. 85 | pause >NUL 86 | goto net 87 | 88 | :step2 89 | net use Z: \\%computername%\chat 90 | mkdir "%appdata%\Batch_Chat" 91 | cls 92 | echo. 93 | echo Step 2 completed! 94 | echo. 95 | echo Press Enter to Exit. 96 | echo. 97 | pause >NUL 98 | exit 99 | 100 | :stepreset 101 | rmdir "%appdata%\Batch_Chat" 102 | cls 103 | echo. 104 | echo Reset complete! 105 | echo. 106 | echo Press Enter to Return. 107 | echo. 108 | pause >NUL 109 | goto net 110 | :okaygo 111 | if not defined pcname set pcname=%computername% 112 | PUSHD \\Nabakin-PC\chat 113 | popd 114 | cd %appdata%\Batch_Chat 115 | if not exist "colous.exe" xcopy "%cddefault%\colous.exe" "%appdata%\Batch_Chat" 116 | if exist "settings.bat" call "settings.bat" 117 | PUSHD \\Nabakin-PC\chat 118 | set /p nextversion=<"Z:\usernames\%rusername%\version.bc" 119 | popd 120 | if exist "%appdata%\Batch_Chat\settings.bat" ( 121 | if not "%nextversion%" == "%fileversion%" goto update 122 | ) 123 | set cols=40 124 | set lines=8 125 | mode con cols=%cols%lines=%lines% 126 | if exist "%appdata%\Batch_Chat\temp.bat" del "%appdata%\Batch_Chat\temp.bat" 127 | PUSHD \\Nabakin-PC\chat 128 | if not exist "Z:\ranks" mkdir "Z:\ranks" 129 | if not exist "Z:\ranks\Guest" mkdir "Z:\ranks\Guest" 130 | if not exist "Z:\ranks\Dispicable" mkdir "Z:\ranks\Dispicable" 131 | if not exist "Z:\ranks\Operator" mkdir "Z:\ranks\Operator" 132 | if not exist "Z:\ranks\Moderator" mkdir "Z:\ranks\Moderator" 133 | if not exist "Z:\ranks\Director" mkdir "Z:\ranks\Director" 134 | if not exist "Z:\ranks\Admin" mkdir "Z:\ranks\Admin" 135 | if not exist "Z:\usernames" mkdir "Z:\usernames" 136 | if not exist "Z:\update" mkdir "Z:\update" 137 | if not exist "Z:\players" mkdir "Z:\players" 138 | popd 139 | goto run 140 | :adstart 141 | cls 142 | title Batch Chat - Admin, not 143 | echo. 144 | echo You need to exit out and run this as Administrator, 145 | echo you only have to do this one time. 146 | echo. 147 | echo If you do not know how, search google.com 148 | echo. 149 | echo Press Enter to Exit. 150 | echo. 151 | pause >NUL 152 | exit 153 | :run 154 | cd %appdata%\Batch_Chat 155 | if exist "settings.bat" goto start 156 | color f0 157 | cls 158 | echo. 159 | echo Welcome to Batch Chat. 160 | echo. 161 | set /p rusername=What is your name? 162 | PUSHD \\Nabakin-PC\chat 163 | if exist "Z:\usernames\%rusername%" goto userexist 164 | popd 165 | cd "%appdata%\Batch_Chat" 166 | set col1=%col1% 167 | set col2=%col2% 168 | set permsg=7 169 | set percol=7 170 | set colousc=7 171 | echo set rusername=%rusername%> "settings.bat" 172 | echo set room=Lobby>> "settings.bat" 173 | echo set rank=Guest>> "settings.bat" 174 | echo set lines=%lines%>> "settings.bat" 175 | echo set cols=%cols%>> "settings.bat" 176 | echo set col1=%col1%>> "settings.bat" 177 | echo set col2=%col2%>> "settings.bat" 178 | echo set permsg=%permsg%>> "settings.bat" 179 | echo set percol=%percol%>> "settings.bat" 180 | echo set colousc=%colousc%>> "settings.bat" 181 | echo set pmsgn=%pmsgn%>> "settings.bat" 182 | echo set fileversion=%fileversion%>> "settings.bat" 183 | echo set cddefault=%cddefault%>> "settings.bat" 184 | echo set pcname=%pcname%>> "settings.bat" 185 | PUSHD \\Nabakin-PC\chat 186 | mkdir "Z:\usernames\%rusername%" 187 | echo %fileversion%> "Z:\usernames\%rusername%\version.bc" 188 | echo Guest> "Z:\usernames\%rusername%\rankGuest.bc" 189 | if not exist "Z:\Lobby" mkdir "Z:\Lobby" 190 | popd 191 | cd "%appdata%\Batch_Chat" 192 | call "settings.bat" 193 | set col1=%col1:~0,-1% 194 | set col2=%col2:~0,-1% 195 | PUSHD \\Nabakin-PC\chat 196 | if not exist "Z:\Lobby\Lobby.crm" echo Welcome to the new room, %room%! > "Z:\Lobby\Lobby.crm" 197 | goto start 198 | :userexist 199 | popd 200 | cls 201 | title Batch Chat - User Error 202 | echo. 203 | echo This user already exists! 204 | echo. 205 | pause >NUL 206 | goto run 207 | :start 208 | cls 209 | if not exist "Z:\players\%rusername% [%rank%]" mkdir "Z:\players\%rusername% [%rank%]" 210 | popd 211 | cd "%appdata%\Batch_Chat" 212 | call "settings.bat" 213 | echo set rusername=%rusername%> "settings.bat" 214 | echo set room=%room%>> "settings.bat" 215 | echo set rank=%rank%>> "settings.bat" 216 | echo set cols=%cols%>> "settings.bat" 217 | echo set lines=%lines%>> "settings.bat" 218 | echo set col1=%col1%>> "settings.bat" 219 | echo set col2=%col2%>> "settings.bat" 220 | echo set permsg=%permsg%>> "settings.bat" 221 | echo set percol=%percol%>> "settings.bat" 222 | echo set colousc=%colousc%>> "settings.bat" 223 | echo set pmsgn=%pmsgn%>> "settings.bat" 224 | echo set fileversion=%fileversion%>> "settings.bat" 225 | echo set cddefault=%cddefault%>> "settings.bat" 226 | echo set pcname=%pcname%>> "settings.bat" 227 | set col1=%col1:~0,-1% 228 | set col2=%col2:~0,-1% 229 | cd "%cddefault%" 230 | start Chat-%fileversion%.bat messages 231 | goto CHATLOOP 232 | :CHATLOOP 233 | mode con cols=%cols%lines=%lines% 234 | color %col1%%col2% 235 | cls 236 | cd "%appdata%\Batch_Chat" 237 | call "settings.bat" 238 | set col1=%col1:~0,-1% 239 | set col2=%col2:~0,-1% 240 | set cols=%cols:~0,-1% 241 | set lines=%lines:~0,-1% 242 | title Batch Chat - %room% 243 | echo %room% 244 | echo. 245 | echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= 246 | for /f "tokens=1,2,3 delims=" %%a IN ('type Z:\%room%\%room%.crm') DO (colous Writesec "%%a"&set check=%%a) 247 | set old=%check% 248 | set oldc=%cols% 249 | set oldl=%lines% 250 | goto loop 251 | :loop 252 | cd "%appdata%\Batch_Chat" 253 | set old1=%col1% 254 | set old2=%col2% 255 | if not "%old1%" == "%col1%" ( 256 | color %col1%%col2% 257 | cls 258 | echo %room% 259 | echo. 260 | echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= 261 | for /f "tokens=1,2,3 delims=" %%a IN ('type Z:\%room%\%room%.crm') DO (colous Writesec "%%a"&set check=%%a) 262 | ) 263 | if not "%cols%" == "%oldc%" ( 264 | set oldc=%cols% 265 | set oldl=%lines% 266 | mode con cols=%cols%lines=%lines% 267 | echo %room% 268 | echo. 269 | echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= 270 | for /f "tokens=1,2,3 delims=" %%a IN ('type Z:\%room%\%room%.crm') DO (colous Writesec "%%a"&set check=%%a) 271 | ) 272 | cd "%appdata%\Batch_Chat" 273 | call "settings.bat" 274 | set col1=%col1:~0,-1% 275 | set col2=%col2:~0,-1% 276 | set cols=%cols:~0,-1% 277 | set lines=%lines:~0,-1% 278 | if not exist "Z:\usernames\%rusername%\newmsg.bc" goto skipt 279 | set /p nomnom=<"Z:\usernames\%rusername%\newmsg.bc" 280 | cd "%appdata%\Batch_Chat" 281 | call "settings.bat" 282 | set pmsgn=%nomnom% 283 | echo set rusername=%rusername%> "settings.bat" 284 | echo set room=%room%>> "settings.bat" 285 | echo set rank=%rank%>> "settings.bat" 286 | echo set cols=%cols%>> "settings.bat" 287 | echo set lines=%lines%>> "settings.bat" 288 | echo set col1=%col1%>> "settings.bat" 289 | echo set col2=%col2%>> "settings.bat" 290 | echo set permsg=%permsg%>> "settings.bat" 291 | echo set percol=%percol%>> "settings.bat" 292 | echo set colousc=%colousc%>> "settings.bat" 293 | echo set pmsgn=%pmsgn%>> "settings.bat" 294 | echo set fileversion=%fileversion%>> "settings.bat" 295 | echo set cddefault=%cddefault%>> "settings.bat" 296 | echo set pcname=%pcname%>> "settings.bat" 297 | cd "%cddefault%" 298 | start Chat-%fileversion%.bat msgingr 299 | del "Z:\usernames\%rusername%\newmsg.bc" 300 | :skipt 301 | if exist "Z:\usernames\%rusername%\%room%\cls.bc" ( 302 | set /p tuser=<"Z:\usernames\%rusername%\%room%\cls.bc" 303 | cls 304 | echo %room% 305 | echo. 306 | echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= 307 | echo %tuser% has cleared the chat log. 308 | del "Z:\usernames\%rusername%\%room%\cls.bc" 309 | ) 310 | if exist "Z:\usernames\%rusername%\cls.bc" ( 311 | cls 312 | echo %room% 313 | echo. 314 | echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= 315 | del "Z:\usernames\%rusername%\cls.bc" 316 | ) 317 | if exist "Z:\usernames\%rusername%\rank.bc" goto rankset 318 | for /f "tokens=1,2,3* delims=" %%a IN ('type Z:\%room%\%room%.crm') DO (set check=%%a) 319 | if NOT "%check%" == "%old%" (colous Writesec "%check%"&set old=%check%) 320 | goto loop 321 | :rankset 322 | set /p rankt=<"Z:\usernames\%rusername%\rank.bc" 323 | cd "%appdata%\Batch_Chat" 324 | call "settings.bat" 325 | if "%rankt%" == "Admin" set colousc=5 326 | if "%rankt%" == "Director" set colousc=4 327 | if "%rankt%" == "Moderator" set colousc=1 328 | if "%rankt%" == "Operator" set colousc=2 329 | if "%rankt%" == "Guest" set colousc=7 330 | if "%rankt%" == "Dispicable" set colousc=0 331 | del "Z:\usernames\%rusername%\rank%rank%.bc" 332 | echo %rankt%> "Z:\usernames\%rusername%\rank%rankt%.bc" 333 | cd "%appdata%\Batch_Chat" 334 | set rank=%rankt% 335 | echo set rusername=%rusername%> "settings.bat" 336 | echo set room=%room%>> "settings.bat" 337 | echo set rank=%rank%>> "settings.bat" 338 | echo set cols=%cols%>> "settings.bat" 339 | echo set lines=%lines%>> "settings.bat" 340 | echo set col1=%col1%>> "settings.bat" 341 | echo set col2=%col2%>> "settings.bat" 342 | echo set permsg=%permsg%>> "settings.bat" 343 | echo set percol=%percol%>> "settings.bat" 344 | echo set colousc=%colousc%>> "settings.bat" 345 | echo set pmsgn=%pmsgn%>> "settings.bat" 346 | echo set fileversion=%fileversion%>> "settings.bat" 347 | echo set cddefault=%cddefault%>> "settings.bat" 348 | echo set pcname=%pcname%>> "settings.bat" 349 | del "Z:\usernames\%rusername%\rank.bc" 350 | goto CHATLOOP 351 | :updone 352 | popd 353 | cd "%appdata%\Batch_Chat" 354 | echo @echo off> "temp.bat" 355 | echo cd "%appdata%\Batch_Chat">> "temp.bat" 356 | echo call "settings.bat">> "temp.bat" 357 | echo cls>> "temp.bat" 358 | echo title Batch Chat - Update Successful>> "temp.bat" 359 | echo echo.>> "temp.bat" 360 | echo echo You have been updated successfully! >> "temp.bat" 361 | echo echo.>> "temp.bat" 362 | echo if exist "Z:\update\Chat-winvista-%nextversion%.bat" del "%cddefault%\Chat-winvista-%fileversion%.bat">> "temp.bat" 363 | echo pause>> "temp.bat" 364 | echo exit>> "temp.bat" 365 | start "temp.bat" 366 | exit 367 | :update 368 | popd 369 | title Batch Chat - Update 370 | cls 371 | echo. 372 | echo There is a update for Batch Chat! 373 | echo Would you like to update? [Y/N] 374 | echo If it asks you to overwrite type "Yes" 375 | echo. 376 | set /p update=">" 377 | if "%update%" == "y" goto next 378 | if "%update%" == "Y" goto next 379 | if "%update%" == "n" goto run 380 | if "%update%" == "N" goto run 381 | :next 382 | cls 383 | if exist "Z:\update\Chat-winvista-%nextversion%.bat" XCOPY "Chat-winvista-%nextversion%.bat" "%cddefault%" 384 | goto updone 385 | rem STOPS HERE GOES TO MESSAGES 386 | rem STOPS HERE GOES TO MESSAGES 387 | rem STOPS HERE GOES TO MESSAGES 388 | rem STOPS HERE GOES TO MESSAGES 389 | rem STOPS HERE GOES TO MESSAGES 390 | rem STOPS HERE GOES TO MESSAGES 391 | rem STOPS HERE GOES TO MESSAGES 392 | rem STOPS HERE GOES TO MESSAGES 393 | rem STOPS HERE GOES TO MESSAGES 394 | rem STOPS HERE GOES TO MESSAGES 395 | rem STOPS HERE GOES TO MESSAGES 396 | rem STOPS HERE GOES TO MESSAGES 397 | rem STOPS HERE GOES TO MESSAGES 398 | rem STOPS HERE GOES TO MESSAGES 399 | rem STOPS HERE GOES TO MESSAGES 400 | rem STOPS HERE GOES TO MESSAGES 401 | :msgingr 402 | start %cddefault%\Chat-%fileversion%.bat msgingrmsg 403 | color f0 404 | cls 405 | cd "%appdata%\Batch_Chat" 406 | call "settings.bat" 407 | title Batch Chat - Private %pmsgn% 408 | echo %pmsgn% 409 | echo. 410 | echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= 411 | for /f "tokens=1,2,3 delims=" %%a IN ('type Z:\usernames\%rusername%\msging\%pmsgn%\chat.crm') DO (colous Writesec "%%a"&set check=%%a) 412 | set old=%check% 413 | goto msgingrloop 414 | :msgingrloop 415 | for /f "tokens=1,2,3* delims=" %%a IN ('type Z:\usernames\%rusername%\msging\%pmsgn%\chat.crm') DO (set check=%%a) 416 | if NOT "%check%" == "%old%" (colous Writesec "%check%"&set old=%check%) 417 | goto msgingrloop 418 | :msgingrmsg 419 | mode con cols=30 lines=2 420 | color f0 421 | cls 422 | cd %appdata%\Batch_Chat 423 | call "settings.bat" 424 | set permsg=%permsg:~0,-1% 425 | set percol=%percol:~0,-1% 426 | set colousc=%colousc:~0,-1% 427 | title Private Message 428 | color f0 429 | set /p messagep=Say: 430 | echo [8]%TIME:~0,2%:%TIME:~3,2% [%colousc%]%rank% [%percol%]%rusername%: [%permsg%]%messagep% >> "Z:\usernames\%rusername%\msging\%pmsgn%\chat.crm" 431 | goto msgingrmsg 432 | :msgings 433 | start %cddefault%\Chat-%fileversion%.bat msgingsmsg 434 | color f0 435 | cls 436 | cd "%appdata%\Batch_Chat" 437 | call "settings.bat" 438 | title Batch Chat - Private %pmsgn% 439 | echo %pmsgn% 440 | echo. 441 | echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= 442 | for /f "tokens=1,2,3 delims=" %%a IN ('type Z:\usernames\%pmsgn%\msging\%rusername%\chat.crm') DO (colous Writesec "%%a"&set check=%%a) 443 | set old=%check% 444 | goto msgingsloop 445 | :msgingsloop 446 | for /f "tokens=1,2,3* delims=" %%a IN ('type Z:\usernames\%pmsgn%\msging\%rusername%\chat.crm') DO (set check=%%a) 447 | if NOT "%check%" == "%old%" (colous Writesec "%check%"&set old=%check%) 448 | goto msgingsloop 449 | :msgingsmsg 450 | mode con cols=30 lines=2 451 | color f0 452 | cls 453 | cd %appdata%\Batch_Chat 454 | call "settings.bat" 455 | set permsg=%permsg:~0,-1% 456 | set percol=%percol:~0,-1% 457 | set colousc=%colousc:~0,-1% 458 | title Private Message 459 | color f0 460 | set /p messagep=Say: 461 | echo [8]%TIME:~0,2%:%TIME:~3,2% [%colousc%]%rank% [%percol%]%rusername%: [%permsg%]%messagep% >> "Z:\usernames\%pmsgn%\msging\%rusername%\chat.crm" 462 | goto msgingsmsg 463 | :rankident 464 | cd "%appdata%\Batch_Chat" 465 | call "settings.bat" 466 | set col1=%col1:~0,-1% 467 | set col2=%col2:~0,-1% 468 | PUSHD \\%pcname%\chat 469 | popd 470 | if not exist "Z:\usernames\%rusername%" mkdir "Z:\usernames\%rusername%" 471 | echo Welcome, %rusername%! >> "Z:\%room%\%room%.crm" 472 | goto msg%rank% 473 | goto error 474 | :error 475 | title MAJOR ERROR 476 | cls 477 | echo. 478 | echo There has been an error! 479 | echo. 480 | echo 1.) exit 481 | echo 2.) delete game data 482 | echo. 483 | set /p errorc=">" 484 | if %errorc%==1 goto exit 485 | if %errorc%==2 goto errordel 486 | goto error 487 | :errordel 488 | cls 489 | del "%appdata%\Batch_Chat\settings.bat" 490 | echo. 491 | echo Data has been deleted! 492 | echo. 493 | pause >NUL 494 | goto exit 495 | :exit 496 | taskkill /f /fi "WINDOWTITLE eq Batch Chat - %room% 497 | exit 498 | :msgAdmin 499 | mode con cols=30 lines=2 500 | cd "%appdata%\Batch_Chat" 501 | call "settings.bat" 502 | set col1=%col1:~0,-1% 503 | set col2=%col2:~0,-1% 504 | set permsg=%permsg:~0,-1% 505 | set percol=%percol:~0,-1% 506 | set colousc=%colousc:~0,-1% 507 | title Message 508 | color %col1%%col2% 509 | if not "%rank%" == "Admin" goto msg%rank% 510 | cls 511 | set /p message=Say: 512 | set thismessage="%message%" 513 | if %thismessage% == "/exit" ( 514 | echo %rusername% has left the chat room. >> "Z:\%room%\%room%.crm" 515 | taskkill /f /fi "WINDOWTITLE eq Batch Chat - %room% 516 | rmdir "Z:\players\%rusername% [%rank%]" 517 | exit 518 | ) 519 | if %thismessage% == "/disconnect" ( 520 | echo %rusername% has left the chat room. >> "Z:\%room%\%room%.crm" 521 | taskkill /f /fi "WINDOWTITLE eq Batch Chat - %room% 522 | rmdir "Z:\players\%rusername% [%rank%]" 523 | exit 524 | ) 525 | if %thismessage% == "/rcls" goto msgcls 526 | if %thismessage% == "/cls" ( 527 | echo cls> "Z:\usernames\%rusername%\cls.bc" 528 | goto msg%rank% 529 | ) 530 | if %thismessage% == "/create" goto rcreate 531 | if %thismessage% == "/dimensions" goto dementions 532 | if %thismessage% == "/join" goto join 533 | if %thismessage% == "/delete" goto rdelete 534 | if %thismessage% == "/list" goto list 535 | if %thismessage% == "/color" goto msgcolor 536 | if %thismessage% == "/msg" goto cmdmsg 537 | if %thismessage% == "/chat" goto cmdchats 538 | if %thismessage% == "/plist" goto plist 539 | if %thismessage% == "/rank" goto rank 540 | if %thismessage% == "/help" goto help 541 | if %thismessage% == "/help dimensions" goto helpdim 542 | if %thismessage% == "/help plist" goto helpplist 543 | if %thismessage% == "/help exit" goto helpexit 544 | if %thismessage% == "/help disconnect" goto helpdis 545 | if %thismessage% == "/help cls" goto helpcls 546 | if %thismessage% == "/help rcls" goto helprcls 547 | if %thismessage% == "/host" goto msghost 548 | if %thismessage% == "/help host" goto helphost 549 | if %thismessage% == "/help color" goto helpcolor 550 | if %thismessage% == "/help create" goto helpcreate 551 | if %thismessage% == "/help join" goto helpjoin 552 | if %thismessage% == "/help delete" goto helpdel 553 | if %thismessage% == "/help list" goto helplist 554 | if %thismessage% == "/help rank" goto helprank 555 | if %thismessage% == "/help connectinst" goto helpconnectinst 556 | if %thismessage% == "/connectinst" goto connectinst 557 | if %thismessage:~1,1% == "/" echo %rusername% has exicuted an unknown command! >> "Z:\%room%\%room%.crm" 558 | if not "%message%" == "%message:@=at%" goto hgf 559 | echo [8]%TIME:~0,2%:%TIME:~3,2% [%colousc%]%rank% [%percol%]%rusername%: [%permsg%]%message% >> "Z:\%room%\%room%.crm" 560 | cd "%appdata%\Batch_Chat" 561 | goto msgAdmin 562 | :hgf 563 | start %cddefault%\Chat-%fileversion%.bat at 564 | cd %appdata%\Batch_Chat 565 | echo set messaget=%message%>> "settings.bat" 566 | :msgDirector 567 | mode con cols=30 lines=2 568 | cd "%appdata%\Batch_Chat" 569 | call "settings.bat" 570 | set col1=%col1:~0,-1% 571 | set col2=%col2:~0,-1% 572 | set permsg=%permsg:~0,-1% 573 | set percol=%percol:~0,-1% 574 | set colousc=%colousc:~0,-1% 575 | title Message 576 | color %col1%%col2% 577 | if not "%rank%" == "Director" goto msg%rank% 578 | cls 579 | set /p message=Say: 580 | set thismessage="%message%" 581 | if %thismessage% == "/exit" ( 582 | echo %rusername% has left the chat room. >> "Z:\%room%\%room%.crm" 583 | taskkill /f /fi "WINDOWTITLE eq Batch Chat - %room% 584 | rmdir "Z:\players\%rusername% [%rank%]" 585 | exit 586 | ) 587 | if %thismessage% == "/disconnect" ( 588 | echo %rusername% has left the chat room. >> "Z:\%room%\%room%.crm" 589 | taskkill /f /fi "WINDOWTITLE eq Batch Chat - %room% 590 | rmdir "Z:\players\%rusername% [%rank%]" 591 | exit 592 | ) 593 | if %thismessage% == "/rcls" goto msgcls 594 | if %thismessage% == "/cls" ( 595 | cls 596 | goto msg%rank% 597 | ) 598 | if %thismessage% == "/delete" goto rdelete 599 | if %thismessage% == "/create" goto rcreate 600 | if %thismessage% == "/join" goto join 601 | if %thismessage% == "/plist" goto plist 602 | if %thismessage% == "/help dimensions" goto helpdim 603 | if %thismessage% == "/dimensions" goto dementions 604 | if %thismessage% == "/color" goto msgcolor 605 | if %thismessage% == "/msg" goto cmdmsg 606 | if %thismessage% == "/chat" goto cmdchats 607 | if %thismessage% == "/connectinst" goto connectinst 608 | if %thismessage% == "/help" goto help 609 | if %thismessage% == "/help exit" goto helpexit 610 | if %thismessage% == "/help disconnect" goto helpdis 611 | if %thismessage% == "/help cls" goto helpcls 612 | if %thismessage% == "/help rcls" goto helprcls 613 | if %thismessage% == "/host" goto msghost 614 | if %thismessage% == "/help color" goto helpcolor 615 | if %thismessage% == "/help host" goto helphost 616 | if %thismessage% == "/help plist" goto helpplist 617 | if %thismessage% == "/help create" goto helpcreate 618 | if %thismessage% == "/help join" goto helpjoin 619 | if %thismessage% == "/help delete" goto helpdel 620 | if %thismessage% == "/help list" goto helplist 621 | if %thismessage% == "/help rank" goto helprank 622 | if %thismessage% == "/help connectinst" goto helpconnectinst 623 | if %thismessage% == "/list" goto list 624 | if %thismessage:~1,1% == "/" echo %rusername% has exicuted an unknown command! >> "Z:\%room%\%room%.crm" 625 | echo [8]%TIME:~0,2%:%TIME:~3,2% [%colousc%]%rank% [%percol%]%rusername%: [%permsg%]%message% >> "Z:\%room%\%room%.crm" 626 | cd "%appdata%\Batch_Chat" 627 | goto msgDirector 628 | :msgModerator 629 | mode con cols=30 lines=2 630 | cd "%appdata%\Batch_Chat" 631 | call "settings.bat" 632 | set col1=%col1:~0,-1% 633 | set col2=%col2:~0,-1% 634 | set permsg=%permsg:~0,-1% 635 | set percol=%percol:~0,-1% 636 | set colousc=%colousc:~0,-1% 637 | title Message 638 | color %col1%%col2% 639 | if not "%rank%" == "Moderator" goto msg%rank% 640 | cls 641 | set /p message=Say: 642 | set thismessage="%message%" 643 | if %thismessage% == "/exit" ( 644 | echo %rusername% has left the chat room. >> "Z:\%room%\%room%.crm" 645 | taskkill /f /fi "WINDOWTITLE eq Batch Chat - %room% 646 | rmdir "Z:\players\%rusername% [%rank%]" 647 | exit 648 | ) 649 | if %thismessage% == "/disconnect" ( 650 | echo %rusername% has left the chat room. >> "Z:\%room%\%room%.crm" 651 | taskkill /f /fi "WINDOWTITLE eq Batch Chat - %room% 652 | rmdir "Z:\players\%rusername% [%rank%]" 653 | exit 654 | ) 655 | if %thismessage% == "/rcls" goto msgcls 656 | if %thismessage% == "/cls" ( 657 | cls 658 | goto msg%rank% 659 | ) 660 | if %thismessage% == "/delete" goto rdelete 661 | if %thismessage% == "/create" goto rcreate 662 | if %thismessage% == "/join" goto join 663 | if %thismessage% == "/connectinst" goto connectinst 664 | if %thismessage% == "/help" goto help 665 | if %thismessage% == "/color" goto msgcolor 666 | if %thismessage% == "/msg" goto cmdmsg 667 | if %thismessage% == "/chat" goto cmdchats 668 | if %thismessage% == "/dimensions" goto dementions 669 | if %thismessage% == "/help plist" goto helpplist 670 | if %thismessage% == "/plist" goto plist 671 | if %thismessage% == "/help dimensions" goto helpdim 672 | if %thismessage% == "/help exit" goto helpexit 673 | if %thismessage% == "/help disconnect" goto helpdis 674 | if %thismessage% == "/help cls" goto helpcls 675 | if %thismessage% == "/help rcls" goto helprcls 676 | if %thismessage% == "/host" goto msghost 677 | if %thismessage% == "/help color" goto helpcolor 678 | if %thismessage% == "/help host" goto helphost 679 | if %thismessage% == "/help create" goto helpcreate 680 | if %thismessage% == "/help join" goto helpjoin 681 | if %thismessage% == "/help delete" goto helpdel 682 | if %thismessage% == "/help list" goto helplist 683 | if %thismessage% == "/help rank" goto helprank 684 | if %thismessage% == "/help connectinst" goto helpconnectinst 685 | if %thismessage% == "/list" goto list 686 | if %thismessage:~1,1% == "/" echo %rusername% has exicuted an unknown command! >> "Z:\%room%\%room%.crm" 687 | echo [8]%TIME:~0,2%:%TIME:~3,2% [%colousc%]%rank% [%percol%]%rusername%: [%permsg%]%message% >> "Z:\%room%\%room%.crm" 688 | cd "%appdata%\Batch_Chat" 689 | goto msgModerator 690 | :msgOperator 691 | mode con cols=30 lines=2 692 | cd "%appdata%\Batch_Chat" 693 | call "settings.bat" 694 | set col1=%col1:~0,-1% 695 | set col2=%col2:~0,-1% 696 | set permsg=%permsg:~0,-1% 697 | set percol=%percol:~0,-1% 698 | set colousc=%colousc:~0,-1% 699 | title Message 700 | color %col1%%col2% 701 | if not "%rank%" == "Operator" goto msg%rank% 702 | cls 703 | set /p message=Say: 704 | set thismessage="%message%" 705 | if %thismessage% == "/exit" ( 706 | echo %rusername% has left the chat room. >> "Z:\%room%\%room%.crm" 707 | taskkill /f /fi "WINDOWTITLE eq Batch Chat - %room% 708 | rmdir "Z:\players\%rusername% [%rank%]" 709 | exit 710 | ) 711 | if %thismessage% == "/disconnect" ( 712 | echo %rusername% has left the chat room. >> "Z:\%room%\%room%.crm" 713 | taskkill /f /fi "WINDOWTITLE eq Batch Chat - %room% 714 | rmdir "Z:\players\%rusername% [%rank%]" 715 | exit 716 | ) 717 | if %thismessage% == "/cls" ( 718 | cls 719 | goto msg%rank% 720 | ) 721 | if %thismessage% == "/join" goto join 722 | if %thismessage% == "/delete" goto rdelete 723 | if %thismessage% == "/help" goto help 724 | if %thismessage% == "/dimensions" goto dementions 725 | if %thismessage% == "/plist" goto plist 726 | if %thismessage% == "/help exit" goto helpexit 727 | if %thismessage% == "/help disconnect" goto helpdis 728 | if %thismessage% == "/help cls" goto helpcls 729 | if %thismessage% == "/help rcls" goto helprcls 730 | if %thismessage% == "/color" goto msgcolor 731 | if %thismessage% == "/msg" goto cmdmsg 732 | if %thismessage% == "/chat" goto cmdchats 733 | if %thismessage% == "/help dimensions" goto helpdim 734 | if %thismessage% == "/help create" goto helpcreate 735 | if %thismessage% == "/help join" goto helpjoin 736 | if %thismessage% == "/host" goto msghost 737 | if %thismessage% == "/help color" goto helpcolor 738 | if %thismessage% == "/help host" goto helphost 739 | if %thismessage% == "/help plist" goto helpplist 740 | if %thismessage% == "/help delete" goto helpdel 741 | if %thismessage% == "/help list" goto helplist 742 | if %thismessage% == "/help rank" goto helprank 743 | if %thismessage% == "/help connectinst" goto helpconnectinst 744 | if %thismessage% == "/connectinst" goto connectinst 745 | if %thismessage% == "/create" goto rcreate 746 | if %thismessage% == "/list" goto list 747 | if %thismessage:~1,1% == "/" echo %rusername% has exicuted an unknown command! >> "Z:\%room%\%room%.crm" 748 | echo [8]%TIME:~0,2%:%TIME:~3,2% [%colousc%]%rank% [%percol%]%rusername%: [%permsg%]%message% >> "Z:\%room%\%room%.crm" 749 | cd "%appdata%\Batch_Chat" 750 | goto msgOperator 751 | :msgGuest 752 | mode con cols=30 lines=2 753 | cd "%appdata%\Batch_Chat" 754 | call "settings.bat" 755 | set col1=%col1:~0,-1% 756 | set col2=%col2:~0,-1% 757 | set permsg=%permsg:~0,-1% 758 | set percol=%percol:~0,-1% 759 | set colousc=%colousc:~0,-1% 760 | title Message 761 | color %col1%%col2% 762 | if not "%rank%" == "Guest" goto msg%rank% 763 | cls 764 | set /p message=Say: 765 | set thismessage="%message%" 766 | if %thismessage% == "/exit" ( 767 | echo %rusername% has left the chat room. >> "Z:\%room%\%room%.crm" 768 | taskkill /f /fi "WINDOWTITLE eq Batch Chat - %room% 769 | rmdir "Z:\players\%rusername% [%rank%]" 770 | exit 771 | ) 772 | if %thismessage% == "/disconnect" ( 773 | echo %rusername% has left the chat room. >> "Z:\%room%\%room%.crm" 774 | taskkill /f /fi "WINDOWTITLE eq Batch Chat - %room% 775 | rmdir "Z:\players\%rusername% [%rank%]" 776 | exit 777 | ) 778 | if %thismessage% == "/delete" goto rdelete 779 | if %thismessage% == "/create" goto rcreate 780 | if %thismessage% == "/connectinst" goto connectinst 781 | if %thismessage% == "/help" goto help 782 | if %thismessage% == "/cls" ( 783 | cls 784 | goto msg%rank% 785 | ) 786 | if %thismessage% == "/dimensions" goto dementions 787 | if %thismessage% == "/plist" goto plist 788 | if %thismessage% == "/help dimensions" goto helpdim 789 | if %thismessage% == "/help exit" goto helpexit 790 | if %thismessage% == "/help disconnect" goto helpdis 791 | if %thismessage% == "/help cls" goto helpcls 792 | if %thismessage% == "/color" goto msgcolor 793 | if %thismessage% == "/msg" goto cmdmsg 794 | if %thismessage% == "/chat" goto cmdchats 795 | if %thismessage% == "/help rcls" goto helprcls 796 | if %thismessage% == "/help plist" goto helpplist 797 | if %thismessage% == "/help create" goto helpcreate 798 | if %thismessage% == "/help join" goto helpjoin 799 | if %thismessage% == "/host" goto msghost 800 | if %thismessage% == "/help color" goto helpcolor 801 | if %thismessage% == "/help host" goto helphost 802 | if %thismessage% == "/help delete" goto helpdel 803 | if %thismessage% == "/help list" goto helplist 804 | if %thismessage% == "/help rank" goto helprank 805 | if %thismessage% == "/help connectinst" goto helpconnectinst 806 | if %thismessage% == "/list" goto list 807 | if %thismessage% == "/join" goto join 808 | if %thismessage:~1,1% == "/" echo %rusername% has exicuted an unknown command! >> "Z:\%room%\%room%.crm" 809 | echo [8]%TIME:~0,2%:%TIME:~3,2% [%colousc%]%rank% [%percol%]%rusername%: [%permsg%]%message% >> "Z:\%room%\%room%.crm" 810 | cd "%appdata%\Batch_Chat" 811 | goto msgGuest 812 | :msgDispicable 813 | mode con cols=30 lines=2 814 | cd "%appdata%\Batch_Chat" 815 | call "settings.bat" 816 | set col1=%col1:~0,-1% 817 | set col2=%col2:~0,-1% 818 | set permsg=%permsg:~0,-1% 819 | set percol=%percol:~0,-1% 820 | set colousc=%colousc:~0,-1% 821 | title Message 822 | color %col1%%col2% 823 | if not "%rank%" == "Dispicable" goto msg%rank% 824 | cls 825 | set /p message=Say: 826 | set thismessage="%message%" 827 | if %thismessage% == "/exit" ( 828 | echo %rusername% has left the chat room. >> "Z:\%room%\%room%.crm" 829 | taskkill /f /fi "WINDOWTITLE eq Batch Chat - %room% 830 | rmdir "Z:\players\%rusername% [%rank%]" 831 | exit 832 | ) 833 | if %thismessage% == "/disconnect" ( 834 | echo %rusername% has left the chat room. >> "Z:\%room%\%room%.crm" 835 | taskkill /f /fi "WINDOWTITLE eq Batch Chat - %room% 836 | rmdir "Z:\players\%rusername% [%rank%]" 837 | exit 838 | ) 839 | if %thismessage% == "/help" goto help 840 | if %thismessage% == "/help exit" goto helpexit 841 | if %thismessage% == "/help disconnect" goto helpdis 842 | if %thismessage% == "/help cls" goto helpcls 843 | if %thismessage% == "/help rcls" goto helprcls 844 | if %thismessage% == "/help create" goto helpcreate 845 | if %thismessage% == "/help join" goto helpjoin 846 | if %thismessage% == "/help delete" goto helpdel 847 | if %thismessage% == "/help list" goto helplist 848 | if %thismessage% == "/help color" goto helpcolor 849 | if %thismessage% == "/host" goto msghost 850 | if %thismessage% == "/help host" goto helphost 851 | if %thismessage% == "/help rank" goto helprank 852 | if %thismessage% == "/help plist" goto helpplist 853 | if %thismessage% == "/help connectinst" goto helpconnectinst 854 | if %thismessage% == "/connectinst" goto connectinst 855 | if %thismessage:~1,1% == "/" echo %rusername% has exicuted an unknown command! >> "Z:\%room%\%room%.crm" 856 | echo [8]%TIME:~0,2%:%TIME:~3,2% [%colousc%]%rank% [%percol%]%rusername%: [%permsg%]%message% >> "Z:\%room%\%room%.crm" 857 | cd "%appdata%\Batch_Chat" 858 | goto msgDispicable 859 | :msgcolor 860 | mode con cols=50 lines=15 861 | title Batch Chat - Color Changer 862 | cls 863 | echo. 864 | echo What colors do you want to change? 865 | echo. 866 | echo 1.) Background/Normal Text Color 867 | echo 2.) Text You Send/Your Name Color 868 | echo. 869 | echo 3.) Exit 870 | echo. 871 | set /p colort=">" 872 | if "%colort%" == "1" goto msgcolorreg 873 | if "%colort%" == "2" goto msgcolorcol 874 | if "%colort%" == "3" goto msg%rank% 875 | goto msgcolor 876 | :msgcolorcol 877 | title Batch Chat - Color Changer 878 | cls 879 | echo. 880 | echo What color do you want your text to be? 881 | echo. 882 | echo 0 = Black 8 = Gray 883 | echo 1 = Blue 9 = Light Blue 884 | echo 2 = Green A = Light Green 885 | echo 3 = Aqua B = Light Aqua 886 | echo 4 = Red C = Light Red 887 | echo 5 = Purple D = Light Purple 888 | echo 6 = Yellow E = Light Yellow 889 | echo 7 = White F = Bright White 890 | echo. 891 | echo Type: "exit" to exit. 892 | echo. 893 | set /p txtc=">" 894 | if "%txtc%" == "exit" goto msgcolor 895 | :msgcolorcol2 896 | title Batch Chat - Color Changer 897 | cls 898 | echo. 899 | echo What color do you want your name to be? 900 | echo. 901 | echo 0 = Black 8 = Gray 902 | echo 1 = Blue 9 = Light Blue 903 | echo 2 = Green A = Light Green 904 | echo 3 = Aqua B = Light Aqua 905 | echo 4 = Red C = Light Red 906 | echo 5 = Purple D = Light Purple 907 | echo 6 = Yellow E = Light Yellow 908 | echo 7 = White F = Bright White 909 | echo. 910 | echo Type: "exit" to exit. 911 | echo. 912 | set /p nc=">" 913 | if "%nc%" == "exit" goto msgcolor 914 | cd "%appdata%\Batch_Chat 915 | call "settings.bat" 916 | set percol=%nc% 917 | set permsg=%txtc% 918 | echo set rusername=%rusername%> "settings.bat" 919 | echo set room=%room%>> "settings.bat" 920 | echo set rank=%rank%>> "settings.bat" 921 | echo set cols=%cols%>> "settings.bat" 922 | echo set lines=%lines%>> "settings.bat" 923 | echo set col1=%col1%>> "settings.bat" 924 | echo set col2=%col2%>> "settings.bat" 925 | echo set permsg=%permsg%>> "settings.bat" 926 | echo set percol=%percol%>> "settings.bat" 927 | echo set colousc=%colousc%>> "settings.bat" 928 | echo set pmsgn=%pmsgn%>> "settings.bat" 929 | echo set fileversion=%fileversion%>> "settings.bat" 930 | echo set cddefault=%cddefault%>> "settings.bat" 931 | echo set pcname=%pcname%>> "settings.bat" 932 | goto msg%rank% 933 | :msgcolorreg 934 | title Batch Chat - Color Changer 935 | cls 936 | echo. 937 | echo What do you want the Background color to be? 938 | echo. 939 | echo 0 = Black 8 = Gray 940 | echo 1 = Blue 9 = Light Blue 941 | echo 2 = Green A = Light Green 942 | echo 3 = Aqua B = Light Aqua 943 | echo 4 = Red C = Light Red 944 | echo 5 = Purple D = Light Purple 945 | echo 6 = Yellow E = Light Yellow 946 | echo 7 = White F = Bright White 947 | echo. 948 | echo Type: "exit" to exit. 949 | echo. 950 | set /p bcg=">" 951 | if "%bcg%" == "exit" goto msgcolor 952 | :msgcolorreg2 953 | title Batch Chat - Color Changer 954 | cls 955 | echo. 956 | echo What do you want the text color to be? 957 | echo. 958 | echo 0 = Black 8 = Gray 959 | echo 1 = Blue 9 = Light Blue 960 | echo 2 = Green A = Light Green 961 | echo 3 = Aqua B = Light Aqua 962 | echo 4 = Red C = Light Red 963 | echo 5 = Purple D = Light Purple 964 | echo 6 = Yellow E = Light Yellow 965 | echo 7 = White F = Bright White 966 | echo. 967 | echo Type: "exit" to exit. 968 | echo. 969 | set /p txt=">" 970 | if "%txt%" == "exit" goto msgcolor 971 | cd "%appdata%\Batch_Chat 972 | call "settings.bat" 973 | set col1=%bcg% 974 | set col2=%txt% 975 | echo set rusername=%rusername%> "settings.bat" 976 | echo set room=%room%>> "settings.bat" 977 | echo set rank=%rank%>> "settings.bat" 978 | echo set cols=%cols%>> "settings.bat" 979 | echo set lines=%lines%>> "settings.bat" 980 | echo set col1=%col1%>> "settings.bat" 981 | echo set col2=%col2%>> "settings.bat" 982 | echo set permsg=%permsg%>> "settings.bat" 983 | echo set percol=%percol%>> "settings.bat" 984 | echo set colousc=%colousc%>> "settings.bat" 985 | echo set pmsgn=%pmsgn%>> "settings.bat" 986 | echo set fileversion=%fileversion%>> "settings.bat" 987 | echo set cddefault=%cddefault%>> "settings.bat" 988 | echo set pcname=%pcname%>> "settings.bat" 989 | goto msg%rank% 990 | :msghost 991 | mode con cols=50 lines=15 992 | cls 993 | title Batch Chat - Change Host 994 | echo. 995 | echo 1.) Change Host for Lan 996 | echo 2.) Change Host for Internet/Hamachi 997 | echo. 998 | echo 3.) Exit 999 | echo. 1000 | set /p hosc=">" 1001 | if "%hosc%" == "1" goto hostlanmsg 1002 | if "%hosc%" == "2" goto hostintmsg 1003 | if "%hosc%" == "3" goto msg%rank% 1004 | goto msghost 1005 | :hostlanmsg 1006 | cls 1007 | title Batch Chat - Change for Lan 1008 | echo. 1009 | echo Enter the name of the computer on your lan network. 1010 | echo. 1011 | echo PC Name Obtaining Instructions 1012 | echo. 1013 | echo Type: 1014 | echo 1.) Windows 7 1015 | echo 2.) Windows Vista 1016 | echo 3.) Windows XP 1017 | echo. 1018 | echo 4.) Exit 1019 | set /p forch=">" 1020 | if "%forch%" == "1" goto lanwin7msg 1021 | if "%forch%" == "2" goto lanwinvistmsg 1022 | if "%forch%" == "3" goto lanwinxpmsg 1023 | if "%forch%" == "4" goto msghost 1024 | cd "%appdata%\Batch_Chat" 1025 | call "settings.bat" 1026 | set pcname=%forch% 1027 | echo set rusername=%rusername%> "settings.bat" 1028 | echo set room=%room%>> "settings.bat" 1029 | echo set rank=%rank%>> "settings.bat" 1030 | echo set cols=%cols%>> "settings.bat" 1031 | echo set lines=%lines%>> "settings.bat" 1032 | echo set col1=%col1%>> "settings.bat" 1033 | echo set col2=%col2%>> "settings.bat" 1034 | echo set permsg=%permsg%>> "settings.bat" 1035 | echo set percol=%percol%>> "settings.bat" 1036 | echo set colousc=%colousc%>> "settings.bat" 1037 | echo set pmsgn=%pmsgn%>> "settings.bat" 1038 | echo set fileversion=%fileversion%>> "settings.bat" 1039 | echo set cddefault=%cddefault%>> "settings.bat" 1040 | echo set pcname=%pcname%>> "settings.bat" 1041 | pushd \\%pcname%\chat 1042 | goto finlan 1043 | :hostintmsg 1044 | cls 1045 | title Batch Chat - Change for Internet/Hamachi 1046 | echo. 1047 | echo Enter the ip of the host listed in Hamachi. 1048 | echo. 1049 | echo PC Name Obtaining Instructions 1050 | echo. 1051 | echo Type: 1052 | echo 1.) Windows 7 1053 | echo 2.) Windows Vista 1054 | echo 3.) Windows XP 1055 | echo. 1056 | echo 4.) Exit 1057 | set /p forch=">" 1058 | if "%forch%" == "1" goto lanwin7msg 1059 | if "%forch%" == "2" goto lanwinvistmsg 1060 | if "%forch%" == "3" goto lanwinxpmsg 1061 | if "%forch%" == "4" goto msghost 1062 | cd "%appdata%\Batch_Chat" 1063 | call "settings.bat" 1064 | set pcname=%forch% 1065 | echo set rusername=%rusername%> "settings.bat" 1066 | echo set room=%room%>> "settings.bat" 1067 | echo set rank=%rank%>> "settings.bat" 1068 | echo set cols=%cols%>> "settings.bat" 1069 | echo set lines=%lines%>> "settings.bat" 1070 | echo set col1=%col1%>> "settings.bat" 1071 | echo set col2=%col2%>> "settings.bat" 1072 | echo set permsg=%permsg%>> "settings.bat" 1073 | echo set percol=%percol%>> "settings.bat" 1074 | echo set colousc=%colousc%>> "settings.bat" 1075 | echo set pmsgn=%pmsgn%>> "settings.bat" 1076 | echo set fileversion=%fileversion%>> "settings.bat" 1077 | echo set cddefault=%cddefault%>> "settings.bat" 1078 | echo set pcname=%pcname%>> "settings.bat" 1079 | pushd \\%pcname%\chat 1080 | goto finlan 1081 | :finlan 1082 | cls 1083 | title Batch Chat - Changed 1084 | echo. 1085 | echo Batch Chat host has been changed. 1086 | echo. 1087 | echo Press Enter to Continue. 1088 | echo. 1089 | pause >NUL 1090 | goto msghost 1091 | :lanwinvistmsg 1092 | cls 1093 | title Batch Chat - Windows Vista PC Name Instructions 1094 | echo. 1095 | echo Windows Vista PC Name Instructions: 1096 | echo. 1097 | echo 1.) Goto your startmenu at the bottom lefthand corrner of your screen. 1098 | echo 2.) Click "Control Panel" 1099 | echo 3.) Click "System and Maintenance" 1100 | echo 4.) Click "System" 1101 | echo 5.) Now look for the section labeled "Computer Name" and take the computer name and that is your computer name. 1102 | echo. 1103 | echo Press enter to Continue. 1104 | echo. 1105 | pause >NUL 1106 | goto msghost 1107 | :lanwin7msg 1108 | cls 1109 | title Batch Chat - Win 7 PC Name Instructions 1110 | echo. 1111 | echo Win 7 PC Name Instructions 1112 | echo. 1113 | echo No info yet. 1114 | echo. 1115 | echo Press enter to Continue. 1116 | echo. 1117 | pause >NUL 1118 | goto msghost 1119 | :lanwinxpmsg 1120 | cls 1121 | title Batch Chat - Win XP PC Name Instructions 1122 | echo. 1123 | echo Win XP PC Name Instructions 1124 | echo. 1125 | echo No info yet. 1126 | echo. 1127 | echo Press enter to Continue. 1128 | echo. 1129 | pause >NUL 1130 | goto msghost 1131 | :msgcls 1132 | echo [4]%rusername% has cleared the chat log. > "Z:\%room%\%room%.crm" 1133 | set x=0 1134 | for %%x in (Z:\usernames\) do set /a count+=1 1135 | :msgcls2 1136 | for /f "delims=" %%a IN ('dir /b Z:\usernames\') DO (call :clsecho %%a) 1137 | :clsecho 1138 | if "%x%" == "%count%" goto msg%rank% 1139 | if "%1" == "messages" goto msg%rank% 1140 | set /a x=%x%+1 1141 | if not exist "Z:\usernames\%rusername%\rooms" mkdir "Z:\usernames\%rusername%\rooms" 1142 | if not exist "Z:\usernames\%rusername%\rooms\%room%" mkdir "Z:\usernames\%rusername%\rooms\%room%" 1143 | echo %rusername%> "Z:\usernames\%1\rooms\%room%\cls.bc" 1144 | goto :eof 1145 | :cmdmsg 1146 | mode con cols=50 lines=15 1147 | cls 1148 | title Batch Chat - Private Messaging 1149 | echo. 1150 | echo Who would you like to message? 1151 | echo. 1152 | echo 1.) Exit 1153 | echo. 1154 | set /p msgn=">" 1155 | if "%msgn%" == "1" goto msg%rank% 1156 | if "%msgn%" == "%rusername%" goto uemsg 1157 | if not exist Z:\usernames\%msgn% goto pnotmsge 1158 | goto cmdmsg2 1159 | :uemsg 1160 | cls 1161 | title Batch Chat - Private Messaging 1162 | echo. 1163 | echo You cant message yourself stupid! 1164 | echo. 1165 | pause >NUL 1166 | goto cmdmsg 1167 | :pnotmsge 1168 | cls 1169 | title Batch Chat - Private Messaging 1170 | echo. 1171 | echo The username %msgn% does not exist! 1172 | echo. 1173 | pause >NUL 1174 | goto cmdmsg 1175 | :cmdmsg2 1176 | cls 1177 | title Batch Chat - Private Messaging 1178 | echo. 1179 | echo What would you like to say? 1180 | echo. 1181 | echo 1.) Back 1182 | echo. 1183 | set /p txtmsg=">" 1184 | if "%txtmsg%" == "1" goto cmdmsg 1185 | if not exist "Z:\usernames\%msgn%\msging" mkdir "Z:\usernames\%msgn%\msging" 1186 | if not exist "Z:\usernames\%msgn%\msging\%rusername%" ( 1187 | mkdir "Z:\usernames\%msgn%\msging\%rusername%" 1188 | echo %rusername%> "Z:\usernames\%msgn%\newmsg.bc" 1189 | ) 1190 | cd %appdata%\Batch_Chat 1191 | call "settings.bat" 1192 | set pmsgn=%msgn% 1193 | echo set rusername=%rusername%> "settings.bat" 1194 | echo set room=%room%>> "settings.bat" 1195 | echo set rank=%rank%>> "settings.bat" 1196 | echo set cols=%cols%>> "settings.bat" 1197 | echo set lines=%lines%>> "settings.bat" 1198 | echo set col1=%col1%>> "settings.bat" 1199 | echo set col2=%col2%>> "settings.bat" 1200 | echo set permsg=%permsg%>> "settings.bat" 1201 | echo set percol=%percol%>> "settings.bat" 1202 | echo set colousc=%colousc%>> "settings.bat" 1203 | echo set pmsgn=%pmsgn%>> "settings.bat" 1204 | echo set fileversion=%fileversion%>> "settings.bat" 1205 | echo set cddefault=%cddefault%>> "settings.bat" 1206 | echo set pcname=%pcname%>> "settings.bat" 1207 | set permsg=%permsg:~0,-1% 1208 | set percol=%percol:~0,-1% 1209 | set colousc=%colousc:~0,-1% 1210 | echo [8]%TIME:~0,2%:%TIME:~3,2% [%colousc%]%rank% [%percol%]%rusername%: [%permsg%]%txtmsg%>> "Z:\usernames\%msgn%\msging\%rusername%\chat.crm" 1211 | goto cmdmsg3 1212 | :cmdmsg3 1213 | cls 1214 | title Batch Chat - Private Messaging 1215 | echo. 1216 | echo Message to %msgn% has been sent! 1217 | echo. 1218 | pause >NUL 1219 | start %cddefault%\Chat-%fileversion%.bat msgings 1220 | goto msg%rank% 1221 | :cmdchats 1222 | mode con cols=50 lines=15 1223 | cls 1224 | title Batch Chat - Access a chat 1225 | echo. 1226 | echo 1.) Access a Chat that you started 1227 | echo 2.) Access a Chat that the other 1228 | echo person started. 1229 | echo. 1230 | echo 3.) Exit 1231 | echo. 1232 | set /p chatrs=">" 1233 | if "%chatrs%" == "1" goto cmdchatss 1234 | if "%chatrs%" == "2" goto cmdchatsr 1235 | if "%chatrs%" == "3" goto msg%rank% 1236 | goto cmdchats 1237 | :cmdchatsr 1238 | cls 1239 | title Batch Chat - Access a chat 1240 | echo. 1241 | echo Enter the name of the person 1242 | echo that you have messaged. 1243 | echo. 1244 | echo 1.) Back 1245 | echo. 1246 | set /p pnamec=">" 1247 | if "%pnamec%" == "1" goto cmdchats 1248 | cd %appdata%\Batch_Chat 1249 | call "settings.bat" 1250 | set pmsgn=%pnamec% 1251 | echo set rusername=%rusername%> "settings.bat" 1252 | echo set room=%room%>> "settings.bat" 1253 | echo set rank=%rank%>> "settings.bat" 1254 | echo set cols=%cols%>> "settings.bat" 1255 | echo set lines=%lines%>> "settings.bat" 1256 | echo set col1=%col1%>> "settings.bat" 1257 | echo set col2=%col2%>> "settings.bat" 1258 | echo set permsg=%permsg%>> "settings.bat" 1259 | echo set percol=%percol%>> "settings.bat" 1260 | echo set colousc=%colousc%>> "settings.bat" 1261 | echo set pmsgn=%pmsgn%>> "settings.bat" 1262 | echo set fileversion=%fileversion%>> "settings.bat" 1263 | echo set cddefault=%cddefault%>> "settings.bat" 1264 | echo set pcname=%pcname%>> "settings.bat" 1265 | start %cddefault%\Chat-%fileversion%.bat msgingr 1266 | goto msg%rank% 1267 | :cmdchatss 1268 | cls 1269 | title Batch Chat - Access a chat 1270 | echo. 1271 | echo Enter the name of the person 1272 | echo that you have been messaged 1273 | echo by. 1274 | echo. 1275 | echo 1.) Back 1276 | echo. 1277 | set /p pnamec=">" 1278 | if "%pnamec%" == "1" goto cmdchats 1279 | cd %appdata%\Batch_Chat 1280 | call "settings.bat" 1281 | set pmsgn=%pnamec% 1282 | echo set rusername=%rusername%> "settings.bat" 1283 | echo set room=%room%>> "settings.bat" 1284 | echo set rank=%rank%>> "settings.bat" 1285 | echo set cols=%cols%>> "settings.bat" 1286 | echo set lines=%lines%>> "settings.bat" 1287 | echo set col1=%col1%>> "settings.bat" 1288 | echo set col2=%col2%>> "settings.bat" 1289 | echo set permsg=%permsg%>> "settings.bat" 1290 | echo set percol=%percol%>> "settings.bat" 1291 | echo set colousc=%colousc%>> "settings.bat" 1292 | echo set pmsgn=%pmsgn%>> "settings.bat" 1293 | echo set fileversion=%fileversion%>> "settings.bat" 1294 | echo set cddefault=%cddefault%>> "settings.bat" 1295 | echo set pcname=%pcname%>> "settings.bat" 1296 | start %cddefault%\Chat-%fileversion%.bat msgings 1297 | goto msg%rank% 1298 | :dementions 1299 | mode con cols=50 lines=15 1300 | cd "%appdata%\Batch_Chat" 1301 | call "settings.bat" 1302 | title Dimensions 1303 | echo. 1304 | echo What size do you want? 1305 | echo. 1306 | echo 1.) Extra Large 1307 | echo 2.) Large 1308 | echo 3.) Medium 1309 | echo 4.) Small 1310 | echo 5.) Mini 1311 | echo. 1312 | echo 6.) Custom 1313 | echo. 1314 | echo 7.) Exit 1315 | echo. 1316 | set /p size=">" 1317 | if %size%==1 ( 1318 | set cols=168 1319 | set lines=58 1320 | ) 1321 | if %size%==2 ( 1322 | set cols=108 1323 | set lines=58 1324 | ) 1325 | if %size%==3 ( 1326 | set cols=88 1327 | set lines=43 1328 | ) 1329 | if %size%==4 ( 1330 | set cols=58 1331 | set lines=28 1332 | ) 1333 | if %size%==5 ( 1334 | set cols=40 1335 | set lines=10 1336 | ) 1337 | if %size%==6 goto custdem 1338 | if %size%==7 goto msg%rank% 1339 | echo set rusername=%rusername%> "settings.bat" 1340 | echo set room=%room%>> "settings.bat" 1341 | echo set rank=%rank%>> "settings.bat" 1342 | echo set cols=%cols%>> "settings.bat" 1343 | echo set lines=%lines%>> "settings.bat" 1344 | echo set col1=%col1%>> "settings.bat" 1345 | echo set col2=%col2%>> "settings.bat" 1346 | echo set permsg=%permsg%>> "settings.bat" 1347 | echo set percol=%percol%>> "settings.bat" 1348 | echo set colousc=%colousc%>> "settings.bat" 1349 | echo set fileversion=%fileversion%>> "settings.bat" 1350 | echo set cddefault=%cddefault%>> "settings.bat" 1351 | echo set pcname=%pcname%>> "settings.bat" 1352 | goto msg%rank% 1353 | :custdem 1354 | cd "%appdata%\Batch_Chat" 1355 | call "settings.bat" 1356 | cls 1357 | title Custom Dimensions 1358 | echo. 1359 | echo Type how long you would like the window to be. 1360 | echo. 1361 | set /p col=">" 1362 | set cols=%col% 1363 | cls 1364 | echo. 1365 | echo Type how tall you would like the window to be. 1366 | echo. 1367 | set /p lin=">" 1368 | set lines=%lin% 1369 | echo set rusername=%rusername%> "settings.bat" 1370 | echo set room=%room%>> "settings.bat" 1371 | echo set rank=%rank%>> "settings.bat" 1372 | echo set cols=%cols%>> "settings.bat" 1373 | echo set lines=%lines%>> "settings.bat" 1374 | echo set col1=%col1%>> "settings.bat" 1375 | echo set col2=%col2%>> "settings.bat" 1376 | echo set permsg=%permsg%>> "settings.bat" 1377 | echo set percol=%percol%>> "settings.bat" 1378 | echo set colousc=%colousc%>> "settings.bat" 1379 | echo set fileversion=%fileversion%>> "settings.bat" 1380 | echo set cddefault=%cddefault%>> "settings.bat" 1381 | echo set pcname=%pcname%>> "settings.bat" 1382 | goto msg%rank% 1383 | :plist 1384 | mode con cols=50 lines=15 1385 | cls 1386 | title Player List 1387 | echo. 1388 | echo -=-=-=-=-=-= Players Online =-=-=-=-=-=- 1389 | echo. 1390 | dir /b "Z:\players" 1391 | echo. 1392 | echo 1.) Open in a seperate window. 1393 | echo 2.) Refresh 1394 | echo 3.) Exit 1395 | echo. 1396 | set /p pq=">" 1397 | if %pq%==1 start %cddefault%\Chat-%fileversion%.bat plist 1398 | if %pq%==2 goto plist 1399 | if %pq%==3 goto msg%rank% 1400 | goto plist 1401 | :plistsep 1402 | mode con cols=30 lines=15 1403 | title Player List 1404 | :dirc 1405 | cls 1406 | echo. 1407 | echo -=-=-= Players Online =-=-=- 1408 | echo. 1409 | for /f "delims=" %%t IN ('dir /b Z:\players') DO (echo %%t &set check1=%%t) 1410 | set old1=%check1% 1411 | :ploop 1412 | for /f "tokens=1,2,3* delims=" %%t IN ('dir /b Z:\players') DO (set check1=%%t) 1413 | if not "%check1%" == "%old1%" goto dirc 1414 | goto ploop 1415 | :rcreate 1416 | title Create Room 1417 | mode con cols=50 lines=15 1418 | color %col1%%col2% 1419 | cls 1420 | echo. 1421 | echo What is the name of the room you want to create? 1422 | echo. 1423 | echo 1.) Exit 1424 | echo. 1425 | set /p roomn=">" 1426 | if "%roomn%" == "1" goto msg%rank% 1427 | if exist "Z:\%roomn%" goto rexist 1428 | mkdir "Z:\%roomn%" 1429 | echo %rank%> "Z:\usernames\%rusername%\%roomn%.bc" 1430 | echo %rusername%> "Z:\ranks\%rank%\%roomn%.bc" 1431 | echo %rusername%, has created a new room called %roomn%! >> "Z:\%room%\%room%.crm" 1432 | echo Welcome to the new room, %roomn%! > "Z:\%roomn%\%roomn%.crm" 1433 | cd "%appdata%\Batch_Chat" 1434 | call "settings.bat" 1435 | set col1=%col1:~0,-1% 1436 | set col2=%col2:~0,-1% 1437 | goto msg%rank% 1438 | :rexist 1439 | cls 1440 | echo. 1441 | echo This room already exists! 1442 | echo. 1443 | pause >NUL 1444 | goto rcreate 1445 | :join 1446 | title Join Room 1447 | mode con cols=50 lines=15 1448 | cd "%appdata%\Batch_Chat" 1449 | color %col1%%col2% 1450 | cls 1451 | echo. 1452 | echo What's the name of the room you want to join? 1453 | echo. 1454 | echo 1.) Exit 1455 | echo. 1456 | set /p roomj=">" 1457 | if "%roomj%" == "1" goto msg%rank% 1458 | if not exist "Z:\%roomj%" goto jnotexist 1459 | echo %rusername% has left the chat. >> "Z:\%room%\%room%.crm" 1460 | cd "%appdata%\Batch_Chat" 1461 | set room=%roomj% 1462 | echo set rusername=%rusername%> "settings.bat" 1463 | echo set room=%room%>> "settings.bat" 1464 | echo set rank=%rank%>> "settings.bat" 1465 | echo set cols=%cols%>> "settings.bat" 1466 | echo set lines=%lines%>> "settings.bat" 1467 | echo set col1=%col1%>> "settings.bat" 1468 | echo set col2=%col2%>> "settings.bat" 1469 | echo set permsg=%permsg%>> "settings.bat" 1470 | echo set percol=%percol%>> "settings.bat" 1471 | echo set colousc=%colousc%>> "settings.bat" 1472 | echo set fileversion=%fileversion%>> "settings.bat" 1473 | echo set cddefault=%cddefault%>> "settings.bat" 1474 | echo set pcname=%pcname%>> "settings.bat" 1475 | goto rankident 1476 | :jnotexist 1477 | cls 1478 | echo. 1479 | echo This room does not exist! 1480 | echo. 1481 | pause >NUL 1482 | goto join 1483 | :list 1484 | cls 1485 | cd "%appdata%\Batch_Chat" 1486 | call "settings.bat" 1487 | set col1=%col1:~0,-1% 1488 | set col2=%col2:~0,-1% 1489 | title Room List 1490 | mode con cols=50 lines=15 1491 | color %col1%%col2% 1492 | dir Z:\ /A:D 1493 | pause >NUL 1494 | goto msg%rank% 1495 | :rank 1496 | cd "%appdata%\Batch_Chat" 1497 | call "settings.bat" 1498 | title Rank - Who 1499 | mode con cols=50 lines=15 1500 | cls 1501 | echo. 1502 | echo Who's rank would you like to change? 1503 | echo. 1504 | echo 1.) Exit 1505 | echo. 1506 | set /p urank=">" 1507 | if "%urank%" == "1" goto msg%rank% 1508 | if not exist "Z:\usernames\%urank%" goto pnotexist 1509 | if %rank%==Admin goto userpass 1510 | if "%urank%" == "%rusername%" goto urusern 1511 | if not exist "Z:\usernames\%urank%" goto usernote 1512 | goto userpass 1513 | :userpass 1514 | if exist "Z:\usernames\%urank%\rankGuest.bc" ( 1515 | if exist "Z:\usernames\%rusername%\rankModerator.bc" goto rank2 1516 | if exist "Z:\usernames\%rusername%\rankDirector.bc" goto rank2 1517 | if exist "Z:\usernames\%rusername%\rankAdmin.bc" goto rank2 1518 | goto notallow 1519 | ) 1520 | if exist "Z:\usernames\%urank%\rankDispicable.bc" ( 1521 | if exist "Z:\usernames\%rusername%\rankModerator.bc" goto rank2 1522 | if exist "Z:\usernames\%rusername%\rankDirector.bc" goto rank2 1523 | if exist "Z:\usernames\%rusername%\rankAdmin.bc" goto rank2 1524 | goto notallow 1525 | ) 1526 | if exist "Z:\usernames\%urank%\rankOperator.bc" ( 1527 | if exist "Z:\usernames\%rusername%\rankDirector.bc" goto rank2 1528 | if exist "Z:\usernames\%rusername%\rankAdmin.bc" goto rank2 1529 | goto notallow 1530 | ) 1531 | if exist "Z:\usernames\%urank%\rankModerator.bc" ( 1532 | if exist "Z:\usernames\%rusername%\rankDirector.bc" goto rank2 1533 | if exist "Z:\usernames\%rusername%\rankAdmin.bc" goto rank2 1534 | goto notallow 1535 | ) 1536 | if exist "Z:\usernames\%urank%\rankDirector.bc" ( 1537 | if exist "Z:\usernames\%rusername%\rankAdmin.bc" goto rank2 1538 | goto notallow 1539 | ) 1540 | if exist "Z:\usernames\%urank%\rankAdmin.bc" ( 1541 | if exist "Z:\usernames\%rusername%\rankAdmin.bc" goto rank2 1542 | goto notallow 1543 | ) 1544 | goto error 1545 | :usernote 1546 | cls 1547 | title Rank - Error 1548 | echo. 1549 | echo Username does not exist! 1550 | echo. 1551 | pause >NUL 1552 | goto rank 1553 | :urusern 1554 | title Rank - Error 1555 | cls 1556 | echo. 1557 | echo You cannot rank yourself! 1558 | echo. 1559 | pause >NUL 1560 | goto rank 1561 | :notallow 1562 | title Rank - Error 1563 | cls 1564 | echo. 1565 | echo You can are either to low to change %urank%'s rank 1566 | echo or %urank% is to high to be changed. 1567 | echo. 1568 | pause >NUL 1569 | goto rank 1570 | :rdelete 1571 | mode con cols=50 lines=15 1572 | cls 1573 | title Batch Chat - Room Delete 1574 | echo. 1575 | echo What room would you like to delete? 1576 | echo 1.) exit 1577 | echo. 1578 | set /p vrdelete=">" 1579 | if "%vrdelete%" == "1" goto msg%rank% 1580 | if "%vrdelete%" == "%room%" goto rdelcannot 1581 | if "%vrdelete%" == "Lobby" goto mdelete 1582 | if not exist ""Z:\%vrdelete%"" goto rmnotexist 1583 | if %rank%==Admin goto admindel 1584 | if %rank%==Director goto directdel 1585 | if %rank%==Moderator goto moddel 1586 | if %rank%==Operator goto opdel 1587 | if %rank%==Guest goto guestdel 1588 | goto msg%rank% 1589 | :rdelcannot 1590 | cls 1591 | title Batch Chat - Delete Error 1592 | echo. 1593 | echo You cannot delete a room you or someone is in! 1594 | echo. 1595 | pause >NUL 1596 | goto rdelete 1597 | :rmnotexist 1598 | cls 1599 | title Batch Chat - Room Error 1600 | echo. 1601 | echo This room does not exist! 1602 | echo. 1603 | pause >NUL 1604 | goto rdelete 1605 | :dirdel 1606 | set userr=<"Z:\ranks\Director\%vrdelete%.bc" 1607 | del "Z:\usernames\%userr%\%vrdelete%.bc" 1608 | del "Z:\ranks\Director\%vrdelete%.bc" 1609 | goto deldone 1610 | :model 1611 | set userr=<"Z:\ranks\Moderator\%vrdelete%.bc" 1612 | del "Z:\usernames\%userr%\%vrdelete%.bc" 1613 | del "Z:\ranks\Moderator\%vrdelete%.bc" 1614 | goto deldone 1615 | :odel 1616 | set userr=<"Z:\ranks\Operator\%vrdelete%.bc" 1617 | del "Z:\usernames\%userr%\%vrdelete%.bc" 1618 | del "Z:\ranks\Operator\%vrdelete%.bc" 1619 | goto deldone 1620 | :gudel 1621 | set userr=<"Z:\ranks\Guest\%vrdelete%.bc" 1622 | del "Z:\usernames\%userr%\%vrdelete%.bc" 1623 | del "Z:\ranks\Guest\%vrdelete%.bc" 1624 | goto deldone 1625 | :admindel 1626 | if exist "Z:\usernames\%rusername%\%vrdelete%.bc" ( 1627 | rmdir /S /Q "Z:\%vrdelete%" 1628 | del "Z:\usernames\%rusername%\%vrdelete%.bc" 1629 | if exist "Z:\ranks\Admin\%vrdelete%.bc" del "Z:\ranks\Admin\%vrdelete%.bc" 1630 | if exist "Z:\ranks\Director\%vrdelete%.bc" goto dirdel 1631 | if exist "Z:\ranks\Moderator\%vrdelete%.bc" goto model 1632 | if exist "Z:\ranks\Operator\%vrdelete%.bc" goto odel 1633 | if exist "Z:\ranks\Guest\%vrdelete%.bc" goto gudel 1634 | goto deldone 1635 | ) 1636 | if exist "Z:\ranks\Admin\%vrdelete%.bc" ( 1637 | rmdir /S /Q "Z:\%vrdelete%" 1638 | del "Z:\ranks\Admin\%vrdelete%.bc" 1639 | goto deldone 1640 | ) 1641 | if exist "Z:\ranks\Director\%vrdelete%.bc" ( 1642 | rmdir /S /Q "Z:\%vrdelete%" 1643 | goto dirdel 1644 | ) 1645 | if exist "Z:\ranks\Moderator\%vrdelete%.bc" ( 1646 | rmdir /S /Q "Z:\%vrdelete%" 1647 | goto model 1648 | ) 1649 | if exist "Z:\ranks\Operator\%vrdelete%.bc" ( 1650 | rmdir /S /Q "Z:\%vrdelete%" 1651 | goto odel 1652 | ) 1653 | if exist "Z:\ranks\Guest\%vrdelete%.bc" ( 1654 | rmdir /S /Q "Z:\%vrdelete%" 1655 | goto gudel 1656 | ) 1657 | goto error 1658 | :directdel 1659 | if exist "Z:\usernames\%rusername%\%vrdelete%.bc" ( 1660 | rmdir /S /Q "Z:\%vrdelete%" 1661 | del "Z:\usernames\%rusername%\%vrdelete%.bc" 1662 | if exist "Z:\ranks\Director\%vrdelete%.bc goto dirdel" 1663 | if exist "Z:\ranks\Moderator\%vrdelete%.bc goto model" 1664 | if exist "Z:\ranks\Operator\%vrdelete%.bc goto odel" 1665 | if exist "Z:\ranks\Guest\%vrdelete%.bc goto gudel" 1666 | goto deldone 1667 | ) 1668 | if exist "Z:\ranks\Moderator\%vrdelete%.bc" ( 1669 | rmdir /S /Q "Z:\%vrdelete%" 1670 | goto model 1671 | ) 1672 | if exist "Z:\ranks\Operator\%vrdelete%.bc" ( 1673 | rmdir /S /Q "Z:\%vrdelete%" 1674 | goto odel 1675 | ) 1676 | if exist "Z:\ranks\Guest\%vrdelete%.bc" ( 1677 | rmdir /S /Q "Z:\%vrdelete%" 1678 | goto gudel 1679 | ) 1680 | goto error 1681 | :moddel 1682 | if exist "Z:\usernames\%rusername%\%vrdelete%.bc" ( 1683 | rmdir /S /Q "Z:\%vrdelete%" 1684 | del "Z:\usernames\%rusername%\%vrdelete%.bc" 1685 | if exist "Z:\ranks\Moderator\%vrdelete%.bc" goto model 1686 | if exist "Z:\ranks\Operator\%vrdelete%.bc" goto odel 1687 | if exist "Z:\ranks\Guest\%vrdelete%.bc" goto gudel 1688 | goto deldone 1689 | ) 1690 | if exist "Z:\ranks\Operator\%vrdelete%.bc" ( 1691 | rmdir /S /Q "Z:\%vrdelete%" 1692 | goto odel 1693 | ) 1694 | if exist "Z:\ranks\Guest\%vrdelete%.bc" ( 1695 | rmdir /S /Q "Z:\%vrdelete%" 1696 | goto gudel 1697 | ) 1698 | goto error 1699 | :opdel 1700 | if exist "Z:\usernames\%rusername%\%vrdelete%.bc" ( 1701 | rmdir /S /Q "Z:\%vrdelete%" 1702 | del "Z:\usernames\%rusername%\%vrdelete%.bc" 1703 | if exist "Z:\ranks\Operator\%vrdelete%.bc" goto odel 1704 | if exist "Z:\ranks\Guest\%vrdelete%.bc" goto gudel 1705 | goto deldone 1706 | ) 1707 | if exist "Z:\ranks\Guest\%vrdelete%.bc" ( 1708 | rmdir /S /Q "Z:\%vrdelete%" 1709 | goto gudel 1710 | ) 1711 | goto error 1712 | :guestdel 1713 | if not exist "Z:\usernames\%rusername%\%vrdelete%.bc" goto delerror 1714 | rmdir /S /Q "Z:\%vrdelete%" 1715 | del "Z:\usernames\%rusername%\%vrdelete%.bc" 1716 | if exist "Z:\ranks\Guest\%vrdelete%.bc" goto gudel 1717 | goto deldone 1718 | :delerror 1719 | cls 1720 | title Batch Chat - Delete Error 1721 | echo. 1722 | echo You are not authorized to delete the room 1723 | echo %vrdelete%! 1724 | echo. 1725 | pause >NUL 1726 | goto rdelete 1727 | :deldone 1728 | cls 1729 | title Batch Chat - Delete Successful 1730 | echo. 1731 | echo The room %vrdelete% has been deleted! 1732 | echo. 1733 | pause >NUL 1734 | goto msg%rank% 1735 | :mdelete 1736 | cls 1737 | title Back Chat - Delete Error 1738 | echo. 1739 | echo You cannot delete the main room! 1740 | echo. 1741 | pause >NUL 1742 | goto rdelete 1743 | :urankident 1744 | cd "%appdata%\Batch_Chat" 1745 | call "settings.bat" 1746 | goto msg%rank% 1747 | :pnotexist 1748 | title Rank - Who - Error 1749 | mode con cols=50 lines=15 1750 | cls 1751 | echo. 1752 | echo That person does not exist! 1753 | echo. 1754 | pause >NUL 1755 | goto rank 1756 | :rank2 1757 | title Rank - What 1758 | mode con cols=50 lines=15 1759 | cls 1760 | echo. 1761 | echo What rank do you want them to be? 1762 | echo. 1763 | echo 1.) exit 1764 | echo. 1765 | set /p srank=">" 1766 | if %srank%==1 goto urankident 1767 | if %srank%==Admin ( 1768 | if exist "Z:\usernames\%rusername%\rankAdmin.bc" goto rank3 1769 | ) 1770 | if %srank%==Director goto rank3 ( 1771 | if exist "Z:\usernames\%rusername%\rankAdmin.bc" goto rank3 1772 | ) 1773 | if %srank%==Moderator ( 1774 | if exist "Z:\usernames\%rusername%\rankAdmin.bc" goto rank3 1775 | if exist "Z:\usernames\%rusername%\rankDirector.bc" goto rank3 1776 | ) 1777 | if %srank%==Operator ( 1778 | if exist "Z:\usernames\%rusername%\rankAdmin.bc" goto rank3 1779 | if exist "Z:\usernames\%rusername%\rankDirector.bc" goto rank3 1780 | if exist "Z:\usernames\%rusername%\rankModerator.bc" goto rank3 1781 | ) 1782 | if %srank%==Guest ( 1783 | if exist "Z:\usernames\%rusername%\rankAdmin.bc" goto rank3 1784 | if exist "Z:\usernames\%rusername%\rankDirector.bc" goto rank3 1785 | if exist "Z:\usernames\%rusername%\rankModerator.bc" goto rank3 1786 | if exist "Z:\usernames\%rusername%\rankOperator.bc" goto rank3 1787 | ) 1788 | if %srank%==Dispicable ( 1789 | if exist "Z:\usernames\%rusername%\rankAdmin.bc" goto rank3 1790 | if exist "Z:\usernames\%rusername%\rankDirector.bc" goto rank3 1791 | if exist "Z:\usernames\%rusername%\rankModerator.bc" goto rank3 1792 | ) 1793 | if %srank%==admin ( 1794 | if exist "Z:\usernames\%rusername%\rankAdmin.bc" goto rank3 1795 | ) 1796 | if %srank%==director goto rank3 ( 1797 | if exist "Z:\usernames\%rusername%\rankAdmin.bc" goto rank3 1798 | ) 1799 | if %srank%==moderator ( 1800 | if exist "Z:\usernames\%rusername%\rankAdmin.bc" goto rank3 1801 | if exist "Z:\usernames\%rusername%\rankDirector.bc" goto rank3 1802 | ) 1803 | if %srank%==operator ( 1804 | if exist "Z:\usernames\%rusername%\rankAdmin.bc" goto rank3 1805 | if exist "Z:\usernames\%rusername%\rankDirector.bc" goto rank3 1806 | if exist "Z:\usernames\%rusername%\rankModerator.bc" goto rank3 1807 | ) 1808 | if %srank%==guest ( 1809 | if exist "Z:\usernames\%rusername%\rankAdmin.bc" goto rank3 1810 | if exist "Z:\usernames\%rusername%\rankDirector.bc" goto rank3 1811 | if exist "Z:\usernames\%rusername%\rankModerator.bc" goto rank3 1812 | if exist "Z:\usernames\%rusername%\rankOperator.bc" goto rank3 1813 | ) 1814 | if %srank%==dispicable ( 1815 | if exist "Z:\usernames\%rusername%\rankAdmin.bc" goto rank3 1816 | if exist "Z:\usernames\%rusername%\rankDirector.bc" goto rank3 1817 | if exist "Z:\usernames\%rusername%\rankModerator.bc" goto rank3 1818 | ) 1819 | goto ranke 1820 | :ranke 1821 | title Rank - What - Error 1822 | mode con cols=50 lines=15 1823 | cls 1824 | echo. 1825 | echo That rank does not exist! 1826 | echo Make sure every letter is correct! 1827 | echo Case sensitive! 1828 | echo. 1829 | pause >NUL 1830 | goto rank2 1831 | :rank3 1832 | echo %srank%> Z:\usernames\%urank%\rank.bc 1833 | echo %urank%'s rank has been changed to %srank% by %rusername%! >> "Z:\%room%\%room%.crm" 1834 | goto rankfin 1835 | :rankfin 1836 | title Rank - Success 1837 | mode con cols=50 lines=15 1838 | cls 1839 | echo. 1840 | echo %urank% has been successfully ranked to %srank% 1841 | echo. 1842 | pause >NUL 1843 | echo %urank% has been ranked to %srank% 1844 | goto urankident 1845 | :help 1846 | mode con cols=50 lines=25 1847 | cls 1848 | title Batch Chat - Help 1849 | echo Help Menu 1850 | echo. 1851 | echo 1.) Commands 1852 | echo 2.) Commands + Descriptions 1853 | echo. 1854 | echo 3.) Exit 1855 | echo. 1856 | set /p comdsdesin=">" 1857 | if %comdsdesin%==1 goto helpcommands 1858 | if %comdsdesin%==2 goto helpcmdsdes 1859 | if %comdsdesin%==3 goto msg%rank% 1860 | goto help 1861 | :helpdim 1862 | title Help - /dimensions 1863 | cls 1864 | echo. 1865 | echo This command changes the window dimensions. 1866 | echo. 1867 | pause >NUL 1868 | goto msg%rank% 1869 | :helpcommands 1870 | cls 1871 | title Batch Chat - Help Commands 1872 | echo Help Commands 1873 | echo. 1874 | echo /help 1875 | echo /help [command] 1876 | echo /cls 1877 | echo /rcls 1878 | echo /disconnect 1879 | echo /exit 1880 | echo /host 1881 | echo /rank 1882 | echo /list 1883 | echo /join 1884 | echo /color 1885 | echo /create 1886 | echo /delete 1887 | echo /plist 1888 | echo /dimensions 1889 | echo /connectinst 1890 | echo. 1891 | pause >NUL 1892 | goto help 1893 | :helpcmdsdes 1894 | cls 1895 | title Batch Chat - Help Commands 1896 | echo Help Commands + Descriptions 1897 | echo. 1898 | echo /help - Shows you all commands 1899 | echo /help [command] - Shows you the command specified. 1900 | echo /cls - Clears your screen only 1901 | echo /rcls - Clears your room's log. 1902 | echo /disconnect - Disconnect from chatroom 1903 | echo /exit - Exit from chatroom 1904 | echo /host - Changes your host computer 1905 | echo /rank - Change users ranks 1906 | echo /plist - List of Online Players 1907 | echo /list - List of rooms 1908 | echo /join - Join chatrooms 1909 | echo /color - Change the color of the chat 1910 | echo /create - Create a chatroom 1911 | echo /delete - Delete a chatroom 1912 | echo /dimensions - Change window dimensions. 1913 | echo /connectinst - Instructions on how to 1914 | echo connect chats together. 1915 | echo. 1916 | pause >NUL 1917 | goto help 1918 | :connectinst 1919 | mode con cols=75 lines=42 1920 | cls 1921 | title Batch Chat - Connection Instructions 1922 | echo. 1923 | echo How to connect chats together. 1924 | echo. 1925 | echo 1.) How to connect Lan chats. 1926 | echo 2.) How to connect any chats together, over the internet. 1927 | echo. 1928 | echo 3.) Offical Chat Connection Info 1929 | echo. 1930 | echo 4.) Exit 1931 | echo. 1932 | set /p begi=">" 1933 | if %begi%==1 goto connectinstlan 1934 | if %begi%==2 goto connectinstany 1935 | if %begi%==3 goto connectoffchat 1936 | if %begi%==4 goto msg%rank% 1937 | goto connectinst 1938 | :connectinstlan 1939 | cls 1940 | title Batch Chat - Lan Connect Choice 1941 | echo. 1942 | echo Lan Connect Choice 1943 | echo. 1944 | echo Info: Host is the computer hosting the chat the Client if the computer connecting to the Host. 1945 | echo. 1946 | echo 1.) Host Info 1947 | echo 2.) Client Info 1948 | echo. 1949 | echo 3.) Exit 1950 | echo. 1951 | set /p lanc=">" 1952 | if %lanc%==1 goto connectinsthlan 1953 | if %lanc%==2 goto connectinstclan 1954 | if %lanc%==3 goto connectinst 1955 | goto connectinstlan 1956 | :connectinsthlan 1957 | cls 1958 | title Batch Chat - Lan Host Connection Instructions 1959 | echo. 1960 | echo Lan Host Connection Instructions. 1961 | echo. 1962 | echo 1.) No instructions really you are the host, when you start it up and enter the PC Name you are the host. 1963 | echo. 1964 | echo PC Name Obtaining Instructions 1965 | echo. 1966 | echo Type: 1967 | echo 1.) Windows 7 1968 | echo 2.) Windows Vista 1969 | echo 3.) Windows XP 1970 | echo. 1971 | echo 4.) Exit 1972 | echo. 1973 | set /p lann=">" 1974 | if %lann%==1 goto win7name 1975 | if %lann%==2 goto winvistname 1976 | if %lann%==3 goto winxpname 1977 | if %lann%==4 goto connectinst 1978 | goto connectinsthlan 1979 | :connectinstclan 1980 | cls 1981 | title Batch Chat - Lan Client Connection Instructions 1982 | echo. 1983 | echo Lan Client Connection Instructions. 1984 | echo. 1985 | echo 1.) Obtain the Host computer name using the instructions below. 1986 | echo 2.) Once done take that name and enter it with the "/host" command. 1987 | echo 3.) When that is done you are now chatting on the host computer. 1988 | echo. 1989 | echo PC Name Obtaining Instructions 1990 | echo. 1991 | echo Type: 1992 | echo 1.) Windows 7 1993 | echo 2.) Windows Vista 1994 | echo 3.) Windows XP 1995 | echo. 1996 | echo 4.) Exit 1997 | echo. 1998 | set /p lann=">" 1999 | if %lann%==1 goto win7name 2000 | if %lann%==2 goto winvistname 2001 | if %lann%==3 goto winxpname 2002 | if %lann%==4 goto connectinst 2003 | goto connectinstclan 2004 | :winvistname 2005 | cls 2006 | title Batch Chat - Windows Vista PC Name Instructions 2007 | echo. 2008 | echo Windows Vista PC Name Instructions: 2009 | echo. 2010 | echo 1.) Goto your startmenu at the bottom lefthand corrner of your screen. 2011 | echo 2.) Click "Control Panel" 2012 | echo 3.) Click "System and Maintenance" 2013 | echo 4.) Click "System" 2014 | echo 5.) Now look for the section labeled "Computer Name" and take the computer name and that is your computer name. 2015 | echo. 2016 | echo Press enter to Continue. 2017 | echo. 2018 | pause >NUL 2019 | goto connectinstlan 2020 | :win7name 2021 | cls 2022 | title Batch Chat - Win 7 PC Name Instructions 2023 | echo. 2024 | echo Win 7 PC Name Instructions 2025 | echo. 2026 | echo No info yet. 2027 | echo. 2028 | echo Press enter to Continue. 2029 | echo. 2030 | pause >NUL 2031 | goto connectinstlan 2032 | :winxpname 2033 | cls 2034 | title Batch Chat - Win XP PC Name Instructions 2035 | echo. 2036 | echo Win XP PC Name Instructions 2037 | echo. 2038 | echo No info yet. 2039 | echo. 2040 | echo Press enter to Continue. 2041 | echo. 2042 | pause >NUL 2043 | goto connectinstlan 2044 | :connectinstany 2045 | cls 2046 | title Batch Chat - Chat Internet Connection Instructions 2047 | echo. 2048 | echo Chat Internet Connection Instructions 2049 | echo. 2050 | echo If you you are planning to make your own Batch Chat connection 2051 | echo go to "Host Info," if you want to connect to someones Batch Chat 2052 | echo go to "Client Info." If you want to connect to the Offical 2053 | echo Batch Chat host go to "Offical Chat Info" 2054 | echo. 2055 | echo 1.) Host Info 2056 | echo 2.) Client Info 2057 | echo. 2058 | echo 3.) Offical Chat Connection Info 2059 | echo. 2060 | echo 4.) Exit 2061 | echo. 2062 | set /p none=">" 2063 | if %none%==1 goto hostinfo 2064 | if %none%==2 goto clientinfo 2065 | if %none%==3 goto connectoffchat 2066 | if %none%==4 goto connectinst 2067 | goto connectinstany 2068 | :clientinfo 2069 | cls 2070 | title Batch Chat - Client Connection Instructions 2071 | echo. 2072 | echo Client Connection Instructions 2073 | echo. 2074 | echo First some notes. These are instructions how to connect to Hosts chats. 2075 | echo If you want to be a Host look at the bottom of the window. 2076 | echo. 2077 | echo 1.) Download a program called Hamachi, make sure it is version 1.0.3.0. 2078 | echo 2.) Next make Hamachi a Service 2079 | echo 1.) By opening up Hamachi. 2080 | echo 2.) Click the bottom right hand corrner of the window. 2081 | echo 3.) Click "Preferences," 2082 | echo 4.) Then click "System" 2083 | echo 5.) Click "Run Hamachi as a Service" possible authentication requirement, also you should have to restart Hamachi now and open it up again. 2084 | echo 3.) Once Hamachi is up again click the triangle at the bottom right hand corrner of the Hamachi window. 2085 | echo 4.) Click "Join an existing network"" 2086 | echo 5.) Now figure out the name and password (If the network has one.) of the network. 2087 | echo 6.) Take that info and enter it in the window that has just come up for Hamachi. 2088 | echo 7.) Click "Join" 2089 | echo 8.) And now you have joined the network. 2090 | echo 9.) Note when you want to use the chat over the internet you need to leave Hamachi up. 2091 | echo 10.) Once open and in a room type the command "/host" 2092 | echo 11.) Now you need the information, get it by: 2093 | echo 1.) Put your cursor over the network 2094 | echo 2.) Copy the numbers beside "Owner:" 2095 | echo 3.) Thats the info you need. 2096 | echo 12.) Take that info and enter it when specifed with the /host command. 2097 | echo 13.) Now you should be connected to the host chat and be able to chat with other people also connected including the host. 2098 | echo. 2099 | echo Type: 2100 | echo 1.) Exit 2101 | echo 2.) Host Info 2102 | echo 3.) Copy Hamachi download link to clipboard. 2103 | echo 4.) Offical Chat Connection Info 2104 | echo. 2105 | set /p cli=">" 2106 | if %cli%==1 goto connectinst 2107 | if %cli%==2 goto hostinfo 2108 | if %cli%==3 echo http://www.oldapps.com/Hamachi.php?app=b40fa067c8c2340957fd0779aaafd336| clip 2109 | if %cli%==4 goto connectoffchat 2110 | goto clientinfo 2111 | :hostinfo 2112 | cls 2113 | title Batch Chat - Host Connection Instructions 2114 | echo. 2115 | echo Host Connection Instructions 2116 | echo. 2117 | echo 1.) Download a program called Hamachi, make sure it is version 1.0.3.0. 2118 | echo 2.) Next make Hamachi a Service 2119 | echo 1.) By opening up Hamachi. 2120 | echo 2.) Click the bottom right hand corrner of the window. 2121 | echo 3.) Click "Preferences," 2122 | echo 4.) Then click "System" 2123 | echo 5.) Click "Run Hamachi as a Service" possible authentication requirement, also you should have to restart Hamachi now and open it up again. 2124 | echo 3.) Once Hamachi is up again click the triangle at the bottom right hand corrner of the Hamachi window. 2125 | echo 4.) Click "Create a New Network" 2126 | echo 5.) Type a name for the network and a password. 2127 | echo 6.) Click "Create" 2128 | echo 7.) Now your ready to give the client your info to connect to your chat. 2129 | echo. 2130 | echo Type: 2131 | echo 1.) Exit 2132 | echo 2.) Client Info 2133 | echo 3.) Copy Hamachi download link to clipboard. 2134 | echo 4.) How to make it so you only need the username and there is no password. 2135 | echo. 2136 | set /p beta=">" 2137 | if %beta%==1 goto connectinst 2138 | if %beta%==2 goto clientinfo 2139 | if %beta%==3 echo http://www.oldapps.com/Hamachi.php?app=b40fa067c8c2340957fd0779aaafd336| clip 2140 | if %beta%==4 goto rempass 2141 | goto hostinfo 2142 | :rempass 2143 | cls 2144 | title Batch Chat - How to remove the Hamachi Network Password 2145 | echo. 2146 | echo How to remove the Hamachi Network Password 2147 | echo. 2148 | echo 1.) Make sure you already have a Network set up, if not look at the bottom of the window for "Host Info." 2149 | echo 2.) Next open Hamachi. 2150 | echo 3.) Right-Click on your Network. 2151 | echo 4.) Click "Details." 2152 | echo 5.) Once in Details Click "Access" on the left of that little pop-up window. 2153 | echo 6.) Look under "Network Password" and you should see a checkbox that says, "Require a password to join the network" now un check it. If it is already unchecked then the network doesn't need the password for people to join. 2154 | echo 7.) Click "Ok" at the bottom of the little pop-up window, and now you have a passwordless Network! 2155 | echo. 2156 | echo Type: 2157 | echo 1.) Exit 2158 | echo 2.) Host Info 2159 | echo. 2160 | set /p hamn=">" 2161 | if %hamn%==1 goto connectinst 2162 | if %hamn%==2 goto hostinfo 2163 | goto rempass 2164 | :connectoffchat 2165 | cls 2166 | title Batch Chat - Offical Chat Connect 2167 | echo. 2168 | echo Offical Batch Chat Connection 2169 | echo. 2170 | echo In the program "Hamachi" enter the username 2171 | echo "Batch_Chat" and connect then you will be 2172 | echo able to connect to the offical chat. 2173 | echo. 2174 | pause >NUL 2175 | goto connectinst 2176 | :helpexit 2177 | mode con cols=30 lines=4 2178 | cls 2179 | title Help - /exit 2180 | echo. 2181 | echo This command exits you out of Batch Chat. 2182 | echo. 2183 | pause >NUL 2184 | goto msg%rank% 2185 | :helpplist 2186 | mode con cols=30 lines=4 2187 | cls 2188 | title Help - /plist 2189 | echo. 2190 | echo This command lets you view all of the players online. 2191 | echo. 2192 | pause >NUL 2193 | goto msg%rank% 2194 | :helpdis 2195 | mode con cols=30 lines=4 2196 | cls 2197 | title Help - /dis 2198 | echo. 2199 | echo This command exits you out of Batch Chat. 2200 | echo. 2201 | pause >NUL 2202 | goto msg%rank% 2203 | :helphost 2204 | mode con cols=30 lines=5 2205 | cls 2206 | title Help - /host 2207 | echo. 2208 | echo This command allows you to change your 2209 | echo host computer. 2210 | echo. 2211 | pause >NUL 2212 | goto msg%rank% 2213 | :helprcls 2214 | mode con cols=30 lines=4 2215 | cls 2216 | title Help - /rcls 2217 | echo. 2218 | echo This command clears your room's chat log. 2219 | echo. 2220 | pause >NUL 2221 | goto msg%rank% 2222 | :helpcls 2223 | mode con cols=30 lines=4 2224 | cls 2225 | title Help - /cls 2226 | echo. 2227 | echo This command clears your screen. 2228 | echo. 2229 | pause >NUL 2230 | goto msg%rank% 2231 | :helpcreate 2232 | mode con cols=30 lines=4 2233 | cls 2234 | title Help - /create 2235 | echo. 2236 | echo This command creates a new Batch Chat room. 2237 | echo. 2238 | pause >NUL 2239 | goto msg%rank% 2240 | :helpdel 2241 | mode con cols=30 lines=4 2242 | cls 2243 | title Help - /delete 2244 | echo. 2245 | echo This command deletes a Batch Chat room. 2246 | echo. 2247 | pause >NUL 2248 | goto msg%rank% 2249 | :helplist 2250 | mode con cols=30 lines=4 2251 | cls 2252 | title Help - /list 2253 | echo. 2254 | echo This command lists the Batch Chat rooms. 2255 | echo. 2256 | pause >NUL 2257 | goto msg%rank% 2258 | :helpcolor 2259 | cls 2260 | mode con cols=30 lines=5 2261 | title Help - /color 2262 | echo. 2263 | echo This command allows you to 2264 | echo change the Batch Chat color. 2265 | echo. 2266 | pause >NUL 2267 | goto msg%rank% 2268 | :helprank 2269 | mode con cols=30 lines=4 2270 | cls 2271 | title Help - /rank 2272 | echo. 2273 | echo This command allows you to rank people. 2274 | echo. 2275 | pause >NUL 2276 | goto msg%rank% 2277 | :helpjoin 2278 | mode con cols=30 lines=4 2279 | cls 2280 | title Help - /join 2281 | echo. 2282 | echo This command makes you join another Batch Chat room. 2283 | echo. 2284 | pause >NUL 2285 | goto msg%rank% 2286 | :helpconnectinst 2287 | mode con cols=30 lines=4 2288 | cls 2289 | title Help - /connectinst 2290 | echo. 2291 | echo This command gives you instructions on how to connect Batch Chats. 2292 | echo. 2293 | pause >NUL 2294 | goto msg%rank% -------------------------------------------------------------------------------- /original batch chat/README.md: -------------------------------------------------------------------------------- 1 | Old Batch Chat - v1.9.2 2 | ========== 3 | 4 | A chat made in Batch of all things. 5 | This is the original version of the chat I created in 2011-2012. 6 | It has some nice features like rooms, fully implemented ranks, etc, 7 | but it has a lot of bugs, is extremely vulnerable x10, and has messy/ 8 | inefficient code. Like the newer chat, it cannot communicate over the 9 | internet directly, it can only send messages locally on your network. 10 | BUT you can use Hamachi or a similar program to chat over the internet. 11 | 12 | ### Features: 13 | - Local Area Network (LAN) chat 14 | - Support for Virtual LAN IP's 15 | - Group chat 16 | - Colors (via colous binary) 17 | - Help and command inheritance 18 | - Ranks! 19 | - Rooms! 20 | - **unfinished**: Private messaging 21 | 22 | ### Commands: 23 | - /help - Shows you all commands 24 | - /help [command] - Shows you the command specified. 25 | - /cls - Clears your screen only 26 | - /rcls - Clears your room's log. 27 | - /disconnect - Disconnect from chatroom 28 | - /exit - Exit from chatroom 29 | - /host - Changes your host computer 30 | - /rank - Change users ranks 31 | - /plist - List of Online Players 32 | - /list - List of rooms 33 | - /join - Join chatrooms 34 | - /color - Change the color of the chat 35 | - /create - Create a chatroom 36 | - /delete - Delete a chatroom 37 | - /dimensions - Change window dimensions. 38 | - /connectinst - Instructions on how to connect chats together. 39 | - /msg - **unfinished**: Open a Private Chat with another player 40 | - /chat - **unfinished**: Return to a Private Chat with another player 41 | 42 | 43 | 44 | 45 | 46 | ### Color codes: 47 | 48 | To use color codes while chatting, simply type "[<insert color code>]<my text>". 49 | So, for example, I could type "[12]Hello [5]world[12]!" to send a message 50 | that looks like this: 51 | 52 | ![color code example](http://i.imgur.com/BirW5sj.png) 53 | 54 | Here's a key for the color codes: 55 | 56 | ![colous color codes](http://i.imgur.com/705yk3s.png) 57 | 58 | 59 | 60 | 61 | ### Becoming Admin: 62 | 63 | Like I said, this version of the chat is beyond vulnerable. 64 | When I first created the chat, I wasn't designing it for any form 65 | of real use, just experimenting with Batch, so the only way to become 66 | Admin, use the ranking system, and commands higher than guest, is to 67 | go through the temporary files and make yourself an Admin. 68 | 69 | To do this, the first file you need to modify is located in your 70 | roaming AppData in the folder "Batch_Chat". Its name is "settings.bat" 71 | and all you need to do is open it up, change "Guest" to "Admin". Then, 72 | you have to browse to "C:\chat", open the "players" folder, find your 73 | folder and change "[Guest]" to "[Admin]". Lastly, open the "usernames" 74 | folder, open the folder with your username, change all instances of 75 | "Guest" to "Admin" both in the file names and in the files themselves. 76 | 77 | That's it! Now you should be an Admin and all Admin 78 | commands ready for you to use. 79 | -------------------------------------------------------------------------------- /original batch chat/colous.exe: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/xNul/batch-chat/8e8f72ea913ba20aef0f11eb5c72bfca83528870/original batch chat/colous.exe -------------------------------------------------------------------------------- /ping.mp3: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/xNul/batch-chat/8e8f72ea913ba20aef0f11eb5c72bfca83528870/ping.mp3 --------------------------------------------------------------------------------