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?
|