; Generic Macro  This macro pulls of a list of all macros and bat files
; and allows user to select one to run.

ActWin=WinGetActive()                  ;Get currently active Window
DirChange(DirHome())                   ;Change to Home directory
List=FileItemize("*.WBM *.WBT")        ;Get a list of all WBM and WBT files
RunMe=ItemSelect("Select Macro/Batch",List," ")   ;Allow user to select one
if RunMe=="" then exit                 ;Gee, nothing was selected
WinActivate(ActWin)                    ;Activate original Window
call(RunMe,"")                         ;And call our little file
Exit                                   ;Bye Bye