如何让iMacros脚本展开Facebook墙，然后展开所有评论

我正在尝试扩展Facebook的一面墙，然后在扩展后的墙上显示所有评论

手动地，这可以通过访问到墙的链接，然后连续向下滚动，逐渐显示更多的页面，直到显示所有页面为止。然后，将选择表单

View*更多注释
的可选择文本段的每个实例，从而使页面中的所有注释完全显示

我曾尝试将向下滚动事件注册到iMacros，但没有成功，我已基本成功地使用以下脚本选择了文本
View 1 more comments
：

VERSION BUILD=8820413 RECORDER=FX
TAB T=1
URL GOTO=https://www.facebook.com/FACEBOOKID1?and=FACEBOOKID2
TAG POS={{!LOOP}} TYPE=SPAN ATTR=TXT:View<SP>1<SP>more<SP>comments

VERSION BUILD=8820413 RECORDER=FX
表T=1
URL转到=https://www.facebook.com/FACEBOOKID1?and=FACEBOOKID2
标记POS={{！LOOP}}TYPE=SPAN ATTR=TXT:View1morecomments

如何使向下滚动行为自动化，以及如何改进当前扩展注释的尝试，使其更通用？
我使用下面的js脚本：

// set the number of scrolls you prefer
var scrollNumber = 1;
// scroll
for (i = 1; i <= scrollNumber; i++) {
    window.scrollTo(0, i*10000);
    iimPlayCode("WAIT SECONDS=2");
}
// expand comment boxes with 50 less comments
var doc = window.document;
var cmtBoxes = doc.getElementsByClassName("UFIBlingBox uiBlingBox feedbackBling");
for (i = 1; i <= cmtBoxes.length; i++) {
    var cmtLabel = cmtBoxes[i - 1].getAttribute("aria-label");
    var cmtNumber = cmtLabel.match(/.*\s(\d+)\scomments.*/)[1];
    if (cmtNumber < 50)
        iimPlayCode('TAG POS=' + i + ' TYPE=A ATTR=CLASS:"UFIBlingBox uiBlingBox feedbackBling"');
}
// count
var cmtPostNumber = 0;
for (i = 0; i < doc.links.length; i++) {
    if (doc.links[i].innerHTML.match(/View\s\d+\smore\scomment/) != null)
        cmtPostNumber++;
}
// view
for (i = 1; i <= cmtPostNumber; i++) {
    var M = "SET !TIMEOUT_STEP 1" + "\n";
    M += "TAG POS=1 TYPE=A ATTR=TXT:View<SP>*<SP>more<SP>comment*" + "\n";
    M += "WAIT SECONDS=1";
    var ret = iimPlayCode(M);
    if (ret != 1) break;
}
// go to the top
window.scrollTo(0, 0);

//设置您喜欢的滚动条数
var-number=1；
//卷轴
对于（i=1；i