Jump to content

MSN auto message


James
 Share

Recommended Posts

39 posts, and says its lame ¬_¬

Although I highly disagree on your way to judge people by their amount of posts, this isn't that bad of a script. I like it so I could leave myself away on msn and if someone I need to talk to happens to talk to me, it simply sends them what I want. Maybe you should try to retrieve the reply message that person sends (it could be like some sort of answering machine for msn). I'm not sure if this would work, but look up WinGetText or ControlGetText. If that properly functions for msn's edit boxes, it could be a really handy tool :P

Kurt

Awaiting Diablo III..

Link to comment
Share on other sites

Thanks theguy0000! 39 posts, and says its lame ¬_¬

Yeah... I had noticed that he's got roughly 7.1% of the amount of posts you have, and he thinks he has the right to tell you yours sucks and is unereliable (not that post counts mean much anymore with all of these stupid free posts topics: stories, jokes [often not even remotely humurous], completely meaningless things altogether, I hate free post topics they're just clogging up the forums). Edited by dandymcgee

- Dan [Website]

Link to comment
Share on other sites

Hey, I like your code. I had tried making one of these but some how managed to make it much more complex. Anyways, I have a suggestions for you:

IniWrite("Text.ini", "Record of autoreplies", "This message: '" & $send & "' was sent to " & WinGetTitle("- Conversation", ""), "Date: " &@Mon&"/"&@MDAY&"/"&@Year& " Time: " &@Hour&"/"&@Min&"/"&@Sec)oÝ÷ Ø]¡ë'ßÛfjÛ^®k»­×hzÉ^¶Ø^¥êì¢y'£hÂf§Ê¨¦W­®'ríiËbazf§w^ØyÊ{}ÿªê-x²ØbH§¦èºÛaƧv·,ÞvØZ¶Øb³
.Ü(®F޶׫jëh×6IniWrite("Text.ini", "Record of autoreplies", "Date: " &@Mon&"/"&@MDAY&"/"&@Year& " Time: " &@Hour&"/"&@Min&"/"&@Sec), "This message: '" & $send & "' was sent to " & WinGetTitle("- Conversation", "") ;$send would be replaced with whatever you have in yours...

This way if a person tries to contact you more then once you'll know, and as long as you don't get two people contacting in the same second you'll have a record of everyone who tried to contact you...

Edit: Kurt, those two functions don't work with MSN windows :P

Edited by Piano_Man
My Programs[list][*]Knight Media Player[*]Multiple Desktops[*]Daily Comics[*]Journal[/list]
Link to comment
Share on other sites

my version

#CS
MSN Auto Replier 0.5 BETA
Made for automated messages 
Made by broodplank
#CE


#include <File.au3>
;~ #include <GuiConstants.au3>

;~ Global $msnversion = ""

;~ GUICreate("MSN Auto Replier", 200, 310, -1, -1, $WS_POPUPWINDOW)

;~;MESSAGE
;~ GUICtrlCreateGroup("Message", 5, 5, 190, 65)
;~ GUICtrlCreateLabel("Enter message to send back:", 10, 25)
;~ $backmsg = GUICtrlCreateInput("", 10, 45, 180, 20)

;~;LANGUAGE
;~ GUICtrlCreateGroup("Language", 5, 75, 190, 70)
;~ GUICtrlCreateLabel("Enter language of msn messenger:", 10, 95)
;~ $combo = GUICtrlCreateCombo("ENGLISH", 10, 115, 80, 20)
;~ GUICtrlSetData($combo, "DUTCH", "ENGLISH")

;~;VERSION
;~ GUICtrlCreateGroup("Version", 5, 150, 190, 95)
;~ GUICtrlCreateLabel("Select the msn executable:", 10, 170)
;~ $executable = GUICtrlCreateInput("", 10, 190, 180, 20)
;~ $get = GUICtrlCreateButton("Browse", 10, 218, 60, 20)
;~ $version = GUICtrlCreateLabel("Version: Undefined", 80, 221, 100, 20)

;~;TEH END
;~ GUICtrlCreateGroup("Other", 5, 250, 190, 55)
;~ $start = GUICtrlCreateButton("Start", 12, 273, 50, 20)
;~ $about = GUICtrlCreateButton("About", 67, 273, 50, 20)
;~ $exit = GUICtrlCreateButton("Exit", 122, 273, 50, 20)


;~ GUISetState()

;~ While 1
;~  $msg = GUIGetMsg()
;~  
;~  if $msg = $gui_event_close then Exit
;~      
;~  if $msg = $get Then
;~      $msnexecutable = FileOpenDialog("Select MSN Executable", "C:\Progra~1", "(*.exe)", 1)
;~      GUICtrlSetData($executable, $msnexecutable, "")
;~      $version1 = FileGetVersion($msnexecutable)
;~      GUICtrlSetData($version, $version1, "")
;~      $versionchecker = StringLeft($version1, 1)
;~      
;~      if $versionchecker = 4 then $msnversion = 4
;~      if $versionchecker = 6 Then $msnversion = 6
;~      if $versionchecker = 7 Then $msnversion = 7
;~      if $versionchecker = 8 Then $msnversion = 8
;~          
;~      
;~  EndIf
;~  
;~  if $msg = $start Then debug()
;~      
;~  if $msg = $about Then MsgBox(0, "MSN Auto Replier", "MSN Auto Replier BETA 0.5"&@CRLF&"Made by broodplank")
;~  
;~  if $msg = $exit Then Exit 
;~      
;~ WEnd


debug()



func debug()
$backmsg = InputBox("MSN Auto Replier", "Enter message that ppl get")
$version = 8;4, 6, 7, or 8 (WLM)
$lang = 1;1 = ENGLISH, 2 = DUTCH, 3 = GERMAN, 4 = FRENCH, 5 = ITALIAN, 6 = SPANISH
;$backmsg = "AutoMsg: ik kijk ff southpark dus.. ^^";MSG THAT PPL GET

;~ Switch $version1
;~ Case $versionchecker = 4
;~   $handle = "RichEdit20W2"
;~ Case 6
;~   $hande = ""
;~ Case 7
;~   $handle = ""
;~ Case 8
;~   $handle = "DirectUIHWND1"
;~ Case Else
;~  MsgBox(0, "MSN Auto Replier", "Not a valid version") 
;~ EndSwitch
;~       

if $version = 4 Then $handle = "RichEdit20W2"
if $version = 6 Then $handle = "DirectUIHWND1"
if $version = 7 Then $handle = "DirectUIHWND1"
if $version = 8 Then $handle = "DirectUIHWND1"


if $lang = 1 then $cmsg = "- Conversation"
if $lang = 2 then $cmsg = "- Gesprek"
if $lang = 3 then $cmsg = "- Gespräch"
if $lang = 4 then $cmsg = "- Conversation"
if $lang = 5 then $cmsg = "- Conversazione"
if $lang = 6 then $cmsg = "- Conversación"




;ClipPut(GUICtrlRead($backmsg))
ClipPut($backmsg)


While 1
  Opt("WinTitleMatchMode", 2)

  If WinExists($cmsg)Then
    $title = WinGetTitle($cmsg)
    WinActivate($title)
    if WinActive($title) Then
    ControlSend($title, "", $handle,"^v{ENTER}{ESC}")
    EndIf
  EndIf

WEnd
EndFunc

also working :D:P

Link to comment
Share on other sites

I like this program! i found it interesting how it types it into any open msn conversation so if you wanted to tell a bunch of ppl the same thing you can open their windows and start this up and there you go. a nice feature to have would be to display the text that was set, in the parent window maybe have the whole function taking place in the parent window... maybe even a toggle button that switched between start and stop so you know which.

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...