Extensions
: K-Meleon Web Browser Forum
All about K-Meleon extensions.
Go to:
Forum List
•
Message List
•
Search
•
Log In
Your Name:
Subject:
Help information
BBcode help
Smileys help
Spam prevention:
Please, enter the code that you see below in the input field. This is for blocking bots that try to post this form automatically. If the code is hard to read, then just try to guess it right. If you enter the wrong code, a new image is created and you get another chance to enter it right.
[Please, enable JavaScript to see the code]
Enter code:
[quote=disrupted] this is an experiMENTAL release version on KEM using external [u][b]ini[/b][/u] locale files. this is a test version, not a final release do not download this for regular use. support for only: french, german and spanish the locales are in locale\es-ES de-de fr-fr as kmextman.ini the locales need to be translated for testing..for now they just have dummy text autoit gets kmeleon locale language from prefs, in case others/else/english ..english locale is used embedded inside the autoit script (not externally... this is the only way to avoid problems with autoit..english must be embedded and not as an external file to avoid problems(over-zealous user deletes locale file etc) plese download from this link (testers-only not a final release) [url=http://kmext.sf.net/tests/kmextman-inttest.zip]http://kmext.sf.net/tests/kmextman-inttest.zip[/url] sources: [color=green][sub]# K-Meleon Macros (http://kmeleon.sourceforge.net/wiki/index.php?id=MacroLanguage) # --------extensions uninstaller-experimental------------------------- $_keu_path=getfolder(RootFolder); $_profile_path=getfolder(ProfileFolder); $_keith_path=getfolder(RootFolder)."\\Tools\\keith"; keith{ menugrayed=(substr($LinkURL,0,14)!="http://kmext.s"); exec($_keith_path."\\keith.exe " . $LinkURL); } kmextman{ $getlocale=getpref(STRING,"general.useragent.contentlocale"); exec($_keu_path."\\kmextman-inttest.exe \"".$_profile_path."\" " . $getlocale); } kmextman_BuildMenu{ setmenu("&Tools",inline,keu_pag,6); setmenu(keu_pag,macro,"Extensions Manager",kmextman,-1); setmenu(LinkSave,inline,keith_pagina); setmenu(keith_pagina,macro,"KM Extension",keith,1); } $OnInit=$OnInit."kmextman_BuildMenu;"; $macroModules=$macroModules."keu;";[/sub][/color] [color=blue][sub]; AutoIt Version: 3.3.0 ; Language: mary poppins ; Platform: Win9x/NT ; Author: yannis #Include <File.au3> #Include <Array.au3> #include <Misc.au3> #include <extprop.au3> #include <GUIConstants E x.au3> #include <GUIComboBox.au3> #notrayicon if _Singleton("KME",0) = 0 Then exit endif $locales=(@scriptdir & "\locales\") if $cmdline[2]=("ES") then $txt1=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "1", "kmextman") $txt2=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "2", "kmextman") $txt3=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "3", "kmextman") $txt4=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "4", "kmextman") $txt5=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "5", "kmextman") $txt6=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "6", "kmextman") $txt7=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "7", "kmextman") $txt8=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "8", "kmextman") $txt9=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "9", "kmextman") $txt10=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "10", "kmextman") $txt11=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "11", "kmextman") $txt12=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "12", "kmextman") $txt13=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "13", "kmextman") $txt14=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "14", "kmextman") $txt15=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "15", "kmextman") elseif $cmdline[2]=("DE") then $txt1=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "1", "kmextman") $txt2=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "2", "kmextman") $txt3=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "3", "kmextman") $txt4=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "4", "kmextman") $txt5=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "5", "kmextman") $txt6=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "6", "kmextman") $txt7=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "7", "kmextman") $txt8=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "8", "kmextman") $txt9=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "9", "kmextman") $txt10=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "10", "kmextman") $txt11=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "11", "kmextman") $txt12=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "12", "kmextman") $txt13=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "13", "kmextman") $txt14=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "14", "kmextman") $txt15=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "15", "kmextman") else if $cmdline[2]=("FR") then $txt1=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "1", "kmextman") $txt2=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "2", "kmextman") $txt3=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "3", "kmextman") $txt4=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "4", "kmextman") $txt5=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "5", "kmextman") $txt6=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "6", "kmextman") $txt7=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "7", "kmextman") $txt8=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "8", "kmextman") $txt9=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "9", "kmextman") $txt10=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "10", "kmextman") $txt11=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "11", "kmextman") $txt12=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "12", "kmextman") $txt13=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "13", "kmextman") $txt14=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "14", "kmextman") $txt15=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "15", "kmextman") else $txt1=("K-Meleon Extensions Manager Error") $txt2=("Only execute the manager from inside k-meleon. ") $txt3=("K-meleon Extensions Manager") $txt4=("uninstall") $txt5=("edit macro") $txt6=("run installer") $txt7=("Note: K-meleon will be restarted on an uninstall/install") $txt8=("can't uninstall: malformed ini, please reinstall this extension or contact the author") $txt9=("The extension: ") $txt10=(" has been uninstalled successfully. ") $txt11=("macro editor mode: when done remember to save and restart k-meleon for changes to take effect") $txt12=("this extension does not include a macro") $txt13=("You don't have any installed extensions. Would you like to download extensions?") $txt14=("installed extensions:") $txt15=("install date:") ;$txt16=() ;$txt18=() ;$txt19=() ;$txt20=() endif endif $KEITH=(@scriptDir & "\tools\keith\keith.exe") $KMBIN=(@scriptDir & "\k-meleon.exe") $DEL1=(@scriptDir & "\components\xpti.dat") $DEL2=(@scriptDir & "\components\compreg.dat") $kmexthome=("http://kmext.sourceforge.net") $openhome=($KMBIN & " " & $kmexthome) $medit=(@scriptDir & "\tools\keith\notepad2.exe") if $cmdline[0]=0 then msgbox(48,$txt1, $txt2) else $inini=(@scriptDir & "\kmextensions") $kmunext="*.ini" $inipath=("pending") $kmprefs=($CmdLine[1] & "\prefs.js") $kmprof=($CmdLine[1] & "\") ;$testrun=("c:\windows\notepad.exe") $FileList=_FileListToArray($inini,$kmunext) If @Error=1 Then openkmext() Exit EndIf if $FileList= 0 Then openkmext() ;MsgBox (64,"K-meleon Extensions Manager","You don't have any installed extensions. ") Else runman() endif endif func runman() $pentrim=_ArrayToString($FileList, "|", 1) $remini=StringReplace($pentrim, ".ini", "") $first=StringInStr($remini, "|" ,"",1) $initial=StringMid($remini, 1, $first-1) ;msgbox(0, "test", $initial) $hGUI = GUICreate($txt3,304,174) $Label1 = GUICtrlCreateLabel($txt14 & $FileList[0], 10, 3, 140, 15) $hCombo = GUICtrlCreateCombo("", 10, 20,178,100) $update=GUICtrlSetData($hCombo,$remini, $initial) $hButton = GUICtrlCreateButton($txt4,193,18,100) $mButton = GUICtrlCreateButton($txt5,193,60,100) $iButton = GUICtrlCreateButton($txt6,193,88,100) $eButton = GUICtrlCreateButton("kmext.sf.net",193,116,100) $Label2 = GUICtrlCreateLabel($txt7, 10, 157, 290, 20) $inipath=($inini & "\" & $FileList[_GUICtrlComboBox_GetCurSel($hCombo)+1]) $findinfo=IniRead($inipath, "info", "1", "N/A") $date=_GetExtProperty($inipath,4) $extinstdate= GUICtrlCreateLabel($txt15, 11, 44, 100, 20) $setdata=GUICtrlCreateLabel($date, 71, 44, 120, 20) $info= GUICtrlCreateLabel("info:", 11, 67, 40, 15) $desc= GUICtrlCreateLabel($findinfo, 11, 83, 150, 67) GUISetState() WinSetOnTop($txt3, "", 1) While 1 $msg = GUIGetMsg() select case $msg =$hCombo $inipath=($inini & "\" & $FileList[_GUICtrlComboBox_GetCurSel($hCombo)+1]) $findinfo=IniRead($inipath, "info", "1", "N/A") $date=_GetExtProperty($inipath,4) GUICtrlSetData($desc,$findinfo) GUICtrlSetData($setdata,$date) endselect select Case $msg = $GUI_EVENT_CLOSE ExitLoop Case $msg = $hButton ;MsgBox (64,"K-meleon Extensions Manager",$testrun & " " & $inini & "\" & $FileList[_GUICtrlComboBox_GetCurSel($hCombo)+1]) ;$commandtest=($testrun & " " & $inini & "\" & $FileList[_GUICtrlComboBox_GetCurSel($hCombo)+1]) $inipath=($inini & "\" & $FileList[_GUICtrlComboBox_GetCurSel($hCombo)+1]) if fileexists($inipath)then ;MsgBox (64,"K-meleon Extensions Manager",$inipath) $findmacro=IniRead($inipath, "macros", "1", "supercalafragelisticexpialido.ciaus") $findmacro2=IniRead($inipath, "macros", "2", "supercalafragelisticexpialido.ciaus") $findmacro3=IniRead($inipath, "macros", "3", "supercalafragelisticexpialido.ciaus") $findmacro4=IniRead($inipath, "macros", "4", "supercalafragelisticexpialido.ciaus") $findmacro5=IniRead($inipath, "macros", "5", "supercalafragelisticexpialido.ciaus") $findjar=IniRead($inipath, "chrome", "1", "supercalafragelisticexpialido.ciaus") $findmani=IniRead($inipath, "chrome", "2", "supercalafragelisticexpialido.ciaus") $findjar2=IniRead($inipath, "chrome", "3", "supercalafragelisticexpialido.ciaus") $findmani2=IniRead($inipath, "chrome", "4", "supercalafragelisticexpialido.ciaus") $findcomp1=IniRead($inipath, "components", "1", "supercalafragelisticexpialido.ciaus") $findcomp2=IniRead($inipath, "components", "2", "supercalafragelisticexpialido.ciaus") $findcomp3=IniRead($inipath, "components", "3", "supercalafragelisticexpialido.ciaus") $findcomp4=IniRead($inipath, "components", "4", "supercalafragelisticexpialido.ciaus") $findcomp5=IniRead($inipath, "components", "5", "supercalafragelisticexpialido.ciaus") $findcomp6=IniRead($inipath, "components", "6", "supercalafragelisticexpialido.ciaus") $findcomp7=IniRead($inipath, "components", "7", "supercalafragelisticexpialido.ciaus") $findcomp8=IniRead($inipath, "components", "8", "supercalafragelisticexpialido.ciaus") $findkplugs=IniRead($inipath, "kplugins", "1", "supercalafragelisticexpialido.ciaus") $findplugs1=IniRead($inipath, "plugins", "1", "supercalafragelisticexpialido.ciaus") $findplugs2=IniRead($inipath, "plugins", "2", "supercalafragelisticexpialido.ciaus") $findplugs3=IniRead($inipath, "plugins", "3", "supercalafragelisticexpialido.ciaus") $findplugs4=IniRead($inipath, "plugins", "4", "supercalafragelisticexpialido.ciaus") $findpref=IniRead($inipath, "pref", "1", "supercalafragelisticexpialido.ciaus") $findpref2=IniRead($inipath, "pref", "2", "supercalafragelisticexpialido.ciaus") $findloc1=IniRead($inipath, "locales", "1", "supercalafragelisticexpialido.ciaus") $findloc2=IniRead($inipath, "locales", "2", "supercalafragelisticexpialido.ciaus") $findloc3=IniRead($inipath, "locales", "3", "supercalafragelisticexpialido.ciaus") $findloc4=IniRead($inipath, "locales", "4", "supercalafragelisticexpialido.ciaus") $findloc5=IniRead($inipath, "locales", "5", "supercalafragelisticexpialido.ciaus") $findloc6=IniRead($inipath, "locales", "6", "supercalafragelisticexpialido.ciaus") $findloc7=IniRead($inipath, "locales", "7", "supercalafragelisticexpialido.ciaus") $findloc8=IniRead($inipath, "locales", "8", "supercalafragelisticexpialido.ciaus") $findloc9=IniRead($inipath, "locales", "9", "supercalafragelisticexpialido.ciaus") $findloc10=IniRead($inipath, "locales", "10", "supercalafragelisticexpialido.ciaus") $findloc11=IniRead($inipath, "locales", "11", "supercalafragelisticexpialido.ciaus") $findloc12=IniRead($inipath, "locales", "12", "supercalafragelisticexpialido.ciaus") $findloc13=IniRead($inipath, "locales", "13", "supercalafragelisticexpialido.ciaus") $findloc14=IniRead($inipath, "locales", "14", "supercalafragelisticexpialido.ciaus") $findloc15=IniRead($inipath, "locales", "15", "supercalafragelisticexpialido.ciaus") $findloc16=IniRead($inipath, "locales", "16", "supercalafragelisticexpialido.ciaus") $findloc17=IniRead($inipath, "locales", "17", "supercalafragelisticexpialido.ciaus") $findloc18=IniRead($inipath, "locales", "18", "supercalafragelisticexpialido.ciaus") $findloc19=IniRead($inipath, "locales", "19", "supercalafragelisticexpialido.ciaus") $findloc20=IniRead($inipath, "locales", "20", "supercalafragelisticexpialido.ciaus") $findtools=IniRead($inipath, "tools", "1", "supercalafragelisticexpialido.ciaus") $findtools2=IniRead($inipath, "tools", "2", "supercalafragelisticexpialido.ciaus") $findtools3=IniRead($inipath, "tools", "3", "supercalafragelisticexpialido.ciaus") $findtools4=IniRead($inipath, "tools", "4", "supercalafragelisticexpialido.ciaus") $findtools5=IniRead($inipath, "tools", "5", "supercalafragelisticexpialido.ciaus") $findtools6=IniRead($inipath, "tools", "6", "supercalafragelisticexpialido.ciaus") $findtools7=IniRead($inipath, "tools", "7", "supercalafragelisticexpialido.ciaus") $findtools8=IniRead($inipath, "tools", "8", "supercalafragelisticexpialido.ciaus") $findscripts=IniRead($inipath, "scripts", "1", "supercalafragelisticexpialido.ciaus") $findscripts2=IniRead($inipath, "scripts", "2", "supercalafragelisticexpialido.ciaus") $findscripts3=IniRead($inipath, "scripts", "3", "supercalafragelisticexpialido.ciaus") $findscripts4=IniRead($inipath, "scripts", "4", "supercalafragelisticexpialido.ciaus") $findscripts5=IniRead($inipath, "scripts", "5", "supercalafragelisticexpialido.ciaus") $findscripts6=IniRead($inipath, "scripts", "6", "supercalafragelisticexpialido.ciaus") $findskins1=IniRead($inipath, "skins", "1", "supercalafragelisticexpialido.ciaus") $findskins2=IniRead($inipath, "skins", "2", "supercalafragelisticexpialido.ciaus") $findskins3=IniRead($inipath, "skins", "3", "supercalafragelisticexpialido.ciaus") $findskins4=IniRead($inipath, "skins", "4", "supercalafragelisticexpialido.ciaus") $findstyles=IniRead($inipath, "stylesheets", "1", "supercalafragelisticexpialido.ciaus") $findstyles2=IniRead($inipath, "stylesheets", "2", "supercalafragelisticexpialido.ciaus") $findstyles3=IniRead($inipath, "stylesheets", "3", "supercalafragelisticexpialido.ciaus") $findstyles4=IniRead($inipath, "stylesheets", "4", "supercalafragelisticexpialido.ciaus") $findstyles5=IniRead($inipath, "stylesheets", "5", "supercalafragelisticexpialido.ciaus") $findpfiles=IniRead($inipath, "profile", "1", "supercalafragelisticexpialido.ciaus") $findpfiles2=IniRead($inipath, "profile", "2", "supercalafragelisticexpialido.ciaus") $findpfiles3=IniRead($inipath, "profile", "3", "supercalafragelisticexpialido.ciaus") $findroot1=IniRead($inipath, "root", "1", "supercalafragelisticexpialido.ciaus") $findroot2=IniRead($inipath, "root", "2", "supercalafragelisticexpialido.ciaus") $findroot3=IniRead($inipath, "root", "3", "supercalafragelisticexpialido.ciaus") ;MsgBox(48, "test macro", $findmacro, 10) ;MsgBox(48, "test jar", $findjar, 10) ;MsgBox(48, "test mani", $findmani, 10) ;MsgBox(48, "test plug", $findplugs1, 10) ;MsgBox(48, "test loc1", $findloc1, 10) ;MsgBox(48, "test loc2", $findloc2, 10) ;MsgBox(48, "test loc3", $findloc3, 10) ;MsgBox(48, "test skins1", $findskins1, 10) ;MsgBox(48, "test skins2", $findskins2, 10) ;MsgBox(48, "test skins3", $findskins3, 10) ;MsgBox(48, "test skins4", $findskins4, 10) $retpath=(@scriptdir) if $findmacro=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findmacro=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findmacro2=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findmacro2=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findmacro3=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findmacro3=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findmacro4=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findmacro4=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findmacro5=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findmacro5=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findjar=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findjar=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findmani=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findmani=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findjar2=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findjar2=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findmani2=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findmani2=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findcomp1=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findcomp1=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findcomp2=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findcomp2=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findcomp3=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findcomp3=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findcomp4=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findcomp4=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findcomp5=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findcomp5=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findcomp6=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findcomp6=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findcomp7=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findcomp7=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findcomp8=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findcomp8=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findkplugs=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findkplugs=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findplugs1=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findplugs1=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findplugs2=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findplugs2=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findplugs3=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findplugs3=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else ;--------------------------------------------------- if $findplugs4=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findplugs4=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findpref=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findpref=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findpref2=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findpref2=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc1=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc1=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc2=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc2=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc3=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc3=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc4=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc4=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc5=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc5=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc6=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc6=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc7=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc7=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc8=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc8=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc9=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc9=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc10=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc10=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc11=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc11=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc12=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc12=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc13=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc13=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc14=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc14=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc15=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc15=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc16=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc16=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc17=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc17=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc18=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc18=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc19=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc19=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findloc20=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findloc20=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findtools=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findtools=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findtools2=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findtools2=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findtools3=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findtools3=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findtools4=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findtools4=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findtools5=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findtools5=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findtools6=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findtools6=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findtools7=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findtools7=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findtools8=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findtools8=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findscripts=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findscripts=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findscripts2=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findscripts2=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findscripts3=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findscripts3=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findscripts4=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findscripts4=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findscripts5=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findscripts5=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findscripts6=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findscripts6=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findskins1=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findskins1=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findskins2=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findskins2=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findskins3=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findskins3=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findskins4=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findskins4=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findstyles=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findstyles=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findstyles2=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findstyles2=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findstyles3=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findstyles3=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findstyles4=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findstyles4=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findstyles5=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findstyles5=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findpfiles=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findpfiles=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findpfiles2=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findpfiles2=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findpfiles3=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findpfiles3=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findroot1=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findroot1=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findroot2=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findroot2=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else if $findroot3=("") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) elseif $findroot3=("\") then GUICtrlSetData($desc,$txt8) FileDelete($inipath) else $retpath=(@scriptdir) guidelete() $retmacro=($retpath &"\macros\" & $findmacro) $retmacro2=($retpath &"\macros\" & $findmacro2) $retmacro3=($retpath &"\macros\" & $findmacro3) $retmacro4=($retpath &"\macros\" & $findmacro4) $retmacro5=($retpath &"\macros\" & $findmacro5) $retjar=($retpath &"\chrome\" & $findjar) $retmani=($retpath &"\chrome\" & $findmani) $retjar2=($retpath &"\chrome\" & $findjar2) $retmani2=($retpath &"\chrome\" & $findmani2) $retcomp1=($retpath &"\components\" & $findcomp1) $retcomp2=($retpath &"\components\" & $findcomp2) $retcomp3=($retpath &"\components\" & $findcomp3) $retcomp4=($retpath &"\components\" & $findcomp4) $retcomp5=($retpath &"\components\" & $findcomp5) $retcomp6=($retpath &"\components\" & $findcomp6) $retcomp7=($retpath &"\components\" & $findcomp7) $retcomp8=($retpath &"\components\" & $findcomp8) $retkplugs=($retpath &"\kplugins\" & $findkplugs) $retplugs1=($retpath &"\plugins\" & $findplugs1) $retplugs2=($retpath &"\plugins\" & $findplugs2) $retplugs3=($retpath &"\plugins\" & $findplugs3) $retplugs4=($retpath &"\plugins\" & $findplugs4) $retpref=($retpath &"\defaults\pref\" & $findpref) $retpref2=($retpath &"\defaults\pref\" & $findpref2) $retloc1=($retpath &"\locales\" & $findloc1) $retloc2=($retpath &"\locales\" & $findloc2) $retloc3=($retpath &"\locales\" & $findloc3) $retloc4=($retpath &"\locales\" & $findloc4) $retloc5=($retpath &"\locales\" & $findloc5) $retloc6=($retpath &"\locales\" & $findloc6) $retloc7=($retpath &"\locales\" & $findloc7) $retloc8=($retpath &"\locales\" & $findloc8) $retloc9=($retpath &"\locales\" & $findloc9) $retloc10=($retpath &"\locales\" & $findloc10) $retloc11=($retpath &"\locales\" & $findloc11) $retloc12=($retpath &"\locales\" & $findloc12) $retloc13=($retpath &"\locales\" & $findloc13) $retloc14=($retpath &"\locales\" & $findloc14) $retloc15=($retpath &"\locales\" & $findloc15) $retloc16=($retpath &"\locales\" & $findloc16) $retloc17=($retpath &"\locales\" & $findloc17) $retloc18=($retpath &"\locales\" & $findloc18) $retloc19=($retpath &"\locales\" & $findloc19) $retloc20=($retpath &"\locales\" & $findloc20) $rettools=($retpath &"\tools\" & $findtools) $rettools2=($retpath &"\tools\" & $findtools2) $rettools3=($retpath &"\tools\" & $findtools3) $rettools4=($retpath &"\tools\" & $findtools4) $rettools5=($retpath &"\tools\" & $findtools5) $rettools6=($retpath &"\tools\" & $findtools6) $rettools7=($retpath &"\tools\" & $findtools7) $rettools8=($retpath &"\tools\" & $findtools8) $retscripts=($retpath &"\scripts\" & $findscripts) $retscripts2=($retpath &"\scripts\" & $findscripts2) $retscripts3=($retpath &"\scripts\" & $findscripts3) $retscripts4=($retpath &"\scripts\" & $findscripts4) $retscripts5=($retpath &"\scripts\" & $findscripts5) $retscripts6=($retpath &"\scripts\" & $findscripts6) $retskins1=($retpath &"\skins\default\" & $findskins1) $retskins2=($retpath &"\skins\default\" & $findskins2) $retskins3=($retpath &"\skins\default\" & $findskins3) $retskins4=($retpath &"\skins\default\" & $findskins4) $retstyles=($retpath &"\styles\" & $findstyles) $retstyles2=($retpath &"\styles\" & $findstyles2) $retstyles3=($retpath &"\styles\" & $findstyles3) $retstyles4=($retpath &"\styles\" & $findstyles4) $retstyles5=($retpath &"\styles\" & $findstyles5) $retpfiles=($CmdLine[1] & "\" & $findpfiles) $retpfiles2=($CmdLine[1] & "\" & $findpfiles2) $retpfiles3=($CmdLine[1] & "\" & $findpfiles3) $retroot1=($retpath & "\" & $findroot1) $retroot2=($retpath & "\" & $findroot2) $retroot3=($retpath & "\" & $findroot3) ;MsgBox(48, "test loc3", $retmacro, 10) ;MsgBox(48, "test comp3", $retcomp3, 10) ;MsgBox(48, "test locale1", $retloc1, 10) ;MsgBox(48, "test locale3", $retloc3, 10) ;MsgBox(48, "test tools", $rettools, 10) ;MsgBox(48, "test sk1", $retskins1, 10) ;MsgBox(48, "test sk2", $retskins2, 10) ;MsgBox(48, "test sk3", $retskins3, 10) ;MsgBox(48, "test sk4", $retskins4, 10) ProcessClose("loader.exe") ProcessClose("k-meleon.exe") sleep(400) FileDelete($retmacro) FileDelete($retmacro2) FileDelete($retmacro3) FileDelete($retmacro4) FileDelete($retmacro5) DirRemove($retmacro, 1) DirRemove($retmacro2, 1) DirRemove($retmacro3, 1) DirRemove($retmacro4, 1) DirRemove($retmacro5, 1) FileDelete($retjar) FileDelete($retmani) FileDelete($retjar2) FileDelete($retmani2) FileDelete($retcomp1) FileDelete($retcomp2) FileDelete($retcomp3) FileDelete($retcomp4) FileDelete($retcomp5) FileDelete($retcomp6) FileDelete($retcomp7) FileDelete($retcomp8) FileDelete($retkplugs) FileDelete($retplugs1) FileDelete($retplugs2) FileDelete($retplugs3) FileDelete($retplugs4) FileDelete($retpref) FileDelete($retpref2) FileDelete($retloc1) FileDelete($retloc2) FileDelete($retloc3) FileDelete($retloc4) FileDelete($retloc5) FileDelete($retloc6) FileDelete($retloc7) FileDelete($retloc8) FileDelete($retloc9) FileDelete($retloc10) FileDelete($retloc11) FileDelete($retloc12) FileDelete($retloc13) FileDelete($retloc14) FileDelete($retloc15) FileDelete($retloc16) FileDelete($retloc17) FileDelete($retloc18) FileDelete($retloc19) FileDelete($retloc20) FileDelete($rettools) FileDelete($rettools2) FileDelete($rettools3) FileDelete($rettools4) FileDelete($rettools5) FileDelete($rettools6) FileDelete($rettools7) FileDelete($rettools8) DirRemove($rettools, 1) DirRemove($rettools2, 1) DirRemove($rettools3, 1) DirRemove($rettools4, 1) DirRemove($rettools5, 1) DirRemove($rettools6, 1) DirRemove($rettools7, 1) DirRemove($rettools8, 1) FileDelete($retscripts) FileDelete($retscripts2) FileDelete($retscripts3) FileDelete($retscripts4) FileDelete($retscripts5) FileDelete($retscripts6) DirRemove($retscripts) DirRemove($retscripts2) DirRemove($retscripts3) DirRemove($retscripts4) DirRemove($retscripts5) DirRemove($retscripts6) FileDelete($retskins1) FileDelete($retskins2) FileDelete($retskins3) FileDelete($retskins4) DirRemove($retskins1) DirRemove($retskins2) DirRemove($retskins3) DirRemove($retskins4) FileDelete($retstyles) FileDelete($retstyles2) FileDelete($retstyles3) FileDelete($retstyles4) FileDelete($retstyles5) FileDelete($retroot1) FileDelete($retroot2) FileDelete($retroot3) DirRemove($retroot1) DirRemove($retroot2) DirRemove($retroot3) FileDelete($retpfiles) FileDelete($retpfiles2) FileDelete($retpfiles3) DirRemove($retpfiles, 1) DirRemove($retpfiles2, 1) DirRemove($retpfiles3, 1) sleep(100) FileDelete($inipath) FileDelete($DEL1) FileDelete($DEL2) $cleanclose=("user_pref" & "(" &"""" & "kmeleon.plugins.sessions.cleanShutdown" & """" & "," & " true" & ");") FileWriteLine($kmprefs, $cleanclose) sleep(48) run($KMBIN) Winwaitactive("[CLASS:KMeleon Browser Window]", "", 5) sleep(888) $findextname=StringTriMRight($findmacro, 4) $message=($txt9 & $findextname & $txt10) MsgBox(64, "KEU: uninstall complete", $message, 8) exit EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf else GUICtrlSetData($desc,"invalid uninstall ini") endif Case $msg = $mButton $findmacro=IniRead($inipath, "macros", "1", "supercalafragelisticexpialido.ciaus") $macropath=(@scriptdir &"\macros\" & $findmacro) if fileexists($macropath) then $editcmd=($medit & " " & $macropath) GUICtrlSetData($desc,$txt11) WinSetOnTop($txt3, "", 0) run($editcmd) else GUICtrlSetData($desc,$txt12) endif Case $msg = $iButton run($KEITH) exit Case $msg = $eButton run($openhome) exit endselect WEnd endfunc func openkmext() $ask=MsgBox(32+4, $txt3,$txt13) If $ask=7 Then Exit Else run($openhome) endif endfunc[/sub][/color][/quote]
[Please Enable JavaScript]
K-Meleon forum is powered by
Phorum
.
Home/News
Screenshots
Download
Documentation
Resources
Get Involved
Forum
FAQ
English