[Batch] The Official Batch File Repository - Learn & ask questions about batch files

Discussion in 'Scripting' started by timesurfer, Oct 11, 2010.

  1. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    #181 timesurfer, Jul 4, 2011
    Last edited by a moderator: Apr 20, 2017
    (OP)
    Nope :sith:
     
  2. Compo

    Compo MDL Member

    Mar 29, 2011
    136
    106
    10
    #182 Compo, Jul 4, 2011
    Last edited by a moderator: Apr 20, 2017
    Why bother with notepad for this task?

    HOSTS is a read-only file so if you are just viewing it then use the command prompt for it.

    The following, (single line), will open another command prompt window, open the hosts file for reading and return to the original prompt after about one minute if not closed before that by the user.

    Code:
    START "" "CMD /C COLOR 70 & TYPE %SYSTEMROOT%\SYSTEM32\DRIVERS\ETC\HOSTS & >NUL PING -n 61 127.0.0.1"
     
  3. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    #183 timesurfer, Jul 4, 2011
    Last edited by a moderator: Apr 20, 2017
    (OP)
    Wow :0

    I was hoping you would answer...lol

    Thanks

    I thought I'd add a status for fun with ACS5T

    Changes in green

    Enjoy

    Code:
    @echo off
    @color 0A
    cls
    mode con: cols=45 lines=9
    md %windir%\TrilogyAdminTest 2>NUL
    if %errorlevel%==0 ( 
    rd %windir%\TrilogyAdminTest 
    goto mainmenu
    ) else (
    echo Right click Trilogy and run as administrator
    echo.
    pause
    goto end
    )
    :mainmenu
    title Trilogy 3.3
    mode con: cols=49 lines=12
    CLS
    echo.
    echo.  
    echo.              ---- Trilogy 3.3 ----
    echo.    
    echo.         A. IR5 (Windows 7/2008 R2)
    echo.         B. IORRT (Office 2010 Volume)
    echo.         C. ACS5T (Adobe CS5/CS5.5)
    echo.         D. Details, Links and Torrents
    echo.         E. ISO Installation Basics
    echo.         F. Manual Package Console (MPC)
    echo.         G. Exit Trilogy
    echo.
      
    :CHOOSEACTION
    set /p userinp=    ^   Make your selection: 
    set userinp=%userinp:~0,1%
    if /i "%userinp%"=="A" goto IR5
    if /i "%userinp%"=="B" goto IORRT
    if /i "%userinp%"=="C" goto ACS5T
    if /i "%userinp%"=="D" goto Details and Links
    if /i "%userinp%"=="E" goto ISO
    if /i "%userinp%"=="F" goto MPC
    if /i "%userinp%"=="G" goto Exit
    echo.Try Again...
    GOTO CHOOSEACTION
    
    :IORRT
    setlocal enabledelayedexpansion
    title IORRT 4.0
    if not exist "%Windir%\system32\schtasks.exe" ( cls
    echo You don't have schtasks.exe installed
    echo.
    echo IORRT is not compatable with XP Home Edition
    echo Install XP Professional or schtasks.exe
    ping -n 10 127.0.0.1 >NUL
    goto MAINMENU
    )
    set OfficeArchType=
    if '%processor_architecture%'=='x86' Set OfficeArchType=32 && Goto:EndArchCheck
    goto:WOWCheck
    :WOWCheck
    2>nul REG QUERY HKLM\SOFTWARE\Microsoft\Office\14.0\Common | find /i "InstallRoot" 1>nul
    IF ERRORLEVEL 1 Set OfficeArchType=WOW && Goto:EndArchCheck
    Set OfficeArchType=64
    :EndArchCheck
    if %OfficeArchType%==WOW (
    FOR /F "tokens=2* delims= " %%A IN ('"REG QUERY "HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Office\14.0\Common\InstallRoot" /v Path 2>NUL"') DO SET InstallRoot=%%B
    if not defined InstallRoot ( cls & echo Office 2010 VL is not installed... & ping -n 5 127.0.0.1 >nul & goto mainmenu )
    Goto:FoundPath
    )
    FOR /F "tokens=2* delims= " %%A IN ('"REG QUERY "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\14.0\Common\InstallRoot" /v Path 2>NUL"') DO SET InstallRoot=%%B
    if not defined InstallRoot ( cls & echo Office 2010 VL is not installed... & ping -n 5 127.0.0.1 >nul & goto mainmenu )
    :FoundPath
    1>nul 2>nul net start osppsvc
    cscript "%InstallRoot%"ospp.vbs /dstatus |FINDSTR /i "KMS_Client" >NUL
    if %errorlevel% EQU 1 ( cls & echo No office 2010 VL detected... & ping -n 5 127.0.0.1 >nul & goto mainmenu )
    
    :IORRT1
    mode con: cols=45 lines=11
    CLS
    echo.
    echo.  
    echo.    InfiniteOfficeRestoreRearmTask (IORRT) 
    echo.    
    echo.               A. Install
    echo.               B. Uninstall
    echo.               C. Restore/Rearm
    echo.               D. Status
    echo.               E. Trilogy
    echo.               F. Exit Trilogy
    echo.
      
    :CHOOSEACTION1
    set /p userinp=    ^   Make your selection: 
    set userinp=%userinp:~0,1%
    if /i "%userinp%"=="A" goto InstallIORRT
    if /i "%userinp%"=="B" goto UninstallIORRT
    if /i "%userinp%"=="C" goto Rearm
    if /i "%userinp%"=="D" goto StatusIORRT
    if /i "%userinp%"=="E" goto MAINMENU
    if /i "%userinp%"=="F" goto End
    echo.Try Again...
    GOTO CHOOSEACTION1
    
    :InstallIORRT
    CLS
    title IORRT 4.0
    mode con: cols=45 lines=11
    schtasks /query | FINDSTR /I "IORRT" >NUL 
    IF %ERRORLEVEL% NEQ 0 (
    echo.
    ) ELSE (
    echo IORRT is already installed...
    ping -n 5 127.0.0.1 >nul
    GOTO IORRT1
    )
    mode con: cols=62 lines=5
    title IORRT 4.0
    echo Installing IORRT...
    echo.
    set onstart=onstart
    set daily=daily
    VER | FINDSTR /IL "5.1." > NUL
    if %ERRORLEVEL% EQU 0 ( for /f "tokens=2,*" %%A in ('"reg query "HKLM\system\controlset001\control\nls\language" /v InstallLanguage"') do set Language=%%B
    REM German-Germany
    if '!Language!' EQU '0407' ( set daily=täglich & set onstart=beimstart )
    REM Portuguese-Brazil
    if '!Language!' EQU '0416' ( set daily=diariamente )
    REM Polish
    if '!Language!' EQU '0415' ( set daily=codziennie & set onstart=przy_uruchomieniu )
    REM Turkish
    if '!Language!' EQU '041f' ( set daily=günlük )
    )
    schtasks /create /tn "IORRT" /tr "%SystemDrive%\IORRT\IORRT.bat" /sc %daily% /mo 1 /ru "" >NUL 2>&1
    if %ERRORLEVEL% NEQ 0 ( cls
    echo IORRT task could not be installed
    echo.
    echo Your language version is not yet compatable with IORRT
    echo Seek assistance in Trilogy development thread
    ping -n 10 127.0.0.1 >NUL
    goto IORRT1
    ) else ( schtasks /delete /tn "IORRT" /f >NUL )
    schtasks /create /tn "Hybrid" /tr "%SystemDrive%\IORRT\IORRT.bat" /sc %onstart% /ru "" >NUL 2>&1
    if %ERRORLEVEL% NEQ 0 ( cls
    echo Hybrid task could not be installed
    echo.
    echo Your language version is not yet compatable with IORRT
    echo Seek assistance in Trilogy development thread
    ping -n 10 127.0.0.1 >NUL
    goto IORRT1
    ) else ( schtasks /delete /tn "Hybrid" /f >NUL )
    mkdir "%SystemDrive%\Check"
    net stop osppsvc >NUL
    xcopy /cheriky "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform" "%SystemDrive%\Check\Backup\Files\Tokens" >NUL
    mkdir "%SystemDrive%\Check\Backup\Registry" >NUL
    reg save "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\Check\Backup\Registry\OfficeSPPInfo.hiv >NUL
    net start osppsvc >NUL
    IF Exist "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" (
    "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" >NUL
    ) ELSE ( "%commonprogramfiles(x86)%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" >NUL
    )
    if errorlevel==0 goto Pass
    net stop osppsvc >NUL
    xcopy /cheriky "%SystemDrive%\Check\Backup\Files\Tokens" "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform" >NUL
    REG DELETE HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >NUL
    REG ADD HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >NUL
    reg restore "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\Check\Backup\Registry\OfficeSPPInfo.hiv >NUL
    net start osppsvc >NUL
    DEL "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform\Backup.hiv" 2> nul
    SET file=%SystemDrive%\Check
    IF EXIST %file% attrib -h %file%
    RD /S /Q  %file%
    cd /d "%InstallRoot%"
    echo.
    cscript OSPP.VBS /dstatus | FINDSTR /i "Status"
    cscript OSPP.VBS /dstatus | FINDSTR /i "Remaining"
    echo.
    echo No Rearms Detected...
    set msg=No rearms detected
    call :speak "No rearms detected"
    goto :END
    :speak
    echo On Error Resume Next: CreateObject("SAPI.SpVoice").Speak %1 >"%~dp0vc.vbs"
    "%~dp0vc.vbs" & del "%~dp0vc.vbs"
    ping -n 5 127.0.0.1 >nul
    GOTO IORRT1
    :Pass
    net stop osppsvc >NUL
    xcopy /cheriky "%SystemDrive%\Check\Backup\Files\Tokens" "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform" >NUL
    REG DELETE HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >NUL
    REG ADD HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >NUL
    reg restore "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\Check\Backup\Registry\OfficeSPPInfo.hiv >NUL
    net start osppsvc >NUL
    DEL "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform\Backup.hiv" 2> nul
    SET file=%SystemDrive%\Check
    IF EXIST %file% attrib -h %file%
    RD /S /Q  %file%
    mkdir "%SystemDrive%\IORRT"
    net stop osppsvc >NUL
    xcopy /cheriky "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform" "%SystemDrive%\IORRT\Backup\Files\Tokens" >NUL
    mkdir "%SystemDrive%\IORRT\Backup\Registry"
    reg save "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\IORRT\Backup\Registry\OfficeSPPInfo.hiv >NUL
    net start osppsvc >NUL
    SET file=%SystemDrive%\IORRT\IORRT.bat
    IF EXIST %file% attrib -h %file% 
    echo @echo off >%file%
    echo net stop osppsvc >>%file%
    echo xcopy /cheriky "%SystemDrive%\IORRT\Backup\Files\Tokens" "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform" >>%file%
    echo REG DELETE HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >>%file%
    echo REG ADD HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >>%file%
    echo reg restore "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\IORRT\Backup\Registry\OfficeSPPInfo.hiv >>%file%
    echo net start osppsvc >>%file%
    echo IF Exist "%COMMONPROGRAMFILES%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" ( >>%file%
    echo "%COMMONPROGRAMFILES%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" >>%file%
    echo ) ELSE ( "%COMMONPROGRAMFILES(X86)%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" >>%file%
    echo ) >>%file%
    echo schtasks /delete /tn "IORRT" /f >>%file%
    echo schtasks /create /tn "IORRT" /tr "%SystemDrive%\IORRT\IORRT.bat" /sc %daily% /mo 1 /ru "" >>%file%
    IF Exist "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" (
    "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" >NUL
    ) ELSE ( "%commonprogramfiles(x86)%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" >NUL
    )
    attrib +h "%SystemDrive%\IORRT"
    schtasks /create /tn "Hybrid" /tr "%SystemDrive%\IORRT\IORRT.bat" /sc %onstart% /ru "" >NUL
    schtasks /create /tn "IORRT" /tr "%SystemDrive%\IORRT\IORRT.bat" /sc %daily% /mo 1 /ru "" >NUL
    echo.
    title IORRT 4.0
    cd /d "%InstallRoot%"
    echo.
    echo.
    cscript OSPP.VBS /dstatus | FINDSTR /i "Status"
    cscript OSPP.VBS /dstatus | FINDSTR /i "Remaining"
    echo.
    echo Installation Successful...
    set msg=Installation Successful
    call :speak "Installation Successful"
    goto :END
    :speak
    echo On Error Resume Next: CreateObject("SAPI.SpVoice").Speak %1 >"%~dp0vc.vbs"
    "%~dp0vc.vbs" & del "%~dp0vc.vbs"
    ping -n 5 127.0.0.1 >nul
    GOTO IORRT1
    
    :UninstallIORRT
    schtasks /query | FINDSTR /I "IORRT" >NUL
    IF '%ERRORLEVEL%' EQU '0' (
    echo.
    ) ELSE (
    mode con: cols=45 lines=10
    title IORRT 4.0
    echo IORRT is already uninstalled...
    ping -n 5 127.0.0.1 >nul
    GOTO IORRT1
    )
    mode con: cols=62 lines=5
    title IORRT 4.0
    echo Uninstalling IORRT...
    echo.
    net stop osppsvc >NUL
    xcopy /cheriky "%SystemDrive%\IORRT\Backup\Files\Tokens" "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform" >NUL
    REG DELETE HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >NUL
    REG ADD HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >NUL
    reg restore "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\IORRT\Backup\Registry\OfficeSPPInfo.hiv >NUL
    net start osppsvc >NUL
    DEL "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform\Backup.hiv" 2> nul
    SET file=%SystemDrive%\IORRT
    IF EXIST %file% attrib -h %file%
    rd /S /Q  %file%
    schtasks /delete /tn "Hybrid" /f >NUL
    schtasks /delete /tn "IORRT" /f >NUL
    cd /d "%InstallRoot%"
    echo.
    echo.
    cscript OSPP.VBS /dstatus | FINDSTR /i "Status" 
    cscript OSPP.VBS /dstatus | FINDSTR /i "Remaining"
    echo.
    echo Successfully Uninstalled...
    set msg=Successfully Uninstalled
    call :speak "Successfully Uninstalled"
    goto :END
    :speak
    echo On Error Resume Next: CreateObject("SAPI.SpVoice").Speak %1 >"%~dp0vc.vbs"
    "%~dp0vc.vbs" & del "%~dp0vc.vbs"
    ping -n 5 127.0.0.1 >nul
    GOTO IORRT1
    
    :Rearm
    mode con: cols=45 lines=11
    title IORRT 4.0
    schtasks /query | FINDSTR /I "IORRT" >NUL 
    IF %ERRORLEVEL% EQU 0 ( echo.
    ) ELSE (
    echo IORRT is not installed...
    ping -n 5 127.0.0.1 >nul
    GOTO IORRT1
    )
    mode con: cols=64 lines=6
    echo Restoring and rearming IORRT...
    echo.
    set daily=daily
    VER | FINDSTR /IL "5.1." > NUL
    if %ERRORLEVEL% EQU 0 ( for /f "tokens=2,*" %%A in ('"reg query "HKLM\system\controlset001\control\nls\language" /v InstallLanguage"') do set Language=%%B
    REM German-Germany
    if '!Language!' EQU '0407' ( set daily=täglich )
    REM Portuguese-Brazil
    if '!Language!' EQU '0416' ( set daily=diariamente )
    REM Polish
    if '!Language!' EQU '0415' ( set daily=codziennie )
    REM Turkish
    if '!Language!' EQU '041f' ( set daily=günlük )
    )
    net stop osppsvc >NUL
    xcopy /cheriky "C:\IORRT\Backup\Files\Tokens" "%SystemDrive%\ProgramData\Microsoft\OfficeSoftwareProtectionPlatform" >NUL
    REG DELETE HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >NUL
    REG ADD HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >NUL
    reg restore "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\IORRT\Backup\Registry\OfficeSPPInfo.hiv >NUL
    net start osppsvc >NUL
    IF Exist "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" (
    "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" >NUL
    ) ELSE ( "%commonprogramfiles(x86)%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" >NUL
    )
    schtasks /delete /tn "IORRT" /f >NUL
    schtasks /create /tn "IORRT" /tr "%SystemDrive%\IORRT\IORRT.bat" /sc %daily% /mo 1 /ru "" >NUL
    cd /d "%InstallRoot%"
    cscript OSPP.VBS /dstatus | FINDSTR /i "Status"
    cscript OSPP.VBS /dstatus | FINDSTR /i "Remaining"
    echo.
    schtasks /query | FINDSTR /I "IORRT"
    IF ERRORLEVEL 1 echo IORRT is not installed...
    ping -n 5 127.0.0.1 >nul
    GOTO IORRT1
    )
    
    :StatusIORRT
    mode con: cols=64 lines=6
    title IORRT 4.0
    cd /d "%InstallRoot%"
    cscript OSPP.VBS /dstatus | FINDSTR /i "Status"
    cscript OSPP.VBS /dstatus | FINDSTR /i "Remaining"
    echo.
    schtasks /query | FINDSTR /I "IORRT"
    IF ERRORLEVEL 1 echo IORRT is not installed...
    ping -n 10 127.0.0.1 >nul
    GOTO IORRT1
    )
    endlocal
    
    :IR5
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v CurrentVersion | FINDSTR 6.1 >NUL
    IF ERRORLEVEL 1 cls & echo Supports only windows 7 and server 2008 R2 & ping -n 5 127.0.0.1 >nul & goto mainmenu 
    for /f "tokens=2 delims==" %%A in ('"wmic volume where DriveLetter="%SystemDrive%" get SerialNumber /format:list"') do set sn=%%A
    for /f "tokens=2 delims==" %%A in ('"wmic volume where SystemVolume="true" get DeviceId /format:list"') do set sd=%%A
    
    :start
    title IR5 3.6
    mode con: cols=45 lines=12
    cls
    echo.
    echo.
    echo.             InfiniteRearm5 (IR5)
    echo.                   
    echo.                A. Install
    echo.                B. Uninstall
    echo.                C. Rearm
    echo.                D. Status                
    echo.                E. Instructions
    echo.                F. Trilogy
    echo.                G. Exit Trilogy
    echo.
    
    :CHOOSEACTION2
    set /p userinp=    ^   Make your selection: 
    set userinp=%userinp:~0,1%
    if /i "%userinp%"=="A" goto InstallIR5
    if /i "%userinp%"=="B" goto UninstallIR5
    if /i "%userinp%"=="C" goto RearmIR5
    if /i "%userinp%"=="D" goto StatusIR5
    if /i "%userinp%"=="E" goto InstructionsIR5
    if /i "%userinp%"=="F" goto MAINMENU
    if /i "%userinp%"=="G" goto End
    echo.Try Again...
    GOTO CHOOSEACTION2
    
    :InstallIR5
    CLS
    schtasks /query | FINDSTR /I "IR5" >NUL 
    IF ERRORLEVEL 1 (
    echo.
    ) ELSE (
    echo IR5 is already installed...
    ping -n 5 127.0.0.1 >nul
    GOTO start
    )
    REG ADD "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\Activation" /v NotificationDisabled /t REG_DWORD /d 1 /f >NUL
    echo edition = CreateObject("WScript.Shell").RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\EditionID") >key.vbs
    echo Set keys = CreateObject ("Scripting.Dictionary") >>key.vbs
    echo keys.Add "Enterprise",                     "H7X92-3VPBB-Q799D-Y6JJ3-86WC6" >>key.vbs
    echo keys.Add "EnterpriseE",                    "H3V6Q-JKQJG-GKVK3-FDDRF-TCKVR" >>key.vbs
    echo keys.Add "EnterpriseN",                    "BQ4TH-BWRRY-424Y9-7PQX2-B4WBD" >>key.vbs
    echo keys.Add "HomeBasic",                      "YGFVB-QTFXQ-3H233-PTWTJ-YRYRV" >>key.vbs
    echo keys.Add "HomeBasicE",                     "VTKM9-74GQY-K3W94-47DHV-FTXJY" >>key.vbs
    echo keys.Add "HomeBasicN",                     "MD83G-H98CG-DXPYQ-Q8GCR-HM8X2" >>key.vbs
    echo keys.Add "HomePremium",                    "RHPQ2-RMFJH-74XYM-BH4JX-XM76F" >>key.vbs
    echo keys.Add "HomePremiumE",                   "76BRM-9Q4K3-QDJ48-FH4F3-9WT2R" >>key.vbs
    echo keys.Add "HomePremiumN",                   "D3PVQ-V7M4J-9Q9K3-GG4K3-F99JM" >>key.vbs
    echo keys.Add "Professional",                   "HYF8J-CVRMY-CM74G-RPHKF-PW487" >>key.vbs
    echo keys.Add "ProfessionalE",                  "3YHKG-DVQ27-RYRBX-JMPVM-WG38T" >>key.vbs
    echo keys.Add "ProfessionalN",                  "BKFRB-RTCT3-9HW44-FX3X8-M48M6" >>key.vbs
    echo keys.Add "ServerDatacenter",               "7X29B-RDCR7-J6R29-K27FF-H9CR9" >>key.vbs
    echo keys.Add "ServerDatacenterCore",           "7X29B-RDCR7-J6R29-K27FF-H9CR9" >>key.vbs
    echo keys.Add "ServerEmbeddedSolution",         "M2KD2-F2333-Q3TJ8-BQMHX-9PWX6" >>key.vbs
    echo keys.Add "ServerEmbeddedSolutionCore",     "M2KD2-F2333-Q3TJ8-BQMHX-9PWX6" >>key.vbs
    echo keys.Add "ServerEnterprise",               "7P8GH-FV2FF-8FDCR-YK49D-D7P97" >>key.vbs
    echo keys.Add "ServerEnterpriseCore",           "7P8GH-FV2FF-8FDCR-YK49D-D7P97" >>key.vbs
    echo keys.Add "ServerEnterpriseIA64",           "7YKJ4-CX8QP-Q23QY-7BYQM-H2893" >>key.vbs
    echo keys.Add "ServerEssentialAdditional",      "7PDBG-28HK4-276G6-XVJF4-KH9Y4" >>key.vbs
    echo keys.Add "ServerEssentialAdditionalSvc",   "RCDPD-97Q7B-MRDC3-GTRYF-MCD6G" >>key.vbs
    echo keys.Add "ServerEssentialManagement",      "4F37J-4YTKY-6DFDJ-FDRFY-2HT34" >>key.vbs
    echo keys.Add "ServerEssentialManagementSvc",   "4HFV2-KB9P6-TQVJF-87D8X-2YYBF" >>key.vbs
    echo keys.Add "ServerForSBSolutions",           "PHYFD-HQ4XW-78PR4-2CXKF-V67KJ" >>key.vbs
    echo keys.Add "ServerForSBSolutionsEM",         "JR4Y2-WC84X-PBRDJ-QTBTB-TQGGH" >>key.vbs
    echo keys.Add "ServerHomePremium",              "YQXDR-G2MBV-63VW2-JX8J2-FVTVG" >>key.vbs
    echo keys.Add "ServerHomeStandard",             "BTMWJ-8KHD9-B9BX8-J7JQ9-7M6J2" >>key.vbs
    echo keys.Add "ServerHPC",                      "Q7PRR-M2WBM-RJJ99-FG393-MGY3B" >>key.vbs
    echo keys.Add "ServerHyperCore",                "Q8R8C-T2W6H-7MGPB-4CQ9R-KR36H" >>key.vbs
    echo keys.Add "ServerMediumBusinessManagement", "FD499-FD79G-V9D2W-F9WQ6-MD2VC" >>key.vbs
    echo keys.Add "ServerMediumBusinessMessaging",  "YVYC7-KVQ8G-XF6K4-9MG8M-QXFC2" >>key.vbs
    echo keys.Add "ServerMediumBusinessSecurity",   "YQ3V7-79DM4-42PVW-BYRH8-69VXK" >>key.vbs
    echo keys.Add "ServerSBSPremium",               "BXQQP-Q6Q6D-TR7TR-3YXQW-VFHKM" >>key.vbs
    echo keys.Add "ServerSBSPremiumCore",           "BXQQP-Q6Q6D-TR7TR-3YXQW-VFHKM" >>key.vbs
    echo keys.Add "ServerSBSStandard",              "YMFM8-J2RV2-66G78-XPQ7C-4RY3B" >>key.vbs
    echo keys.Add "ServerSolution",                 "Y7GVM-YFQQW-HV8HW-GRW6D-YJ84M" >>key.vbs
    echo keys.Add "ServerSolutionEM",               "WF9T8-VT7D2-GD629-WTKGH-3WBJT" >>key.vbs
    echo keys.Add "ServerSolutionsPremium",         "4TMY4-8JG4B-VKY8X-6TVDH-J7XFV" >>key.vbs
    echo keys.Add "ServerSolutionsPremiumCore",     "4TMY4-8JG4B-VKY8X-6TVDH-J7XFV" >>key.vbs
    echo keys.Add "ServerStandard",                 "HMG6P-C7VGP-47GJ9-TWBD4-2YYCD" >>key.vbs
    echo keys.Add "ServerStandardCore",             "HMG6P-C7VGP-47GJ9-TWBD4-2YYCD" >>key.vbs
    echo keys.Add "ServerWeb",                      "YGTGP-9XH8D-8BVGY-BVK4V-3CPRF" >>key.vbs
    echo keys.Add "ServerWebCore",                  "YGTGP-9XH8D-8BVGY-BVK4V-3CPRF" >>key.vbs
    echo keys.Add "ServerWinFoundation",            "36RXV-4Y4PJ-B7DWH-XY4VW-KQXDQ" >>key.vbs
    echo keys.Add "ServerWinSB",                    "JG43G-CMPHG-VPBC6-9TDQR-RRFJ4" >>key.vbs
    echo keys.Add "ServerWinSBV",                   "WQG3Q-VWT72-VX39Q-VRTRD-2RF7K" >>key.vbs
    echo keys.Add "Starter",                        "7Q28W-FT9PC-CMMYT-WHMY2-89M6G" >>key.vbs
    echo keys.Add "StarterE",                       "BRQCV-K7HGQ-CKXP6-2XP7K-F233B" >>key.vbs
    echo keys.Add "StarterN",                       "D4C3G-38HGY-HGQCV-QCWR8-97FFR" >>key.vbs
    echo keys.Add "Ultimate",                       "D4F6K-QK3RD-TMVMJ-BBMRX-3MBMV" >>key.vbs
    echo keys.Add "UltimateE",                      "TWMF7-M387V-XKW4Y-PVQQD-RK7C8" >>key.vbs
    echo keys.Add "UltimateN",                      "HTJK6-DXX8T-TVCR6-KDG67-97J8Q" >>key.vbs
    echo keys.Add "Embedded",                       "743Q4-G676P-84RX9-B8HRR-6V73F" >>key.vbs
    echo if keys.Exists(edition) then >>key.vbs
    echo WScript.Echo keys.Item(edition) >>key.vbs
    echo End If >>key.vbs
    FOR /F %%A in ('cscript /nologo key.vbs') do SET PIDKEY=%%A 
    del key.vbs
    SET file=%sd%\IR5.bat
    echo @echo off>>%file% 
    echo echo Set objWMIService = GetObject("winmgmts:\\.\root\CIMV2") ^>^>drive.vbs>>%file% 
    echo echo Set colItems = objWMIService.ExecQuery( "SELECT * FROM Win32_Volume",,48) ^>^>drive.vbs>>%file% 
    echo echo For Each objItem in colItems ^>^>drive.vbs>>%file% 
    echo echo If Hex(%sn%) = Hex(objItem.SerialNumber) then ^>^>drive.vbs>>%file% 
    echo echo Wscript.Echo objItem.DriveLetter ^>^>drive.vbs>>%file% 
    echo echo End If ^>^>drive.vbs>>%file% 
    echo echo Next ^>^>drive.vbs>>%file% 
    echo for /f %%%%A IN ('"cscript /nologo drive.vbs"') do set dl=%%%%A>>%file% 
    echo set dl=%%dl:~0,-1%%>>%file%
    echo del drive.vbs>>%file% 
    echo reg load HKLM\MY_SYSTEM "%%dl%%\Windows\System32\config\system" ^>NUL >>%file% 
    echo reg delete HKLM\MY_SYSTEM\WPA /f ^>NUL >>%file% 
    echo reg unload HKLM\MY_SYSTEM ^>NUL >>%file%
    echo echo cscript /b slmgr.vbs /ipk %PIDKEY% ^>%%dl%%\installkey.bat >>%file%
    echo echo slmgr.vbs /dlv ^>^>%%dl%%\installkey.bat >>%file%
    echo echo del "C:\installkey.bat" ^>^>%%dl%%\installkey.bat >>%file%
    echo echo CreateObject("WScript.Shell").Run """C:\installkey.bat""", 0, False ^>%%dl%%\key.vbs >>%file%
    echo echo @echo off ^>%%dl%%\launch.bat >>%file%
    echo echo wscript.exe "C:\key.vbs" ^>^>%%dl%%\launch.bat >>%file%
    echo echo del "%sd%\IR5.bat" ^>^>%%dl%%\launch.bat >>%file%
    echo echo del "C:\key.vbs" ^>^>%%dl%%\launch.bat >>%file%
    echo echo del "C:\launch.bat" ^>^>%%dl%%\launch.bat >>%file%
    echo reg load HKLM\MY_SOFTWARE "%%dl%%\Windows\System32\config\software" ^>NUL >>%file% 
    echo reg add HKLM\MY_SOFTWARE\Microsoft\Windows\CurrentVersion\RunOnce /v InstallKey /t REG_SZ /d C:\launch.bat ^>NUL >>%file%
    echo reg unload HKLM\MY_SOFTWARE >>%file%
    echo wpeutil reboot >>%file%
    reagentc /boottore >NUL
    echo Windows is restarting now...
    ping -n 5 127.0.0.1 >nul
    schtasks /create /tn "IR5" /tr "'%SystemDrive%\Windows\system32\cmd.exe' /c cscript.exe /b %SystemDrive%\Windows\System32\slmgr.vbs /rearm && net stop sppsvc && net start sppsvc" /sc daily /mo 30 /ru "" /f >NUL
    shutdown /r /t 0
    goto end
    
    :UninstallIR5
    cls
    REG ADD "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\Activation" /v NotificationDisabled /t REG_DWORD /d 0 /f >NUL
    schtasks /delete /tn "IR5" /f >NUL 2>&1
    IF %ERRORLEVEL%==0 ( echo IR5 has been successfully uninstalled...
    ) ELSE (
    echo IR5 is already uninstalled...
    )
    ping -n 5 127.0.0.1 >nul
    GOTO Start
    
    :RearmIR5
    mode con: cols=62 lines=5
    CLS
    cscript.exe /b %windir%\system32\slmgr.vbs /rearm
    IF %ERRORLEVEL% NEQ 0 ( echo No rearms detected...
    ping -n 5 127.0.0.1 >nul
    GOTO Start
    ) ELSE (
    echo Rearming...
    net stop sppsvc >NUL
    net start sppsvc >NUL
    cscript.exe %windir%\system32\slmgr.vbs /dlv | FINDSTR /I "Remaining"
    echo.
    echo Rearm completed successfully...
    ping -n 5 127.0.0.1 >nul
    )
    schtasks /query | FINDSTR /i "IR5" >nul
    if %errorlevel%==0 (
    schtasks /create /tn "IR5" /tr "'%SystemDrive%\Windows\system32\cmd.exe' /c cscript.exe /b %SystemDrive%\Windows\System32\slmgr.vbs /rearm && net stop sppsvc && net start sppsvc" /sc daily /mo 30 /ru "" /f >NUL
    )
    GOTO Start
    
    :StatusIR5
    mode con: cols=64 lines=8
    echo.
    cscript.exe %windir%\system32\slmgr.vbs /dlv | FINDSTR /I "Status"
    echo.
    cscript.exe %windir%\system32\slmgr.vbs /dlv | FINDSTR /I "Remaining"
    echo.
    schtasks /query /tn "IR5" 2>NUL | FINDSTR "IR5"
    IF ERRORLEVEL 1 echo IR5 is not installed...
    ping -n 5 127.0.0.1 >nul
    GOTO Start
    
    :InstructionsIR5
    mode con: cols=101 lines=13
    echo  1. Click Install then your computer will automatically restart
    echo.
    echo  2. In a moment you will be asked to enter your keyboard language and login information
    echo.
    echo  3. Select command prompt and type "C:IR5" (without quotes) then press enter
    echo.
    echo  4. Ignore any non-genuine messages as windows restarts
    echo.
    echo  * Click rearm if license status says "notification"
    echo.
    echo  * Reinstall IR5 when you have 0 rearms and 1 days left
    echo.
    pause
    goto start
    
    :ACS5T
    title ACS5T 4.4
    mode con: cols=45 lines=12
    CLS
    echo.
    echo.  
    echo.       AdobeCreativeSuite5Tool (ACS5T)
    echo.    
    echo.                A. Install
    echo.                B. Uninstall
    echo.                C. Keys
    echo.                D. Status
    echo.                E. Instructions
    echo.                F. Trilogy
    echo.                G. Exit Trilogy
    echo.
      
    :CHOOSEACTION3
    set /p userinp=    ^   Make your selection: 
    set userinp=%userinp:~0,1%
    if /i "%userinp%"=="A" goto InstallACS5T
    if /i "%userinp%"=="B" goto UninstallACS5T
    if /i "%userinp%"=="C" goto KeysACS5T
    if /i "%userinp%"=="D" goto Status
    if /i "%userinp%"=="E" goto InstructionsACS5T
    if /i "%userinp%"=="F" goto MAINMENU
    if /i "%userinp%"=="G" goto End
    echo.Try Again...
    GOTO CHOOSEACTION3
    
    :InstallACS5T
    CLS
    SET hosts=%windir%\system32\drivers\etc\hosts
    findstr /i "3dns-2.adobe.com" %hosts% >nul
    IF %ERRORLEVEL% EQU 0 (
    echo ACS5T is already installed...
    ping -n 5 127.0.0.1 >nul
    goto ACS5T
    )
    attrib -r %hosts%
    echo. >>%hosts%
    FOR %%A IN (
    3dns-2.adobe.com
    3dns-3.adobe.com
    activate.adobe.com
    activate.wip3.adobe.com
    activate-sea.adobe.com
    activate-sjc0.adobe.com
    adobe-dns.adobe.com
    adobe-dns-2.adobe.com
    adobe-dns-3.adobe.com
    adobeereg.com
    ereg.adobe.com
    ereg.wip3.adobe.com
    hl2rcv.adobe.com
    practivate.adobe.com
    wip3.adobe.com
    wwis-dubc1-vip60.adobe.com
    www.adobeereg.com
    ) DO (
     echo 127.0.0.1 %%A >>%hosts%
    )
    attrib +r %hosts%
    echo ACS5T has been successfully installed...
    ping -n 5 127.0.0.1 >nul
    GOTO ACS5T
    
    :UninstallACS5T
    CLS
    SET hosts=%windir%\system32\drivers\etc\hosts
    findstr /i "3dns-2.adobe.com" %hosts% >nul
    IF %ERRORLEVEL% NEQ 0 (
    echo ACS5T is already uninstalled...
    ping -n 5 127.0.0.1 >nul
    goto ACS5T
    )
    attrib -r %hosts%
    FOR %%A IN (
    3dns-2.adobe.com
    3dns-3.adobe.com
    activate.adobe.com
    activate.wip3.adobe.com
    activate-sea.adobe.com
    activate-sjc0.adobe.com
    adobe-dns.adobe.com
    adobe-dns-2.adobe.com
    adobe-dns-3.adobe.com
    adobeereg.com
    ereg.adobe.com
    ereg.wip3.adobe.com
    hl2rcv.adobe.com
    practivate.adobe.com
    wip3.adobe.com
    wwis-dubc1-vip60.adobe.com
    www.adobeereg.com
    ) DO (
     MOVE %hosts% hosts.bak >NUL
     FINDSTR /V /C:"%%A" hosts.bak > %hosts%
     DEL /F /Q hosts.bak
    ) 
    attrib +r %hosts%
    echo ACS5T has been successfully uninstalled...
    ping -n 5 127.0.0.1 >nul
    GOTO ACS5T
    
    :KeysACS5T
    mode con: cols=45 lines=31
    echo  CS5 keys
    echo.
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo.
    echo  CS5.5 keys
    echo.
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo.
    pause
    GOTO ACS5T
    
    :Status
    START "" "CMD /C COLOR 0A & TYPE %SYSTEMROOT%\SYSTEM32\DRIVERS\ETC\HOSTS & >NUL PING -n 5 127.0.0.1"
    GOTO ACS5T
    
    :InstructionsACS5T
    mode con: cols=94 lines=17
    echo  1. Sign up at http://www.adobe.com/products/creativesuite/mastercollection/ 
    echo.
    echo  2. Remember your ID and password and download the free trial for CS5/CS5.5 Master Collection
    echo.
    echo  3. Click install first before you install your CS5/CS5.5 Master Collection
    echo.
    echo  4. Uncompress Adobe CS5 Master Collection 7-zip file with 7-zip or winrar
    echo.
    echo  5. Click the set-up file
    echo.
    echo  6. Click keys and select one
    echo.
    echo  7. Enter your ID and password and install Adobe CS5 Master Collection
    echo.
    echo  8. If necessary re-register with your ID and password in the help tab
    echo.
    pause
    GOTO ACS5T
    
    :Details and Links
    title Details, Links and Torrents
    mode con: cols=127 lines=39
    echo  Trilogy 3.2 - The Official Windows 7, Office 2010 VL and Adobe CS5 AIO Solution
    echo.
    echo  IR5 - The Official Windows 7 Rearm Solution
    echo.
    echo  * The only "interactive" solution to use windows 7 without patches, cracks, loaders, activators or leaked keys
    echo  * After you install IR5 only a task called "IR5" is on your computer
    echo  * "IR5" task runs once every 30 days automatically and silently
    echo  * Always install IR5 when your computer will most likely be on so "IR5" task can run or just manually rearm when needed
    echo  * IR5 keeps you in trial and in trial you are always genuine 
    echo  * IR5 works with all updates and service packs
    echo  * Supports all Windows 7/Server 2008 R2, languages, versions, editions, 32/64bit
    echo  * Does not modify any system files and never causes restart problems
    echo.
    echo  IORRT - The Official Office 2010 VL Rearm Solution
    echo.
    echo  * IORRT keeps office VL 2010 in infinite trial
    echo  * IORRT uninstalls cleanly and returns office back to it's prior status
    echo  * IORRT puts backup and IORRT.bat in hidden C:\IORRT folder
    echo  * IORRT works with all updates and service packs
    echo  * IORRT gives A.I. voice confirmation
    echo  * IORRT and Hybrid tasks restores/rearms silently every day or at boot
    echo.
    echo  ACS5T - The Official Adobe CS5 MC Solution
    echo.
    echo  * Adds hosts file entries
    echo.
    echo  Manual Package Console (MPC)
    echo.
    echo  * The manual installation tool for IR5
    echo.
    echo  Trilogy 3.2 Development thread
    echo.
    echo  * http://forums.mydigitallife.net/threads/24744-Trilogy-3.2-The-Official-Windows-7-Office-2010-VL-and-Adobe-CS5-AIO-Solution
    echo.
    echo  Windows 7 and Office 2010 VL torrents (untouched)
    echo.
    echo  * http://www.datafilehost.com/download-7338f244.html
    echo.
    pause
    GOTO MAINMENU
    
    :ISO
    title ISO Installation Basics
    mode con: cols=112 lines=29
    echo  Windows 7 ISO
    echo.
    echo  You must burn a windows 7 ISO to a USB (4GB) or DVD-R with UltraISO
    echo.
    echo  For USB (4GB)
    echo.
    echo  Double click on the windows 7 ISO then click the bootable tab then write disk image then write
    echo.
    echo  For DVD-R
    echo.
    echo  1. Right-click the ISO image then click UltraISO then Burn to Disc
    echo  2. Select a minimum Write Speed (4x recommended)
    echo  3. Click on the Burn button
    echo.
    echo  Then you can upgrade or clean install from inside windows or clean install from boot
    echo.
    echo  4. You can upgrade from Vista, but if you have XP a clean install will be necessary
    echo.
    echo  5. When installing windows 7 just bypass entering any key then un-check the activate online box and click next
    echo.
    echo  6. Install with updates and internet on
    echo.
    echo  Office 2010 VL ISO
    echo.
    echo  1. Right click the office ISO then choose UltraISO and mount the Office ISO image
    echo.
    echo  2. Then in computer open the drive office is mounted on and install
    echo.
    pause
    GOTO MAINMENU
    
    :MPC
    title Manual Package Console
    mode con: cols=45 lines=10
    CLS
    echo.  
    echo.          ManualPackageConsole (MPC)
    echo.    
    echo.               A. Install
    echo.               B. Instructions
    echo.               C. Product key
    echo.               D. Trilogy
    echo.               E. Exit Trilogy
    echo.
    
    :CHOOSEACTION
    set /p userinp=    ^   Make your selection: 
    set userinp=%userinp:~0,1%
    if /i "%userinp%"=="A" goto MPC2
    if /i "%userinp%"=="B" goto InstructionsMPC
    if /i "%userinp%"=="C" goto Productkey
    if /i "%userinp%"=="D" goto MAINMENU
    if /i "%userinp%"=="E" goto End
    echo.Try Again...
    GOTO CHOOSEACTION
    
    :MPC2
    title Manual Package Console
    mode con: cols=50 lines=10
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v CurrentVersion | FINDSTR 6.1 >NUL
    IF ERRORLEVEL 1 cls & echo Supports only windows 7 and server 2008 R2 & ping -n 5 127.0.0.1 >nul & goto MPC
    schtasks /query | FINDSTR /I "IR5" >NUL 
    IF ERRORLEVEL 1 (
    echo.
    ) ELSE (
    echo Uninstall IR5 before using MPC...
    ping -n 5 127.0.0.1 >nul
    GOTO MPC
    )
    schtasks /create /tn "IR5" /tr "'%SystemDrive%\Windows\system32\cmd.exe' /c cscript.exe /b %SystemDrive%\Windows\System32\slmgr.vbs /rearm && net stop sppsvc && net start sppsvc" /sc daily /mo 30 /ru "" /f >NUL
    REG ADD "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\Activation" /v NotificationDisabled /t REG_DWORD /d 1 /f >NUL
    echo Installation successful...
    ping -n 5 127.0.0.1 >nul
    goto MPC
    
    :Productkey
    title Manual Package Console
    mode con: cols=64 lines=8
    del "%SystemDrive%\MPC.bat" 2> nul
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v CurrentVersion | FINDSTR 6.1 >NUL
    IF ERRORLEVEL 1 cls & echo Supports only windows 7 and server 2008 R2 & ping -n 5 127.0.0.1 >nul & goto MPC
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "Enterprise" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=H7X92-3VPBB-Q799D-Y6JJ3-86WC6
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "EnterpriseE" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=H3V6Q-JKQJG-GKVK3-FDDRF-TCKVR
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "EnterpriseN" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=BQ4TH-BWRRY-424Y9-7PQX2-B4WBD
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "HomeBasic" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=YGFVB-QTFXQ-3H233-PTWTJ-YRYRV
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "HomeBasicE" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=VTKM9-74GQY-K3W94-47DHV-FTXJY
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "HomeBasicN" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=MD83G-H98CG-DXPYQ-Q8GCR-HM8X2
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "HomePremium" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=RHPQ2-RMFJH-74XYM-BH4JX-XM76F
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "HomePremiumE" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=76BRM-9Q4K3-QDJ48-FH4F3-9WT2R
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "HomePremiumN" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=D3PVQ-V7M4J-9Q9K3-GG4K3-F99JM
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "Professional" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=HYF8J-CVRMY-CM74G-RPHKF-PW487
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ProfessionalE" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=3YHKG-DVQ27-RYRBX-JMPVM-WG38T
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ProfessionalN" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=BKFRB-RTCT3-9HW44-FX3X8-M48M6
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerDatacenter" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=7X29B-RDCR7-J6R29-K27FF-H9CR9
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerDatacenterCore" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=7X29B-RDCR7-J6R29-K27FF-H9CR9
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerEmbeddedSolution" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=M2KD2-F2333-Q3TJ8-BQMHX-9PWX6
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerEmbeddedSolutionCore" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=M2KD2-F2333-Q3TJ8-BQMHX-9PWX6
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerEnterprise" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=7P8GH-FV2FF-8FDCR-YK49D-D7P97
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerEnterpriseCore" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=7P8GH-FV2FF-8FDCR-YK49D-D7P97
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerEnterpriseIA64" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=7YKJ4-CX8QP-Q23QY-7BYQM-H2893
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerEssentialAdditional" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=7PDBG-28HK4-276G6-XVJF4-KH9Y4
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerEssentialAdditionalSvc" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=RCDPD-97Q7B-MRDC3-GTRYF-MCD6G
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerEssentialManagement" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=4F37J-4YTKY-6DFDJ-FDRFY-2HT34
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerEssentialManagementSvc" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=4HFV2-KB9P6-TQVJF-87D8X-2YYBF
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerForSBSolutions" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=PHYFD-HQ4XW-78PR4-2CXKF-V67KJ
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerForSBSolutionsEM" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=JR4Y2-WC84X-PBRDJ-QTBTB-TQGGH
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerHomePremium" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=YQXDR-G2MBV-63VW2-JX8J2-FVTVG
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerHomeStandard" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=BTMWJ-8KHD9-B9BX8-J7JQ9-7M6J2
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerHPC" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=Q7PRR-M2WBM-RJJ99-FG393-MGY3B
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerHyperCore" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=Q8R8C-T2W6H-7MGPB-4CQ9R-KR36H
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerMediumBusinessManagement" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=FD499-FD79G-V9D2W-F9WQ6-MD2VC
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerMediumBusinessMessaging" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=YVYC7-KVQ8G-XF6K4-9MG8M-QXFC2
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerMediumBusinessSecurity" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=YQ3V7-79DM4-42PVW-BYRH8-69VXK
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerSBSPremium" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=BXQQP-Q6Q6D-TR7TR-3YXQW-VFHKM
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerSBSPremiumCore" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=BXQQP-Q6Q6D-TR7TR-3YXQW-VFHKM
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerSBSStandard" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=YMFM8-J2RV2-66G78-XPQ7C-4RY3B
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerSolution" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=Y7GVM-YFQQW-HV8HW-GRW6D-YJ84M
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerSolutionEM" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=WF9T8-VT7D2-GD629-WTKGH-3WBJT
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerSolutionsPremium" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=4TMY4-8JG4B-VKY8X-6TVDH-J7XFV
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerSolutionsPremiumCore" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=4TMY4-8JG4B-VKY8X-6TVDH-J7XFV
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerStandard" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=HMG6P-C7VGP-47GJ9-TWBD4-2YYCD
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerStandardCore" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=HMG6P-C7VGP-47GJ9-TWBD4-2YYCD
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerWeb" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=YGTGP-9XH8D-8BVGY-BVK4V-3CPRF
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerWebCore" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=YGTGP-9XH8D-8BVGY-BVK4V-3CPRF
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerWinFoundation" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=36RXV-4Y4PJ-B7DWH-XY4VW-KQXDQ
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerWinSB" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=JG43G-CMPHG-VPBC6-9TDQR-RRFJ4
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerWinSBV" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=WQG3Q-VWT72-VX39Q-VRTRD-2RF7K
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "Starter" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=7Q28W-FT9PC-CMMYT-WHMY2-89M6G
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "StarterE" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=BRQCV-K7HGQ-CKXP6-2XP7K-F233B
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "StarterN" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=D4C3G-38HGY-HGQCV-QCWR8-97FFR
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "Ultimate" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=D4F6K-QK3RD-TMVMJ-BBMRX-3MBMV
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "UltimateE" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=TWMF7-M387V-XKW4Y-PVQQD-RK7C8
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "UltimateN" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=HTJK6-DXX8T-TVCR6-KDG67-97J8Q
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "Embedded" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=743Q4-G676P-84RX9-B8HRR-6V73F
    cls
    echo Installing product key...
    slmgr -ipk %PIDKEY%
    cls
    echo.
    cscript.exe %windir%\system32\slmgr.vbs /dlv | FINDSTR /I "Status"
    echo.
    cscript.exe %windir%\system32\slmgr.vbs /dlv | FINDSTR /I "Remaining"
    echo.
    schtasks /query /tn "IR5" 2>NUL | FINDSTR "IR5"
    IF ERRORLEVEL 1 echo IR5 is not installed...
    ping -n 5 127.0.0.1 >nul
    GOTO MPC
    
    :InstructionsMPC
    mode con: cols=107 lines=27
    echo  1. Select the install option
    echo.
    echo  2. Open the (MPC) folder and copy the "MPC.bat" file into your system drive e.g. C, D, E, F, G, H, etc...
    echo.
    echo  3. Restart your computer and press the F8 function key when BIOS screen flashes
    echo.
    echo  4. Choose the option to repair computer
    echo.
    echo  5. In a moment you will be asked to enter your keyboard language and login information
    echo.
    echo  6. Look at top of recovery console and see what local drive it says e.g. C, D, E, F, G, H, etc...
    echo.
    echo  7. Select the option command prompt at bottom of the recovery console
    echo.
    echo  8. Depending on what your local drive said type either C:MPC, D:MPC, E:MPC, F:MPC, G:MPC, H:MPC, etc...
    echo.
    echo  9. Then press enter
    echo.
    echo  10. After you recieve messages that all operations have been successful restart your computer
    echo.
    echo  11. Ignore any non-genuine messages as windows restarts
    echo.
    echo  12. Select the Product key option and wait for product key to install and for status confirmation
    echo.
    echo  13. Use IR5 as you normally would to rearm, get status or uninstall
    echo.
    pause
    GOTO MPC
    
    :End
    exit
    Works good :sith:

    Although I wish I could get just Trilogy console window to open the hosts file not the cmd prompt extra one
     
  4. Compo

    Compo MDL Member

    Mar 29, 2011
    136
    106
    10
    #184 Compo, Jul 4, 2011
    Last edited by a moderator: Apr 20, 2017
    Change it to this then!
    Code:
    :Status
    COLOR 70
    TYPE %SYSTEMROOT%\SYSTEM32\DRIVERS\ETC\HOSTS && (>NUL PING -n 5 127.0.0.1)
    COLOR
    GOTO ACS5
     
  5. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    #185 timesurfer, Jul 4, 2011
    Last edited by a moderator: Apr 20, 2017
    (OP)
    2011-07-04_131847.jpg

    Code:
    @echo off
    @color 0A
    cls
    mode con: cols=45 lines=9
    md %windir%\TrilogyAdminTest 2>NUL
    if %errorlevel%==0 ( 
    rd %windir%\TrilogyAdminTest 
    goto mainmenu
    ) else (
    echo Right click Trilogy and run as administrator
    echo.
    pause
    goto end
    )
    :mainmenu
    title Trilogy 3.3
    mode con: cols=49 lines=12
    CLS
    echo.
    echo.  
    echo.              ---- Trilogy 3.3 ----
    echo.    
    echo.         A. IR5 (Windows 7/2008 R2)
    echo.         B. IORRT (Office 2010 Volume)
    echo.         C. ACS5T (Adobe CS5/CS5.5)
    echo.         D. Details, Links and Torrents
    echo.         E. ISO Installation Basics
    echo.         F. Manual Package Console (MPC)
    echo.         G. Exit Trilogy
    echo.
      
    :CHOOSEACTION
    set /p userinp=    ^   Make your selection: 
    set userinp=%userinp:~0,1%
    if /i "%userinp%"=="A" goto IR5
    if /i "%userinp%"=="B" goto IORRT
    if /i "%userinp%"=="C" goto ACS5T
    if /i "%userinp%"=="D" goto Details and Links
    if /i "%userinp%"=="E" goto ISO
    if /i "%userinp%"=="F" goto MPC
    if /i "%userinp%"=="G" goto Exit
    echo.Try Again...
    GOTO CHOOSEACTION
    
    :IORRT
    setlocal enabledelayedexpansion
    title IORRT 4.0
    if not exist "%Windir%\system32\schtasks.exe" ( cls
    echo You don't have schtasks.exe installed
    echo.
    echo IORRT is not compatable with XP Home Edition
    echo Install XP Professional or schtasks.exe
    ping -n 10 127.0.0.1 >NUL
    goto MAINMENU
    )
    set OfficeArchType=
    if '%processor_architecture%'=='x86' Set OfficeArchType=32 && Goto:EndArchCheck
    goto:WOWCheck
    :WOWCheck
    2>nul REG QUERY HKLM\SOFTWARE\Microsoft\Office\14.0\Common | find /i "InstallRoot" 1>nul
    IF ERRORLEVEL 1 Set OfficeArchType=WOW && Goto:EndArchCheck
    Set OfficeArchType=64
    :EndArchCheck
    if %OfficeArchType%==WOW (
    FOR /F "tokens=2* delims= " %%A IN ('"REG QUERY "HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Office\14.0\Common\InstallRoot" /v Path 2>NUL"') DO SET InstallRoot=%%B
    if not defined InstallRoot ( cls & echo Office 2010 VL is not installed... & ping -n 5 127.0.0.1 >nul & goto mainmenu )
    Goto:FoundPath
    )
    FOR /F "tokens=2* delims= " %%A IN ('"REG QUERY "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\14.0\Common\InstallRoot" /v Path 2>NUL"') DO SET InstallRoot=%%B
    if not defined InstallRoot ( cls & echo Office 2010 VL is not installed... & ping -n 5 127.0.0.1 >nul & goto mainmenu )
    :FoundPath
    1>nul 2>nul net start osppsvc
    cscript "%InstallRoot%"ospp.vbs /dstatus |FINDSTR /i "KMS_Client" >NUL
    if %errorlevel% EQU 1 ( cls & echo No office 2010 VL detected... & ping -n 5 127.0.0.1 >nul & goto mainmenu )
    
    :IORRT1
    mode con: cols=45 lines=11
    CLS
    echo.
    echo.  
    echo.    InfiniteOfficeRestoreRearmTask (IORRT) 
    echo.    
    echo.               A. Install
    echo.               B. Uninstall
    echo.               C. Restore/Rearm
    echo.               D. Status
    echo.               E. Trilogy
    echo.               F. Exit Trilogy
    echo.
      
    :CHOOSEACTION1
    set /p userinp=    ^   Make your selection: 
    set userinp=%userinp:~0,1%
    if /i "%userinp%"=="A" goto InstallIORRT
    if /i "%userinp%"=="B" goto UninstallIORRT
    if /i "%userinp%"=="C" goto Rearm
    if /i "%userinp%"=="D" goto StatusIORRT
    if /i "%userinp%"=="E" goto MAINMENU
    if /i "%userinp%"=="F" goto End
    echo.Try Again...
    GOTO CHOOSEACTION1
    
    :InstallIORRT
    CLS
    title IORRT 4.0
    mode con: cols=45 lines=11
    schtasks /query | FINDSTR /I "IORRT" >NUL 
    IF %ERRORLEVEL% NEQ 0 (
    echo.
    ) ELSE (
    echo IORRT is already installed...
    ping -n 5 127.0.0.1 >nul
    GOTO IORRT1
    )
    mode con: cols=62 lines=5
    title IORRT 4.0
    echo Installing IORRT...
    echo.
    set onstart=onstart
    set daily=daily
    VER | FINDSTR /IL "5.1." > NUL
    if %ERRORLEVEL% EQU 0 ( for /f "tokens=2,*" %%A in ('"reg query "HKLM\system\controlset001\control\nls\language" /v InstallLanguage"') do set Language=%%B
    REM German-Germany
    if '!Language!' EQU '0407' ( set daily=täglich & set onstart=beimstart )
    REM Portuguese-Brazil
    if '!Language!' EQU '0416' ( set daily=diariamente )
    REM Polish
    if '!Language!' EQU '0415' ( set daily=codziennie & set onstart=przy_uruchomieniu )
    REM Turkish
    if '!Language!' EQU '041f' ( set daily=günlük )
    )
    schtasks /create /tn "IORRT" /tr "%SystemDrive%\IORRT\IORRT.bat" /sc %daily% /mo 1 /ru "" >NUL 2>&1
    if %ERRORLEVEL% NEQ 0 ( cls
    echo IORRT task could not be installed
    echo.
    echo Your language version is not yet compatable with IORRT
    echo Seek assistance in Trilogy development thread
    ping -n 10 127.0.0.1 >NUL
    goto IORRT1
    ) else ( schtasks /delete /tn "IORRT" /f >NUL )
    schtasks /create /tn "Hybrid" /tr "%SystemDrive%\IORRT\IORRT.bat" /sc %onstart% /ru "" >NUL 2>&1
    if %ERRORLEVEL% NEQ 0 ( cls
    echo Hybrid task could not be installed
    echo.
    echo Your language version is not yet compatable with IORRT
    echo Seek assistance in Trilogy development thread
    ping -n 10 127.0.0.1 >NUL
    goto IORRT1
    ) else ( schtasks /delete /tn "Hybrid" /f >NUL )
    mkdir "%SystemDrive%\Check"
    net stop osppsvc >NUL
    xcopy /cheriky "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform" "%SystemDrive%\Check\Backup\Files\Tokens" >NUL
    mkdir "%SystemDrive%\Check\Backup\Registry" >NUL
    reg save "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\Check\Backup\Registry\OfficeSPPInfo.hiv >NUL
    net start osppsvc >NUL
    IF Exist "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" (
    "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" >NUL
    ) ELSE ( "%commonprogramfiles(x86)%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" >NUL
    )
    if errorlevel==0 goto Pass
    net stop osppsvc >NUL
    xcopy /cheriky "%SystemDrive%\Check\Backup\Files\Tokens" "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform" >NUL
    REG DELETE HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >NUL
    REG ADD HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >NUL
    reg restore "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\Check\Backup\Registry\OfficeSPPInfo.hiv >NUL
    net start osppsvc >NUL
    DEL "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform\Backup.hiv" 2> nul
    SET file=%SystemDrive%\Check
    IF EXIST %file% attrib -h %file%
    RD /S /Q  %file%
    cd /d "%InstallRoot%"
    echo.
    cscript OSPP.VBS /dstatus | FINDSTR /i "Status"
    cscript OSPP.VBS /dstatus | FINDSTR /i "Remaining"
    echo.
    echo No Rearms Detected...
    set msg=No rearms detected
    call :speak "No rearms detected"
    goto :END
    :speak
    echo On Error Resume Next: CreateObject("SAPI.SpVoice").Speak %1 >"%~dp0vc.vbs"
    "%~dp0vc.vbs" & del "%~dp0vc.vbs"
    ping -n 5 127.0.0.1 >nul
    GOTO IORRT1
    :Pass
    net stop osppsvc >NUL
    xcopy /cheriky "%SystemDrive%\Check\Backup\Files\Tokens" "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform" >NUL
    REG DELETE HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >NUL
    REG ADD HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >NUL
    reg restore "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\Check\Backup\Registry\OfficeSPPInfo.hiv >NUL
    net start osppsvc >NUL
    DEL "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform\Backup.hiv" 2> nul
    SET file=%SystemDrive%\Check
    IF EXIST %file% attrib -h %file%
    RD /S /Q  %file%
    mkdir "%SystemDrive%\IORRT"
    net stop osppsvc >NUL
    xcopy /cheriky "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform" "%SystemDrive%\IORRT\Backup\Files\Tokens" >NUL
    mkdir "%SystemDrive%\IORRT\Backup\Registry"
    reg save "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\IORRT\Backup\Registry\OfficeSPPInfo.hiv >NUL
    net start osppsvc >NUL
    SET file=%SystemDrive%\IORRT\IORRT.bat
    IF EXIST %file% attrib -h %file% 
    echo @echo off >%file%
    echo net stop osppsvc >>%file%
    echo xcopy /cheriky "%SystemDrive%\IORRT\Backup\Files\Tokens" "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform" >>%file%
    echo REG DELETE HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >>%file%
    echo REG ADD HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >>%file%
    echo reg restore "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\IORRT\Backup\Registry\OfficeSPPInfo.hiv >>%file%
    echo net start osppsvc >>%file%
    echo IF Exist "%COMMONPROGRAMFILES%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" ( >>%file%
    echo "%COMMONPROGRAMFILES%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" >>%file%
    echo ) ELSE ( "%COMMONPROGRAMFILES(X86)%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" >>%file%
    echo ) >>%file%
    echo schtasks /delete /tn "IORRT" /f >>%file%
    echo schtasks /create /tn "IORRT" /tr "%SystemDrive%\IORRT\IORRT.bat" /sc %daily% /mo 1 /ru "" >>%file%
    IF Exist "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" (
    "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" >NUL
    ) ELSE ( "%commonprogramfiles(x86)%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" >NUL
    )
    attrib +h "%SystemDrive%\IORRT"
    schtasks /create /tn "Hybrid" /tr "%SystemDrive%\IORRT\IORRT.bat" /sc %onstart% /ru "" >NUL
    schtasks /create /tn "IORRT" /tr "%SystemDrive%\IORRT\IORRT.bat" /sc %daily% /mo 1 /ru "" >NUL
    echo.
    title IORRT 4.0
    cd /d "%InstallRoot%"
    echo.
    echo.
    cscript OSPP.VBS /dstatus | FINDSTR /i "Status"
    cscript OSPP.VBS /dstatus | FINDSTR /i "Remaining"
    echo.
    echo Installation Successful...
    set msg=Installation Successful
    call :speak "Installation Successful"
    goto :END
    :speak
    echo On Error Resume Next: CreateObject("SAPI.SpVoice").Speak %1 >"%~dp0vc.vbs"
    "%~dp0vc.vbs" & del "%~dp0vc.vbs"
    ping -n 5 127.0.0.1 >nul
    GOTO IORRT1
    
    :UninstallIORRT
    schtasks /query | FINDSTR /I "IORRT" >NUL
    IF '%ERRORLEVEL%' EQU '0' (
    echo.
    ) ELSE (
    mode con: cols=45 lines=10
    title IORRT 4.0
    echo IORRT is already uninstalled...
    ping -n 5 127.0.0.1 >nul
    GOTO IORRT1
    )
    mode con: cols=62 lines=5
    title IORRT 4.0
    echo Uninstalling IORRT...
    echo.
    net stop osppsvc >NUL
    xcopy /cheriky "%SystemDrive%\IORRT\Backup\Files\Tokens" "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform" >NUL
    REG DELETE HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >NUL
    REG ADD HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >NUL
    reg restore "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\IORRT\Backup\Registry\OfficeSPPInfo.hiv >NUL
    net start osppsvc >NUL
    DEL "%ALLUSERSPROFILE%\Microsoft\OfficeSoftwareProtectionPlatform\Backup.hiv" 2> nul
    SET file=%SystemDrive%\IORRT
    IF EXIST %file% attrib -h %file%
    rd /S /Q  %file%
    schtasks /delete /tn "Hybrid" /f >NUL
    schtasks /delete /tn "IORRT" /f >NUL
    cd /d "%InstallRoot%"
    echo.
    echo.
    cscript OSPP.VBS /dstatus | FINDSTR /i "Status" 
    cscript OSPP.VBS /dstatus | FINDSTR /i "Remaining"
    echo.
    echo Successfully Uninstalled...
    set msg=Successfully Uninstalled
    call :speak "Successfully Uninstalled"
    goto :END
    :speak
    echo On Error Resume Next: CreateObject("SAPI.SpVoice").Speak %1 >"%~dp0vc.vbs"
    "%~dp0vc.vbs" & del "%~dp0vc.vbs"
    ping -n 5 127.0.0.1 >nul
    GOTO IORRT1
    
    :Rearm
    mode con: cols=45 lines=11
    title IORRT 4.0
    schtasks /query | FINDSTR /I "IORRT" >NUL 
    IF %ERRORLEVEL% EQU 0 ( echo.
    ) ELSE (
    echo IORRT is not installed...
    ping -n 5 127.0.0.1 >nul
    GOTO IORRT1
    )
    mode con: cols=64 lines=6
    echo Restoring and rearming IORRT...
    echo.
    set daily=daily
    VER | FINDSTR /IL "5.1." > NUL
    if %ERRORLEVEL% EQU 0 ( for /f "tokens=2,*" %%A in ('"reg query "HKLM\system\controlset001\control\nls\language" /v InstallLanguage"') do set Language=%%B
    REM German-Germany
    if '!Language!' EQU '0407' ( set daily=täglich )
    REM Portuguese-Brazil
    if '!Language!' EQU '0416' ( set daily=diariamente )
    REM Polish
    if '!Language!' EQU '0415' ( set daily=codziennie )
    REM Turkish
    if '!Language!' EQU '041f' ( set daily=günlük )
    )
    net stop osppsvc >NUL
    xcopy /cheriky "C:\IORRT\Backup\Files\Tokens" "%SystemDrive%\ProgramData\Microsoft\OfficeSoftwareProtectionPlatform" >NUL
    REG DELETE HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >NUL
    REG ADD HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform /f >NUL
    reg restore "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" %SystemDrive%\IORRT\Backup\Registry\OfficeSPPInfo.hiv >NUL
    net start osppsvc >NUL
    IF Exist "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" (
    "%CommonProgramFiles%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" >NUL
    ) ELSE ( "%commonprogramfiles(x86)%\microsoft shared\OfficeSoftwareProtectionPlatform\OSPPREARM.exe" >NUL
    )
    schtasks /delete /tn "IORRT" /f >NUL
    schtasks /create /tn "IORRT" /tr "%SystemDrive%\IORRT\IORRT.bat" /sc %daily% /mo 1 /ru "" >NUL
    cd /d "%InstallRoot%"
    cscript OSPP.VBS /dstatus | FINDSTR /i "Status"
    cscript OSPP.VBS /dstatus | FINDSTR /i "Remaining"
    echo.
    schtasks /query | FINDSTR /I "IORRT"
    IF ERRORLEVEL 1 echo IORRT is not installed...
    ping -n 5 127.0.0.1 >nul
    GOTO IORRT1
    )
    
    :StatusIORRT
    mode con: cols=64 lines=6
    title IORRT 4.0
    cd /d "%InstallRoot%"
    cscript OSPP.VBS /dstatus | FINDSTR /i "Status"
    cscript OSPP.VBS /dstatus | FINDSTR /i "Remaining"
    echo.
    schtasks /query | FINDSTR /I "IORRT"
    IF ERRORLEVEL 1 echo IORRT is not installed...
    ping -n 10 127.0.0.1 >nul
    GOTO IORRT1
    )
    endlocal
    
    :IR5
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v CurrentVersion | FINDSTR 6.1 >NUL
    IF ERRORLEVEL 1 cls & echo Supports only windows 7 and server 2008 R2 & ping -n 5 127.0.0.1 >nul & goto mainmenu 
    for /f "tokens=2 delims==" %%A in ('"wmic volume where DriveLetter="%SystemDrive%" get SerialNumber /format:list"') do set sn=%%A
    for /f "tokens=2 delims==" %%A in ('"wmic volume where SystemVolume="true" get DeviceId /format:list"') do set sd=%%A
    
    :start
    title IR5 3.6
    mode con: cols=45 lines=12
    cls
    echo.
    echo.
    echo.             InfiniteRearm5 (IR5)
    echo.                   
    echo.                A. Install
    echo.                B. Uninstall
    echo.                C. Rearm
    echo.                D. Status                
    echo.                E. Instructions
    echo.                F. Trilogy
    echo.                G. Exit Trilogy
    echo.
    
    :CHOOSEACTION2
    set /p userinp=    ^   Make your selection: 
    set userinp=%userinp:~0,1%
    if /i "%userinp%"=="A" goto InstallIR5
    if /i "%userinp%"=="B" goto UninstallIR5
    if /i "%userinp%"=="C" goto RearmIR5
    if /i "%userinp%"=="D" goto StatusIR5
    if /i "%userinp%"=="E" goto InstructionsIR5
    if /i "%userinp%"=="F" goto MAINMENU
    if /i "%userinp%"=="G" goto End
    echo.Try Again...
    GOTO CHOOSEACTION2
    
    :InstallIR5
    CLS
    schtasks /query | FINDSTR /I "IR5" >NUL 
    IF ERRORLEVEL 1 (
    echo.
    ) ELSE (
    echo IR5 is already installed...
    ping -n 5 127.0.0.1 >nul
    GOTO start
    )
    REG ADD "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\Activation" /v NotificationDisabled /t REG_DWORD /d 1 /f >NUL
    echo edition = CreateObject("WScript.Shell").RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\EditionID") >key.vbs
    echo Set keys = CreateObject ("Scripting.Dictionary") >>key.vbs
    echo keys.Add "Enterprise",                     "H7X92-3VPBB-Q799D-Y6JJ3-86WC6" >>key.vbs
    echo keys.Add "EnterpriseE",                    "H3V6Q-JKQJG-GKVK3-FDDRF-TCKVR" >>key.vbs
    echo keys.Add "EnterpriseN",                    "BQ4TH-BWRRY-424Y9-7PQX2-B4WBD" >>key.vbs
    echo keys.Add "HomeBasic",                      "YGFVB-QTFXQ-3H233-PTWTJ-YRYRV" >>key.vbs
    echo keys.Add "HomeBasicE",                     "VTKM9-74GQY-K3W94-47DHV-FTXJY" >>key.vbs
    echo keys.Add "HomeBasicN",                     "MD83G-H98CG-DXPYQ-Q8GCR-HM8X2" >>key.vbs
    echo keys.Add "HomePremium",                    "RHPQ2-RMFJH-74XYM-BH4JX-XM76F" >>key.vbs
    echo keys.Add "HomePremiumE",                   "76BRM-9Q4K3-QDJ48-FH4F3-9WT2R" >>key.vbs
    echo keys.Add "HomePremiumN",                   "D3PVQ-V7M4J-9Q9K3-GG4K3-F99JM" >>key.vbs
    echo keys.Add "Professional",                   "HYF8J-CVRMY-CM74G-RPHKF-PW487" >>key.vbs
    echo keys.Add "ProfessionalE",                  "3YHKG-DVQ27-RYRBX-JMPVM-WG38T" >>key.vbs
    echo keys.Add "ProfessionalN",                  "BKFRB-RTCT3-9HW44-FX3X8-M48M6" >>key.vbs
    echo keys.Add "ServerDatacenter",               "7X29B-RDCR7-J6R29-K27FF-H9CR9" >>key.vbs
    echo keys.Add "ServerDatacenterCore",           "7X29B-RDCR7-J6R29-K27FF-H9CR9" >>key.vbs
    echo keys.Add "ServerEmbeddedSolution",         "M2KD2-F2333-Q3TJ8-BQMHX-9PWX6" >>key.vbs
    echo keys.Add "ServerEmbeddedSolutionCore",     "M2KD2-F2333-Q3TJ8-BQMHX-9PWX6" >>key.vbs
    echo keys.Add "ServerEnterprise",               "7P8GH-FV2FF-8FDCR-YK49D-D7P97" >>key.vbs
    echo keys.Add "ServerEnterpriseCore",           "7P8GH-FV2FF-8FDCR-YK49D-D7P97" >>key.vbs
    echo keys.Add "ServerEnterpriseIA64",           "7YKJ4-CX8QP-Q23QY-7BYQM-H2893" >>key.vbs
    echo keys.Add "ServerEssentialAdditional",      "7PDBG-28HK4-276G6-XVJF4-KH9Y4" >>key.vbs
    echo keys.Add "ServerEssentialAdditionalSvc",   "RCDPD-97Q7B-MRDC3-GTRYF-MCD6G" >>key.vbs
    echo keys.Add "ServerEssentialManagement",      "4F37J-4YTKY-6DFDJ-FDRFY-2HT34" >>key.vbs
    echo keys.Add "ServerEssentialManagementSvc",   "4HFV2-KB9P6-TQVJF-87D8X-2YYBF" >>key.vbs
    echo keys.Add "ServerForSBSolutions",           "PHYFD-HQ4XW-78PR4-2CXKF-V67KJ" >>key.vbs
    echo keys.Add "ServerForSBSolutionsEM",         "JR4Y2-WC84X-PBRDJ-QTBTB-TQGGH" >>key.vbs
    echo keys.Add "ServerHomePremium",              "YQXDR-G2MBV-63VW2-JX8J2-FVTVG" >>key.vbs
    echo keys.Add "ServerHomeStandard",             "BTMWJ-8KHD9-B9BX8-J7JQ9-7M6J2" >>key.vbs
    echo keys.Add "ServerHPC",                      "Q7PRR-M2WBM-RJJ99-FG393-MGY3B" >>key.vbs
    echo keys.Add "ServerHyperCore",                "Q8R8C-T2W6H-7MGPB-4CQ9R-KR36H" >>key.vbs
    echo keys.Add "ServerMediumBusinessManagement", "FD499-FD79G-V9D2W-F9WQ6-MD2VC" >>key.vbs
    echo keys.Add "ServerMediumBusinessMessaging",  "YVYC7-KVQ8G-XF6K4-9MG8M-QXFC2" >>key.vbs
    echo keys.Add "ServerMediumBusinessSecurity",   "YQ3V7-79DM4-42PVW-BYRH8-69VXK" >>key.vbs
    echo keys.Add "ServerSBSPremium",               "BXQQP-Q6Q6D-TR7TR-3YXQW-VFHKM" >>key.vbs
    echo keys.Add "ServerSBSPremiumCore",           "BXQQP-Q6Q6D-TR7TR-3YXQW-VFHKM" >>key.vbs
    echo keys.Add "ServerSBSStandard",              "YMFM8-J2RV2-66G78-XPQ7C-4RY3B" >>key.vbs
    echo keys.Add "ServerSolution",                 "Y7GVM-YFQQW-HV8HW-GRW6D-YJ84M" >>key.vbs
    echo keys.Add "ServerSolutionEM",               "WF9T8-VT7D2-GD629-WTKGH-3WBJT" >>key.vbs
    echo keys.Add "ServerSolutionsPremium",         "4TMY4-8JG4B-VKY8X-6TVDH-J7XFV" >>key.vbs
    echo keys.Add "ServerSolutionsPremiumCore",     "4TMY4-8JG4B-VKY8X-6TVDH-J7XFV" >>key.vbs
    echo keys.Add "ServerStandard",                 "HMG6P-C7VGP-47GJ9-TWBD4-2YYCD" >>key.vbs
    echo keys.Add "ServerStandardCore",             "HMG6P-C7VGP-47GJ9-TWBD4-2YYCD" >>key.vbs
    echo keys.Add "ServerWeb",                      "YGTGP-9XH8D-8BVGY-BVK4V-3CPRF" >>key.vbs
    echo keys.Add "ServerWebCore",                  "YGTGP-9XH8D-8BVGY-BVK4V-3CPRF" >>key.vbs
    echo keys.Add "ServerWinFoundation",            "36RXV-4Y4PJ-B7DWH-XY4VW-KQXDQ" >>key.vbs
    echo keys.Add "ServerWinSB",                    "JG43G-CMPHG-VPBC6-9TDQR-RRFJ4" >>key.vbs
    echo keys.Add "ServerWinSBV",                   "WQG3Q-VWT72-VX39Q-VRTRD-2RF7K" >>key.vbs
    echo keys.Add "Starter",                        "7Q28W-FT9PC-CMMYT-WHMY2-89M6G" >>key.vbs
    echo keys.Add "StarterE",                       "BRQCV-K7HGQ-CKXP6-2XP7K-F233B" >>key.vbs
    echo keys.Add "StarterN",                       "D4C3G-38HGY-HGQCV-QCWR8-97FFR" >>key.vbs
    echo keys.Add "Ultimate",                       "D4F6K-QK3RD-TMVMJ-BBMRX-3MBMV" >>key.vbs
    echo keys.Add "UltimateE",                      "TWMF7-M387V-XKW4Y-PVQQD-RK7C8" >>key.vbs
    echo keys.Add "UltimateN",                      "HTJK6-DXX8T-TVCR6-KDG67-97J8Q" >>key.vbs
    echo keys.Add "Embedded",                       "743Q4-G676P-84RX9-B8HRR-6V73F" >>key.vbs
    echo if keys.Exists(edition) then >>key.vbs
    echo WScript.Echo keys.Item(edition) >>key.vbs
    echo End If >>key.vbs
    FOR /F %%A in ('cscript /nologo key.vbs') do SET PIDKEY=%%A 
    del key.vbs
    SET file=%sd%\IR5.bat
    echo @echo off>>%file% 
    echo echo Set objWMIService = GetObject("winmgmts:\\.\root\CIMV2") ^>^>drive.vbs>>%file% 
    echo echo Set colItems = objWMIService.ExecQuery( "SELECT * FROM Win32_Volume",,48) ^>^>drive.vbs>>%file% 
    echo echo For Each objItem in colItems ^>^>drive.vbs>>%file% 
    echo echo If Hex(%sn%) = Hex(objItem.SerialNumber) then ^>^>drive.vbs>>%file% 
    echo echo Wscript.Echo objItem.DriveLetter ^>^>drive.vbs>>%file% 
    echo echo End If ^>^>drive.vbs>>%file% 
    echo echo Next ^>^>drive.vbs>>%file% 
    echo for /f %%%%A IN ('"cscript /nologo drive.vbs"') do set dl=%%%%A>>%file% 
    echo set dl=%%dl:~0,-1%%>>%file%
    echo del drive.vbs>>%file% 
    echo reg load HKLM\MY_SYSTEM "%%dl%%\Windows\System32\config\system" ^>NUL >>%file% 
    echo reg delete HKLM\MY_SYSTEM\WPA /f ^>NUL >>%file% 
    echo reg unload HKLM\MY_SYSTEM ^>NUL >>%file%
    echo echo cscript /b slmgr.vbs /ipk %PIDKEY% ^>%%dl%%\installkey.bat >>%file%
    echo echo slmgr.vbs /dlv ^>^>%%dl%%\installkey.bat >>%file%
    echo echo del "C:\installkey.bat" ^>^>%%dl%%\installkey.bat >>%file%
    echo echo CreateObject("WScript.Shell").Run """C:\installkey.bat""", 0, False ^>%%dl%%\key.vbs >>%file%
    echo echo @echo off ^>%%dl%%\launch.bat >>%file%
    echo echo wscript.exe "C:\key.vbs" ^>^>%%dl%%\launch.bat >>%file%
    echo echo del "%sd%\IR5.bat" ^>^>%%dl%%\launch.bat >>%file%
    echo echo del "C:\key.vbs" ^>^>%%dl%%\launch.bat >>%file%
    echo echo del "C:\launch.bat" ^>^>%%dl%%\launch.bat >>%file%
    echo reg load HKLM\MY_SOFTWARE "%%dl%%\Windows\System32\config\software" ^>NUL >>%file% 
    echo reg add HKLM\MY_SOFTWARE\Microsoft\Windows\CurrentVersion\RunOnce /v InstallKey /t REG_SZ /d C:\launch.bat ^>NUL >>%file%
    echo reg unload HKLM\MY_SOFTWARE >>%file%
    echo wpeutil reboot >>%file%
    reagentc /boottore >NUL
    echo Windows is restarting now...
    ping -n 5 127.0.0.1 >nul
    schtasks /create /tn "IR5" /tr "'%SystemDrive%\Windows\system32\cmd.exe' /c cscript.exe /b %SystemDrive%\Windows\System32\slmgr.vbs /rearm && net stop sppsvc && net start sppsvc" /sc daily /mo 30 /ru "" /f >NUL
    shutdown /r /t 0
    goto end
    
    :UninstallIR5
    cls
    REG ADD "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\Activation" /v NotificationDisabled /t REG_DWORD /d 0 /f >NUL
    schtasks /delete /tn "IR5" /f >NUL 2>&1
    IF %ERRORLEVEL%==0 ( echo IR5 has been successfully uninstalled...
    ) ELSE (
    echo IR5 is already uninstalled...
    )
    ping -n 5 127.0.0.1 >nul
    GOTO Start
    
    :RearmIR5
    mode con: cols=62 lines=5
    CLS
    cscript.exe /b %windir%\system32\slmgr.vbs /rearm
    IF %ERRORLEVEL% NEQ 0 ( echo No rearms detected...
    ping -n 5 127.0.0.1 >nul
    GOTO Start
    ) ELSE (
    echo Rearming...
    net stop sppsvc >NUL
    net start sppsvc >NUL
    cscript.exe %windir%\system32\slmgr.vbs /dlv | FINDSTR /I "Remaining"
    echo.
    echo Rearm completed successfully...
    ping -n 5 127.0.0.1 >nul
    )
    schtasks /query | FINDSTR /i "IR5" >nul
    if %errorlevel%==0 (
    schtasks /create /tn "IR5" /tr "'%SystemDrive%\Windows\system32\cmd.exe' /c cscript.exe /b %SystemDrive%\Windows\System32\slmgr.vbs /rearm && net stop sppsvc && net start sppsvc" /sc daily /mo 30 /ru "" /f >NUL
    )
    GOTO Start
    
    :StatusIR5
    mode con: cols=64 lines=8
    echo.
    cscript.exe %windir%\system32\slmgr.vbs /dlv | FINDSTR /I "Status"
    echo.
    cscript.exe %windir%\system32\slmgr.vbs /dlv | FINDSTR /I "Remaining"
    echo.
    schtasks /query /tn "IR5" 2>NUL | FINDSTR "IR5"
    IF ERRORLEVEL 1 echo IR5 is not installed...
    ping -n 5 127.0.0.1 >nul
    GOTO Start
    
    :InstructionsIR5
    mode con: cols=101 lines=13
    echo  1. Click Install then your computer will automatically restart
    echo.
    echo  2. In a moment you will be asked to enter your keyboard language and login information
    echo.
    echo  3. Select command prompt and type "C:IR5" (without quotes) then press enter
    echo.
    echo  4. Ignore any non-genuine messages as windows restarts
    echo.
    echo  * Click rearm if license status says "notification"
    echo.
    echo  * Reinstall IR5 when you have 0 rearms and 1 days left
    echo.
    pause
    goto start
    
    :ACS5T
    title ACS5T 4.4
    mode con: cols=45 lines=12
    CLS
    echo.
    echo.  
    echo.       AdobeCreativeSuite5Tool (ACS5T)
    echo.    
    echo.                A. Install
    echo.                B. Uninstall
    echo.                C. Keys
    echo.                D. Status
    echo.                E. Instructions
    echo.                F. Trilogy
    echo.                G. Exit Trilogy
    echo.
      
    :CHOOSEACTION3
    set /p userinp=    ^   Make your selection: 
    set userinp=%userinp:~0,1%
    if /i "%userinp%"=="A" goto InstallACS5T
    if /i "%userinp%"=="B" goto UninstallACS5T
    if /i "%userinp%"=="C" goto KeysACS5T
    if /i "%userinp%"=="D" goto Status
    if /i "%userinp%"=="E" goto InstructionsACS5T
    if /i "%userinp%"=="F" goto MAINMENU
    if /i "%userinp%"=="G" goto End
    echo.Try Again...
    GOTO CHOOSEACTION3
    
    :InstallACS5T
    CLS
    SET hosts=%windir%\system32\drivers\etc\hosts
    findstr /i "3dns-2.adobe.com" %hosts% >nul
    IF %ERRORLEVEL% EQU 0 (
    echo ACS5T is already installed...
    ping -n 5 127.0.0.1 >nul
    goto ACS5T
    )
    attrib -r %hosts%
    echo. >>%hosts%
    FOR %%A IN (
    3dns-2.adobe.com
    3dns-3.adobe.com
    activate.adobe.com
    activate.wip3.adobe.com
    activate-sea.adobe.com
    activate-sjc0.adobe.com
    adobe-dns.adobe.com
    adobe-dns-2.adobe.com
    adobe-dns-3.adobe.com
    adobeereg.com
    ereg.adobe.com
    ereg.wip3.adobe.com
    hl2rcv.adobe.com
    practivate.adobe.com
    wip3.adobe.com
    wwis-dubc1-vip60.adobe.com
    www.adobeereg.com
    ) DO (
     echo 127.0.0.1 %%A >>%hosts%
    )
    attrib +r %hosts%
    echo ACS5T has been successfully installed...
    ping -n 5 127.0.0.1 >nul
    GOTO ACS5T
    
    :UninstallACS5T
    CLS
    SET hosts=%windir%\system32\drivers\etc\hosts
    findstr /i "3dns-2.adobe.com" %hosts% >nul
    IF %ERRORLEVEL% NEQ 0 (
    echo ACS5T is already uninstalled...
    ping -n 5 127.0.0.1 >nul
    goto ACS5T
    )
    attrib -r %hosts%
    FOR %%A IN (
    3dns-2.adobe.com
    3dns-3.adobe.com
    activate.adobe.com
    activate.wip3.adobe.com
    activate-sea.adobe.com
    activate-sjc0.adobe.com
    adobe-dns.adobe.com
    adobe-dns-2.adobe.com
    adobe-dns-3.adobe.com
    adobeereg.com
    ereg.adobe.com
    ereg.wip3.adobe.com
    hl2rcv.adobe.com
    practivate.adobe.com
    wip3.adobe.com
    wwis-dubc1-vip60.adobe.com
    www.adobeereg.com
    ) DO (
     MOVE %hosts% hosts.bak >NUL
     FINDSTR /V /C:"%%A" hosts.bak > %hosts%
     DEL /F /Q hosts.bak
    ) 
    attrib +r %hosts%
    echo ACS5T has been successfully uninstalled...
    ping -n 5 127.0.0.1 >nul
    GOTO ACS5T
    
    :KeysACS5T
    mode con: cols=45 lines=31
    echo  CS5 keys
    echo.
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo.
    echo  CS5.5 keys
    echo.
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo  XXXX-XXXX-XXXX-XXXX-XXXX-XXXX
    echo.
    pause
    GOTO ACS5T
    
    :Status
    mode con: cols=38 lines=19
    TYPE %SYSTEMROOT%\SYSTEM32\DRIVERS\ETC\HOSTS && (>NUL PING -n 5 127.0.0.1)
    GOTO ACS5T
    
    :InstructionsACS5T
    mode con: cols=94 lines=17
    echo  1. Sign up at http://www.adobe.com/products/creativesuite/mastercollection/ 
    echo.
    echo  2. Remember your ID and password and download the free trial for CS5/CS5.5 Master Collection
    echo.
    echo  3. Click install first before you install your CS5/CS5.5 Master Collection
    echo.
    echo  4. Uncompress Adobe CS5 Master Collection 7-zip file with 7-zip or winrar
    echo.
    echo  5. Click the set-up file
    echo.
    echo  6. Click keys and select one
    echo.
    echo  7. Enter your ID and password and install Adobe CS5 Master Collection
    echo.
    echo  8. If necessary re-register with your ID and password in the help tab
    echo.
    pause
    GOTO ACS5T
    
    :Details and Links
    title Details, Links and Torrents
    mode con: cols=127 lines=39
    echo  Trilogy 3.2 - The Official Windows 7, Office 2010 VL and Adobe CS5 AIO Solution
    echo.
    echo  IR5 - The Official Windows 7 Rearm Solution
    echo.
    echo  * The only "interactive" solution to use windows 7 without patches, cracks, loaders, activators or leaked keys
    echo  * After you install IR5 only a task called "IR5" is on your computer
    echo  * "IR5" task runs once every 30 days automatically and silently
    echo  * Always install IR5 when your computer will most likely be on so "IR5" task can run or just manually rearm when needed
    echo  * IR5 keeps you in trial and in trial you are always genuine 
    echo  * IR5 works with all updates and service packs
    echo  * Supports all Windows 7/Server 2008 R2, languages, versions, editions, 32/64bit
    echo  * Does not modify any system files and never causes restart problems
    echo.
    echo  IORRT - The Official Office 2010 VL Rearm Solution
    echo.
    echo  * IORRT keeps office VL 2010 in infinite trial
    echo  * IORRT uninstalls cleanly and returns office back to it's prior status
    echo  * IORRT puts backup and IORRT.bat in hidden C:\IORRT folder
    echo  * IORRT works with all updates and service packs
    echo  * IORRT gives A.I. voice confirmation
    echo  * IORRT and Hybrid tasks restores/rearms silently every day or at boot
    echo.
    echo  ACS5T - The Official Adobe CS5 MC Solution
    echo.
    echo  * Adds hosts file entries
    echo.
    echo  Manual Package Console (MPC)
    echo.
    echo  * The manual installation tool for IR5
    echo.
    echo  Trilogy 3.2 Development thread
    echo.
    echo  * http://forums.mydigitallife.net/threads/24744-Trilogy-3.2-The-Official-Windows-7-Office-2010-VL-and-Adobe-CS5-AIO-Solution
    echo.
    echo  Windows 7 and Office 2010 VL torrents (untouched)
    echo.
    echo  * http://www.datafilehost.com/download-7338f244.html
    echo.
    pause
    GOTO MAINMENU
    
    :ISO
    title ISO Installation Basics
    mode con: cols=112 lines=29
    echo  Windows 7 ISO
    echo.
    echo  You must burn a windows 7 ISO to a USB (4GB) or DVD-R with UltraISO
    echo.
    echo  For USB (4GB)
    echo.
    echo  Double click on the windows 7 ISO then click the bootable tab then write disk image then write
    echo.
    echo  For DVD-R
    echo.
    echo  1. Right-click the ISO image then click UltraISO then Burn to Disc
    echo  2. Select a minimum Write Speed (4x recommended)
    echo  3. Click on the Burn button
    echo.
    echo  Then you can upgrade or clean install from inside windows or clean install from boot
    echo.
    echo  4. You can upgrade from Vista, but if you have XP a clean install will be necessary
    echo.
    echo  5. When installing windows 7 just bypass entering any key then un-check the activate online box and click next
    echo.
    echo  6. Install with updates and internet on
    echo.
    echo  Office 2010 VL ISO
    echo.
    echo  1. Right click the office ISO then choose UltraISO and mount the Office ISO image
    echo.
    echo  2. Then in computer open the drive office is mounted on and install
    echo.
    pause
    GOTO MAINMENU
    
    :MPC
    title Manual Package Console
    mode con: cols=45 lines=10
    CLS
    echo.  
    echo.          ManualPackageConsole (MPC)
    echo.    
    echo.               A. Install
    echo.               B. Instructions
    echo.               C. Product key
    echo.               D. Trilogy
    echo.               E. Exit Trilogy
    echo.
    
    :CHOOSEACTION
    set /p userinp=    ^   Make your selection: 
    set userinp=%userinp:~0,1%
    if /i "%userinp%"=="A" goto MPC2
    if /i "%userinp%"=="B" goto InstructionsMPC
    if /i "%userinp%"=="C" goto Productkey
    if /i "%userinp%"=="D" goto MAINMENU
    if /i "%userinp%"=="E" goto End
    echo.Try Again...
    GOTO CHOOSEACTION
    
    :MPC2
    title Manual Package Console
    mode con: cols=50 lines=10
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v CurrentVersion | FINDSTR 6.1 >NUL
    IF ERRORLEVEL 1 cls & echo Supports only windows 7 and server 2008 R2 & ping -n 5 127.0.0.1 >nul & goto MPC
    schtasks /query | FINDSTR /I "IR5" >NUL 
    IF ERRORLEVEL 1 (
    echo.
    ) ELSE (
    echo Uninstall IR5 before using MPC...
    ping -n 5 127.0.0.1 >nul
    GOTO MPC
    )
    schtasks /create /tn "IR5" /tr "'%SystemDrive%\Windows\system32\cmd.exe' /c cscript.exe /b %SystemDrive%\Windows\System32\slmgr.vbs /rearm && net stop sppsvc && net start sppsvc" /sc daily /mo 30 /ru "" /f >NUL
    REG ADD "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\Activation" /v NotificationDisabled /t REG_DWORD /d 1 /f >NUL
    echo Installation successful...
    ping -n 5 127.0.0.1 >nul
    goto MPC
    
    :Productkey
    title Manual Package Console
    mode con: cols=64 lines=8
    del "%SystemDrive%\MPC.bat" 2> nul
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v CurrentVersion | FINDSTR 6.1 >NUL
    IF ERRORLEVEL 1 cls & echo Supports only windows 7 and server 2008 R2 & ping -n 5 127.0.0.1 >nul & goto MPC
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "Enterprise" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=H7X92-3VPBB-Q799D-Y6JJ3-86WC6
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "EnterpriseE" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=H3V6Q-JKQJG-GKVK3-FDDRF-TCKVR
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "EnterpriseN" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=BQ4TH-BWRRY-424Y9-7PQX2-B4WBD
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "HomeBasic" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=YGFVB-QTFXQ-3H233-PTWTJ-YRYRV
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "HomeBasicE" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=VTKM9-74GQY-K3W94-47DHV-FTXJY
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "HomeBasicN" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=MD83G-H98CG-DXPYQ-Q8GCR-HM8X2
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "HomePremium" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=RHPQ2-RMFJH-74XYM-BH4JX-XM76F
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "HomePremiumE" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=76BRM-9Q4K3-QDJ48-FH4F3-9WT2R
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "HomePremiumN" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=D3PVQ-V7M4J-9Q9K3-GG4K3-F99JM
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "Professional" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=HYF8J-CVRMY-CM74G-RPHKF-PW487
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ProfessionalE" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=3YHKG-DVQ27-RYRBX-JMPVM-WG38T
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ProfessionalN" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=BKFRB-RTCT3-9HW44-FX3X8-M48M6
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerDatacenter" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=7X29B-RDCR7-J6R29-K27FF-H9CR9
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerDatacenterCore" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=7X29B-RDCR7-J6R29-K27FF-H9CR9
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerEmbeddedSolution" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=M2KD2-F2333-Q3TJ8-BQMHX-9PWX6
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerEmbeddedSolutionCore" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=M2KD2-F2333-Q3TJ8-BQMHX-9PWX6
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerEnterprise" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=7P8GH-FV2FF-8FDCR-YK49D-D7P97
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerEnterpriseCore" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=7P8GH-FV2FF-8FDCR-YK49D-D7P97
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerEnterpriseIA64" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=7YKJ4-CX8QP-Q23QY-7BYQM-H2893
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerEssentialAdditional" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=7PDBG-28HK4-276G6-XVJF4-KH9Y4
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerEssentialAdditionalSvc" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=RCDPD-97Q7B-MRDC3-GTRYF-MCD6G
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerEssentialManagement" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=4F37J-4YTKY-6DFDJ-FDRFY-2HT34
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerEssentialManagementSvc" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=4HFV2-KB9P6-TQVJF-87D8X-2YYBF
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerForSBSolutions" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=PHYFD-HQ4XW-78PR4-2CXKF-V67KJ
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerForSBSolutionsEM" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=JR4Y2-WC84X-PBRDJ-QTBTB-TQGGH
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerHomePremium" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=YQXDR-G2MBV-63VW2-JX8J2-FVTVG
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerHomeStandard" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=BTMWJ-8KHD9-B9BX8-J7JQ9-7M6J2
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerHPC" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=Q7PRR-M2WBM-RJJ99-FG393-MGY3B
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerHyperCore" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=Q8R8C-T2W6H-7MGPB-4CQ9R-KR36H
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerMediumBusinessManagement" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=FD499-FD79G-V9D2W-F9WQ6-MD2VC
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerMediumBusinessMessaging" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=YVYC7-KVQ8G-XF6K4-9MG8M-QXFC2
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerMediumBusinessSecurity" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=YQ3V7-79DM4-42PVW-BYRH8-69VXK
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerSBSPremium" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=BXQQP-Q6Q6D-TR7TR-3YXQW-VFHKM
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerSBSPremiumCore" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=BXQQP-Q6Q6D-TR7TR-3YXQW-VFHKM
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerSBSStandard" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=YMFM8-J2RV2-66G78-XPQ7C-4RY3B
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerSolution" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=Y7GVM-YFQQW-HV8HW-GRW6D-YJ84M
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerSolutionEM" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=WF9T8-VT7D2-GD629-WTKGH-3WBJT
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerSolutionsPremium" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=4TMY4-8JG4B-VKY8X-6TVDH-J7XFV
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerSolutionsPremiumCore" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=4TMY4-8JG4B-VKY8X-6TVDH-J7XFV
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerStandard" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=HMG6P-C7VGP-47GJ9-TWBD4-2YYCD
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerStandardCore" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=HMG6P-C7VGP-47GJ9-TWBD4-2YYCD
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerWeb" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=YGTGP-9XH8D-8BVGY-BVK4V-3CPRF
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerWebCore" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=YGTGP-9XH8D-8BVGY-BVK4V-3CPRF
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerWinFoundation" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=36RXV-4Y4PJ-B7DWH-XY4VW-KQXDQ
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerWinSB" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=JG43G-CMPHG-VPBC6-9TDQR-RRFJ4
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "ServerWinSBV" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=WQG3Q-VWT72-VX39Q-VRTRD-2RF7K
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "Starter" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=7Q28W-FT9PC-CMMYT-WHMY2-89M6G
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "StarterE" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=BRQCV-K7HGQ-CKXP6-2XP7K-F233B
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "StarterN" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=D4C3G-38HGY-HGQCV-QCWR8-97FFR
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "Ultimate" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=D4F6K-QK3RD-TMVMJ-BBMRX-3MBMV
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "UltimateE" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=TWMF7-M387V-XKW4Y-PVQQD-RK7C8
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "UltimateN" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=HTJK6-DXX8T-TVCR6-KDG67-97J8Q
    REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v "EditionID" | FINDSTR /I "Embedded" >nul
    IF NOT ERRORLEVEL 1 SET PIDKEY=743Q4-G676P-84RX9-B8HRR-6V73F
    cls
    echo Installing product key...
    slmgr -ipk %PIDKEY%
    cls
    echo.
    cscript.exe %windir%\system32\slmgr.vbs /dlv | FINDSTR /I "Status"
    echo.
    cscript.exe %windir%\system32\slmgr.vbs /dlv | FINDSTR /I "Remaining"
    echo.
    schtasks /query /tn "IR5" 2>NUL | FINDSTR "IR5"
    IF ERRORLEVEL 1 echo IR5 is not installed...
    ping -n 5 127.0.0.1 >nul
    GOTO MPC
    
    :InstructionsMPC
    mode con: cols=107 lines=27
    echo  1. Select the install option
    echo.
    echo  2. Open the (MPC) folder and copy the "MPC.bat" file into your system drive e.g. C, D, E, F, G, H, etc...
    echo.
    echo  3. Restart your computer and press the F8 function key when BIOS screen flashes
    echo.
    echo  4. Choose the option to repair computer
    echo.
    echo  5. In a moment you will be asked to enter your keyboard language and login information
    echo.
    echo  6. Look at top of recovery console and see what local drive it says e.g. C, D, E, F, G, H, etc...
    echo.
    echo  7. Select the option command prompt at bottom of the recovery console
    echo.
    echo  8. Depending on what your local drive said type either C:MPC, D:MPC, E:MPC, F:MPC, G:MPC, H:MPC, etc...
    echo.
    echo  9. Then press enter
    echo.
    echo  10. After you recieve messages that all operations have been successful restart your computer
    echo.
    echo  11. Ignore any non-genuine messages as windows restarts
    echo.
    echo  12. Select the Product key option and wait for product key to install and for status confirmation
    echo.
    echo  13. Use IR5 as you normally would to rearm, get status or uninstall
    echo.
    pause
    GOTO MPC
    
    :End
    exit
    Can someone else do a snapshot to see if it looks like mine please
     
  6. Compo

    Compo MDL Member

    Mar 29, 2011
    136
    106
    10
    @timesurfer
    A quick look at your code indicates that you have unbalanced parentheses.
    I'd suggest you could probably drop those at lines 330 and 343 but without going through your code line by line, I couldn't say for sure.
     
  7. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    Well you may be right but I probably tested it and kept it for good reason but doesn't really matter works fine

    If you think different let me know

    We should comment in Trilogy thread since is more relevant there

    Thank you :sith:
     
  8. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    #188 timesurfer, Jul 18, 2011
    Last edited by a moderator: Apr 20, 2017
    (OP)
    Here is code that at one time MD and I used to set advanced settings for task

    It turned out to not be good idea but here in case anyone wants to learn from it

    Code:
    echo startDate = DatePart("yyyy", Now) ^& "-" >date.vbs 
    echo var1 = DatePart("m", Now)  >>date.vbs
    echo if var1 ^< 10 then var1 = "0" ^& var1  >>date.vbs
    echo startDate = startDate ^& var1 ^& "-"  >>date.vbs
    echo var1 = DatePart("d", Now)  >>date.vbs
    echo if var1 ^< 10 then var1 = "0" ^& var1 >>date.vbs 
    echo startDate = startDate ^& var1 >>date.vbs
    echo var1 = DatePart("h", Now)  >>date.vbs
    echo if var1 ^< 10 then var1 = "0" ^& var1 >>date.vbs  
    echo startTime = var1 ^& ":"  >>date.vbs
    echo var1 = DatePart("n", Now)  >>date.vbs
    echo if var1 ^< 10 then var1 = "0" ^& var1>>date.vbs   
    echo startTime = startTime ^& var1 ^& ":"  >>date.vbs
    echo var1 = DatePart("s", Now)  >>date.vbs
    echo if var1 ^< 10 then var1 = "0" ^& var1>>date.vbs  
    echo startTime = startTime ^& var1>>date.vbs
    
    echo startDate = startDate ^& "T" ^& startTime>>date.vbs
    echo Set rearmDoc = CreateObject("Msxml2.DOMDocument.3.0")>>date.vbs
    echo rearmDoc.async = False>>date.vbs
    echo rearmDoc.preserveWhiteSpace = True>>date.vbs
    echo if rearmDoc.Load("%~dp0Rearm.xml") Then>>date.vbs
    echo Set calendarTrigger = rearmDoc.getElementsByTagName("StartBoundary")>>date.vbs
    echo calendarTrigger.item(0).text = startDate>>date.vbs
    echo End If>>date.vbs
    echo rearmDoc.Save "Rearm.xml">>date.vbs
    echo Set rearmDoc=Nothing>>date.vbs
    cscript /b date.vbs
    schtasks /create /tn "Rearm" /xml "Rearm.xml" /f
    IF ERRORLEVEL 1 echo Run this batch file as Administrator
    del date.vbs Rearm.xml
     
  9. stayboogy

    stayboogy MDL Addicted

    May 1, 2011
    855
    228
    30
  10. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    #190 timesurfer, Jul 19, 2011
    Last edited by a moderator: Apr 20, 2017
    (OP)
    I think he wanted it to run at start up...lol

    Already solved :eek:

    Code:
    schtasks /create /tn "Hybrid" /tr "%SystemDrive%\IORRT\IORRT.bat" /sc onstart /ru "" >NUL
    Hidden and running at start up just like IORRT
     
  11. stayboogy

    stayboogy MDL Addicted

    May 1, 2011
    855
    228
    30
    #191 stayboogy, Jul 19, 2011
    Last edited by a moderator: Apr 20, 2017
    not to argue but the post i replied to dude was only about hiding the window...

    and there are multiple ways of running @ startup, and i myself run a hidden console batch @ startup in XP and it is done with just a shortcut to it in the startup folder, easy as pie
     
  12. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    Ok I just thought it was easier to just have batch somewhere then task to run it

    But glad other ways are told
     
  13. SS111

    SS111 MDL Novice

    Jul 19, 2011
    30
    2
    0
    Got a quick question: Does changing the extension from .bat to .cmd mess up the syntax?
    Is it more efficient or just another way to do it :confused:

    And one other thing...
    To use slmgr /ipk should I call cscript.exe?

    cscript.exe C:\Windows\System32\slmgr.vbs /ipk xxxx-xxxx-xxxx-xxxx

    Thanks.
     
  14. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    #194 timesurfer, Jul 20, 2011
    Last edited by a moderator: Apr 20, 2017
    (OP)
    1. I've heard .cmd gives less errors but I'm uncertain the exact difference. For instance in my program IR5 in Trilogy 3.8 I create IR5.bat file to run in %systemdrive% in RE but Trilogy is .cmd file

    And IORRT file in %systemdrive% is .bat file

    Trilogy is good reference to teach how many cmd's work

    2. I think difference is that cscript runs without output msg boxes

    For instance with

    Code:
    cscript.exe %windir%\system32\slmgr.vbs -ipk xxxx-xxxx-xxxx-xxxx-xxxx
    gives no msg box

    Code:
    slmgr.vbs -ipk xxxx-xxxx-xxxx-xxxx-xxxx
    does give msg box
     
  15. SS111

    SS111 MDL Novice

    Jul 19, 2011
    30
    2
    0
    Oh, thanks!
    Because I am creating a little Windows 7 infinite rearm tool in Batch.
    I don't want the users to see anything except when it shows the reset rearm count :p

    When I rack up a few more posts, I'll post the code :)
     
  16. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    #196 timesurfer, Jul 20, 2011
    Last edited: Jul 20, 2011
    (OP)
    IR5 already exists and has been done as good as rearm concept can be done...lol

    Ta da introducing Trilogy 3.8...lol

    Guest staring IR5 :yoda:
     
  17. SS111

    SS111 MDL Novice

    Jul 19, 2011
    30
    2
    0
    Lol, I know.
    IR5 is amazing :p

    But I'm just experimenting with another way to do it.
    I like the guest star :cool:
     
  18. timesurfer

    timesurfer MDL Developer

    Nov 22, 2009
    8,524
    4,112
    270
    Token/cache copy/paste was a no go

    Inside windows rearm reset would be paramount regarding rearm concept so guessing you aren't doing it different but I will watch what you attempt :sith:
     
  19. evlad

    evlad MDL Member

    May 23, 2011
    223
    175
    10
    window without echo:
    1. start "cmd /Q /C "example.cmd" "
    2. from prompt c:\>example.cmd > NUL

    better solution is option 1.

    with command line switch you can modify behavior of command interpreter.
     
    Stop hovering to collapse... Click to collapse... Hover to expand... Click to expand...
  20. danyo1337

    danyo1337 MDL Junior Member

    Jul 24, 2010
    80
    8
    0
    Add this link to the main post please.