var	jsLF = "\n";

macro ="CODE:";
macro += "SET !ERRORIGNORE YES"	+ jsLF;
macro += "SET !EXTRACT_TEST_POPUP NO" +	jsLF;
macro += "SET !ERRORCONTINUE YES" +	jsLF;
macro += "URL GOTO=https://www.facebook.com/groups/?category=membership&ref=bookmark_header" +	jsLF;
macro += "WAIT SECONDS=1" +	jsLF;
macro += "SET !TIMEOUT_TAG 0"	+ jsLF;
macro += "TAG POS=1 TYPE=A ATTR=TXT:ดูกลุ่มเพิ่มเติม EXTRACT=TXT" +	jsLF;
iimPlay(macro);
var more = iimGetLastExtract(1);

while(more == "ดูกลุ่มเพิ่มเติม"){
	iimDisplay("กรุณารอสักครู่ กำลังโหลด Groups");
	macro ="CODE:";
	macro += "SET !ERRORIGNORE YES"	+ jsLF;
	macro += "SET !EXTRACT_TEST_POPUP NO" +	jsLF;
	macro += "SET !ERRORCONTINUE YES" +	jsLF;
	macro += "TAG POS=1 TYPE=A ATTR=TXT:ดูกลุ่มเพิ่มเติม" +	jsLF;
	macro += "WAIT SECONDS=3" +	jsLF;
	macro += "SET !TIMEOUT_TAG 0"	+ jsLF;
	macro += "TAG POS=1 TYPE=A ATTR=TXT:ดูกลุ่มเพิ่มเติม EXTRACT=TXT" +	jsLF;
	iimPlay(macro);
	var more = iimGetLastExtract(1);
}

macro ="CODE:";
macro += "SET !ERRORIGNORE YES"	+ jsLF;
macro += "SET !EXTRACT_TEST_POPUP NO" +	jsLF;
macro += "SET !ERRORCONTINUE YES" +	jsLF;
macro += "TAG POS=1 TYPE=div ATTR=id:content EXTRACT=htm" +	jsLF;
iimPlay(macro);
var list = iimGetLastExtract(1).split('class="groupsRecommendedTitle"');
var count_Groups = list.length;

for(i=1;i<count_Groups;i++){
	iimDisplay("Keep Groups "+i+jsLF+"Save ไว้ตรงนี้"+jsLF+"Documents\\iMacros\\Downloads");
	macro ="CODE:";
	macro += "SET !ERRORIGNORE YES"	+ jsLF;
	macro += "SET !EXTRACT_TEST_POPUP NO" +	jsLF;
	macro += "SET !ERRORCONTINUE YES" +	jsLF;
	macro += "TAG POS="+i+" TYPE=A ATTR=class:groupsRecommendedTitle EXTRACT=TXT" +	jsLF;
	macro += "TAG POS="+i+" TYPE=A ATTR=class:groupsRecommendedTitle EXTRACT=HREF" +	jsLF;
	macro += "SAVEAS TYPE=EXTRACT FOLDER=* FILE=FB_groups.csv"+ jsLF;
	iimPlay(macro);
}