Shoutbox

[HELP] Send On Signin - Printable Version

-Shoutbox (https://shoutbox.menthix.net)
+-- Forum: MsgHelp Archive (/forumdisplay.php?fid=58)
+--- Forum: Messenger Plus! for Live Messenger (/forumdisplay.php?fid=4)
+---- Forum: Scripting (/forumdisplay.php?fid=39)
+----- Thread: [HELP] Send On Signin (/showthread.php?tid=98155)

[HELP] Send On Signin by albert22 on 08-15-2011 at 07:39 PM

hi

I Downloaded the file from http://shoutbox.menthix.net/showthread.php?tid=63043

But now i want to automaticly send a text when someone comes online.


but now I always have to press a button but that is not the intention

it must be completely automatic

///////////////////////////////////////////////////////
//
//    This script is written by Mark 'markee' Kernke
//
//    Please do not reproduce this script (part or whole)
//        without prior concent of the author.
//
///////////////////////////////////////////////////////


var Status = new Array("","Offline","","Online","Busy","Be Right Back","Idle","Away","In a Call","Out to Lunch");
var fso = new ActiveXObject("Scripting.FileSystemObject");
var E2;
function OnEvent_Initialize(M){
    if(!fso.FolderExists(MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId+"\\"))
        fso.CreateFolder(MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId+"\\");
}
function OnEvent_ContactSignin(Email){
    if(!fso.FolderExists(MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId+"\\"))
        fso.CreateFolder(MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId+"\\");
    if(Messenger.MyContacts.GetContact(Email).status!=1){
        var Contact = Messenger.MyContacts.GetContact(Email);
        if(fso.FileExists(MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId+"\\"+Email+".txt")){
            MsgPlus.DisplayToastContact("Send On Sign-in",Contact.Name,"Signed in ("+Status[Contact.Status]+")\r\nClick to send personal hello","","Open",Contact);
           
        }else{
            MsgPlus.DisplayToastContact("Send On Sign-in",Contact.Name,"Signed in ("+Status[Contact.Status]+")\r\nClick to Open Chat","","Chat",Contact);
        }
    }else if(Messenger.MyContacts.GetContact("yahoo:"+Email).status!=1){
        Email = "yahoo:"+Email;
        var Contact = Messenger.MyContacts.GetContact(Email);
        if(fso.FileExists(MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId+"\\"+Email+".txt")){
            MsgPlus.DisplayToastContact("Send On Sign-in",Contact.Name,"Signed in ("+Status[Contact.Status]+")\r\nClick to send personal hello","","Open",Contact);
           
        }else{
            MsgPlus.DisplayToastContact("Send On Sign-in",Contact.Name,"Signed in ("+Status[Contact.Status]+")\r\nClick to Open Chat","","Chat",Contact);
        }
    }
}
function Chat(Contact){
    Messenger.OpenChat(Contact.Email);
}
function Open(Contact){
    CWnd = Messenger.OpenChat(Contact.Email);
    CWnd.SendMessage(fso.OpenTextFile(MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId+"\\"+((Contact.Network===1)?"":"yahoo:")+Contact.Email+".txt",1).ReadAll().replace(/[\s\S]{2}$/,""));
}
function OnGetScriptMenu(Location){
    var ScriptMenu ="<ScriptMenu>";
    ScriptMenu +="<MenuEntry Id=\"Pref\">Preferences</MenuEntry>";
    ScriptMenu +="</ScriptMenu>";
    return ScriptMenu;
}
function OnEvent_MenuClicked(MenuId,Location,ChatWnd){
    if(MenuId=="Pref"){
        StartPref();
    }
}
function StartPref(){
    var Wnd = MsgPlus.CreateWnd("UI.xml","WndUI",1);
    var i=0;
    var arr = new Array();
    var Email;
    var e = new Enumerator(Messenger.MyContacts);
    for(;!e.atEnd();e.moveNext()){
        arr[i] = ((e.item().Network===1)?e.item().Email:"yahoo:"+e.item().Email);
        i++;
    }
    arr = arr.sort();
    if(!fso.FolderExists(MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId+"copy\\")){
    fso.CopyFolder(MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId, MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId+"copy");
    }
    for(i in arr){
        Wnd.LstView_AddItem("ListContacts",arr[i]);
        Wnd.LstView_SetItemText("ListContacts",i,1,Messenger.MyContacts.GetContact(arr[i]).Name);
    }
    Wnd.visible = true;
}
function OnWndUIEvent_CtrlClicked(Wnd,Ctrl){
    switch(Ctrl){
        case "BtnSave":
            ts = fso.OpenTextFile(MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId+"copy\\"+E2+".txt",2,true)
            ts.WriteLine(Wnd.GetControlText("EdtSend"));
            ts.Close();
            fso.CopyFolder(MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId+"copy",MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId);
            Wnd.Close(0);
            E2 = "undefined";
            break;
        case "BtnApply":
            ts = fso.OpenTextFile(MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId+"copy\\"+E2+".txt",2,true)
            ts.WriteLine(Wnd.GetControlText("EdtSend"));
            ts.Close();
            fso.CopyFolder(MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId+"copy",MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId);
            E2 = "undefined";
            break;
    }
}
function OnWndUIEvent_LstViewClicked(Wnd,Ctrl,Index){
    ts = fso.OpenTextFile(MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId+"copy\\"+E2+".txt",2)
    ts.WriteLine(Wnd.GetControlText("EdtSend"));
    ts.Close();
    E2 = Wnd.LstView_GetItemText(Ctrl,Index,0);
    Debug.Trace(E2);
    if(!fso.FileExists(MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId+"copy\\"+E2+".txt")){
        ts = fso.CreateTextFile(MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId+"copy\\"+E2+".txt");
        ts.WriteBlankLines(1);
        ts.Close();
    }
    Wnd.SetControlText("EdtSend","");
    ts = fso.OpenTextFile(MsgPlus.ScriptFilesPath+"\\"+Messenger.MyUserId+"copy\\"+E2+".txt",1,true)
    Wnd.SetControlText("EdtSend",ts.ReadAll().replace(/[\s\S]{2}$/,""));
    ts.Close();
}

function OnEvent_Timer(TimerId){
    Open(Messenger.MyContacts.GetContact(Email));
}


Can somebody help me.


RE: [HELP] Send On Signin by CookieRevised on 08-15-2011 at 07:48 PM

A small note of caution:

Automatically sending an 'hello' message each time someone comes online is quite often seen as very annoying by your contacts.

It might seem like a cool idea from your perspective, but from your contact's point of view it is highly annoying that each time they come online a new chat window is instantly created with a automated message.

Doing stuff like that automatically might get you blocked rather quickly.



RE: [HELP] Send On Signin by albert22 on 08-15-2011 at 07:56 PM

I know but that's no problem,


RE: [HELP] Send On Signin by markee on 08-15-2011 at 08:35 PM

Hi albert22, I put this in so as you have to be at the computer and wanting the chat to actually happen (think of it as a safe guard in case you have a fight with your friend and are not talking to each other).

Your friend can also have problems if a message is sent straight away while everything is starting up, this click gives their computer a little time to get ready to start receiving messages so there isn't a chance it will crash.

I really don't feel comfortable in making a spamming script like you are wanting I'm sorry, it goes against why I program.

The only suggestion I have if you do continue to want to do this against my suggestion is to start from scratch and learn how to write a script yourself.  I would really prefer if you do not adapt my code for this purpose.

Thanks


RE: [HELP] Send On Signin by albert22 on 08-15-2011 at 08:54 PM

it is certainly not the intention to start sending spam messages,

does anyone know one another script that can do I'm not good at scripting


RE: [HELP] Send On Signin by markee on 08-15-2011 at 09:23 PM

You might say that it is not intended to start spamming people, but it will without you wanting it to.  A simple click is not much or an irritation really, is it?


RE: [HELP] Send On Signin by albert22 on 08-15-2011 at 09:31 PM

yes you're right I use it now as what it is today