Sunday, January 11, 2015

IMACRO For Click all warofclicks ads v1.6




Original code By Rewat Tamontree
Modify and optimize By Eakkasit MT
Exchange tips for about war of click or some script Here

Register war of clicks  Click Here

What is war of clicks?


Sorry For my english not good :( but i try


IMACRO For Click all war of clicks ads v1.6

increse page wait time ( for some slow pc or internet )

click all ads ( 5 15 30 and 60 sec )

Copy and paste to your imacros


//<--------------- Version 1.6 Last Edit By Eakkasit MT ---------->>//
//< Facebook Group -->> https://www.facebook.com/groups/warofclicks/    //
       
var jsLF = "\n";
do{
macro ="CODE:";
macro += "SET !ERRORIGNORE YES" + jsLF;
macro += "SET !EXTRACT_TEST_POPUP NO" + jsLF;
macro += "SET !ERRORCONTINUE YES" + jsLF;
//macro += "FILTER TYPE=IMAGES STATUS=ON" + jsLF;
macro += "SET !TIMEOUT_PAGE 10" + jsLF;
macro += "SET !TIMEOUT_TAG 2" + jsLF;
macro += "SET !TIMEOUT_STEP 2" + jsLF;
macro += "URL GOTO=http://www.warofclicks.com/Advertisement/List/" + jsLF;
macro += "WAIT SECONDS=5" + jsLF;
macro += "TAG POS=1 TYPE=DIV ATTR=class:AdvBg<SP>LoadButton<SP>LoadLast EXTRACT=htm" + jsLF;
iimPlay(macro);
var page= iimGetLastExtract(1).replace('style="outline: 1px solid blue;"', '');
if(page == "#EANF#"){
page = 'e1';
}
var pagenumber = parseInt(page.replace(/\D/g,''));
for(n=1;n<=pagenumber;n++){
iimDisplay("PAGE ที่ " +n+"/"+pagenumber);
macro ="CODE:";
macro += "SET !ERRORIGNORE YES" + jsLF;
macro += "SET !EXTRACT_TEST_POPUP NO" + jsLF;
macro += "SET !ERRORCONTINUE YES" + jsLF;
macro += "SET !TIMEOUT_PAGE 10" + jsLF;
macro += "SET !TIMEOUT_TAG 2" + jsLF;
macro += "SET !TIMEOUT_STEP 2" + jsLF;
macro += "TAG POS=1 TYPE=DIV ATTR=ID:AdvCurrentPage EXTRACT=htm" + jsLF;
iimPlay(macro);
var adslist = iimGetLastExtract(1);
var resads = adslist.split('<div class="AdvBox">');
var countAds = resads.length-1;

for(i=1;i<=countAds;i++){
iimDisplay("PAGE ที่ " +n+"/"+pagenumber+ jsLF+ "ADS ที่ "+i+"/"+countAds);
macro ="CODE:";
macro += "SET !ERRORIGNORE YES" + jsLF;
macro += "SET !EXTRACT_TEST_POPUP NO" + jsLF;
macro += "SET !ERRORCONTINUE YES" + jsLF;
//macro += "SET !TIMEOUT_PAGE 10" + jsLF;
//macro += "SET !TIMEOUT_TAG 2" + jsLF;
//macro += "SET !TIMEOUT_STEP 2" + jsLF;
macro += "TAG POS="+i+" TYPE=DIV ATTR=TXT:*<SP>Sec EXTRACT=txt" + jsLF;
macro += "TAG POS="+i+" TYPE=DIV ATTR=class:DisableText<SP>AdvBg<SP>FontClear08<SP>WocTimerTime EXTRACT=txt" + jsLF;
iimPlay(macro);
var sec = parseInt(iimGetLastExtract(1).replace(/\D/g,''))+5;
var skip = iimGetLastExtract(2);
if((!skip) && (sec < 66)){
macro ="CODE:";
macro += "SET !ERRORIGNORE YES" + jsLF;
macro += "SET !EXTRACT_TEST_POPUP NO" + jsLF;
macro += "SET !ERRORCONTINUE YES" + jsLF;
macro += "SET !TIMEOUT_PAGE 15" + jsLF;
macro += "SET !TIMEOUT_TAG 2" + jsLF;
macro += "SET !TIMEOUT_STEP 2" + jsLF;
//macro += "FILTER TYPE=IMAGES STATUS=ON" + jsLF;
macro += "TAG POS="+i+" TYPE=IMG ATTR=CLASS:AdvImage" + jsLF;
macro += "WAIT SECONDS="+ sec + jsLF;
macro += "ONDIALOG POS=1 BUTTON=OK CONTENT=" + jsLF;
iimPlay(macro);
do {
macro ="CODE:";
macro += "SET !ERRORIGNORE YES" + jsLF;
macro += "SET !EXTRACT_TEST_POPUP NO" + jsLF;
macro += "SET !ERRORCONTINUE YES" + jsLF;
macro += "SET !TIMEOUT_PAGE 10" + jsLF;
macro += "SET !TIMEOUT_TAG 2" + jsLF;
macro += "SET !TIMEOUT_STEP 2" + jsLF;
macro += "ADD !EXTRACT {{!URLCURRENT}}" + jsLF;
iimPlay(macro);
var siteproxy = iimGetLastExtract(1);
if(siteproxy.search("List") == -1) {
macro ="CODE:";
macro += "SET !ERRORIGNORE YES" + jsLF;
macro += "SET !EXTRACT_TEST_POPUP NO" + jsLF;
macro += "SET !ERRORCONTINUE YES" + jsLF;
macro += "SET !TIMEOUT_PAGE 10" + jsLF;
macro += "SET !TIMEOUT_TAG 2" + jsLF;
macro += "SET !TIMEOUT_STEP 2" + jsLF;
macro += "TAB CLOSE" + jsLF;
//macro += "WAIT SECONDS=3" + jsLF;
iimPlay(macro);
}
}while (siteproxy.search("List") == -1);
}
}
if((pagenumber == 1) || (pagenumber == n)){
}else{
macro ="CODE:";
macro += "SET !ERRORIGNORE YES" + jsLF;
macro += "SET !EXTRACT_TEST_POPUP NO" + jsLF;
macro += "SET !ERRORCONTINUE YES" + jsLF;
//macro += "FILTER TYPE=IMAGES STATUS=ON" + jsLF;
macro += "SET !TIMEOUT_PAGE 10" + jsLF;
macro += "SET !TIMEOUT_TAG 2" + jsLF;
macro += "SET !TIMEOUT_STEP 2" + jsLF;
macro += "TAG POS=1 TYPE=DIV ATTR=CLASS:AdvBg<SP>LoadButton<SP>LoadNext&&PAGE:*" + jsLF;
macro += "WAIT SECONDS=5" + jsLF;
iimPlay(macro);
}
}
}while(0==0);

No comments:

Post a Comment

Popular Posts

Get In Touch