Author Topic: Model 2 Emulator  (Read 3550 times)

mgalaxy

  • Administrator
  • Hero Member
  • *****
  • Posts: 828
    • Email
Model 2 Emulator
« on: August 25, 2013, 09:32:36 AM »
Source code

Code: AutoIt
  1. ;Parsing
  2. Local $count = StringInStr($CmdLineRaw, ".exe", 0 , 1 , 1)
  3. local $app = StringLeft ( $CmdLineRaw, $count + 4 )
  4. local $command = StringTrimLeft( $CmdLineRaw, $count + 4 )
  5. if not $command then exit 0
  6.  
  7. HotKeySet("{ESC}", "Terminate")
  8.  
  9. local $PID = Run ( '"' & $app & '" ' & $command )
  10.  
  11.    sleep(100)
  12.  
  13.      
  14. ;Functions
  15. Func Terminate()
  16.    While ProcessExists ( $PID )
  17.     ProcessClose ( $PID )
  18.   WEnd
  19.   Exit 0

Executable

http://www.mgalaxy.com/forum/index.php?action=downloads;sa=view;down=33
« Last Edit: August 25, 2013, 03:59:35 PM by mgalaxy »