FF4 AppID by danielkza

Global Const $PrefsPath = @ScriptDir & "\data\profile\prefs.js"
Global Const $PrefsContent = FileRead($PrefsPath)
If @error Then Exit 1

Func GetAppID($prefs)
    Local Const $RegexMatch = StringRegExp($PrefsContent, 'user_pref\("browser.taskbar.lastgroupid",\s*"([^"]+)"\);', 1)
    If @error Then Return SetError(1, 0, "")

    Return $RegexMatch[0]
EndFunc

Global Const $AppID = GetAppID($PrefsContent)
If @error Then Exit 1

Run(StringFormat('"%s\mkshortcut.exe" -output "%s\Mozilla Firefox.lnk" -target "%s\FirefoxPortable.exe" -appid "%s"', _
    @ScriptDir, @ScriptDir, @ScriptDir, $AppID), "", @SW_HIDE)
If @error Then Exit 1

Exit 0