DosTips.com

Code: Select all

@echo off
if not exist runfapp.fapp exit
del runfapp.fapp
setlocal  ENABLEEXTENSIONS ENABLEDELAYEDEXPANSION
title Docx
color f0
mode 80,25
if exist allsyscheck.dev goto mainmenu
if exist offsyscheckonn.dev goto colortest
if exist noguidev.dev goto nogui
:deveploroptions
if not exist devmenu.bat goto errornodevmenufile
if not exist dev.ini goto testiftheresafilethere
if exist dev.ini goto devoption
:testiftheresafilethere
if not exist error_codes.txt goto infonofiles
if exist error_codes.txt goto testprofile
:testprofile
goto errorcolor

:red
(

echo f4

)>color1.sgf
goto saveprofile
:blue
(

echo f$

)>color2.sgf
goto saveprofile
:white
(

echo fc

)>color3.sgf
goto saveprofile
:green
(

echo %nff

)>color4.sgf
goto saveprofile
:cyan
(

echo %nrff

)>color5.sgf
goto saveprofile
:purple
(

echo %nrfr

)>color6.sgf
goto saveprofile
:yellow
(

echo %rfrf

)>color7.sgf
goto saveprofile
:grey
(

echo %nrfrf

)>color8.sgf
goto saveprofile
:lightblue
(

echo %rff

)>color9.sgf
goto saveprofile
:saveprofile
cls
color F2
echo.
echo ``````````````````````````                        
echo `         Done!          `
echo `                        `
echo `   Saving your profile  `
echo ` please wait until done `
echo `  Do not close program  `
echo ``````````````````````````
ping localhost -n 2 > nu
del colorpr.dll
Cls
echo.
echo `````````````````````````
echo ` Successfully deleted  `
echo `````````````````````````
echo.
pause
goto testiftheresafilethere
:deletedoc
cls
echo.
echo ``````````````````````````                        
echo ` enter a name for the   `
echo ` document you want to   `
echo `       delete           `
echo `       %name%           `
echo `                        `
echo ``````````````````````````
set /p delete=":"
if not exist %delete%.doc goto errornofilename2
if exist %delete%.doc goto proseed2
:proseed2
Cls
echo.
echo `````````````````````````
echo ` Successfully deleted  `
echo `````````````````````````
echo.
del %delete%.doc
echo.
pause
goto main
:opendoc
cls
echo.
echo ``````````````````````````                        
echo `  name of the document  `
echo `        %name%          `
echo `                        `
echo `  Hit enter after done  `
echo `                        `
echo ``````````````````````````
set /p load=":"
if not exist %load%.doc goto errornofilename
if exist %load%.doc goto proseed
:proseed
cls
set /p doc=<%load%.doc
echo.
echo `````````````````````````
echo ` this is your document `
echo `````````````````````````
echo.
echo %doc%
echo.
pause
goto main

:newdoc
if exist docload10.set goto errorcannotcreateanymoredocs
cls
echo.
:saveingdoc
cls
echo.
echo `````````````````````````
echo ` saveing your document `
echo `````````````````````````
echo.
(

echo %namem%

)>%savefile%.doc



(
ping localhost -n 2 > nul
ping localhost -n 2 > nul
ping localhost -n 2 > nul
del batchaibobtp15.vbs
cls
goto testfilenameifitsgood

:testfilenameifitsgood
cls
if %savefile%==docx goto errorinvalisfilename else goto success1
:success1
cls
if %savefile%==doxgui goto errorinvalisfilename else goto success

:success
cls
del batchaibobtp15.vbs
cls
echo.
echo `````````````````````````
echo `       Success!        `
echo `````````````````````````
echo.
pause
cls
del batchaibobtp15.vbs
cls

echo falesaveconfig_file

)>falesafe.fsav

goto main

goto deletedoc

goto newdoc

if not exist infoption.dll goto thisismain


)>infoptiono.dll
goto testiftheresafilethere
:yesinfo
(

echo falesaveconfig_file

)>infoption.dll
goto testiftheresafilethere
:errordifferentfilename
if e
:devmenu
(

echo falesaveconfig_file

)>devmenuaccess.dev
cls

pause
goto mainmenu1

:byscolsettingsdection
set /p devvarg=<byscol.ini
if %devvarg%==user(.manek;chose-yes goto mainmenu1
cls
echo -error unable to read byscol.ini file 
echo.
echo -your input: %devvarg%
echo.
echo -press any key to exit.
pause>nul
exit



:debuggingmode
if not exist debug.ini goto debuggingmodenotenables
set /p debuggingd=<debug.ini
if %debuggingd%==user.8chose.yeee.o0yes goto correctdebugging
echo 
echo -screen might look stuck but its not!
ping localhost -n 6 > nul
cls
echo -successfully loded into debuging mode 
echo.
echo -press any key to load files!
pause>nul
cls
echo -loading all scrypt files please wait
echo. 
ebug_part1.deb
set /p desmeus
cls 
echo -done loading would you like to integrity

echo -checking all files please wait and see your results
ping localhost -n 3 > nul
echo.
if %debug_part1%==$docx_file$ goto debug_part1correct
cls
echo -invalid string entrypoint. %debug_part1%
ping localhost -n 3 > nul
goto debug_part2
:debug_part1correct
cls
echo -successfully loded. %debug_part1%
ping localhost -n 3 > nul
goto debug_part2

:debug_part2
cls
echo -successfully loded. %debug_part2%
ping localhost -n 3 > nul
goto debug_part3

:debug_part3
if %debug_part3%==f4 goto colorcorrectdebug
if %debug_part3%==f1 goto colorcorrectdebug
if %debug_part3%==f7 goto colorcorrectdebug
if %debug_part3%==f2 goto colorcorrectdebug
if %deb

cls
echo -invalid string warpoint. %debug_part4%
ping localhost -n 3 > nul
goto debug_part5
:correctwarp
cls
echo -successfully loded. %debug_part4%
ping localhost -n 3 > nul
goto debug_part5

:debug_part5
if %debug_part5%==$docx_file$ goto debug_part1correct1
cls
echo -invalid string endpoint. %debug_part5%
ping localhost -n 3 > nul

:debug_part1correct1
cls
echo -successfully loded. %debug_part5%
ping localhost -n 3 > nul
(

echo falesaveconfig_file

)>debugcrt.deb
goto debugingfis

:debuggingmodenotenables
cls
echo -error cannot enable debugging mode 
echo -error code :4WQ1C
echo -press any key
pause>nul
exit

:notenoughtilfes
cls
echo -missing debug part files
echo -error code :4WQ2C
echo -press any key
pause>nul
exit


:integritycheckallfilesmeus
cls
echo -choose y/n try again!
echo -press any key
pause>nul
goto integritycheckallfilesmeusintegritycheckallfilesmeus

:encryptmenu
cls
echo -1)Encrypt a document

set /A str_len += 1
goto lengthloop )
cls
echo Your document: %DecryptOut%
echo.
echo.
pause
goto mainmenu1

:incalidnamegtamane
cls
echo -that file does not exist make sure that 
echo -you have copied over the document
pause
goto viewdocincrypt
:encryptmenu1
cls
echo -To Make Encrypted Documents 
echo -You need DocEncrypter
echo.
echo -Type th