var macro, retcode, url="", pos=1, stop=false,i=1;
        var username=prompt("Please enter Avatar / Email:","Guest_yourname");
        var passwd=prompt("Please enter Password:","password");
        var message=prompt("Enter the message:"," your message");
        macro="CODE:";
        macro+="VERSION BUILD=7400919 RECORDER=FX \n";
        macro+="CLEAR\n";
        macro+="TAB T=1\n";
        macro+="URL GOTO=http://www.imvu.com/login/\n";
        macro+="TAG POS=1 TYPE=INPUT:TEXT FORM=ACTION:https://secure.imvu.com/login/login/ ATTR=ID:login_field CONTENT="+username+"\n";
        macro+="SET !ENCRYPTION NO\n";
        macro+="TAG POS=1 TYPE=INPUT:PASSWORD FORM=ACTION:https://secure.imvu.com/login/login/ ATTR=ID:password_field CONTENT="+passwd+"\n";
        macro+="TAG POS=1 TYPE=BUTTON ATTR=ID:btn_logon\n";
        retcode=iimPlay(macro);

        while(i<101){
        macro="CODE:";
        macro+="VERSION BUILD=7400919 RECORDER=FX \n";
        macro+="URL GOTO=http://www.imvu.com/people/search.php?page="+i+"&sort=online_since&gender=1&location=223&minage=18&maxage=99&online=1&interests=&relationship=0&orientation=0&here_for=0&default=1&action=Search#pg\n";
        retcode=iimPlay(macro);
        if (retcode < 0)               // an error has occured
       {
          errtext = iimGetLastError();
          alert("Error 1: "+retcode+":     "+errtext);
          break;
       }

           ////////////////////// Tested perfect!!
          //var message="Hii";
    while(!stop)
    {
       macro="CODE: \n";
           macro+="VERSION BUILD=7400919 RECORDER=FX \n";
          // macro+="SET !REPLAYSPEED SLOW\n";
      // macro+="TAB T=1 \n";
           macro+="SET !ERRORIGNORE YES\n";
          macro+="WAIT SECONDS=1\n";
       macro+="TAG POS="+pos+" TYPE=A ATTR=ID:send_* \n";
          //  macro+="SET !REPLAYSPEED SLOW\n";
           macro+="WAIT SECONDS=3\n";
            retcode = iimPlay(macro);
       if (retcode < 0)               // an error has occured
       {
          errtext = iimGetLastError();
          alert("Error 2: "+retcode+":     "+errtext);
                          //alert(macro);

          stop=true;
       }


           macro="CODE: \n";
           // macro+="TAB T=1 \n";
                macro+="TAG POS=1 TYPE=TEXTAREA ATTR=ID:message_text CONTENT="+message.replace(/ /g,"<SP>")+"\n";
                //macro="";
           macro+="TAG POS=1 TYPE=INPUT:CHECKBOX ATTR=ID:is_public_* CONTENT=NO\n";
                macro+="TAG POS=1 TYPE=BUTTON ATTR=ID:btn_send\n";
                macro+="WAIT SECONDS=2\n";
                 retcode = iimPlay(macro);

       if (retcode < 0)               // an error has occured
       {
          errtext = iimGetLastError();
          alert("Error 3: "+retcode+":     "+errtext);
                  //alert(macro);
          stop=true;
       }
           macro="CODE: \n";
                macro+="TAG POS=1 TYPE=BUTTON ATTR=ID:message-complete-ok";

       retcode = iimPlay(macro);

       if (retcode < 0)               // an error has occured
       {
          errtext = iimGetLastError();
                 macro="CODE: \n";
                 macro+="TAG POS=1 TYPE=BUTTON ATTR=ID:mw_btn_cancel";
            }

       if( pos > 9)
       {
                        break;
       }
       else
       {
            pos++;
       }

    }
        pos=1;
        i++;
}