for(i=2; i<=1000; i++){ 
        iimPlayCode('TAG POS='+i+' TYPE=INPUT:BUTTON ATTR=*');
        }

SET !ERRORIGNORE YES
SET !ERRORCONTINUE YES
SET !EXTRACT_TEST_POPUP NO
SET !TIMEOUT 1
SET !REPLAYSPEED MEDIUM
TAB T=1
CMDLINE !DATASOURCE vkdr.txt
SET !DATASOURCE_COLUMNS 50
SET !LOOP 1
SET !DATASOURCE_LINE {{!LOOP}}
URL GOTO={{!COL1}}
WAIT SECONDS=5
SET !VAR3 "Сообщение1"
SET !VAR4 "Сообщение2"
SET !VAR5 "Сообщение3"
SET !VAR6 "Сообщение4"
TAG POS=1 TYPE=TEXTAREA ATTR=ID:post_field
EVENTS TYPE=KEYPRESS SELECTOR="#post_field" CHARS={{!VAR5}}
WAIT SECONDS=5
TAG POS=1 TYPE=BUTTON ATTR=ID:send_post

CMDLINE !DATASOURCE vkdr.txt

CMDLINE !DATASOURCE vkdr.txt[/b] на [b]iimPlayCode('URL GOTO=https://vk.com/public124403325')

SET !VAR3 "Сообщение1"
SET !VAR4 "Сообщение2"
SET !VAR5 "Сообщение3"
SET !VAR6 "Сообщение4"

https://vk.com/club44723042, https://vk.com/club61413825, https://vk.com/club74738426,

TAG POS=1 TYPE=TEXTAREA ATTR=ID:msg_text46923  CONTENT=rrrrrr

var papka = '???????????????????????????????????';
var login = '?????????????????';
var parol = '&&&&&&&&&&&&&&';

var n = '\n';
var code = '';
var start_macro = '';
start_macro +='CODE:' + n;
start_macro +='SET !EXTRACT_TEST_POPUP NO' + n;
start_macro +='SET !ERRORIGNORE YES' + n;
start_macro +='SET !TIMEOUT_STEP 0' + n;
start_macro +='SET !TIMEOUT_PAGE 240' + n;
start_macro +='SET !EXTRACT NULL' + n;

function Vhod(){
iimPlay('CODE:SET !TIMEOUT_PAGE 1\n SET !ERRORIGNORE YES\n TAG POS=1 TYPE=INPUT:EMAIL FORM=ID:gaia_loginform ATTR=TYPE:email&&AUTOFOCUS:&&SPELLCHECK:false&&VALUE:&&PLACEHOLDER:Введите<SP>адрес<SP>электронной<SP>почты&&NAME:Email&&ID:Email CONTENT='+login);
iimPlay('CODE:SET !TIMEOUT_PAGE 1\n SET !ERRORIGNORE YES\n TAG POS=1 TYPE=INPUT:SUBMIT FORM=ID:gaia_loginform ATTR=TYPE:submit&&VALUE:Далее&&CLASS:rc-button<SP>rc-button-submit&&NAME:signIn&&ID:next');
iimPlay('CODE:SET !TIMEOUT_PAGE 1\n SET !ERRORIGNORE YES\n TAG POS=1 TYPE=INPUT:PASSWORD FORM=ID:gaia_loginform ATTR=TYPE:password&&CLASS:&&PLACEHOLDER:Пароль&&NAME:Passwd&&ID:Passwd CONTENT='+parol);
iimPlay('CODE:SET !TIMEOUT_PAGE 120\n SET !ERRORIGNORE YES\n TAG POS=1 TYPE=INPUT:SUBMIT FORM=ID:gaia_loginform ATTR=TYPE:submit&&VALUE:Войти&&CLASS:rc-button<SP>rc-button-submit&&NAME:signIn&&ID:signIn');
}

