var datasources = "geneanet_trends_niche.txt";
var datasources1 = "akungeneanet_trends_niche.txt";
var login;
login = "CODE:";
login += "set !errorignore yes" + "\n";
login += "set !timeout_step 0" + "\n";
login += "set !extract_test_popup no" + "\n";
login += "set !loop 1" + "\n";
login += "set !datasource {{datasources1}}\nset !datasource_line {{!loop}}" + "\n";
login += "URL GOTO=https://en.geneanet.org/connexion/" + "\n";
login += "TAG POS=1 TYPE=INPUT:TEXT FORM=ACTION:https://en.geneanet.org/connexion/login_check ATTR=ID:_username CONTENT={{!col1}}" + "\n";
login += "SET !ENCRYPTION NO" + "\n";
login += "TAG POS=1 TYPE=INPUT:PASSWORD FORM=ACTION:https://en.geneanet.org/connexion/login_check ATTR=ID:_password CONTENT={{!col2}}" + "\n";
login += "TAG POS=1 TYPE=BUTTON FORM=ACTION:https://en.geneanet.org/connexion/login_check ATTR=ID:_submit" + "\n";
login += "set !timeout_step 9999999" + "\n";
login += "TAG POS=1 TYPE=span attr=id:header-username extract=txt" + "\n";
iimSet("datasources1", datasources1)
iimPlay(login)
var macro;
macro = "CODE:";
macro += "set !errorignore yes" + "\n";
macro += "set !timeout_step 999999" + "\n";
macro += "set !extract_test_popup no" + "\n";
macro += "set !datasource {{datasources}}\nset !datasource_line {{o}}" + "\n";
macro += "URL GOTO=http://207.180.251.154/google.php?query={{queryValue}}&link={{linkValue}}" + "\n";
macro += "TAG POS=1 TYPE=TEXTAREA ATTR=id:title extract=txt\nset title {{!col1}}\nset !extract null" + "\n";
macro += "TAG POS=1 TYPE=TEXTAREA ATTR=id:content extract=txt\nset desc {{!extract}}\nset !extract null" + "\n";
macro += "TAG POS=1 TYPE=TEXTAREA ATTR=id:link_lp extract=txt\nset link {{!extract}}\nset !extract null" + "\n";
macro += "tab open" + "\n";
macro += "tab t=2" + "\n";
macro += "SET !VAR2 EVAL(\"var letters = ['a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p','q','r','s','t','u','w','x','y','z']; var string = ''; for(var i = 0; i < 3; i++){string += letters[parseInt(Math.random() * 25)]}; string\")" + "\n";
macro += "URL GOTO=https://en.geneanet.org/forum/posting.php?mode=post&f=70154" + "\n";
macro += "TAG POS=1 TYPE=INPUT:TEXT FORM=ID:postform ATTR=ID:subject CONTENT={{title}}" + "\n";
macro += "TAG POS=1 TYPE=TEXTAREA FORM=ID:postform ATTR=ID:message CONTENT={{desc}}" + "\n";
macro += "TAG POS=1 TYPE=INPUT:SUBMIT FORM=ID:postform ATTR=NAME:post" + "\n";
macro += "set !extract null" + "\n";
macro += "add !extract {{title}}" + "\n";
macro += "add !extract {{desc}}" + "\n";
macro += "add !extract {{!var2}}" + "\n";
macro += "add !extract {{domainroot}}" + "\n";
var macrob1;
macrob1 = "CODE:";
macrob1 += "set !errorignore yes" + "\n";
macrob1 += "set !timeout_step 2" + "\n";
macrob1 += "set !extract_test_popup no" + "\n";
macrob1 += "tag pos=1 type=a attr=href:httiyxwfree24 extract=href\nwait seconds=0.1" + "\n";
var macroa;
macroa = "CODE:";
macroa += "set !errorignore yes" + "\n";
macroa += "set !timeout_step 999999" + "\n";
macroa += "set !extract_test_popup no" + "\n";
macroa += "set !datasource {{datasources}}\nset !datasource_line {{o}}" + "\n";
macroa += "set !extract {{!urlcurrent}},{{title}},{{kwimg}}\nsaveas type=extract folder=* file={{datasources}}" + "\n";
macroa += "SET linke EVAL(\"encodeURIComponent('{{!urlcurrent}}');\")" + "\n";
macroa += "set !extract {{!urlcurrent}}" + "\n";
macroa += "SET title EVAL(\"encodeURIComponent('{{title}}');\")" + "\n";
macroa += "SET col1 EVAL(\"encodeURIComponent('{{!col1}}');\")" + "\n";
macroa += "URL GOTO=http://207.180.251.154/backlink.php?backlink={{linke}}&title={{title}}&source={{col1}}\nTAG POS=1 TYPE=P ATTR=ID:sukses\nURL GOTO=http://207.180.251.154/backlink_logsv1.php?datasources={{datasources}}&lines={{o}}&source={{col1}}&backlink={{linke}}&title={{title}}\n";
macroa += "TAG POS=1 TYPE=P ATTR=ID:sukses" + "\n";
for (var o = 1; o <= 10000; o++) {
iimSet("datasources", datasources)
iimSet("o", o)
iimPlay('code:set !errorignore yes\nset !timeout_step 0\nset !extract_test_popup no\nset !datasource {{datasources}}\nset !datasource_line {{o}}\nset !extract {{!col1}}')
var kwimg = iimGetLastExtract(0);
if (kwimg == "") {
break;
}
var queryValue = encodeURIComponent(kwimg);
var linkValue = encodeURIComponent("https://iyxwfree24.my.id/watch-streaming/");
iimSet("queryValue", queryValue)
iimSet("linkValue", linkValue)
iimSet("datasources", datasources)
iimSet("o", o)
iimPlay(macro)
var title = iimGetLastExtract(1);
var desc = iimGetLastExtract(2);
for (var p = 1; p <= 10000; p++) {
iimPlay('code:set !errorignore yes\nset !timeout_step 1\nset !extract_test_popup no\nTAG POS=1 TYPE=P ATTR=TXT:You<SP>cannot<SP>make<SP>another<SP>post<SP>so<SP>soon<SP>af* extract=txt')
var kwimgccc = iimGetLastExtract(0);
if (kwimgccc == "#EANF#") {
break;
}else{
iimPlay('code:set !errorignore yes\nset !timeout_step 0\nset !extract_test_popup no\nwait seconds=10\nONDIALOG POS=1 BUTTON=OK CONTENT=\nrefresh')
}
}
iimPlay(macrob1)
var hasil = iimGetLastExtract(0);
if (hasil == "#EANF#") {
iimDisplay("skip")
} else {
iimSet("datasources", datasources)
iimSet("kwimg", kwimg)
iimSet("hasil", hasil)
iimSet("title", title)
iimSet("o", o)
iimPlay(macroa)
}
iimPlay('code:tab close\nwait seconds=0.1')
}