Function EnumProc($exe)
  Dim $winmgmts, $ExecQuery, $Proc, $ID, $GetObject
  $winmgmts = "winmgmts:{impersonationLevel=impersonate}!//" + @wksta
      $ExecQuery = "select * from Win32_Process where Name='" + "$exe'"
      $GetObject = GetObject($winmgmts).ExecQuery($ExecQuery)
      For Each $Proc in $GetObject
        $ID = $Proc.ProcessID
        $EnumProc = $ID + "|" + $EnumProc
        Next
      $EnumProc = Left($EnumProc,Len($EnumProc)-1)
      $GetObject = ''
EndFunction

CLS
BREAK ON
For $i=1 to 4
  $i
  RUN $location+'\'+$i+'.lnk'
NEXT
get $

  

RUNorSHELL "c:\mappingprogram.exe"
  ?check for running process
     ?if process not running check again after 5 seconds (loop)
  ?next
sleep 10
RUNorSHELL "c:\caddispatchprogram.exe"
exit

$prog1 = 'exe1'
$prog2 = 'exe2'

SHELL "%path_to_exe1%\"+$prog1

While @ERROR <> 0
  EnumProc($prog1)
  Sleep 1
Loop

;; Now you may want to set a sleep offset depending on
;; whether the condition exists where the program, even
;; though it may be started, needs to wait a few secs 
;; before kicking off the other...

SHELL "%path_to_exe2%\"+$prog2

Function EnumProc($exe)
  Dim $winmgmts, $ExecQuery, $Proc, $ID, $GetObject
  $winmgmts = "winmgmts:{impersonationLevel=impersonate}!//" + @wksta
      $ExecQuery = "select * from Win32_Process where Name='" + "$exe'"
      $GetObject = GetObject($winmgmts).ExecQuery($ExecQuery)
      For Each $Proc in $GetObject
        $ID = $Proc.ProcessID
        $EnumProc = $ID + "|" + $EnumProc
        Next
      $EnumProc = Left($EnumProc,Len($EnumProc)-1)
      $GetObject = ''
EndFunction