Quote

# Macro name : GApplication.kmm
# author: ThanhVu(baysao a cong gmail dot com)
# Macros make google application more usefuls. To use this macro, you have to disable function Automatic block popup in kmeleon.

GNote{
injectJS("window.open(\"http://www.google.com/notebook/ig?hl=__MSG_locale__\",\"popFrameless\",\"scrollbars,width=214,height=398\");");
}
GCalEvent{
injectJS("window.open(\"http://www.google.com/calendar/m\",\"popFrameless\",\"scrollbars,width=214,height=398\");");
}
GCal{
injectJS("window.open(\"http://www.google.com/calendar/gadget?up_showAgenda=false&upt_showAgenda=hidden&up_calendarFeeds=(%7B%7D)&upt_calendarFeeds=hidden&up_firstDay=0&upt_firstDay=enum&up_dateFormat=0&upt_dateFormat=enum&up_timeFormat=1:00pm&upt_timeFormat=enum&up_calendarFeedsImported=0&upt_calendarFeedsImported=hidden&up_showCalendar2=1&upt_showCalendar2=bool&lang=en&country=us&.lang=en&.country=us&synd=ig&mid=0&parent=&libs=9yKJTwdwCZw/lib/libcore.js,DXEULJSfpLM/lib/libdynamic-height.js,c64nWSZKWFg/lib/libsetprefs.js\",\"popFrameless\",\"scrollbars,width=214,height=398\");");
}

GTalk{
injectJS("window.open(\"http://talkgadget.google.com/talkgadget/client\",\"popFrameless\",\"scrollbars,width=214,height=398\");");
}
GMail{
injectJS("window.open(\"http://m.gmail.com\",\"popFrameless\",\"scrollbars,width=214,height=398\");");
}
GDocs{
injectJS("window.open(\"http://docs.google.com/m\",\"popFrameless\",\"scrollbars,width=214,height=398\");");
}
GReader{
injectJS("window.open(\"http://www.google.com/reader/m/view\",\"popFrameless\",\"scrollbars,width=214,height=398\");");
}
$_blogger_conf="kmeleon.general.bloggerID";
Blogger{
$__userid=getpref(STRING, $_blogger_conf);
$__userid=="" ? &Blogger_set : "";
$__userid=="" ? "" : &Blogger_run;
}

Blogger_run{
$OpenURL="http://www.blogger.com/post-create.g?blogID=".$__userid;
$link="window.open('";
$link=$link.$OpenURL;
$link=$link."','popFrameless','scrollbars,width=750,height=398')";
injectJS($link);
}

Blogger_set{
$__userid=prompt("Set your blog ID: ", "Blogger setup");
$__userid=="" ? "" : setpref(STRING, $_blogger_conf, $__userid);
}


GTranslate_ru{
$lang="ru";&GTranslate;
}
GTranslate_en{
$lang="en";&GTranslate;
}
GTranslate_fr{
$lang="fr";&GTranslate;
}
GTranslate_es{
$lang="es";&GTranslate;
}
GTranslate_pt{
$lang="pt";&GTranslate;
}
GTranslate_de{
$lang="de";&GTranslate;
}
GTranslate_nl{
$lang="nl";&GTranslate;
}
GTranslate_it{
$lang="it";&GTranslate;
}
GTranslate_el{
$lang="el";&GTranslate;
}
GTranslate_ko{
$lang="ko";&GTranslate;
}
GTranslate_ja{
$lang="ja";&GTranslate;
}
GTranslate_zh{
$lang="zh";&GTranslate;
}
GTranslate_zt{
$lang="zt";&GTranslate;
}

GTranslate_other{
$lang=prompt("Two-letter target language code:","Language code","vi");&GTranslate;
}
GTranslate{
$lang="&langpair=auto|".$lang;
$link="var t=((window.getSelection&&window.getSelection())||(document.getSelection&&document.getSelection())||(document.selection&&document.selection.createRange&&document.selection.createRange().text));var e=(document.charset||document.characterSet);if(t!=''){window.open('http://translate.google.com/translate_t?text='+t+'&hl=en";;
$link=$link.$lang;
$link=$link."&tbb=1&ie='+e,'popFrameless','scrollbars,width=750,height=398');}else{window.open('http://translate.google.com/translate?u='+escape(location.href)+'&hl=en";;
$link=$link.$lang;
$link=$link."&tbb=1&ie='+e,'popFrameless','scrollbars,width=750,height=398');};";
injectJS($link);
}

# ----- PRIVATE
$Gpopup_menu="Google &Application";
$g_selection="Google &Translate";
$g_selection_link="Google &Translate";
_GPopup_BuildMenu{
setmenu($Gpopup_menu,macro,"Google &Notebook",GNote);
setmenu($Gpopup_menu,macro,"Google Calendar &QuickEvent",GCalEvent);
setmenu($Gpopup_menu,macro,"Google &Calendar",GCal);
setmenu($Gpopup_menu,macro,"Google &Talk",GTalk);
setmenu($Gpopup_menu,macro,"Google &Mail",GMail);
setmenu($Gpopup_menu,macro,"Google &Document",GDocs);
setmenu($Gpopup_menu,macro,"Google &Reader",GReader);
setmenu($Gpopup_menu,macro,"Set &ID Blogger",Blogger_set);
setmenu($Gpopup_menu,macro,"Google &Blogger",Blogger);

## google translate
setmenu($g_selection,macro,"to &English", GTranslate_en);
setmenu($g_selection,macro,"to &French", GTranslate_fr);
setmenu($g_selection,macro,"to &Russian", GTranslate_ru);
setmenu($g_selection,macro,"to &Spanish", GTranslate_es);
setmenu($g_selection,macro,"to &Portuguese", GTranslate_pt);
setmenu($g_selection,macro,"to &German", GTranslate_de);
setmenu($g_selection,macro,"to &Dutch", GTranslate_nl);
setmenu($g_selection,macro,"to &Italian", GTranslate_it);
setmenu($g_selection,macro,"to Gr&eek", GTranslate_el);
setmenu($g_selection,macro,"to &Korean", GTranslate_ko);
setmenu($g_selection,macro,"to &Japanese", GTranslate_ja);
setmenu($g_selection,macro,"to &Chinese (Traditional)", GTranslate_zt);
setmenu($g_selection,macro,"to Chi&nese (Simplified)", GTranslate_zh);
setmenu($g_selection,macro,"&To (Specify Language)...",GTranslate_other);
## end google translate

setmenu($Gpopup_menu,popup,$g_selection);
setmenu(Selection,popup,$g_selection);
setmenu(LinkSave,popup,$g_selection);
setmenu(Document,popup,$Gpopup_menu);
}
_GPopup_BuildAccel{
setaccel("CTRL ALT N","macros(GNote)");
setaccel("CTRL ALT Q","macros(GCalEvent)");
setaccel("CTRL ALT C","macros(GCal)");
setaccel("CTRL ALT T","macros(GTalk)");
setaccel("CTRL ALT M","macros(GMail)");
setaccel("CTRL ALT D","macros(GDocs)");
setaccel("CTRL ALT R","macros(GReader)");
setaccel("CTRL ALT B","macros(Blogger)");
}
$OnInit=$OnInit."_GPopup_BuildMenu;_GPopup_BuildAccel;";

# ------------------------------------------------------------------------------------------------------------------
$macroModules=$macroModules."GApplication;";