function Prochitan() {
iimPlay('CODE:SET !TIMEOUT_PAGE 1\n SET !ERRORIGNORE YES\n EVENT TYPE=TXT SELECTOR="HTML>BODY>DIV:nth-of-type(2)>DIV:nth-of-type(4)>DIV>DIV:nth-of-type(5)>DIV>DIV:nth-of-type(2)>DIV>DIV>DIV>DIV>DIV>OL>LI:nth-of-type('+r+')>OL>LI>DIV>DIV>DIV:nth-of-type(2)>UL>LI:nth-of-type('+v+')>DIV>DIV>DIV>A>DIV:nth-of-type(2)" EXTRACT=CLASS');
prochitan = iimGetLastExtract();
//alert(prochitan);
}

function Smotrim() {
iimPlay('CODE:SET !TIMEOUT_PAGE 120\n SET !ERRORIGNORE YES\n EVENT TYPE=CLICK SELECTOR="HTML>BODY>DIV:nth-of-type(2)>DIV:nth-of-type(4)>DIV>DIV:nth-of-type(5)>DIV>DIV:nth-of-type(2)>DIV>DIV>DIV>DIV>DIV>OL>LI:nth-of-type('+r+')>OL>LI>DIV>DIV>DIV:nth-of-type(2)>UL>LI:nth-of-type('+v+')>DIV>DIV>DIV>A>DIV>SPAN>IMG" BUTTON=0');
iimPlay('CODE:WAIT SECONDS=30');
iimPlay('CODE:SET !TIMEOUT_PAGE 120\n BACK\n REFRESH');
}

function Razdel() {
iimPlay('CODE:SET !TIMEOUT_PAGE 1\n SET !ERRORIGNORE YES\n EVENT TYPE=TXT SELECTOR="HTML>BODY>DIV:nth-of-type(2)>DIV:nth-of-type(4)>DIV>DIV:nth-of-type(5)>DIV>DIV:nth-of-type(2)>DIV>DIV>DIV>DIV>DIV>OL>LI:nth-of-type('+r+')>OL>LI>DIV>DIV>DIV:nth-of-type(2)>UL>LI:nth-of-type('+v+')>DIV>DIV>DIV>A>DIV>SPAN>IMG" EXTRACT=TXT');
razdel = iimGetLastExtract();
//alert(razdel);
}

function YouTube() {
    code = '';
    code += start_macro;
    code += 'URL GOTO=https://www.youtube.com/feed/subscriptions' + n;
    iimPlay(code,60);
iimPlay('CODE:SET !TIMEOUT_PAGE 1\n SET !ERRORIGNORE YES\n TAG POS=1 TYPE=H2 ATTR=TXT:Чтобы<SP>запустить<SP>YouTube,<SP>войдите<SP>в<SP>свой<SP>ак* EXTRACT=TXT');
if(iimGetLastExtract() !== '#EANF#'){
Vhod();
}
r = 1;
v = 1;
Razdel();
for(;razdel !== '#EANF#';Razdel()){// || prochitan !== '#EANF#'
//alert("r = "+r+"    "+"v = "+v);
//Prochitan();
if(razdel !== '#EANF#'){// && prochitan == '#EANF#'
Smotrim();
v++;
}
else{
v++;
}
if(razdel == '#EANF#'){
r++;
}
}
}

YouTube();

var t0='SET !TIMEOUT_STEP 0\n';
var f1='FRAME NAME=undefined\n';
        if(iimPlayCode(t0+''+f1+'TAG POS=2 TYPE=DIV ATTR=TXT:reCAPTCHA')>0){ 
            iimPlayCode('PAUSE');
            } else {

if(iimPlayCode('SET !TIMEOUT_STEP 0\nTAG POS=1 TYPE=script ATTR=src:*recaptcha*')>0){

var teksite=window.location;
teksite=String(teksite);

var obsu=teksite.indexOf("88392");
obsu=obsu*1+9;
obsu=teksite.slice(obsu,obsu+8);

var idobsu='#reply_field-88392_'+obsu;

iimSet("idobsu",idobsu);
iimPlay('CODE:'
+ 'PROMPT {{idobsu}}\n'
+ 'EVENT TYPE=CLICK SELECTOR={{idobsu}} BUTTON=0\n'
+ 'EVENTS TYPE=KEYPRESS SELECTOR={{idobsu}} CHARS="gdghdgdgd"');