What happened to the Messenger Plus! forums on msghelp.net?
Shoutbox » MsgHelp Archive » Skype & Technology » Skype & Live Messenger » CeX Clone++ script

CeX Clone++ script
Author: Message:
sourav93
New Member
*


Posts: 9
Joined: Oct 2007
O.P. CeX Clone++ script
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;


10-17-2007 08:55 PM
Profile E-Mail PM Find Quote Report
NanaFreak
Scripting Contest Winner
*****


Posts: 1476
Reputation: 53
32 / Male / Flag
Joined: Jul 2006
RE: CeX Clone++ script
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 =\
10-17-2007 09:00 PM
Profile PM Find Quote Report
sourav93
New Member
*


Posts: 9
Joined: Oct 2007
O.P. RE: CeX Clone++ script
tht still doesnt solve my problem:(
10-17-2007 09:03 PM
Profile E-Mail PM Find Quote Report
rav0
Veteran Member
*****

Avatar
i have an avatar

Posts: 1419
Reputation: 29
34 / Male / Flag
Joined: Aug 2003
RE: RE: CeX Clone++ script
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?
| [Image: dorsh] |

(\ /)
(O.o)
(> <)

This is Bunny. Copy Bunny into your signature to help him on his way to world domination
10-18-2007 01:44 AM
Profile E-Mail PM Web Find Quote Report
« Next Oldest Return to Top Next Newest »


Threaded Mode | Linear Mode
View a Printable Version
Send this Thread to a Friend
Subscribe | Add to Favorites
Rate This Thread:

Forum Jump:

Forum Rules:
You cannot post new threads
You cannot post replies
You cannot post attachments
You can edit your posts
HTML is Off
myCode is On
Smilies are On
[img] Code is On