K-Meleon

Bitte den Text im grauen Feld kopieren und als macros.cfg speichern und die Datei C:\Programme\K-Meleon\Profiles\default\????????.slt\macros.cfg ersetzen. Falls ich etwas vegessen habe oder etwas falsch ist, bitte hier ändern.

<pre>

  1. MACROS DEFINITION FILE (http://kmeleon.sourceforge.net/wiki/index.php?id=MacroLanguage)
  2. Deutsche Wörter von rumpel rumpel»public±files
  3. ENGINES

Google{ &OldSearch?; $search = "Google"; $eng = "http://www.google.de/search?q="; &SetSearch?; }

Yahoo{ &OldSearch?; $search = "Yahoo"; $eng = "http://de.search.yahoo.com/bin/search?p="; &SetSearch?; }

Wikipedia{ &OldSearch?; $search = "Wikipedia"; $eng = "http://de.wikipedia.org/wiki/"; &SetSearch?; }

LeoED{ &OldSearch?; $search = "Leo Englisch/Deutsch"; $eng = "http://dict.leo.org/?lp=ende&search="; &SetSearch?; }

KM{ &OldSearch?; $search = "K-Meleon im K-Meleon Forum"; $eng = "http://kmeleon.sourceforge.net/forum/search.php? f=3&globalsearch=1&match=1&date=0&fldsubject=1&fldbody=1&search="; &SetSearch?; }

URL{ &OldSearch?; $search = "URL"; $eng = ""; &Locked; }

EngineSync?{ setcheck("macros(Google)", getpref(STRING, $sen) == "Google" ? true:false); setcheck("macros(Yahoo)", getpref(STRING, $sen) == "Yahoo" ? true:false); setcheck("macros(Wikipedia)", getpref(STRING, $sen) == "Wikipedia" ? true:false); setcheck("macros(LeoED)", getpref(STRING, $sen) == "Leo Englisch/Deutsch" ? true:false); }

  1. SEARCH MACROS

$se = "kmeleon.general.searchEngine"; $sl = "kmeleon.general.searchLocked"; $sen = "kmeleon.general.searchEngineName"; $so = "kmeleon.general.searchOpen"; $eng = getpref(STRING, $se) ; $search = getpref(STRING, $sen); $layers = "kmeleon.plugins.layers.load";

OldSearch?{ $oldeng = $eng; $oldsearch = $search; }

SetSearch?{ getpref(BOOL, $sl) == "false" ? &Unlocked : &Locked; &Sync; } Unlocked{ setpref(STRING, $sen, $search); setpref(STRING, $se, $eng); &Search; } Locked{ &Search; $search = $oldsearch; $eng = $oldeng; } Search{ $tmp = getclipboard(); setclipboard(); id(ID_EDIT_COPY?); $word = getclipboard(); $word "" ? &URLBarSearch? : $word $URL ? &PromptSearch? : &OpenSearch?; setclipboard($tmp); } URLBarSearch?{ id(ID_SELECT_URL?); id(ID_EDIT_COPY?); $word = getclipboard(); $word "" ? $word = $URL : ""; $word $URL ? &PromptSearch? : &OpenSearch?; } PromptSearch?{ $search == "" ? $search = "Google":0; $search == "URL" ? $tip = "Enter URL:" : $tip = "Suche mit " . $search . " nach:"; setclipboard($tmp); $word = prompt($tip, $search); $word == "" ? "" : &OpenSearch?; } OpenSearch?{ $how = getpref(INT, $so); $how "0" ? open($eng . $word) : $how "1" ? &SearchNew? : $how == "2" ? &SearchBack?:0; } SearchNew?{ &ResetURL; getpref(BOOL, $layers) == "true" ? pluginmsg(layers, "OpenURL", $eng . $word) : opennew($eng . $word); } ResetURL{ setclipboard($URL); id(ID_SELECT_URL?); id(ID_EDIT_PASTE?); id(ID_SELECT_URL?); } SearchBack?{ &ResetURL; getpref(BOOL, $layers) == "true" ? pluginmsg(layers, "OpenURLBg?", $eng . $word) : OpenBg?($eng . $word); }

SN0{ setpref(INT, $so, 0); &Sync; } SN1{ setpref(INT, $so, 1); &Sync; } SN2{ setpref(INT, $so, 2); &Sync; }

SearchLock?{ $search == "" ? $search = "Google":0; togglepref(BOOL, $sl); getpref(BOOL, $sl) == "true" ? $how = " > " . $search : $how = "WÄHLBAR"; alert("Die Standart Suchmaschine ist jetzt " . $how . "\n\n\nUm die Standart Suchmaschine zu wählen:\n\n1. Auswahl erlauben\n2. Suchmaschine im Menü anklicken\n3. Auswahl wieder sperren", "Suchen Schaltfläche", INFO); &Sync; }

AddEng?{ $theurl = "http://kmeleon.sourceforge.net/wiki/index.php?id=Search+Engines"; getpref(BOOL, $layers) == "true" ? pluginmsg(layers, "OpenURL", $theurl) : opennew($theurl); $loaded = "MacMen?"; } MacMen?{ &Macros; &Menus; $loaded = ""; }

JSEnable { getpref(BOOL, $jscript) == "false" ? &JS : macros($macro); } JS{ &JSToggle; macros($macro); &JSToggle; }

Highlight{ $macro = "Find"; &JSEnable; } Find{ open("javascript:(function(){var count=0, text, dv;text=prompt(%22Folgendes suchen und makieren:%22, %22%22);if(textnull || text.length0)return;dv=document.defaultView;function searchWithinNode(node, te, len){var pos, skip, spannode, middlebit, endbit, middleclone;skip=0;if( node.nodeType==3 ){pos=node.data.toUpperCase().indexOf(te);if(pos>=0){spannode=document.createElement(%22SPAN%22); spannode.style.backgroundColor=%22yellow%22;middlebit=node.splitText(pos);endbit=middlebit.splitText(len); middleclone=middlebit.cloneNode(true);spannode.appendChild(middleclone); middlebit.parentNode.replaceChild(spannode,middlebit);count;skip=1;}}else if( node.nodeType1&& node.childNodes&& dv.getComputedStyle(node, null).getPropertyValue(%22display%22)!=%22none%22){for (var child=0; child < node.childNodes.length; child){child=child+searchWithinNode(node.childNodeschild?, te, len);}}return skip;}window.status=%22Searching for '%22+text+%22'...%22;searchWithinNode(document.body, text.toUpperCase(), text.length);window.status=%22Found %22+count+%22 occurrence%22+(count1?%22%22:%22s%22)+%22 of '%22+text+%22'.%22;})();"); }

Keyword{ togglepref(BOOL, "keyword.enabled"); $var = getpref(BOOL, "keyword.enabled") == "true" ? $pref = "EINGESCHALTET" : $pref = "AUSGESCHALTET"; alert("URL Bar Schlüsselwort Autosuche - " . $pref, "Schlüsselwort Autosuche", INFO); &Sync; }

CheckKey?{ $eng = getpref(STRING, "keyword.URL"); } KeyEngBBN?{ $eng = "http://www.google.de/search?hl=de&q="; $string = "BBN"; &KeyEng?; } KeyEngIFL?{ $eng = "http://www.google.de/search?hl=de&lr=lang_de&btnI=1&q="; $string = "IFL"; &KeyEng?; } KeyEngGoog?{ $eng = "http://www.google.de/search?hl=de&lr=lang_de&q="; $string = "GOOG"; &KeyEng?; } KeyConfig?{ &CheckKey?; $eng = prompt("Schlüsselwort Suchmaschine auswählen:", "Schlüsselwort Autosuche", $eng) $eng "" ? "" : $string = ""; $eng "" ? "" : &KeyEng?; } KeyEng?{ setpref(STRING, "keyword.URL", $eng); setpref(STRING, "keyword.eng", $string); &Sync; alert("Schlüsselwort Suchmaschine = '" . $eng . "'\n\n\nDie ausgewählte Suchmaschine ist nach einem K-Meleon Neustart aktiviert. Wort oder Ausdruck in URL Bar eintippen und Enter drücken", "Schlüsselwort Suchmaschine", INFO); }

$taf = "accessibility.typeaheadfind";

TAF{ togglepref(BOOL, $taf); $var = getpref(BOOL, $taf) == "true" ? $bool = " - EINGESCHALTET " : $bool = " - AUSGESCHALTET "; $tip = "Sobald geschrieben"; &Sync; &AlertTAF; } TAFAuto{ togglepref(BOOL, $taf . ".autostart"); $var = getpref(BOOL, $taf . ".autostart") == "true" ? $bool = " - Eingeschaltet. Sobald geschrieben wird automatisch gestartet, wenn eine Seite geladen wird und eine Eingabe erfolgt ." : $bool = " - AUSGESCHALTET "; $tip = "Sobald geschrieben Autostart"; &Sync; &AlertTAF; } TAFLinks{ togglepref(BOOL, $taf . ".linksonly"); $var = getpref(BOOL, $taf . ".linksonly") == "true" ? $bool = " - Eingeschaltet. Sobald geschrieben sucht nur in Links. Sobald geschrieben Für gesammten Text wird durch ausschalten von Nur Links wieder aktiviert." : $bool = " - AUSGESCHALTET "; $tip = "Sobald geschrieben nur für Links "; &Sync; &AlertTAF; } AlertTAF{ alert($tip . $bool, $tip, INFO); }

  1. IMAGE & ZOOM MACROS

ImageInfo?{ $macro = "ImgInfo?"; &JSEnable; } ImgInfo? { $FrameURL=""; $PageURL=$FrameURL; open("javascript: function chkframes(elem) { var rep; if (unescape(elem.location) '".$PageURL."' || '".$PageURL."''') { rep=chkimg(elem); if (rep) return rep; } for (var f=0; f<elem.frames.length; f) { rep=chkframes(elem.framesf?); if (rep) return rep; } return; } function chkimg(elem){ if(elem.document.images.length>0){ var i; for(i=0;i<elem.document.images.length;i){ if(unescape(elem.document.imagesi.src) == '".$ImageURL."'){ return elem.document.imagesi; } } } } function XyZ() { var img=chkframes(window); if (img) { alert(\"* I M A G E P R O P E R T I E S *\\r\\n\\r\\nURL:\\t\" + unescape(img.src) + \"\\r\\nWidth:\\t\" + img.width + \"\\r\\nHeight:\\t\" + img.height + \"\\r\\nALT:\\t\" + img.alt + \"\\r\\nTitle:\\t\" + img.title); } } void(XyZ()); "); }

ImageCache?{ $i = index($ImageURL, "#"); $addr = $i==-1 ? $ImageURL : substr($ImageURL, 0, $i); $client = index($addr, "https://")==0 ? "HTTP-memory-only" : "HTTP"; $var = "about:cache-entry?client=" . $client . "&sb=1&key=" . $addr; index($addr, "http")==0 ? opennew($var) : ""; }

ZoomInImage?{ $macro = "ZoomInImg?"; &JSEnable; } ZoomInImg?{ $FrameURL=""; $PageURL=$FrameURL; open("javascript:function chkframes(elem) { var rep; if (unescape(elem.location) '".$PageURL."' || '".$PageURL."''') { rep=chkimg(elem); if (rep) return rep; } for (var f=0; f<elem.frames.length; f) { rep=chkframes(elem.framesf?); if (rep) return rep; } return; } function chkimg(elem){ if(elem.document.images.length>0){ var i; for(i=0;i<elem.document.images.length;i){ if(unescape(elem.document.imagesi.src) '".$ImageURL."'){ return elem.document.imagesi; } } } } function zoomImage(image, amt) { if(image.initialHeight null) { /* avoid losing height information due to integer rounding while zooming out */ image.initialHeight = image.height; image.initialWidth = image.width; image.scalingFactor = 1; } image.scalingFactor *= amt; image.width = image.scalingFactor * image.initialWidth; image.height = image.scalingFactor * image.initialHeight; } function findIMG() { var img=chkframes(window); zoomImage(img,2); } void(findIMG());"); }

ZoomOutImage?{ $macro = "ZoomOutImg?"; &JSEnable; } ZoomOutImg? { $FrameURL=""; $PageURL=$FrameURL; open("javascript:function chkframes(elem) { var rep; if (unescape(elem.location) '".$PageURL."' || '".$PageURL."''') { rep=chkimg(elem); if (rep) return rep; } for (var f=0; f<elem.frames.length; f) { rep=chkframes(elem.framesf?); if (rep) return rep; } return; } function chkimg(elem){ if(elem.document.images.length>0){ var i; for(i=0;i<elem.document.images.length;i){ if(unescape(elem.document.imagesi.src) '".$ImageURL."'){ return elem.document.imagesi; } } } } function zoomImage(image, amt) { if(image.initialHeight null) { /* avoid losing height information due to integer rounding while zooming out */ image.initialHeight = image.height; image.initialWidth = image.width; image.scalingFactor = 1; } image.scalingFactor *= amt; image.width = image.scalingFactor * image.initialWidth; image.height = image.scalingFactor * image.initialHeight; } function findIMG() { var img=chkframes(window); zoomImage(img,.5); } void(findIMG());"); }

ZoomInImages?{ $macro = "ZoomInImgs?"; &JSEnable; } ZoomInImgs?{ open("javascript:(function(){ function zoomImage(image, amt) { if(image.initialHeight == null) { /* avoid losing height information due to integer rounding while zooming out */ image.initialHeight = image.height; image.initialWidth = image.width; image.scalingFactor = 1; } image.scalingFactor *= amt; image.width = image.scalingFactor * image.initialWidth; image.height = image.scalingFactor * image.initialHeight; } for (i=0; i<document.images.length; ++i) zoomImage(document.imagesi, 1.1); })();"); }

ZoomOutImages?{ $macro = "ZoomOutImgs?"; &JSEnable; } ZoomOutImgs?{ open("javascript:(function(){ function zoomImage(image, amt) { if(image.initialHeight == null) { /* avoid losing height information due to integer rounding while zooming out */ image.initialHeight = image.height; image.initialWidth = image.width; image.scalingFactor = 1; } image.scalingFactor *= amt; image.width = image.scalingFactor * image.initialWidth; image.height = image.scalingFactor * image.initialHeight; } for (i=0; i<document.images.length; ++i) zoomImage(document.imagesi, .9092); })();"); }

ZoomImageLinks?{ $macro = "ZoomImgLinks?"; &JSEnable; } ZoomImgLinks?{ open("javascript:{var hrefs=document.getElementsByTagName('A'),images='';for(idx=0;idx<hrefs.length;idx++) {href=hrefsidx?.href.toUpperCase(); if(href.indexOf('.GIF')>-1||href.indexOf('.BMP')>-1||href.indexOf('.JPEG')>-1||href.indexOf('.JPG')>-1||href.indexOf ('.PNG')>-1)images+='<img src='+hrefsidx?+'>

';}images='<html><body><center><h2>Images</h2>

'+images+'</center> </body></html>'; document.write(images);document.close();}"); }

ZoomInPage?{ $macro = "ZoomInPg?"; &JSEnable; } ZoomInPg?{ open("javascript:function zoomImage(image, amt) { if(image.initialHeight null) {image.initialHeight = image.height; image.initialWidth = image.width; image.scalingFactor = 1; } image.scalingFactor *= amt; image.width = image.scalingFactor * image.initialWidth; image.height = image.scalingFactor * image.initialHeight; }function rZoomFont(n, node) {for ( var i = 0; i < node.childNodes.length; i ) {if (node.childNodesi.nodeType 1) rZoomFont(n, node.childNodesi);}startSize = getComputedStyle(node,).getPropertyValue('font-size');startSize = Number(startSize.substr(0,startSize.length-2));lh = getComputedStyle(node,).getPropertyValue('line-height');if (lh != 'normal') {lh = Number(lh.substr(0,lh.length-2)) * n + 'px';node.style.lineHeight = lh;}newSize = (startSize * n) + 'px';node.style.fontSize = newSize;}rZoomFont(1.1,document.getElementsByTagName('body')0?); for (i=0; i<document.images.length; i) zoomImage(document.imagesi, 1.1);"); }

ZoomOutPage?{ $macro = "ZoomOutPg?"; &JSEnable; } ZoomOutPg?{ open("javascript:function zoomImage(image, amt) { if(image.initialHeight null) {image.initialHeight = image.height; image.initialWidth = image.width; image.scalingFactor = 1; } image.scalingFactor *= amt; image.width = image.scalingFactor * image.initialWidth; image.height = image.scalingFactor * image.initialHeight; }function rZoomFont(n, node) {for ( var i = 0; i < node.childNodes.length; i ) {if (node.childNodesi.nodeType 1) rZoomFont(n, node.childNodesi);}startSize = getComputedStyle(node,).getPropertyValue('font-size');startSize = Number(startSize.substr(0,startSize.length-2));lh = getComputedStyle(node,).getPropertyValue('line-height');if (lh != 'normal') {lh = Number(lh.substr(0,lh.length-2)) * n + 'px';node.style.lineHeight = lh;}newSize = (startSize * n) + 'px';node.style.fontSize = newSize;}rZoomFont(0.9092,document.getElementsByTagName('body')0?); for (i=0; i<document.images.length; i) zoomImage(document.imagesi, .9092);"); }

$zoom = "kmeleon.general.zoomButtons";

ZoomSet?{ setpref(STRING, $zoom, $var); &Sync; alert("Zoom Schaltflächen benutzen für " . $what, Zoom Schaltflächen, INFO); } ZoomText?{ $var = "text"; $what = "Text."; &ZoomSet?; } ZoomImages{ $var = "images"; $what = "Bilder."; &ZoomSet?; } ZoomPage?{ $var = ""; $what = "beides, Bilder und Text."; &ZoomSet?; }

ZoomIn?{ $zi = getpref(STRING, $zoom); $zi == "" ? &ZoomInPage? : &ZoomInCheck?; } ZoomInCheck?{ $zi == "text" ? id(ID_FONT_INCREASE?) : &ZoomInImages?; }

ZoomOut?{ $zo = getpref(STRING, $zoom); $zo == "" ? &ZoomOutPage? : &ZoomOutCheck?; } ZoomOutCheck?{ $zo == "text" ? id(ID_FONT_DECREASE?) : &ZoomOutImages?; }

  1. BOOKMARK MACROS

FileBook?{ plugin(bookmarks, Add); plugin(bookmarks, Edit); } FileHot?{ plugin(hotlist, Add); plugin(hotlist, Edit); } FileFav?{ plugin(favorites, Add); plugin(favorites, Edit); }

FavToolbar?{ $tf = "kmeleon.plugins.favorites.toolbarFolder"; $folder = getpref(STRING, $tf); $folder == "" ? $folder = "Links" : ""; $folder = prompt("Name des Ordners der in der Favoriten Leiste angezeigt wird eingeben.", "Favoriten Leisten Ordner", $folder); $folder == "" ? "" : setpref(STRING, $tf, $folder); $folder == "" ? "" : alert("Nach einem K-Meleon Neustart ist ' " . $folder . " ' der angezeigte Favoriten Ordner", Favoriten Ordner, INFO); } ChangeLinks?{ $tit = "kmeleon.plugins.favorites.title"; $favtit = getpref(STRING, $tit); $favtit == "" ? $favtit = "Links" : ""; $favtit = prompt("Namen für die Favoriten Leiste eingeben.", "Leiste Name (Leer lassen oder auf Abbrechen klicken um den Namen zu entfernen)", $favtit); setpref(STRING, $tit, $favtit); alert("Dia Änderung wird nach einem Neustart von K-Meleon wirksam", Favoriten Leiste Name, INFO); }

Chevron{ $chevron = "kmeleon.plugins." . $plugin . ".chevron"; togglepref(BOOL, $chevron); &Sync; getpref(BOOL, $chevron) == "true" ? $var = "- EINGESCHALTET" : $var = "- AUSGESCHALTET"; alert("\nLeisten Aufklappmenü " . $var . "\n\n\nDie Änderung wird sichtbar wenn K-Meleon neu gestartet wird.", "Leisten Aufklappmenü", INFO); }

BookChev?{ $plugin = "bookmarks"; &Chevron; } FavChev?{ $plugin = "favorites"; &Chevron; } HotChev?{ $plugin = "hotlist"; &Chevron; }

$ol="ID_OPEN_LINK?"; $nw="ID_OPEN_LINK_IN_NEW_WINDOW?"; $bw="ID_OPEN_LINK_IN_BACKGROUND?"; $lo="layers(OpenURL)"; $bl="layers(OpenURLBg?)"; $book = "kmeleon.plugins.bookmarks.openurl"; $fav = "kmeleon.plugins.favorites.openurl"; $hot = "kmeleon.plugins.hotlist.openurl";

openurl{ setpref(STRING, "kmeleon.plugins." . $plugin . ".openurl", $how); &Sync; }

OpenBook1?{ $plugin = "bookmarks"; $how = $ol; &openurl; } OpenBook2?{ $plugin = "bookmarks"; $how = $nw; &openurl; } OpenBook3?{ $plugin = "bookmarks"; $how = $lo; &openurl; } OpenBook4?{ $plugin = "bookmarks"; $how = $bl; &openurl; } OpenBook5?{ $plugin = "bookmarks"; $how = $bw; &openurl; }

OpenFav1?{ $plugin = "favorites"; $how = $ol; &openurl; } OpenFav2?{ $plugin = "favorites"; $how = $nw; &openurl; } OpenFav3?{ $plugin = "favorites"; $how = $lo; &openurl; } OpenFav4?{ $plugin = "favorites"; $how = $bl; &openurl; } OpenFav5?{ $plugin = "favorites"; $how = $bw; &openurl; }

OpenHot1?{ $plugin = "hotlist"; $how = $ol; &openurl; } OpenHot2?{ $plugin = "hotlist"; $how = $nw; &openurl; } OpenHot3?{ $plugin = "hotlist"; $how = $lo; &openurl; } OpenHot4?{ $plugin = "hotlist"; $how = $bl; &openurl; } OpenHot5?{ $plugin = "hotlist"; $how = $bw; &openurl; }

  1. GROUP MACROS

$kg = "kmeleon.group."; $URL=""; $rl = "ReplaceLayersInWindow?"; $al = "AddLayersToWindow?"; $gl = "GetLayersInWindow?"; $fn = "FindNick?"; $how = ""; $gn = "kmeleon.groupnames";

ReadNames?{ $names = getpref(STRING, $gn); } Checkname{ $checkname = "\n" . $name . "\n"; $exists = index($names, $checkname); }

SaveAsGroup?{ &ReadNames?; $names == "" ? $names = "\n" :0; $group = pluginmsgex(layers, $gl,"",STRING); $name = prompt("Gruppen Name für diese Schichten eingeben:", "Gruppen Name?", ""); $name == "" ? "" : &Checkname; $name == "" ? "" : $exists != -1 ? &ConfirmGroup? : &SaveGroup?; } ConfirmGroup?{ confirm("Gruppen Name vorhanden,überschreiben?", "Gruppen Name '" . $name . "' vorhanden", YESNO, EXCLAIM)=="YES" ? setpref(STRING, $kg . $name, $group) : &SaveAsGroup?; } SaveGroup?{ setpref(STRING, $gn, $names . $name . "\n"); setpref(STRING, $kg . $name, $group); confirm("\n '" . $name . "' in die URL Bar eingeben und dann SHIFT+ENTER drücken um die Gruppe alleine oder ALT+ENTER drücken um die Gruppe neben einer bestehenden zum öffnen.\n\n\nDiese Gruppe jedesmal öffnen wenn K-Meleon gestartet wird?","Gruppe gespeichert als: " . $name, YESNO) == "NO" ? "" : &AlertGroup?; }

SavedGroups?{ &ReadNames?; $names == "" ? $var = "Ordner" : $var = "Gruppe"; $names == "" ? $names = "Keine Gruppe gefunden" ."\n" :0; $open = confirm($names . "\n\n" . $var . " öffnen?", "Gespeicherte Gruppen") == "OK" ? &GroupNext?:""; }

URLToGroup?{ $name = prompt("URL hinzufügen zur Gruppe:", "Gruppen Name?", ""); getpref(STRING, $kg . $name); $group = getpref(STRING, $kg . $name); $name "" ? "" : $group "" ? &NoGroup? : &AddURL; } AddURL{ setpref(STRING, $kg . $name, $group . $URL . "\t"); alert(" URL '" . $TITLE . "' zur Gruppe hinzugefügt: " . $name, "Gruppe: '" . $name . "' Aktualisiert", INFO); }

NoGroup?{ alert("Keine Gruppe gefunden"); }

LayersToGroup? { $name = prompt("Schicht hinzufügen zur Gruppe:", "Gruppen Name?", ""); getpref(STRING, $kg . $name); $group = getpref(STRING, $kg . $name); $name "" ? "" : $group "" ? &NoGroup? : &AddLayers?; } AddLayers?{ $curr = pluginmsgex(layers,"Schichten im Fenster hinzufügen","",STRING); setpref(STRING, $kg . $name, $group . $curr); alert("Schichten zur Gruppe hinzugefügt: " . $name, "Gruppe: '" . $name . "' Aktualisiert", INFO); }

DeleteGroup?{ &ReadNames?; $names == "" ? alert("Keine Gruppe gefunden") : &ConfirmDelete?; } ConfirmDelete?{ $open = confirm($names . "\n\nEine dieser Gruppen löschen?", "Gespeicherte Gruppen", YESNO); $open == "NO" ? "" : &PromptDelete?; } PromptDelete?{ $name = prompt("Name der zu löschenden Gruppe eingeben:", "Gruppen Name?", ""); $name == "" ? "" : &Checkname; $name == "" ? "" : $exists != -1 ? &DeleteURLs? : &NoGroup?; } DeleteURLs?{ $names = sub($checkname, "\n", $names); setpref(STRING, $gn, $names); setpref(STRING, $kg . $name, ""); alert("URLs der Gruppe: '" . $name . "' gelöscht.", "Gruppe gelöscht", INFO); }

PluginCheck?{ getpref(BOOL, "kmeleon.plugins.bookmarks.load") == "false" ? $hot = getpref(BOOL, "kmeleon.plugins.hotlist.load"):""; $hot == "false" ? $tip = "Gruppen Name" : $tip = "Gruppen Name oder Ordner Alias eingeben"; }

SetOnly?{ setpref(STRING, $og, "layers(ReplaceLayersInWindow?)"); } SetNext?{ setpref(STRING, $og, "layers(AddLayersToWindow?)"); } GroupOnly?{ $how = $rl; &SetOnly?; &OpenGroup?; $how = $al; &SetNext?; } GroupNext?{ $how = $al; &SetNext?; &OpenGroup?; } OpenGroup?{ $old = getclipboard(); setclipboard(); id(ID_SELECT_URL?); id(ID_EDIT_COPY?); $name = getclipboard(); $name == "" ? $name = $URL : ""; $name == $URL ? &PromptGroup? : &ChkGroup?; setclipboard($old); } PromptGroup?{ &PluginCheck?; $name = prompt($tip, "Gruppen Name?", ""); $name == "" ? "" : &ChkGroup?; } ChkGroup?{ $group = getpref(STRING, $kg . $name); $group == "" ? &ChkFolder? : &Group; } ChkFolder?{ $plugin="bookmarks"; $group = pluginmsgex($plugin, $fn, $name, STRING) == "" ? $plugin="hotlist":""; pluginmsgex($plugin, $fn, $name, STRING) == "" ? &ResetURL : &Folder; } Group{ $how == "" ? $how = $al:""; pluginmsg(layers, $how, $group); } Folder{ setclipboard($name); id(ID_SELECT_URL?); id(ID_EDIT_PASTE?); id(ID_NAV_GO?); &ResetURL; }

  1. STARTUP GROUP & LAST SESSION MACROS

$loaded=""; $sg="kmeleon.general.startGroup"; $sn="kmeleon.general.startGroupName"; $sh="kmeleon.general.startHome"; $og="kmeleon.general.opengroup"; $gt="kmeleon.grouptemp"; $kl="kmeleon.grouplast"; $ln="ID_OPEN_LINK_IN_NEW_WINDOW?|ID_OPEN_LINK_IN_BACKGROUND?";

StartGroup?{ $oldname = getpref(STRING, $sn); &PluginCheck?; $name = prompt($tip, "Startgruppe Name?", $oldname); $name "" ? "" : $group = getpref(STRING, $kg . $name) "" ? &FolderCheck? : &AlertGroup?; } FolderCheck?{ $plugin="bookmarks"; $group = pluginmsgex($plugin, $fn, $name, STRING) == "" ? $plugin="hotlist":0; $group = pluginmsgex($plugin, $fn, $name, STRING) == "" ? &NoStart? : &AlertGroup?; } AlertGroup?{ setpref(INT, $sg, 2); setpref(STRING, $sn, $name); setpref(BOOL, $sh, false); &Sync; alert("Gruppe oder Ordner mit Namen: '" . $name . "' wird geöffnet wenn K-Meleon gestartet wird.", "Startgruppe EINGESCHALTET - " . $name, INFO); } NoStart?{ &NoGroup?; setpref(STRING, $sn, $oldname); &StartGroup?; } StartLast?{ setpref(INT, $sg, 3); setpref(BOOL, $sh, "false"); &Sync; alert("Die Seiten der letzten Sitzung werden beim Start von K-Meleon aufgerufen.", "Starte mit letzter Sitzung EINGESCHALTET" , INFO); } StartHome?{ setpref(INT, $sg, 0); setpref(BOOL, $sh, true); &Sync; } StartBlank?{ setpref(INT, $sg, 1); setpref(BOOL, $sh, false); &Sync; }

GroupStart?{ $oldclip = getclipboard(); $name = getpref(STRING, $sn); id(ID_SELECT_URL?); id(ID_EDIT_COPY?); $theurl = getclipboard(); $theurl == "about:blank" ? &LayersCheck?:""; setclipboard($oldclip); $loaded=""; } LayersCheck?{ getpref(BOOL, $layers) == "true" ? &StartLayers? : &StartWindows?; } StartLayers?{ $how = $rl; &SetOnly?; getpref(INT, $sg) == 3 ? &OpenLast? : &OpenStart?; $how = $al; &SetNext?; } OpenLast?{ $group = getpref(STRING, $kl); $group == ""? alert("Keine Sitzung gefunden") : &Group; } OpenStart?{ $name = getpref(STRING, $sn); &ChkGroup?; } StartWindows?{ setpref(STRING, $og, "ID_OPEN_LINK?|ID_OPEN_LINK_IN_BACKGROUND?"); $name = getpref(STRING, $sn); getpref(INT, $sg) == 3 ? "" : &ChkFolder?; setpref(STRING, $og, $ln); }

GetSetTemp?{ $group = pluginmsgex(layers,$gl,"",STRING); setpref(STRING, $gt, $group); } SetLast?{ $group = getpref(STRING, $gt); setpref(STRING, $kl, $group); } OpenClosed?{ $how = $rl; $group = getpref(STRING, $gt); $curr = pluginmsgex(layers,$gl,"",STRING); $group $curr ? "" : $curr = ""; $curr "" ? &Group : "" ; }

ReloadAll?{ $how = $rl; &GetSetTemp?; &Group; }

Home{ getpref(INT, $sg) < 2 ? id(ID_NAV_HOME?) : ""; getpref(INT, $sg) 2 ? &OpenStart? : ""; getpref(INT, $sg) 3 ? &OpenLast? : ""; }

  1. EVENT MACROS w/LAST SESSION & STARTUP GROUP SUPPORT

OnStartup?{ &SetLast?; getpref(BOOL, $layers) == "true" ? &SetOnly? : setpref(STRING, $og, $ln); getpref(INT, $sg) < 2 ? &SetNext? : $loaded="GroupStart?"; &Sync; }

OnLoad?{ $URL == "about:blank" ? id(ID_SELECT_URL?):""; $loaded == "" ? "" : macros($loaded); &GetSetTemp?; &Sync; }

OnCloseGroup?{ &GetSetTemp?; }

OnWMAppExit?{ &GetSetTemp?; }

OnQuit?{ &SetLast?; }

  1. MAIL MACROS

ReadClient?{ $mclient = getpref(STRING, "kmeleon.general.MailClient?"); $nclient = getpref(STRING, "kmeleon.general.NewsClient?"); } ParseMail?{ &ReadClient?; $which = "Mail"; $client = $mclient; $ex = "freemail.web.de/"; } ParseNews?{ &ReadClient?; $which = "News"; $client = $nclient; $ex = "news.google.de"; } Mail{ &ParseMail?; $mclient "" ? &ClientPath? : $web = index($mclient, "http") -1 ? exec($mclient) : opennew($mclient); } News{ &ParseNews?; $nclient "" ? &ClientPath? : $web = index($nclient, "http") -1 ? exec($nclient) : opennew($nclient); } ClientPath?{ &ReadClient?; $client == "" ? $client = "C:\\Programme\\Outlook Express\\msien.exe":0; $client = prompt("Pfadangabe oder URL (z.b. http://" . $ex . ") des Programms.", $which . " Programm Ordner", $client); $client == "" ? "" : setpref(STRING, "kmeleon.general." . $which . "Client", $client); $client == "" ? "" : alert("\n" . $which . " Programm = '" . $client . "'\n\n\nAuf die " . $which . " Schaltfläche klicken um das " . $which . " Programm zu starten.", $which . " Programm", INFO); } MCFG{ &ParseMail?; &ClientPath?; } NCFG{ &ParseNews?; &ClientPath?; }

Compose{ $old = getclipboard(); open("mailto:"); &ResetURL; setclipboard($old); }

EmailURL{ $old = getclipboard(); open("?subject=".gsub("&","%26",$TITLE)."&body=".gsub("&","%26",$URL)); &ResetURL; setclipboard($old); } EmailImageURL?{ $old = getclipboard(); open("?subject=".gsub("&","%26",$TITLE)."&body=".gsub("&","%26",$IMAGEURL)); &ResetURL; setclipboard($old); } EmailFrameURL?{ $old = getclipboard(); open("?subject=".gsub("&","%26",$TITLE)."&body=".gsub("&","%26",$FRAMEURL)); &ResetURL; setclipboard($old); } EmailText?{ $macro = "EmailTxt?"; &JSEnable; } EmailTxt?{ open("javascript:(function(){var sel=document.getSelection();if(sel)self.location=\"?subject=\"+document.title+\"&body=\"+escape(sel)})()"); }

  1. PRIVACY MACROS

$animation = "image.animation_mode"; $colors = "browser.display.use_document_colors"; $cookies = "network.cookie.cookieBehavior"; $images = "network.image.imageBehavior"; $java = "security.enable_java"; $jscript = "javascript.enabled"; $popups = "dom.disable_open_during_load"; $referer = "network.http.sendRefererHeader";

AniToggle? { togglepref(STRING, $animation, "normal", "none"); &Sync; getpref(STRING, $animation) == "none" ? $tip = "BLOCKED" : $tip = "ALLOWED"; statusbar("Animation " . $tip); }

CToggle{ togglepref(BOOL, $colors); &Sync; getpref(BOOL, $colors) == "false" ? $tip = "BLOCKED" : $tip = "ALLOWED"; statusbar("Page Colors " . $tip); }

CKToggle { togglepref(INT, $cookies, 2,0); &Sync; getpref(INT, $cookies) == "2" ? $tip = "BLOCKED" : $tip = "ALLOWED"; statusbar("Cookies " . $tip); }

PBToggle{ togglepref(BOOL, $popups); &Sync; getpref(BOOL, $popups) == "true" ? $tip = "BLOCKED" : $tip = "ALLOWED"; statusbar("Popups " . $tip); }

JToggle{ togglepref(BOOL, $java); &Sync; getpref(BOOL, $java) == "false" ? $tip = "BLOCKED" : $tip = "ALLOWED"; statusbar("Java " . $tip); }

JSToggle{ togglepref(BOOL, $jscript); &Sync; getpref(BOOL, $jscript) == "false" ? $tip = "BLOCKED" : $tip = "ALLOWED"; statusbar("JavaScript " . $tip); }

ImgToggle? { togglepref(INT, $images, 2,0); &Sync; getpref(INT, $images) == "2" ? $tip = "BLOCKED" : $tip = "ALLOWED"; statusbar("Images " . $tip); }

RefToggle? { togglepref(INT, $referer, 2,0); &Sync; getpref(INT, $referer) == "2" ? $tip = "ALLOWED" : $tip = "BLOCKED"; statusbar("Referer " . $tip); }

$ua = "general.useragent.override"; $pu = "kmeleon.privacy.useragent"; $pn = ".name"; $ps = ".string"; $uan = ""; $uas = "", $var = "";

UA{ $uas = getpref(STRING, $pu . "0" . $ps); $uan = getpref(STRING, $pu . "0" . $pn); &SetUA; } UA1{ $uas = getpref(STRING, $pu . "1" . $ps); $uan = getpref(STRING, $pu . "1" . $pn); &SetUA; } UA2{ $uas = getpref(STRING, $pu . "2" . $ps); $uan = getpref(STRING, $pu . "2" . $pn); &SetUA; } UA3{ $uas = getpref(STRING, $pu . "3" . $ps); $uan = getpref(STRING, $pu . "3" . $pn); &SetUA; }

GetUA{ $uas = getpref(STRING, $ua); $uas == "" ? $uas = getpref(STRING, $pu . "0" . $ps) : ""; } UACust{ &GetUA; $uas = prompt("K-Meleon soll sich identifizieren als:", "Benutzerdefiniert", $uas); $uan = ""; $uas == "" ? "" : &SetUA; } SetUA{ setpref(STRING, $ua, $uas); &Sync; &AlertUA; } AlertUA{ &GetUA; $uan == "" ? $var = getpref(STRING, $pu . "0" . $ps):""; $var == $uas ? $uan = "Original" : ""; alert($uas, "Browser gibt sich aus als: " . $uan, INFO); }

ClearAll?{ plugin(privacy, ClearCache?); plugin(privacy, ClearCookies?); plugin(privacy, ClearHistory?);plugin(privacy, ClearMRU); plugin(privacy, ClearSignon?); }

KillFlash?{ $old = getclipboard(); $macro = "KillFlsh?"; &JSEnable; &ResetURL; setclipboard($old); } KillFlsh?{ open(" javascript: (function(){var d=document; function K(N,t) { var b = d.createElement('div'); b.style.width=N.width; b.style.height=N.height; b.innerHTML='<del>' + t + '</del>'; N.parentNode.replaceChild(b,N); } function Z(t) { var T = d.getElementsByTagName(t), i; for (i=T.length-1;i+1;--i) K(Ti,t); } Z('object'); Z('embed');})(); (function(){document.close();})(); "); }

KillApplets?{ $old = getclipboard(); $macro = "KillApp?"; &JSEnable; &ResetURL; setclipboard($old); } KillApp?{ open(" javascript: (function(){var d=document; function K(N,t) { var b = d.createElement('div'); b.style.width=N.width; b.style.height=N.height; b.innerHTML='<del>' + t + '</del>'; N.parentNode.replaceChild(b,N); } function Z(t) { var T = d.getElementsByTagName(t), i; for (i=T.length-1;i+1;--i) K(Ti,t); } Z('applet');})(); (function(){document.close();})(); "); }

  1. LAYER MACROS

$catch = "kmeleon.plugins.layers.catchOpen"; $mode = "kmeleon.general.mode"; $flip = "dom.disable_window_flip";

LayersOnly?{ $var = "Nur Schichten"; setpref(BOOL, $layers, true); setpref(BOOL, $catch, true); $bool = "true"; $menu = "false"; &Scripts; setpref(STRING, $mode, $var); &Sync; alert("Alle neuen Fenster werden als Schicht geöffnet. Wenn die Änderung aus dem Nur Fenster Modus heraus gemacht wurde, muss K-Meleon neu gestartet werden um den Nur Schichten Modus zu nutzen.", "Browserverhalten: " . $var, INFO); }

LayersWindows?{ $var = ""; setpref(BOOL, $layers, true); setpref(BOOL, $catch, false); setpref(STRING, $mode, $var); &Sync; alert("Schichten UND Fenster können jetzt verwendet werden. Wenn die Änderung aus dem Nur Fenster Modus heraus gemacht wurde, muss K-Meleon neu gestartet werden um Schichten UND Fenster zu nutzen.", "Browserverhalten: " . $var, INFO); }

WindowsOnly?{ $var = "Nur Fenster"; $quest = confirm("\nDer Nur Fenster Modus schaltet den Schichten Modus aus. Gruppen und Sitzungen sind nicht verfügbar, nur Ordner Gruppen für Lesezeichen & Hotlist Benutzer.\n\n\nSchichten Modus ausschalten?", "Browserverhalten: " . $var, YESNO, EXCLAIM); $quest == "NO" ? "" : &SetWO; } SetWO{ setpref(BOOL, $layers, false); setpref(BOOL, $catch, false); setpref(STRING, $mode, $var); &Sync; alert("Der Nur Fenster Modus wird nach einem Neustart von K-Meleon wirksam.", "Browserverhalten: " . $var, INFO); }

BlockScripts?{ $bool = "true"; $menu = "false"; &Scripts; &Sync; alert("Seiten ist es jetzt VERBOTEN Werkzeugleisten zu verstecken, die Fenstergrösse zu ändern und das Kontextmenü abzuschalten.", Script, INFO); } AllowScripts?{ $bool = "false"; $menu = "true"; &Scripts; &Sync; alert("Seiten ist es jetzt ERLAUBT Werkzeugleisten zu verstecken, die Fenstergrösse zu ändern und das Kontextmenü abzuschalten.", Script, INFO); } Scripts{ setpref(BOOL, $flip, $bool); setpref(BOOL, "dom.disable_window_move_resize", $bool); setpref(BOOL, "dom.disable_window_open_feature.*", $bool); setpref(BOOL, "dom.disable_window_open_feature.minimizable", $bool); setpref(BOOL, "dom.disable_window_open_feature.titlebar", $bool); setpref(BOOL, "dom.disable_window_open_feature.close", $bool); setpref(BOOL, "dom.disable_window_open_feature.toolbar", $bool); setpref(BOOL, "dom.disable_window_open_feature.location", $bool); setpref(BOOL, "dom.disable_window_open_feature.directories", $bool); setpref(BOOL, "dom.disable_window_open_feature.personalbar", $bool); setpref(BOOL, "dom.disable_window_open_feature.menubar", $bool); setpref(BOOL, "dom.disable_window_open_feature.scrollbars", $bool); setpref(BOOL, "dom.disable_window_open_feature.resizable", $bool); setpref(BOOL, "dom.disable_window_open_feature.status", $bool); setpref(BOOL, "dom.disable_window_status_change", $bool); setpref(BOOL, "dom.event.contextmenu.enabled", $menu); }

$num = "kmeleon.plugins.layers.numbers"; $style = "kmeleon.plugins.layers.style";

LayerAlert?{ alert("Einige Änderungen werden erst in einer neuer Schicht wirksam.", "Schichten Darstellung geändert", INFO); } Enumerate{ togglepref(BOOL, $num); &Sync; &LayerAlert?; } Style{ setpref(INT, $style, $int); &Sync; &LayerAlert?; } Pressed{ $int = "2"; &Style; } Pressed+{ $int = "10"; &Style; } Buttons{ $int = "6"; &Style; } Buttons+{ $int = "14"; &Style; }

LayersTitle?{ $var = getpref(STRING, "kmeleon.plugins.layers.title"); $var == "" ? $var = "Layers:" : ""; $var = prompt("Schichten Leiste->Name eingeben:", "Schichten Leiste->Name ( Um den Namen zu entfernen, leer lassen oder auf abbrechen klicken )", $var); setpref(STRING, "kmeleon.plugins.layers.title", $var); alert("Schichten Leiste->Name = " . $var . "\n\nDie Einstellung wird nach einem Neustart von K-Meleon wirksam.", "Schichten Leiste->Name", INFO); }

New{ $old = getclipboard(); setclipboard(); id(ID_EDIT_COPY?); $add = getclipboard(); setclipboard($URL); id(ID_SELECT_URL?); id(ID_EDIT_PASTE?); $add == "" ? &Open : &OpenNew?; }

Open{ getpref(BOOL, $layers) == "true" ? plugin(layers, Open) : id(ID_NEW_BROWSER?); setclipboard($old); }

Close{ getpref(BOOL, $layers) == "true" ? plugin(layers, Close) : id(ID_FILE_CLOSE?); }

$onClose = "kmeleon.plugins.layers.onCloseOption"; $onOpen = "kmeleon.plugins.layers.onOpenOption";

SetCloseRight?{ setpref(INT, $onClose, 2); &Sync; } SetCloseLeft?{ setpref(INT, $onClose, 1); &Sync; } SetCloseLast?{ setpref(INT, $onClose, 0); &Sync; } SetOpenNext?{ setpref(INT, $onOpen, 1); &Sync; } SetOpenLast?{ setpref(INT, $onOpen, 0); &Sync; }

$confirm = "kmeleon.plugins.layers.confirmClose";

ConfirmToggle?{ togglepref(BOOL, $confirm); &Sync; getpref(BOOL, $confirm) == "false" ? $tip = "AUSGESCHALTET" : $tip = "EINGESCHALTET"; statusbar("Bestätigen vorm schliessen " . $tip); }

  1. SAVE MACROS

$sd = "kmeleon.general.saveDir"; $si = "kmeleon.general.saveImageDir"; $sld = "kmeleon.general.saveLinkDir"; $dir = "kmeleon.general.profileDir"; $path = getpref(STRING, $dir);

GetSave?{ $savedir = getpref(STRING, $sd); } GetImage?{ $imagedir = getpref(STRING, $si); } GetLink?{ $linkdir = getpref(STRING, $sld); }

SaveDir?{ &GetSave?; $savedir == "" ? setpref(STRING, $sd, $path):""; }

SaveImage?{ &SaveDir?; $oldsave = $savedir; &GetImage?; setpref(STRING, $sd, $imagedir); id(ID_SAVE_IMAGE_AS?); setpref(STRING, $sd, $oldsave); }

SaveLink?{ &SaveDir?; $oldsave = $savedir; &GetLink?; setpref(STRING, $sd, $linkdir); id(ID_SAVE_LINK_AS?); setpref(STRING, $sd, $oldsave); }

$savetip = "Ordner Pfad. (Umgekehrten Schrägstrich am Ende nicht vergessen.)";

PageDir?{ &SaveDir?; $save = "\"Seite speichern als\" Ordner"; &GetSave?; $savedir = prompt($savetip, $save, $savedir); $savedir == "" ? "" : setpref(STRING, $sd, $savedir); $savedir "" ? "" : $savepath = $savedir; $savedir "" ? "" : &AlertSave?; }

ImageDir?{ &SaveDir?; $save = "\"Bild speichern als\" Ordner"; &GetImage?; $imagedir = prompt($savetip, $save, $imagedir); $imagedir == "" ? "" : setpref(STRING, $si, $imagedir); $imagedir "" ? "" : $savepath = $imagedir; $imagedir "" ? "" : &AlertSave?; }

LinkDir?{ &SaveDir?; $save = "\"Link speichern als\" Ordner"; &GetLink?; $linkdir = prompt($savetip, $save, $linkdir); $linkdir == "" ? "" : setpref(STRING, $sld, $linkdir); $linkdir "" ? "" : $savepath = $linkdir; $linkdir "" ? "" : &AlertSave?; }

AlertSave?{ alert($save . " = " . $savepath, $save, INFO); }

  1. URL BAR MACROS

$dom = "kmeleon.general.domComplete";

ctrl_enter{ $var = "0"; &GetComplete?; &Domain; } ctrl_alt_enter{ $var = "1"; &GetComplete?; &Domain; } ctrl_shift_enter{ $var = "2"; &GetComplete?; &Domain; }

GetComplete?{ $prefix = getpref(STRING, $dom . $var . ".prefix"); $prefix == "" ? $prefix = "http://www." : ""; $suffix = getpref(STRING, $dom . $var . ".suffix"); $var "0" ? ($suffix "" ? $suffix = ".de" : "";):""; $var "1" ? ($suffix "" ? $suffix = ".com" : "";):""; $var "2" ? ($suffix "" ? $suffix = ".org" : "";):""; }

Domain{ $old = getclipboard(); setclipboard(); id(ID_SELECT_URL?); id(ID_EDIT_COPY?); $theurl = getclipboard(); $theurl == "" ? &ResetURL : &Complete; setclipboard($old); } Complete{ $fullurl = $prefix . $theurl . $suffix; setclipboard($fullurl); id(ID_EDIT_PASTE?); id(ID_NAV_GO?); }

CEConfig{ $var = "0"; &GetComplete?; $tip = "Strg + Enter"; &DomConfig?; } CAEConfig{ $var = "1"; &GetComplete?; $tip = "Strg + Alt + Enter"; &DomConfig?; } CSEConfig{ $var = "2"; &GetComplete?; $tip = "Strg + Shift + Enter"; &DomConfig?; }

DomConfig?{ $prefix = prompt("Prefix:", $tip, $prefix); $prefix == "" ? "" : setpref(STRING, $dom . $var . ".prefix", $prefix); $prefix == "" ? "" : $suffix = prompt("Suffix:", $tip, $suffix); $prefix "" ? "" : $suffix "" ? "" : setpref(STRING, $dom . $var . ".suffix", $suffix); $prefix "" ? "" : $suffix "" ? "" : alert($prefix . " + " . $suffix, $tip, INFO); }

SelectGo?{ $old = getclipboard(); setclipboard(); id(ID_EDIT_COPY?); $word = getclipboard(); setclipboard($word); $word == "" ? id(ID_NAV_GO?) : &go; setclipboard($old); }

URLInNew?{ $old = getclipboard(); setclipboard(); id(ID_SELECT_URL?); id(ID_EDIT_COPY?); $add = getclipboard(); &OpenNew?; }

OpenNew?{ &ResetURL; setclipboard($add); getpref(BOOL, $layers) == "true" ? pluginmsg(layers, "OpenURL","about:blank") : opennew("about:blank"); $loaded="go"; }

go{ &PasteGo?; setclipboard($old); $loaded=""; }

detach{ $old = getclipboard(); setclipboard($URL); plugin(layers,Close); opennew("about:blank"); $loaded="go"; }

Copy{ id(ID_SELECT_URL?); id(ID_EDIT_COPY?); }

PasteGo?{ id(ID_SELECT_URL?); id(ID_EDIT_PASTE?); id(ID_NAV_GO?); }

PasteSearch?{ id(ID_SELECT_URL?); id(ID_EDIT_PASTE?); &Search; }

ResetURLBar?{ $old = getclipboard(); &ResetURL; setclipboard($old); }

up_directory { $var = dirname($URL); $var == "." ? "" : open($var); }

top_level { $macro = "top"; &JSEnable; } top{ open("javascript:location.pathname = ""; void 0"); }

  1. MOUSE GESTURES

$mouse = "kmeleon.plugins.gestures.";

Gestures{ togglepref(BOOL, $mouse . "load"); &Sync; getpref(BOOL, $mouse . "load") == "true" ? $tip = " EINGESCHALTET" : $tip = " AUSGESCHALTET"; alert("Maus Gesten sind " . $tip . " wenn K-Meleon neu gestartet wird.", "MAUS GESTEN" . $tip, INFO); }

GestGuide?{ $var = confirm("*M A U S E G E S T EN E I N R I C H T E N H I L F E*\n\nDiese Hilfe ermöglicht das Einrichten aller Gesten nacheinander , wenn jedesmal ein Kommando oder Makro für die gerade geöffnete Geste eingegeben wird.Jede Geste hat den entsprechenden Titel.Die Einträge (z.b. ID_APP_ABOUT? ) können aus der Liste kopiert werden.\n\n\nListe der möglichen Kommandos und Makros für Maus Gesten einsehen? (Sehr Hilfreich)","MAUS GESTEN", YESNOCANCEL); $var "YES" ? &Commands1st?:0; $var "NO" ? &left:0; $var == "CANCEL" ? "":0; } Commands1st?{ &Commands; &left; }

GestCFG{ $cmd = getpref(STRING, $mouse . $gest); $cmd = prompt("ID_COMMAND, PLUGIN COMMAND, oder MACRO für diese Geste wählen.", $gest, $cmd); $cmd == "" ? "" : setpref(STRING, $mouse . $gest, $cmd); $cmd "" ? "" : confirm($gest . " = " . $cmd . "\n\n Nächste Geste einrichten?", "MAUS GESTE", YESNO) "YES" ? macros($next):0; }

left{ $gest = "Nach links"; $next = "right"; &GestCFG; } right{ $gest = "Nach rechts"; $next = "down"; &GestCFG; } down{ $gest = "Nach unten"; $next = "downleft"; &GestCFG; } downleft{ $gest = "Nach unten dann links"; $next = "downright"; &GestCFG; } downright{ $gest = "Nach unten dann rechts"; $next = "up"; &GestCFG; } up{ $gest = "Nach oben"; $next = "upleft"; &GestCFG; } upleft{ $gest = "Nach oben dann links"; $next = "upright"; &GestCFG; } upright{ $gest = "Nach oben dann rechts"; $next = "left"; &GestCFG; }

  1. BUTTON & MENU SYNC

Sync{

&EngineSync?; setcheck("macros(SN0)", getpref(INT, $so) == 0 ? true:false); setcheck("macros(SN1)", getpref(INT, $so) == 1 ? true:false); setcheck("macros(SN2)", getpref(INT, $so) == 2 ? true:false); setcheck("macros(SearchLock?)", getpref(BOOL, $sl));

setcheck("macros(Keyword)", getpref(BOOL, "keyword.enabled")); setcheck("macros(KeyEngBBN?)", getpref(STRING, "keyword.eng") == "BBN" ? true:false); setcheck("macros(KeyEngIFL?)", getpref(STRING, "keyword.eng") == "IFL" ? true:false); setcheck("macros(KeyEngGoog?)", getpref(STRING, "keyword.eng") == "GOOG" ? true:false); setcheck("macros(KeyConfig?)", getpref(STRING, "keyword.eng") == "" ? true:false);

setcheck("macros(TAF)", getpref(BOOL, $taf)); setcheck("macros(TAFAuto)", getpref(BOOL, $taf . ".autostart")); setcheck("macros(TAFLinks)", getpref(BOOL, $taf . ".linksonly"));

setcheck("macros(StartHome?)", getpref(INT, $sg) == "0" ? true:false); setcheck("macros(StartBlank?)", getpref(INT, $sg) == "1" ? true:false); setcheck("macros(StartGroup?)", getpref(INT, $sg) == "2" ? true:false); setcheck("macros(StartLast?)", getpref(INT, $sg) == "3" ? true:false);

setcheck("macros(ZoomPage?)", getpref(STRING, $zoom) == "" ? true:false); setcheck("macros(ZoomText?)", getpref(STRING, $zoom) == "text" ? true:false); setcheck("macros(ZoomImages)", getpref(STRING, $zoom) == "images" ? true:false);

setcheck("macros(BookChev?)", getpref(BOOL, "kmeleon.plugins.bookmarks.chevron")); setcheck("macros(FavChev?)", getpref(BOOL, "kmeleon.plugins.favorites.chevron")); setcheck("macros(HotChev?)", getpref(BOOL, "kmeleon.plugins.hotlist.chevron")); setcheck("macros(OpenBook1?)", getpref(STRING, $book) == "ID_OPEN_LINK?" ? true:false); setcheck("macros(OpenBook2?)", getpref(STRING, $book) == "ID_OPEN_LINK_IN_NEW_WINDOW?" ? true:false); setcheck("macros(OpenBook3?)", getpref(STRING, $book) == "layers(OpenURL)" ? true:false); setcheck("macros(OpenBook4?)", getpref(STRING, $book) == "layers(OpenURLBg?)" ? true:false); setcheck("macros(OpenBook5?)", getpref(STRING, $book) == "ID_OPEN_LINK_IN_BACKGROUND?" ? true:false); setcheck("macros(OpenFav1?)", getpref(STRING, $fav) == "ID_OPEN_LINK?" ? true:false); setcheck("macros(OpenFav2?)", getpref(STRING, $fav) == "ID_OPEN_LINK_IN_NEW_WINDOW?" ? true:false); setcheck("macros(OpenFav3?)", getpref(STRING, $fav) == "layers(OpenURL)" ? true:false); setcheck("macros(OpenFav4?)", getpref(STRING, $fav) == "layers(OpenURLBg?)" ? true:false); setcheck("macros(OpenFav5?)", getpref(STRING, $fav) == "ID_OPEN_LINK_IN_BACKGROUND?" ? true:false); setcheck("macros(OpenHot1?)", getpref(STRING, $hot) == "ID_OPEN_LINK?" ? true:false); setcheck("macros(OpenHot2?)", getpref(STRING, $hot) == "ID_OPEN_LINK_IN_NEW_WINDOW?" ? true:false); setcheck("macros(OpenHot3?)", getpref(STRING, $hot) == "layers(OpenURL)" ? true:false); setcheck("macros(OpenHot4?)", getpref(STRING, $hot) == "layers(OpenURLBg?)" ? true:false); setcheck("macros(OpenHot5?)", getpref(STRING, $hot) == "ID_OPEN_LINK_IN_BACKGROUND?" ? true:false);

setcheck("macros(Enumerate)", getpref(BOOL, $num)); setcheck("macros(Pressed)", getpref(INT, $style) == "2" ? true:false); setcheck("macros(Pressed+)", getpref(INT, $style) == "10" ? true:false); setcheck("macros(Buttons)", getpref(INT, $style) == "6" ? true:false); setcheck("macros(Buttons+)", getpref(INT, $style) == "14" ? true:false); setcheck("macros(SetCloseLast?)", getpref(INT, $onClose) == "0" ? true:false); setcheck("macros(SetCloseLeft?)", getpref(INT, $onClose) == "1" ? true:false); setcheck("macros(SetCloseRight?)", getpref(INT, $onClose) == "2" ? true:false); setcheck("macros(SetOpenNext?)", getpref(INT, $onOpen) == "1" ? true:false); setcheck("macros(SetOpenLast?)", getpref(INT, $onOpen) == "0" ? true:false); setcheck("macros(ConfirmToggle?)", getpref(BOOL, $confirm));

setcheck("macros(Gestures)", getpref(BOOL, $mouse . "load"));

setcheck("macros(UA)", getpref(STRING, $pu . "0" . $ps) == getpref(STRING,$ua) ? true:false); setcheck("macros(UA1)", getpref(STRING, $pu . "1" . $ps) == getpref(STRING,$ua) ? true:false); setcheck("macros(UA2)", getpref(STRING, $pu . "2" . $ps) == getpref(STRING,$ua) ? true:false); setcheck("macros(UA3)", getpref(STRING, $pu . "3" . $ps) == getpref(STRING,$ua) ? true:false);

getpref(BOOL, $layers) == "false" ? setpref(BOOL, $catch, "false"):""; getpref(BOOL, $layers) "false" ? setpref(STRING, $mode, "WINDOWS ONLY") : (getpref(BOOL, $catch) "true" ? setpref(STRING, $mode, "LAYERS ONLY") : setpref(STRING, $mode, "")); setcheck("macros(LayersOnly?)", getpref(BOOL, $catch) == "true" ? true:false); setcheck("macros(LayersWindows?)", getpref(STRING, $mode) == "" ? true:false); setcheck("macros(WindowsOnly?)", getpref(BOOL, $layers) == "false" ? true:false);

setcheck("macros(BlockScripts?)", getpref(BOOL, $flip)); setcheck("macros(AllowScripts?)", getpref(BOOL, $flip) == "false" ? true:false);

setcheck("macros(AniToggle?)", getpref(STRING, $animation) == "none" ? true:false); pluginmsg(toolbars, "CheckButton?", "Privates, macros(AniToggle?), " . (getpref(STRING, $animation) == "none" ? 1 : 0));

setcheck("macros(CToggle)", getpref(BOOL, $colors) ? false:true); pluginmsg(toolbars, "CheckButton?", "Privates, macros(CToggle), " . (getpref(BOOL, $colors) ? 0 : 1));

setcheck("macros(CKToggle)", getpref(INT, $cookies)); pluginmsg(toolbars, "CheckButton?", "Privates, macros(CKToggle), " . (getpref(INT, $cookies) ? 1 : 0));

setcheck("macros(ImgToggle?)", getpref(INT, $images)); pluginmsg(toolbars, "CheckButton?", "Privates, macros(ImgToggle?), " . (getpref(INT, $images) ? 1 : 0));

setcheck("macros(JToggle)", getpref(BOOL, $java) ? false:true); pluginmsg(toolbars, "CheckButton?", "Privates, macros(JToggle), " . (getpref(BOOL, $java) ? 0 : 1));

setcheck("macros(JSToggle)", getpref(BOOL, $jscript) ? false:true); pluginmsg(toolbars, "CheckButton?", "Privates, macros(JSToggle), " . (getpref(BOOL, $jscript) ? 0 : 1));

setcheck("macros(PBToggle)", getpref(BOOL, $popups)); pluginmsg(toolbars, "CheckButton?", "Standart, macros(PBToggle), " . (getpref(BOOL, $popups) ? 1 : 0)); pluginmsg(toolbars, "CheckButton?", "Privates, macros(PBToggle), " . (getpref(BOOL, $popups) ? 1 : 0));

setcheck("macros(RefToggle?)", getpref(INT, $referer) ? false:true); pluginmsg(toolbars, "CheckButton?", "Privates, macros(RefToggle?), " . (getpref(INT, $referer) ? 0 : 1));

}

  1. CONFIG MACROS

$skindir = getpref(STRING, "kmeleon.general.skinsDir"); $skin = getpref(STRING, "kmeleon.general.skinsCurrent");

Commands{ exec("notepad.exe " . $skindir . "commands.txt"); } Toolbars{ exec("notepad.exe " . $skindir . $skin . "toolbars.cfg"); } Macros{ exec("notepad.exe " . $path . "macros.cfg"); } Menus{ exec("notepad.exe " . $path . "menus.cfg"); } Accel{ exec("notepad.exe " . $path . "accel.cfg"); } Prefs{ exec("notepad.exe " . $path . "prefs.js"); } User{ exec("notepad.exe " . $path . "user.js"); } UserContent?{ exec("notepad.exe " . $path . "\chrome\\userContent.css"); }

XUL{ getpref(BOOL, $layers) == "true" ? pluginmsg(layers, "OpenURL", $xul) : opennew($xul); } AllPrefs?{ $xul = "about:config"; &XUL; } JSConsole{ $xul = "chrome://global/content/console.xul"; &XUL; } RSS{ $xul = "chrome://aggreg8/content/aggreg8.xul"; &XUL; }

  1. MISC. MACROS

SetHome?{ setpref(STRING, "kmeleon.general.homePage", $URL); setpref(INT, $sg, 0); setpref(BOOL, $sh, true); &Sync; alert("'" . $TITLE . "' ist jetzt die Startseite.", "Startseite aktualisiert", INFO); }

KMWiki{ open("http://kmeleon.sourceforge.net/wiki/index.php?id=Welcome"); }

LinkInfo? { confirm($LinkURL . "\n\n\nGehe zu dieser Adresse?", "URL OF SELECTED LINK:", YESNO) == "YES" ? open($LINKURL):""; }

ListLinks?{ getpref(BOOL, $popups) == "true" ? &PB : &ViewLinks?; } PB{ &PBToggle; &ViewLinks?; &PBToggle; } ViewLinks?{ $macro = "OpenLinks?"; &JSEnable; } OpenLinks?{ open("javascript:LnkW=open('','LnkW','width=600,height=300,scrollbars,resizable,menubar'); sLFw=window.name;if(!sLFw){sLFw=window.name='sLFw'}; sLFd=document;DlnK=document.links;with(LnkW.document){write('<base target='+sLFw+'>'+DlnK.length+' total links from:
<b>'+sLFd.title+'</b>
'+sLFd.URL.link(sLFd.URL)+'<hr>'); for(lNK=0;lNK<DlnK.length;lNK++){write('<p>'+DlnKlNK?.text+'
'+DlnKlNK?.href.link(DlnKlNK?))}; close();LnkW.focus()}") ; }

FrameInLayer?{ pluginmsg(layers, "OpenURL", $FRAMEURL); }

ReloadFrame? { $macro = "ReloadFrm?"; &JSEnable; } ReloadFrm? { $FrameURL=""; $PageURL=$FrameURL; open("javascript: function chkframes(elem) { var rep; if (unescape(elem.location) '".$PageURL."' || '".$PageURL."''') { return elem; } for (var f=0; f<elem.frames.length; f++) { rep=chkframes(elem.framesf?); if (rep) return rep; } return; } function reloadFrame() { var elem=chkframes(window); elem.location.reload(); } void(reloadFrame()); ");"); }

AutoDetect? { setpref(STRING, "intl.charset.detector", $ARG); forcecharset(); }

ForceCharset? { forcecharset($ARG); }

$ie = "\"C:\\Programme\\Internet Explorer\\iexplore.exe\"";

URLInIE{ $oldclip = getclipboard(); setclipboard(); id(ID_SELECT_URL?); id(ID_EDIT_COPY?); $theurl = getclipboard(); $theurl == "" ? $theurl = $URL : ""; &ResetURL; setclipboard($oldclip); exec($ie. $theurl); } LinkInIE?{ exec($ie . $LINKURL); }

Default{ exec("SetDefault.exe "); }

Continuous{ getpref(BOOL, $jscript) "false" ? (confirm("JavaScript ist ausgeschaltet. Für diese Funktion muss es eingeschaltet sein.\n\n\nJavaScript einschalten und weiter?", "JavaScript ausgeschaltet", YESNO, EXCLAIM) "YES" ? &JS1st : "") : &Reload; } JS1st{ &JSToggle; &Reload; } Reload{ open("javascript:(function(){var intv=prompt('Sekunden zwischen neu laden angeben. (Rückwärts anklicken zum beenden)');if(intv&&!isNaN(intv)){with(document){write('<html><frameset rows=\"*,22\" framespacing=0 border=0 frameborder=no><frame noresize frameborder=no><frame scrolling=no noresize frameborder=no></frameset></html>');frames0?.location.href=document.location.href;var docstr='<html><body bgcolor=cyan style=\"margin-top:0px\">\n';docstr+='Reloading in <span id=\"caption\"></span>secs.</body>\n';docstr+='<script>\nvar reloadIntv='+intv+';\nvar secsLeft='+intv+';\nfunction reloadFrame(){secsLeft=reloadIntv+1;parent.frames0?.location.href=parent.frames0?.location.href;}\nfunction countDown(){secsLeft--;showTime();}\nfunction showTime(){document.getElementById(\"caption\").innerHTML=parseInt(secsLeft)+\" \";}\nsetInterval(\"reloadFrame()\",'+intv*1000+');\nsetInterval(\"countDown()\",1000);\nshowTime(); \n</script>\n</html>'; frames1?.document.write(docstr);}}})()"); }

K-Meleon

(c) 2000-2010 kmeleonbrowser.org. All rights reserved.
design by splif.