@echo off&set FileName=%~n0&shift

:: =============================================
:: AutoHelp PlugLab Concept: 2006 by Reatogo
:: =============================================

:: Help Info:
:: =======================
   set Routine_Type=2
::                  1=Getting Data  2=Prompts  3=Getting Files  4=Creating Files  5=General

   set Routine_Vers=1
   set Routine_Date=2007-02-15
   set RoutineName=MessageBox
   set RoutineAuthor=Siegfried
   set Using_work_from=

   set Example_call_1=%%MessageBox%% "INFORMATION" "TopBarTitleHERE" "MessageTextHERE"
   set Example_call_2=
   set Example_call_3=

   set text_01=Message box for simple messages.
   set text_02=.
   set text_03=Param. 1 = INFORMATION or EXCLAMATION or STOP
   set text_04=Only one "OK" button. Differ by the icon. Returns "next" as variable %%BTN%%.
   set text_05=.
   set text_06=Param. 1 = QUESTION
   set text_07=Two buttons: "OK" and "Cancel"
   set text_08=Returns "next" or "cancel" as variable %%BTN%%.
   set text_09=.
   set text_10=Use this: "~"  as a line break char within your text for the message for multi line messages.
   set text_11=~ = start new line.  ~~ = start new paragraph.
   set text_12=.
   set text_13=NOTE: the variable %%result%% is not used here and stays intact through this routine to ensure that if the message box is used for user info regarding a pending other routine, its return "%%result%%" does not get overwritten.
   set text_14=.
   set text_15=INFORMATION etc. can also be abreviated like info, excl, stop and quest



if "%~1" == "GetHelp" goto :EOF
if "%~3" == "" echo.&echo %*
:: =============================================

%MSG% "%~2"

set BTN=

%FREESE_TEXT_VARS%
	set watitle=PLUGIN SETUP
	if not "%~2" == "" set watitle=%~2
	set watext=%~3
"%APPs%\WIZapp.exe" MB %~1

if errorlevel 2 set BTN=cancel&goto _done
if errorlevel 0 set BTN=next&goto _done

:_done
%RESTORE_TEXT_VARS%
goto :EOF