Is this possible? - 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: Is this possible? (/showthread.php?tid=47395)
Is this possible? by blindpoint21 on 07-10-2005 at 03:33 AM
Hi!
I was wondering if anyone could make a plugin that would make it so everytime I logged off it would update my name to tell the time that I logged off. I would appreciate a response either way.
Thanx
RE: Is this possible? by matty on 07-10-2005 at 03:40 AM
That would be difficult since with a Plugin the Unitialize function provided is triggered once you have signed out or exited Messenger. So in actual fact if you tried to change your name it wouldn't work because you are not signed in. You can however make a /x command that will change your name and sign you off/exit messenger for you.
RE: Is this possible? by blindpoint21 on 07-10-2005 at 04:01 AM
Could anyone help me with Matty's suggestion?
RE: Is this possible? by matty on 07-10-2005 at 04:28 AM
code: Option Explicit
Public MessengerAPI As Object
Public Function Initialize(ByVal nVersion As Long, _
ByVal sUserEmail As String, _
ByVal oMessenger As Object) _
As Boolean
Initialize = True
Set MessengerAPI = oMessenger
End Function
Public Function Uninitialize()
End Function
Public Function Configure()
End Function
Public Function GetPublishInfo(ByRef sPluginName As String, _
ByRef nCommandCount As Long, _
ByRef nTagCount As Long) _
As Boolean
sPluginName = "Change Name and sign off"
nCommandCount = 1
nTagCount = 0
GetPublishInfo = True
End Function
Public Function GetPublishCommandInfo(ByVal nCommandIdx As Long, _
ByRef sName As String, _
ByRef sValue As String, _
ByRef sHelp As String)
If (nCommandIdx = 1) Then
sName = "Change name and sign off"
sValue = "xsignoff"
sHelp = "<new name>"
End If
End Function
Public Function GetPublishTagInfo(ByVal nTagIdx As Long, _
ByRef sName As String, _
ByRef sValue As String)
End Function
Public Function ParseCommand(ByVal sCommand As String, _
ByVal sCommandArg As String, _
ByVal oConversationWnd As Object, _
ByRef sResult As String) _
As Boolean
If (StrComp(LCase(sCommand), "/xsignoff", vbTextCompare) = 0) Then
Dim blnReturn As Boolean
Dim strNewName As String
strNewName = Left(Right(sCommandArg, Len(sCommandArg)-1), Len(sCommandArg)-1)
blnReturn = SetNewName(strNewName)
sResult = ""
ParseCommand = True
MessengerAPI.SignOut()
Exit Function
End If
ParseCommand = False
End Function
Public Function ParseTag(ByVal sTag As String, _
ByVal oConversationWnd As Object, _
ByRef sResult As String) _
As Boolean
ParseTag = False
End Function
Public Function ReceiveNotify(ByVal sNotifyCode As String, _
ByVal sText As String, _
ByVal sContactName As String, _
ByVal oConversationWnd As Object, _
ByRef sTextToSend As String) _
As Boolean
ReceiveNotify = False
End Function
RE: Is this possible? by L. Coyote on 07-10-2005 at 04:31 AM
You can do this with MsgPlus! itself:
Go to the Preferences panel of MsgPlus! > Message Helpers > Quick Texts
ALIAS:
/mysignout (or whatever you want to call it)
MESSAGE:
/nick Signed out: (!D) (!T)
#3#/signout
When you want to sign out, just type "/mysignout" and it'll do what you want.
(If it didn't change your nickname, try changing the 3 for a higher number (up to 9 is allowed, though))
Edit: or use what Matty gave you.
Edit 2: you can also check out the help on the website.
RE: Is this possible? by blindpoint21 on 07-10-2005 at 04:39 AM
I think I found where to put all that stuff in at killov, but, I dont know what boxes what goes in.
where do each of these things go individually?
Thanks in advance
RE: Is this possible? by L. Coyote on 07-10-2005 at 04:42 AM
Check it out, I edited my previous message.
Edit: you're welcome
RE: Is this possible? by blindpoint21 on 07-10-2005 at 05:08 AM
Hey that worked perfectly, Thank you both very much
|