Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- @echo off
- if "%1" == "/del" goto Del
- IF EXIST echoon.txt set echoon=defined
- IF DEFINED dontLoadLogo cls & goto boot
- echo.
- echo.
- echo. `.-:--` ::
- echo. -so/-..-/oo ss `d
- echo. +y` ` ss .-::. `.-:/:. .:N----
- echo. -N` sd+:...+y` y- .:N----
- echo. /h sh oo :h `m
- echo. :m so /s :o/::. +m `m
- echo. `d/ so /s .d` :+m `m
- echo. `s+.` `-+ so /s .d. `:om h:```
- echo. .//+++///. /: -/ -++++/-`o `:///
- echo.
- echo. `m `:://:- .::/:::` +.:////.
- echo. `m `s` -+ .s` .s ys. .s-
- echo. `m o. y o. y y: :y
- echo. `m +. y /- h y/ /s
- echo. `N. `o- `+/ o/ -o- ys:` `:s`
- echo. /::::::- --:::. `-::.` y..///-`
- echo. y.
- echo. -`
- echo.
- :boot
- chcp 65001 >nul
- if "%1" == "/echoon" @echo on
- title L O A D I N G . . .
- set startSet=%time%
- set d=DEFIN^ED
- IF NOT %D% cl^s set cl^s=cl^s
- if "%1" == "/echoon" set cls=
- IF %D% echoon @echo on
- setlocal enabledelayedexpansion
- ::MakeVar
- IF NOT DEFINED dontLoadLogo color 8f
- if "%1" == "/noob" set noobStartup=true & set 1= & goto Restart
- IF %D% noobStartup set noobStartup= & goto Help
- IF NOT %D% loopTag set loopTag=loop
- IF %loopTag% == loop set loop=
- IF %loopTag% == loop set loopOn=true
- IF %loopTag% == dontLoop set loop=::
- IF %loopTag% == dontLoop set loopOff=true & set dontLoop=true
- IF NOT %D% buildName set buildName=McW10
- IF %buildName% == twitcord set Twitcord=& set Dmmode=true
- IF %buildname% == McW10 set Twitcord=::
- IF %buildName% == twitcord set name=DmLoop
- IF NOT %D% name set name=ChatLoop
- IF NOT %d% MainDir set MainDir=%cd%
- set Build=15
- set filename=%~n0%~x0
- set ver=1.0.2 Beta
- set lineUp=1
- set numIncrease=1
- set numDecrease=300
- set api-event=RandomStartupClass & call APIs.bat
- ::Check for Files.
- IF NOT EXIST data goto createFiles
- cd %MainDir%
- IF EXIST stop.bat del stop.bat
- IF EXIST GuiStop.vbs del GuiStop.vbs
- IF EXIST options mkdir data
- IF EXIST options move options data\options
- IF EXIST presets move presets data\presets
- cd %MainDir%\Data\Presets\
- dir /b /ad "%MainDir%\Data\Presets\*" | >nul findstr "^" && (set presetExist=true) || (set presetExist=)
- cd %MainDir%
- ::Check for /edit tag
- if "%1" == "/edit" goto EditMah
- ::Backup directories.
- IF NOT %d% backupDone IF EXIST ExecBackup.bat call ExecBackup.bat
- ::Prompt loading page
- set dontEchoDaLoadRn=true
- goto RandomPreset
- :RandomPreset
- ::Load random preset
- IF NOT "%presetExist%" == "true" goto SkipRandomPreset
- cd %MainDir%\Data\Presets\
- setlocal EnableDelayedExpansion
- set root=%MainDir%\Data\presets
- for /f %%d in ('dir /b /a:d "%root%" ^| find /c /v ""') do set count=%%d
- set /a num=%RANDOM% %% %count%
- for /f "skip=%num% tokens=*" %%d in ('dir /b /a:d "%root%"') do (
- set RandomPreset=%%~fd\
- goto SkipFixAttempt
- )
- IF %D% CLS %cls% %cls% & set dontLoadLogo=true & goto Restart
- IF NOT %D% CLS set dontLoadLogo=true & goto Restart
- :SkipFixAttempt
- cd %RandomPreset%
- set RandomPreset=%Cd%
- for /f "delims=\" %%a in ("%RandomPreset%") do set RandomPreset=%%~nxa
- cd %MainDir%
- IF %D% loadRandom set presetName=%randompreset%& goto PresetSetup
- :SkipRandomPreset
- cd data
- cd options
- ::Load default presets
- IF %D% presetToLoad goto Options
- type options.txt | findstr default_preset >output2.txt
- set /p default_preset=<output2.txt
- set default_preset=%default_preset%
- del output*.*
- set default_preset=%default_preset:default_preset: =%
- set altOldDefaultPreset=%default_preset%
- IF "%default_preset%" == "none" goto Options
- IF NOT "%presetExist%" == "true" set noDefPresetExist=true & goto Options
- IF "%default_Preset%" == "none " set default_preset=none
- IF "%default_Preset%" == "none" set default_preset=none
- IF NOT "%default_preset%" == "none" set defaultPreset=true
- set oldDefaultPreset=%default_preset%&set DontDo2=::
- IF "%default_preset%" == "none" set DontDo2=:: & set defPresetName=%default_preset%
- IF EXIST "%mainDir%\data\presets\%default_Preset%" set Yes2=true
- IF NOT EXIST "%mainDir%\data\presets\%default_Preset%" set errorWithDef=true
- IF NOT "%yes2%" == "true" set DontDo2=::
- IF "%yes2%" == "true" set DontDo2=
- %DontDo2%IF NOT "%default_preset%" == "none" set Wait=1
- %DontDo2%IF NOT "%default_preset%" == "none" goto PresetSetup
- IF NOT "%default_preset%" == "none" set NotFoundPreset=true
- IF %D% defPresetName set default_preset=None
- :Options
- ::Pre-Init Options
- cd %MainDir%
- IF NOT EXIST data\options\options.txt goto createFiles
- cd data
- cd Options
- ::Init
- ::Write file options to file
- type options.txt | findstr debug_mode >debug.txt
- type options.txt | findstr tags >tags.txt
- type options.txt | findstr default_delay >defaultDelay.txt
- type options.txt | findstr wait_time >timeWait.txt
- type options.txt | findstr old_build_number >oldBuildNumber.txt
- type options.txt | findstr build_numbers >buildNumbers.txt
- ::Read a set variables.
- set /p debugCheck=<debug.txt
- set /p tags=<tags.txt
- set /p default_delay=<defaultDelay.txt
- set /p wait_time=<timeWait.txt
- set /p updateCheck=<oldBuildNumber.txt
- set /p buildNumber=<buildNumbers.txt
- ::Post-init
- IF "%debugCheck%" == "debug_mode: true" set debug=true& set debugState=true
- IF "%debugCheck%" == "debug_mode: false" set debug=& set debugStart=false
- IF "%buildNumber%" == "build_numbers: false" set blank=::
- IF "%buildNumber%" == "build_numbers: true" set blank=
- IF "%tags%" == "tags: true" set tags=true
- IF "%tags%" == "tags: false" set tags=
- ::Less complicated stuff
- set default_delay=%default_delay:~14%
- set default_delay=%default_delay: =%
- set wait_time=%wait_time:wait_time: =%
- set wait_time=%wait_time: =%
- set updateCheck=%updateCheck:old_build_number: =%
- IF %build% gtr %updateCheck% goto update
- ::Enable/Disable BuildNumbers
- %blank%cd %MainDir%\data
- %blank%IF NOT EXIST buildNum.txt echo.0 > buildNum.txt
- %blank%set /p buildNum=<buildNum.txt
- %blank%set /a buildNum=%buildNum%+1
- %blank%echo %buildNum% > buildNum.txt
- %Blank%cd %MainDir%\data\options
- IF NOT %d% buildNum set buildNum=%build%
- IF %D% dontEchLoad set wait=1
- IF NOT %D% dontEchLoad set wait=2
- rename options.txt options.old &del *.txt &rename options.old options.txt
- ::Check for preset start value
- ::Code is not working, removed for temp
- ::if "%1:~0,7%" == "/preset" set presetToLoad=%1:~9,-1% & goto PresetSetup
- ::doWait
- cd %MainDir%
- IF NOT %d% presetName title %name% ^| Preset: None ^| Version: %ver% ^| Build %buildNum%
- IF %d% presetName title %name% ^| Preset: %presetName% ^| Version: %ver% ^| Build %buildNum%
- :Menu
- %cls%
- set startEnd=%time%
- color 0f
- ::CHECK SCRIPTS
- IF NOT %D% PresetExist set PresetOpt=
- IF %D% dontEchoDaLoadRn set dontEchoDaLoadRn=
- IF %D% VarStart set VarStart=
- IF NOT "%CD%" == "%MainDir%" cd %MainDir%
- IF "%PresetName%" == " " set presetName=
- IF "%PresetName%" == "" set presetName=
- IF NOT %D% debugState set debugState=false
- ::END
- %cls%
- IF NOT %D% moreOpt echo.%PrmtMsg%
- IF NOT %D% moreOpt echo.
- IF NOT %D% moreOpt echo.Type ^[Enter^] to create a ChatL^oop.
- IF NOT %D% moreOpt IF %D% presetExist echo.Or load a pre-existing ChatLoop like maybe %randomPreset%??
- IF NOT %D% moreOpt IF %D% presetExist echo.
- echo.Beta:
- echo.Type "random" to load random preset
- IF %D% loopOn echo.Type "loop" to toggle on/off, it's on right now
- IF %D% loopOff echo.Type "loop" to toggle on/off, it's off right now
- IF %D% dmMode echo.Type "dm" to toggle dm mode, it's on right now(twitter/discord)
- IF NOT %D% dmMode echo.Type "dm" to toggle dm mode, it's off right now(twitter/discord)
- IF %D% presetExist IF %D% presetName IF %D% dontEchoLoad echo.To run the default preset(%presetName%) type "def" or "default"
- IF %D% presetOpt IF %D% moreOpt echo.
- IF %D% presetOpt IF %D% moreOpt echo Presets Options:
- IF %D% presetOpt IF %D% moreOpt echo.To view presets type "view" or "preset-list"
- IF %D% presetOpt IF %D% moreOpt echo.To edit presets type "edit"
- IF %D% presetOpt IF %D% moreOpt echo.To delete presets type "del" or "delete"
- IF %D% presetOpt IF %D% moreOpt echo.And... To rename presets type "rename"
- IF %D% moreOpt echo.
- IF %D% moreOpt echo.Other Options:
- IF %D% moreOpt echo.To restart %name% type "restart"
- IF %D% moreOpt echo.To restart McW10 type "relog"
- IF %D% moreOpt echo.And if you are really confused, type "help"
- IF %D% tags echo.
- IF %D% tags echo.Tags:
- IF %D% tags echo.%buildName%; %loopTag%; build: %build%; %presetname%; %filename%; debug: %debugState%; delay: %default_delay%;
- IF %D% tags echo.default_preset: %default_preset%; wait_time: %wait_time%; numDecrease: %numDecrease%; numIncrease: %numINcrease%
- IF %D% tags echo.Started in: %MainDir%
- IF NOT %D% moreOpt echo.
- IF NOT %D% moreOpt echo.Type "more" to show More Options.
- echo.
- ::FOR ERRORS ONLY
- IF NOT %D% errorWithDef IF %D% notFoundPreset echo.ERROR: Failed to find the preset "%notFoundPreset%".
- IF %D% errorWithDef IF %D% notFoundPreset echo.ERROR: Failed to find the default preset "%oldDefaultPreset%".
- IF %D% noDefPresetExist echo.ERROR: Couldn't find the default preset "%altOldDefaultPreset%", also 0 exist. .-.
- IF %D% defaultPresetNotDefined echo.ERROR: No default preset set, to select a default preset edit options.txt
- IF %D% loopAlreadyOff echo.ERROR: Loop is already off.
- IF %D% loopAlreadyOn echo.ERROR: Loop is already on.
- IF %D% dmAlreadyOn echo.ERROR: DM mode is already on.
- IF EXIST ^%SystemDrive^% rmdir ^%SystemDrive^%
- IF %D% dmAlreadyOff echo.ERROR: McW10 mode is already on.
- set loopAlreadyOff=& set loopAlreadyOn=& set dmModeAlreadyOff=& set dmModeAlreadyOn=& set notFoundPreset=& set noDefPresetExist=& set errorWithDef=& set VarStart=& set dismiss=& set defaultPresetNotDefined=
- ::END FOR ERRORS
- set /p varStart=:
- IF NOT %D% varStart goto Editor
- IF "%varStart:~0,3%" == "dec" set numDecrease=%varStart:~4,9999%& set dismiss=true
- IF "%varStart:~0,3%" == "inc" set numIncrease=%varStart:~4,9999%& set dismiss=true
- IF "%varStart%" == "relog" goto restartMcw10
- IF "%varStart%" == "less" set MoreOpt= & %v%
- IF "%varStart%" == "random" set loadRandom=true & goto RandomPreset
- IF "%varStart%" == "restart" goto Restart
- IF "%varStart%" == "rename" goto renamePreset
- IF "%varStart%" == "view" goto viewPreset
- IF "%varStart%" == "update-beta" start http:\\bit.ly/chatLoopBetaBuild
- IF "%varStart%" == "update-stable" start http:\\bit.ly/chatLoopBuild
- IF "%varStart%" == "more" set moreOpt=true & set PresetOpt=true & set Tags=& goto Menu
- IF "%varStart%" == "preset-list" goto viewPreset
- IF "%varStart%" == "help" goto help
- IF "%varStart%" == "dm" goto DmToggle
- IF "%varStart:~0,1%" == "b" set b=%VarStart:~2,99999999999999%
- IF "%varStart%" == "edit" goto editPreset
- IF "%varStart%" == "delete" goto deletePreset
- IF "%varStart%" == "loop" goto loopToggle
- IF %d% DontEchoLoad IF "%varStart%" == "def" goto delay
- IF %d% DontEchoLoad IF "%varStart%" == "default" goto delay
- IF "%varStart:~0,3%" == "def" set defaultPresetNotDefined=true & set dismiss=true
- IF NOT %D% dmMode IF "%varStart%" == "dm" set buildname=twitcord
- IF NOT %D% dmMode IF "%varStart%" == "dm" set buildname=twitcord
- ::DEV
- IF "%varStart%" == "cls" set cls=
- IF "%varStart%" == "echoon" set EchoOn=true & @echo on
- IF "%varStart%" == "menu" goto Menu
- IF NOT %D% dismiss IF NOT EXIST "Data\Presets\%varStart%" set InvalidPresetName=true & set notFoundPreset=%varStart%& set presetName= &goto Menu
- IF NOT %D% dismiss IF %d% varStart set DontEchoLoad=& goto PresetSetup
- goto Menu
- :LoopToggle
- if %loopTag% == dontLoop set loopTag=loop& set DontLoadLogo=true & goto Restart
- if %loopTag% == loop set loopTag=dontLoop& set DontLoadLogo=true & goto Restart
- :DmToggle
- IF %buildname% == McW10 set buildname=twitcord& set name=&goto Restart
- IF %buildname% == twitcord set buildname=McW10& set name=&goto Restart
- :Editor
- IF %d% s1 goto WipeDefPreset
- %cls%
- ::Leave title blank
- title
- set presetname=None
- color 8f
- set presetIsUsed=
- mode con cols=71 lines=20
- echo.███████████████████████████████████████████████████████████████████████
- echo.███████████████████████████████████████████████████████████████████████
- echo.███████████████████████▌ ▐██████████████████████
- echo.███████████████████████ Hit ^[Enter^] to start ██████████████████████
- echo.███████████████████████▌ ▐██████████████████████
- echo.███████████████████████████████████████████████████████████████████████
- echo.
- echo.But:
- echo.
- echo.1^) You can only edit the current line of text.
- echo.
- echo.2^) When you are done, just leave the line blank, and hit enter.
- echo.
- echo.3^) Put ^^ before any of these symbols:
- echo.
- echo. ^| ^< ^> ^( ^)
- echo.
- echo.
- echo.
- echo.
- pause >nul
- IF %d% debug echo.Build Number: %buildNum%
- IF %D% cls mode con: cols=98 lines=22
- IF %d% debug echo.Window: cols=98 lines=22
- color 8f
- echo.██████████████████████████████████████████████████████████████████████████████████████████████████
- echo.████████████████████████████████████████▌ ▐██████████████████████████████████████
- echo.████████████████████████████████████████ Text below ██████████████████████████████████████
- echo.████████████████████████████████████████▌ ▐██████████████████████████████████████
- echo.██████████████████████████████████████████████████████████████████████████████████████████████████
- :NumInc1
- set numInc1=1
- set numDec1=0
- :backer1
- set /p s%numInc1%=
- IF NOT %d% s%numInc1% set LastNum=%numDec1% & goto Delay
- set /a NumInc1=%NumInc1%+1
- set /a NumDec1=%NumDec1%+1
- goto Backer1
- :PresetSetup
- IF %d% presetToLoad set presetName=%presetToLoad% & goto SkipCheckDef
- IF %D% varStart set presetname=%VarStart%
- IF %D% loadRandom set presetname=%randomPreset%
- IF NOT %D% dontEchoDaLoadRn echo.Loading..
- IF %D% presetName set default_preset= & set LoadedPreset=true & set DontEchoLoad= & goto SkipCheckDef
- IF %d% defaultPreset set defaultPreset= &set presetName=%default_preset% &set DontEchoLoad=true & set defPreset=true
- :SkipCheckDef
- IF NOT %d% presetName IF NOT EXIST "%MainDir%\Data\Presets\%default_preset%\" set presetname=None &goto Options
- IF %D% presetToLoad IF NOT EXIST "%MainDir%\data\presets\%PresetName%" goto Err502
- set presetIsUsed=true
- cd %MainDir%
- cd data
- cd Presets
- cd %PresetName%
- for %%* in (.) do set presetname=%%~nx*
- IF NOT %D% dontEchoDaLoadRn title %name% ^| Preset: %Presetname% ^| Version: %ver% ^| Build %buildNum%
- set NumIncrease3=1
- set NumDecrease3=0
- :loadMoreLines
- IF EXIST %numINcrease3%.txt set /p s%numIncrease3%=<%numIncrease3%.txt & set LastNum=%numIncrease3%
- IF NOT DEFINED s%numIncrease3% set /a Lastnum=%lastnum%-1 & goto loadFinished
- IF %D% cls IF NOT %D% DontEchoLoad cls
- IF NOT %D% DontEchoLoad echo.Loaded line: %numIncrease3%
- set /a NumIncrease3=%numIncrease3%+1
- set /a NumDecrease3=%numDecrease3%+1
- goto loadMoreLines
- :loadFinished
- cd %MainDir%
- IF %D% varStart goto Delay
- IF NOT %D% loadRandom IF %d% defPreset set defPreset= & goto Options
- :Delay
- %cls%
- echo.Servers typically have a chat cooldown, and since having
- echo."Wait between messages!" in your chat is annoying,
- echo.delay should be added between one message and another.
- echo.
- echo.If you want to use the default delay^(%default_delay%^) hit ^[Enter^]
- echo.Or type the delay you want, for example on Cookie Build use 2300
- echo.
- echo.Delay is measured in millieseconds.
- echo.1 second = 1000ms
- echo.
- set /p Delay=Delay(ms):
- IF NOT %d% DELAY set delay=%default_delay%
- IF NOT %d% presetName set presetName=None
- title %name% ^| Preset: %presetname% ^| Version: %ver% ^| Build %buildNum%
- IF %d% presetIsUsed goto startPostChat
- color 0f
- IF %D% cls mode con cols=80 lines=20
- title %name% ^| Preset: %Presetname% ^| Version: %ver% ^| Build %buildNum%
- IF %d% firstRun echo.
- IF %d% firstRun echo.Y = Yes ^| N = No
- choice /C YN /m "Would you like to create a preset out of that?(Save the %name%)"
- IF %ERRORLEVEL% == 1 goto presetMake
- IF %ERRORLEVEL% == 2 goto Startpostchat
- :startPostChat
- %cls%
- choice /C YN /m "Would you like to /tell a player instead?"
- IF %ERRORLEVEL% == 1 goto Tell
- IF %ERRORLEVEL% == 2 goto PromptStart
- :promptStart
- %cls%
- echo.Hit ^[Enter^] key when, you are ready to start %name%.
- echo.You will then have %wait_time% seconds to be at the chat box.
- pause >nul
- title %name%
- cd %MainDir%
- goto CreateFiles2
- :Cr8Done
- start GuiStop.vbs
- timeout /t %wait_time% >nul
- %cls%
- cd %MainDir%
- echo Set WshShell = WScript.CreateObject("WScript.Shell") >spam.vbs
- IF %d% enterKeyPress echo.WshShell.SendKeys "{ENTER}">> spam.vbs
- echo WScript.Sleep %delay%>> spam.vbs
- IF %d% enterKeyPress echo.WshShell.SendKeys "{ENTER}">> spam.vbs
- %twitcord%echo.WshShell.SendKeys "{ENTER}">> spam.vbs
- %twitcord%echo.WshShell.SendKeys "{ENTER}">> spam.vbs
- %twitcord%echo.WshShell.SendKeys "{ENTER}">> spam.vbs
- echo.WshShell.SendKeys ("^+A")>> spam.vbs
- echo.WshShell.SendKeys ("{DEL}")>> spam.vbs
- set looping=::
- echo WshShell.SendKeys ("^v") >> spam.vbs
- echo.%b%%s1% |clip
- :c
- set /a lineUp=%lineUp%+1
- if %lineUp% GTR %LastNum% set lineUp=1& set loopWarn=define
- IF %d% dontLoop IF %D% loopWarn taskkill /f /im wscript.exe & start %filename% /del & exit
- echo.!%b%s%lineUp%!|clip
- set /a numIncrease=%NumIncrease%+1
- set /a numDecrease=%numDecrease%-1
- cscript //nologo spam.vbs & goto C
- :presetMake
- %cls%
- echo.And you want to call the preset?
- set /p makePresetName=Name:
- cd data
- cd Presets
- IF EXIST "%makePresetName%" goto presetAlreadyExist
- :rewriteItThen
- mkdir "%makePresetName%"
- cd "%makePresetName%"
- IF NOT %D% numUpToWrite set numUptoWrite=1
- echo.Saving...
- :loopPresetWrite
- IF NOT %D% s%numUpToWrite% %cls% & goto Startpostchat
- IF %d% s%numUpToWrite% echo !s%numUpToWrite%!> %numUpToWrite%.txt
- set /a numUpToWrite=%numUpToWrite%+1 & goto loopPresetWrite
- ::Deprecated PRESET-EDIT METHOD. Still used by edit preset, idk how tbh
- ::Rewrite this crap \/\/\/\/\/\/\/ please, I can't understand ONE SINGLE word. Also @Brain, can you comment shit more often?
- ::Thanks <3
- echo.WARNING: Attempted to use deprecated preset-write method. & pause
- :echoShit
- IF NOT %D% numUppy set numUppy=1
- IF %d% s%numUppy% echo !s%numUppy%!> %numUppy%.txt
- IF NOT %d% s%numUppy% set dontDoThisPlzFamTysm=::
- set /a numUppy=%NumUppy%+1
- %dontDoThisPlzFamTysm%goto EchoShit
- IF %D% editPresetFunc goto Chunky1
- set makePresetName=%presetName%
- IF NOT %d% presetName title %name% ^| Preset: None ^| Version: %ver% ^| Build %buildNum%
- IF %d% presetName title %name% ^| Preset: %presetName% ^| Version: %ver% ^| Build %buildNum%
- :Chunky1
- set editPresetFunc=
- for %%* in (.) do set presetname=%%~nx*
- set NumIncrease5=0
- :GoBackLawl5
- set /a numIncrease5=%numIncrease5%+1
- echo.Loading Lines: %NumIncrease5%
- %cls%
- IF NOT EXIST %numIncrease5%.txt goto DoneLawl5
- IF EXIST %numIncrease5%.txt set /p b%numIncrease5%=<%numIncrease5%.txt
- goto GoBackLawl5
- :DoneLawl5
- goto EndChunky1
- :Chunky2
- @echo on
- set numIncrease4=1
- for %%* in (.) do set presetname=%%~nx*
- :GoBackLawl4
- set /a numIncrease4=%numIncrease4%+1
- IF NOT EXIST %numIncrease4%.txt set avaLine=%numIncrease4%
- IF %d% avaLine goto EndAva
- echo.Checking Lines: %NumIncrease4%
- %cls%
- goto GOBackLawl4
- :DoneLawl4
- IF NOT %d% avaLine set avaLine=overLap &goto EndAva
- :tell
- %cls%
- echo.Who do you want to /tell?
- set /p ign=Username:
- set b=/tell %ign%
- set enterKeyPress=true
- goto promptStart
- :ViewPreset
- %cls%
- cd data
- cd Presets
- echo.
- echo.Current Pre-sets:
- dir /b
- cd ..
- echo.
- echo.Press any key to return to main menu
- pause >nul
- goto Menu
- :RenamePreset
- %cls%
- cd Data
- cd Presets\%PresetName%
- echo.
- echo.Current Pre-sets:
- dir /b
- echo.
- echo.Do you want to rename any?
- echo.
- echo.Y = Yes ^| N = No
- choice /C YN
- IF %ERRORLEVEL% == 1 goto doRenamePreset
- IF %ERRORLEVEL% == 2 goto Menu
- :doRenamePreset
- echo.Which one do you want to rename?
- echo.
- IF %d% invalidRename echo.The name you entered is invalid. &echo. &set invalidRename=
- set /p renameFrom=Name:
- IF NOT EXIST "%renameFrom%" set InvalidRename=true &goto doRenamePreset
- %cls%
- echo.And you want to rename it to?
- echo.
- set /p renameTo=Name:
- %cls%
- echo.Okay so you want to rename %renameFrom% to %renameTo% correct?
- choice /C YN
- IF %ERRORLEVEL% == 1 echo.
- IF %ERRORLEVEL% == 2 goto RenamePreset
- rename "%renameFrom%" "%renameTo%"
- %cls%
- echo.Done
- echo.
- echo.Press any key to return to main menu
- pause >nul
- goto Menu
- :deletePreset
- %cls%
- cd Data
- cd Presets
- echo.
- echo.Current Pre-sets:
- dir /b
- echo.
- :TryAgainDel
- echo.Which one do you want to remove?
- echo.
- set /p removePreset=Name:
- IF NOT EXIST "%removePreset%" echo.The pre-set you entered does not exist &goto TryAgainDel
- %cls%
- echo.You want to remove %removePreset% right?
- echo.
- choice /C YN
- IF %ERRORLEVEL% == 1 type nul
- IF %ERRORLEVEL% == 2 goto deletePreset
- rmdir /q /s "%removePreset%"
- IF EXIST "%removePreset%" echo.Failed to remove pre-set
- IF NOT EXIST "%removePreset%" echo.Succesfully removed pre-set
- %cls%
- cd ..
- echo.Hit any key to return to main menu.
- pause >nul
- goto Menu
- :editPreset
- %cls%
- cd data
- cd Presets
- echo.
- echo.Current Pre-sets:
- dir /b
- echo.
- echo.Type the name you want to edit.
- set /p editName=Name:
- IF NOT EXIST "%editName%" goto editPreset
- cd ..
- cd ..
- echo %editName% > namePreset.txt
- start %filename% /edit
- exit
- :EditMah
- title %name% Editor ^| %editName%
- set /p editName=<namePreset.txt
- set editName=%editName%
- del NamePreset.txt
- cd Data
- cd Presets
- cd %editName%
- goto echoShit
- :EndChunky1
- IF NOT %D% numUppy2 set numUppy2=1
- IF %d% b%numUppy2% echo.%numUppy2%: !b%numUppy2%!
- IF NOT %d% b%numUppy2% set numUppyCancel2=::
- set /a numUppy2=%numUppy2%+1
- %numUppyCancel2%goto EndChunky1
- echo.Type the line number you want to edit.
- echo.If you just want to add a line type "add"
- echo.If you just want to delete a line type "delete"
- set /p numEdit=:
- if %numEdit% == add goto Chunky2
- if %numEdit% == delete goto DelLine
- set /p oldValue=<%numEdit%.txt
- %cls%
- set errorlevel=
- echo.Change
- echo.%OldValue%
- echo.To:
- set /p valueNew=:
- echo %valueNew%> %numedit%.txt
- pause
- echo.Succesfully, edited line: %numEdit%. &echo.Hit any key to restart &pause >nul &goto Restart
- :DelLine
- set /p delLine=Line Number:
- del %delLine%.txt
- echo.Done & pause & goto Restart
- :EndAva
- echo.What should this new line say?
- set /p addLine=:
- echo %addLine%> %avaLine%.txt
- IF EXIST output2.txt del output2.txt
- IF EXIST lastnum.txt del lastnum.txt
- echo.Succesfully, added line: %avaLine%. &echo.Hit any key to restart &pause >nul &goto Restart
- :Restart
- cd %MainDir%
- IF %D% username echo %username%> username.txt
- IF %D% DontLoadLogo echo %DontLoadLogo%> dontLoadLogo.txt
- IF %D% loopTag echo %loopTag%> loopTag.txt
- IF EXIST %filename% echo %filename%> filename.txt
- IF NOT EXIST %filename% exit
- IF %D% name echo %name%> name.txt
- IF %D% buildName echo %buildName%> buildName.txt
- for /f "delims==" %%a in ('set') do set %%a=
- set d=DEF^INED
- set Path=C:\WINDOWS\system32;C:\WINDOWS;
- set PATHEXT=.COM;.EXE;.BAT;.CMD;.VBS;.VBE;.JS;.JSE;.WSF;.WSH;.MSC;.BAT
- set SystemRoot=C:\WINDOWS
- set ComSpec=C:\WINDOWS\system32\cmd.exe
- IF EXIST dontloadlogo.txt set /p dontloadlogo=<dontloadlogo.txt
- IF EXIST username.txt set /p username=<username.txt
- IF EXIST filename.txt set /p filename=<filename.txt
- IF EXIST buildName.txt set /p buildName=<buildName.txt
- IF EXIST loopTag.txt set /p loopTag=<loopTag.txt
- IF EXIST name.txt set /p name=<name.txt
- IF %D% filename set filename=%filename%
- IF %D% name set name=%name%
- IF %D% dontLoadLogo set dontLoadLogo=%dontLoadLogo%
- IF %D% loopTagset loopTag=%loopTag%
- IF %D% username set username=%Username%
- IF %D% buildname set buildName=%buildName%
- IF EXIST username.txt del username.txt
- IF EXIST name.txt del name.txt
- IF EXIST loopTag.txt del looptag.txt
- IF EXIST dontloadlogo.txt del dontloadlogo.txt
- IF EXIST tags.txt del tags.txt
- IF EXIST filename.txt del filename.txt
- IF EXIST buildname.txt del buildName.txt
- call %filename%
- :help
- set c=%time:~0,2%
- IF "%c%" == " 0" set t1=12&set pmam=AM
- IF "%c%" == " 1" set t1=1&set pmam=AM
- IF "%c%" == " 2" set t1=2&set pmam=AM
- IF "%c%" == " 3" set t1=3&set pmam=AM
- IF "%c%" == " 4" set t1=4&set pmam=AM
- IF "%c%" == " 5" set t1=5&set pmam=AM
- IF "%c%" == " 6" set t1=6&set pmam=AM
- IF "%c%" == " 7" set t1=7&set pmam=AM
- IF "%c%" == " 8" set t1=8&set pmam=AM
- IF "%c%" == " 9" set t1=9&set pmam=AM
- IF "%c%" == "10" set t1=10&set pmam=AM
- IF "%c%" == "11" set t1=11&set pmam=AM
- IF "%c%" == "12" set t1=12&set pmam=PM
- IF "%c%" == "13" set t1=1&set pmam=PM
- IF "%c%" == "14" set t1=2&set pmam=PM
- IF "%c%" == "15" set t1=3&set pmam=PM
- IF "%c%" == "16" set t1=4&set pmam=PM
- IF "%c%" == "17" set t1=5&set pmam=PM
- IF "%c%" == "18" set t1=6&set pmam=PM
- IF "%c%" == "19" set t1=7&set pmam=PM
- IF "%c%" == "20" set t1=8&set pmam=PM
- IF "%c%" == "21" set t1=9&set pmam=PM
- IF "%c%" == "22" set t1=10&set pmam=PM
- IF "%c%" == "23" set t1=11&set pmam=PM
- set TheTime=%t1%:%time:~3,2% %pmam%
- %cls%
- color 0f
- title %name% ^| Help
- echo.What is a %name%?
- echo.
- echo.%name% - automated chat messages.
- echo.Loop chat messages in chat, for example:
- echo.At %TheTime% you say "Let it go, let it go"
- echo.Then right after at %TheTime% you say "Can't hold it back anymore"
- echo.
- echo.
- echo.Pre-set(Or preset)
- echo.Save %name%s, in files.
- echo.
- echo.Want to see more?
- choice /C YN
- :: 2 - y | 1 - n
- IF %ERRORLEVEL% == 1 goto HelpOpt
- IF %ERRORLEVEL% == 2 type nul
- :helpoptdone
- echo.Hit any key to return to main menu.
- pause >nul
- IF %d% noobStartup set firstRun=true
- IF %d% noobStartup set noobStartup= &goto Menu
- :createFiles
- ::If the main variables are NOT set, just exit ;-;
- IF NOT %d% MainDir echo.Error: Variable MainDir was not set and caused an enexpeted issue >Error.log &exit
- ::Make a folder to store data
- IF NOT EXIST data mkdir Data
- ::Go into that data folder
- cd data
- ::If the folder "options" dooesnt exist, make it
- IF NOT EXIST options mkdir options
- cd options
- echo.debug_mode: false>options.txt
- echo.default_delay: 0 >>options.txt
- echo.build_numbers: false>>options.txt
- echo.old_build_number: %build%>>options.txt
- echo.wait_time: 5 >>options.txt
- echo.default_preset: none>>options.txt
- echo.tags: false>>options.txt
- cd %MainDir%\data
- set noobStartup=true
- mkdir presets
- cd %MainDir%
- start %filename% /noob
- exit
- :presetAlreadyExist
- %cls%
- choice /c YN /m "Do you want to overwrite %makePresetName%"
- :: 1 - y | 2 - n
- ::TRUST ME IM CORRECT THIS TIME! 2 = cd .. &and just start postChat
- ::1 is Let's DO WHAT we ARE here to DO
- IF %ERRORLEVEL% == 2 cd .. &goto Startpostchat
- IF %ERRORLEVEL% == 1 goto OverwritePreset
- :OverwritePreset
- cd %makePresetName%
- del *.*
- cd ..
- rmdir /q /s %makePresetName%
- IF %d% debug timeout 4
- goto rewriteItThen
- :restartMcW10
- taskkill /f /im Minecraft.Windows.exe
- %cls%
- timeout 2 >nul
- echo.Waiting for Minecraft to start...
- timeout 1 >nul
- start Minecraft:
- goto Menu
- :Update
- %cls%
- echo.Updated!
- echo.
- echo.Tags can be enabled ^& disabled in options.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.
- echo.Hit any key when your done reading.
- echo.
- :updateSettings
- IF %d% debug @echo on
- cd %MainDir%
- cd data
- cd Options
- type options.txt | findstr debug_mode >output1.txt
- set /p debugCheck=<output1.txt
- set DebugCheck=%DebugCheck%
- type options.txt | findstr default_delay >output2.txt
- set /p delayCheck=<output2.txt
- set delaycheck=%delaycheck%
- type options.txt | findstr build_numbers >output3.txt
- set /p buildNumber=<output3.txt
- set buildNumber=%buildNumber%
- type options.txt | findstr wait_time >output4.txt
- set /p waitTime=<output4.txt
- set waitTime=%waitTime%
- type options.txt | findstr default_preset >output5.txt
- set /p defaultPreset=<output5.txt
- set defaultPreset=%defaultPreset%
- type options.txt | findstr tags >output6.txt
- set /p tags=<output6.txt
- set tags=%tags%
- IF NOT %d% debugCheck set debugCheck=debug_mode: false
- IF NOT %d% delayCheck set delayCheck=default_delay: 0
- IF NOT %d% buildNumber set buildNumber=build_numbers: false
- IF NOT %d% defaultPreset set defaultPreset=default_preset: none
- IF "%defaultPreset%" == "true" set defaultPreset=default_preset: none
- IF NOT %d% waitTime set waitTime=wait_time: 7
- IF NOT %d% waitTime set waitTime=wait_time: 7
- IF NOT %d% tags set waitTime=tags: false
- echo.%debugCheck%>options.txt
- echo.%delayCheck%>>options.txt
- echo.%buildNumber%>>options.txt
- echo.%defaultPreset%>>options.txt
- echo.old_build_number: %build%>>options.txt
- echo.%waitTime% >>options.txt
- echo.%tags% >>options.txt
- del output*.txt
- IF %d% debug pause
- IF %d% debug @echo off
- pause >nul
- goto Restart
- :HelpOpt
- cd %MainDir%
- %cls%
- echo.debug_mode - Simply just gives more details about what
- echo.is happening, what folder it is in, etc.
- echo.
- echo.default_delay - Lets you edit the default delay between
- echo.A part of a %name% and another.
- echo.
- echo.build_numbers - Helps differentiate one instance from
- echo.another - Not really needed
- echo.
- echo.old_build_number - Used to detect updates,
- echo.so don't edit it unless you want to see the changelog again.
- echo.
- echo.wait_time - The time to wait before starting the
- echo.%name%^(Don't confuse with default_delay^)
- echo.
- echo.default_preset - Default preset that gets loaded.
- echo.
- echo.tags - Options, dont loop state, and other info.
- echo.
- echo.Hit any key to go back.
- pause >nul
- goto Menu
- :createFiles2
- cd %MainDir%
- echo.@echo off > stop.bat
- echo.mode con COLS=15 lines=1 >> stop.bat
- echo.taskkill /f /im cscript.exe >>stop.bat
- echo.TASKKILL /FI "WINDOWTITLE eq %name% %PROCCESID%">>stop.bat
- echo.del Spam.vbs>>stop.bat
- echo.del GuiStop.vbs>>stop.bat
- echo.start %filename% /del ^& exit>>stop.bat
- echo set WshShell = WScript.CreateObject("WScript.Shell")> GuiStop.vbs
- echo result=Msgbox("When you want to stop %name%, hit ok",vbOKOnly, "")>> GuiStop.vbs
- echo If result = "1" then WSHShell.Run("Stop.bat")>> GuiStop.vbs
- IF DEFINED doExitAfter exit
- goto Cr8Done
- :WipeDefPreset
- set doNumInc=0
- set LastNum=
- :DoWipe
- set /a doNumInc=%doNumInc%+1
- IF NOT %d% s%doNumInc% goto Editor
- set s%doNumInc%=
- goto DoWipe
- :Del
- del Stop.bat
- IF EXIST %%SystemDrive%% rmdir %%SystemDrive%%
- IF EXIST _avast_ rmdir _avast_
- exit
- :Err502
- ::502????? 502 Is an error which can occur when the user specifies to start a non-exi^sting preset, specifacally w/ cmd for example "start ChatLoop.bat /preset:"non-existing preset"
- echo.Failed to find specified preset, %presetToLoad% & pause & goto Restart
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement