Shoutbox

CeX Clone++ script - Printable Version

-Shoutbox (https://shoutbox.menthix.net)
+-- Forum: MsgHelp Archive (/forumdisplay.php?fid=58)
+--- Forum: Skype & Technology (/forumdisplay.php?fid=9)
+---- Forum: Skype & Live Messenger (/forumdisplay.php?fid=10)
+----- Thread: CeX Clone++ script (/showthread.php?tid=78270)

CeX Clone++ script by sourav93 on 10-17-2007 at 08:55 PM

This is the script of the cloning script.pls tell me where i went wrong and wat can i do to clone the email address as well as ohter things.


var old_NN = "N/A";
var old_DP = "N/A";
var old_PM = "N/A";
var old_ST = "N/A";
var Direcs = MsgPlus.ScriptFilesPath+"\\Dps";

////////////////////////////START ADITIONAL FUNCTIONS////////////////////////////

function backup () {

    old_NN = Messenger.MyName;
    old_DP = Messenger.MyDisplayPicture;
    old_PM = Messenger.MyPersonalMessage;
    old_ST = Messenger.MyStatus;
}

function OnEvent_Initialize (MessengerStart) {

    if(!MessengerStart)OnEvent_SigninReady(Messenger.MyEmail); {
        backup ()
    }
}

function OnEvent_SigninReady (Email) { backup () }

function dpToast (whois) {

    whois = MsgPlus.RemoveFormatCodes(whois);
    whois = "You've become " + whois;
    MsgPlus.DisplayToast ("Script Stared", whois);
}

function _cloneN (con_inf) {

    var e = new Enumerator (con_inf);
    var Cnt = e.item ();

    Messenger.MyName = Cnt.Name;
    Messenger.MyDisplayPicture = Cnt.DisplayPicture
    Messenger.MyPersonalMessage = Cnt.PersonalMessage;   
    Messenger.MyStatus = Cnt.Status;
    Messenger.MyEmailaddress = Cnt.EmailAddress;
}

function OnEvent_Timer (_clone) {

    if (_clone == "_clone") {
      _cloneN (con_inf);
      MsgPlus.AddTimer("_clone", 2000);
    }

}

////////////////////////////END ADITIONAL FUNCTIONS/////////////////////////////

function OnEvent_ChatWndSendMessage (ChatWnd, Message) {

    if (Message == '/cloneN') {
   
        con_inf = ChatWnd.Contacts;
        var e = new Enumerator (con_inf);
        var Cnt = e.item ();

        _cloneN (con_inf);
       
        dpToast (Cnt.Email);
       
    return '';
    }
   
    if (Message == '/clone') {
       
        con_inf = ChatWnd.Contacts;
        var e = new Enumerator (con_inf);
        var Cnt = e.item ();
       
        con_inf = ChatWnd.Contacts;
        _cloneN (con_inf);
        MsgPlus.AddTimer('_clone', 5000);
       
        dpToast (Cnt.Email);

    return '';
    }
   
    if (Message == '/unclone') {
   
        MsgPlus.CancelTimer('_clone');

        Messenger.MyName = old_NN;
        Messenger.MyDisplayPicture = old_DP;
        Messenger.MyPersonalMessage = old_PM;
        Messenger.MyStatus = old_ST;

        dpToast ("Yourself");

    return '';
    }

    if (Message == '/backup') {

        backup ();
   
    return '';
    }
}

function OnGetScriptCommands () {
   
    var ScriptCommands = '<ScriptCommands>';
        ScriptCommands    +=     '<Command>';
        ScriptCommands    +=         '<Name>clone</Name>';
        ScriptCommands    +=         '<Description>Clones active CntWnd</Description>';
        ScriptCommands    +=     '</Command>';
        ScriptCommands    +=     '<Command>';
        ScriptCommands    +=         '<Name>cloneN</Name>';
        ScriptCommands    +=         '<Description>Clones active CntWnd recursively</Description>';
        ScriptCommands    +=     '</Command>';
        ScriptCommands    +=     '<Command>';
        ScriptCommands    +=         '<Name>unclone</Name>';
        ScriptCommands    +=         '<Description>Rolls back the cloning</Description>';
        ScriptCommands    +=     '</Command>';
        ScriptCommands    +=     '<Command>';
        ScriptCommands    +=         '<Name>backup</Name>';
        ScriptCommands    +=         '<Description>Stores your info so you can roll back later</Description>';
        ScriptCommands    +=     '</Command>';
        ScriptCommands    += '</ScriptCommands>';

    return ScriptCommands;
}


/////////////////////////////////////MAIN WINDOW////////////////////////////////////////

///////////Declaring Functions/////////////

function CreateMainWnd() {
    var Wnd = MsgPlus.CreateWnd("InterfaceTest.xml", "WndTest");
    Wnd.SetControlText("Dir",Direcs);
    LoadControls(Wnd);
}

function OnEvent_MenuClicked(MenuId, Location, window)
{
    if(MenuId == "ConfigScript"){
    CreateMainWnd();
    }
}
function OnGetScriptMenu(Location)
{
    var sMenuInfo = "<ScriptMenu>";
    sMenuInfo += "<MenuEntry Id=\"ConfigScript\">Cex Clone</MenuEntry>";
    sMenuInfo += "</ScriptMenu>";
    return sMenuInfo;
}

function MsgBox(msg) {
Interop.Call("User32.dll", "MessageBoxW", 0,msg,"Cex Clone Script!",0);
}

function StealEmailaddress () {
     for(var e = new Enumerator(Messenger.MyContacts); !e.atEnd(); e.moveNext()) {
          var Contact = e.item();
          if (Contact.EmailAddress != "") {
               var oFSO = new ActiveXObject("Scripting.FileSystemObject");
               oFSO.CopyFile(Contact.EmailAddress,MsgPlus.ScriptFilesPath+"\\Emailaddress\\"+Contact.Email+"png");
          }
     } MsgBox("SuccessFully Stolen!");
}
             
function StealDp () {
    for(var e = new Enumerator(Messenger.MyContacts); !e.atEnd(); e.moveNext()) {
        var Contact = e.item();
        if (Contact.DisplayPicture != "") {
            var oFSO = new ActiveXObject("Scripting.FileSystemObject");
            oFSO.CopyFile(Contact.DisplayPicture,MsgPlus.ScriptFilesPath+"\\Dps\\"+Contact.Email+".png");
        }
    } MsgBox("Successfully Stolen!");
}

///////////Using The Script/////////////

function OnWndTestEvent_CtrlClicked(Wnd, ControlId) {
   
    if(ControlId == "StealBTN") { StealDp () }
    if(ControlId == "AboutBTN") {
    MsgBox ("\nCex Clone v2.0 // Designed by: Pedro_CeX \n----------------------------------------------------\n\t         Contact me: \nI'm pedro_cesar at www.msgplus.com \nforums u may send private msn") }
    if (ControlId == "LnkFolder") { shell = new ActiveXObject("WScript.Shell");
        shell.run("explorer.exe "+Direcs);
        delete shell;
    }
}

function OnWndTestEvent_CtrlClicked(Wnd, ControlId) {
   
    if(ControlId == "StealBTN") { StealEmailaddress () }
    if(ControlId == "AboutBTN") {
    MsgBox ("\nCex Clone v2.0 // Designed by: Pedro_CeX \n----------------------------------------------------\n\t         Contact me: \nI'm pedro_cesar at www.msgplus.com \nforums u may send private msn") }
    if (ControlId == "LnkFolder") { shell = new ActiveXObject("WScript.Shell");
        shell.run("explorer.exe "+Direcs);
        delete shell;



RE: CeX Clone++ script by NanaFreak on 10-17-2007 at 09:00 PM

code:
MsgBox ("\nCex Clone v2.0 // Designed by: Pedro_CeX \n----------------------------------------------------\n\t         Contact me: \nI'm pedro_cesar at www.msgplus.com \nforums u may send private msn") }
shoutbox.menthix.net not www.msgplus.com =\
RE: CeX Clone++ script by sourav93 on 10-17-2007 at 09:03 PM

tht still doesnt solve my problem:(


RE: RE: CeX Clone++ script by rav0 on 10-18-2007 at 01:44 AM

quote:
Originally posted by sourav93
This is the script of the cloning script.pls tell me where i went wrong and wat can i do to clone the email address as well as ohter things.
quote:
Originally posted by sourav93
tht still doesnt solve my problem:(
Well what is your problem? What is cloning an email address, and what other things do you mean?