Here's an update for you so that you can chat within the same window!
Code:
Gui, Add, Text,, PC name to send messenger msg to.
Gui, Add, Edit, vPCName
Gui, Add, Text,, What do you have to say today?
Gui, Add, Edit, vSpeak
Gui, Add, Button, x10 y95 Default, &Go
Gui, Add, Button, x40 y95 Default, Clear &Log
Gui, Add, Button, x10 y125 Default, Clear &PCName+msgbox
Gui, Add, Edit, x185 y0 w460 h370 ,Welcome To Robbie's Messenger ; removed read-only attribute
Gui, Show, +NoActivate,Messenger By Robbie
loop{
winwait,Messenger Service
ControlGetText, oldtxt, Edit3, Messenger By Robbie
wingettext,newtxt,Messenger Service,from
WinClose , Messenger Service
StringReplace, newtxt, newtxt, OK,, ;Removed ALL just incase you want to reply with " OK "
fulltxt := oldtxt "`r`n" newtxt
ControlSetText, Edit3, %fulltxt%, Messenger By Robbie
}
GuiClose:
ExitApp
ButtonGo:
Gui, Submit, NoHide
if pcname = ;
{
msgbox, Who are you talking to?
return
}
if speak = ;
{
msgbox, What do you want to say?
Return
}
else
Run, %comspec% /k net send %pcname% %Speak%
sleep, 500
WinClose, %comspec%
EnvSet, PCName,
EnvSet, Speak,
Return
ButtonClearLog:
Gui, Submit, NoHide
ControlSetText, Edit3, , Messenger By Robbie
Return
ButtonClearPCName+msgbox:
Gui, Submit, NoHide
ControlSetText, Edit1, , Messenger By Robbie
ControlSetText, Edit2, , Messenger By Robbie
Return
Login
Register
FAQ
Search
) but i can't get the basic function to work. basically what i want is for the script to wait until a message comes , and then retrieve the information form the message, and add it to an edit field in a gui( keeping the older text in the edit aswell). i have achieved everything exept to keep the older text that is; it updates when a new message comes but the older text is removed. also it's kind of glitchy xD, it seems that when i give the gui(with edit field) focus, the text goes back to what it origonaly was , unless i drag somthing over it..it's weird lol ..anyways, here's my script:
, thanks for any responses
