Shoutbox

nickname changer ! - 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)
+----- Forum: Plug-Ins (/forumdisplay.php?fid=28)
+------ Thread: nickname changer ! (/showthread.php?tid=42999)

nickname changer ! by singh86 on 04-17-2005 at 05:02 AM

i was just wondering, if there is any plugin that can automatically change ur nickname after some time or can someone help me write one in vb.

thanks in advance
singh


RE: nickname changer ! by Grue on 04-17-2005 at 06:11 AM

Messenger Discovery 3 (http://www.messengerdiscovery.com/) can change your nickname either every time you sign in or every minute to a random nickname from a list in which you make.


RE: nickname changer ! by J.J on 04-17-2005 at 06:36 AM

You could try Cyberdudes counter in nickname plugin

This allows you to put a countdown in your nikname and it changes every 6, 10, 15, 30 seconds or 1, 2, 5, 10 minutes


RE: RE: nickname changer ! by singh86 on 04-17-2005 at 07:51 AM

quote:
Originally posted by Third Dimension
You could try Cyberdudes counter in nickname plugin

This allows you to put a countdown in your nikname and it changes every 6, 10, 15, 30 seconds or 1, 2, 5, 10 minutes


i m using 7.0.0777 version of the messenger, it seems not working on this version, can u help me on how i can make it work
thanks
RE: nickname changer ! by matty on 04-17-2005 at 08:35 AM

code:
'This is just an example of using the Visual Basic Input Box on the Initialize Function to set the new name.

Public strNewUserName As String
Public blnNameChange As Boolean

Public Function Initialize(ByVal nVersion As Long, ByVal sUserEmail As String, ByVal oMessenger As Object) As Boolean
    Initialize = True
    strNewUserName = InputBox("Enter New Name","Enter New Name", "Enter New Name")

    If strNewUserName = "" Or strNewUserName = "Enter New Name" Then
        MsgBox "Please Select A Different Name"
    Else
        blnNameChange = SetNewName(strNewUserName)
    End If
End Function