out 20 2008

Script em Ruby para mudar a mensagem pessoal do MSN

  • Autor: admin em Programação
  • Sem Comentários. Seja o primeiro a comentar.
[ruby]

1. require ‘dl/import’
2. require ‘dl/struct’
3. require ‘dl/types’
4.
5. def encode(str)
6. require ‘Win32API’
7. str += “\0”
8. ostr = “\0” * 256
9. multiByteToWideChar = Win32API.new(‘kernel32′,’MultiByteToWideChar’,[‘L’,’L’,’P’,’L’,’P',’L’],’L’)
10. multiByteToWideChar.Call(0,0,str,-1,ostr,128)
11. ostr
12. end
13.
14. module Msn
15. extend DL::Importable
16. dlload ‘User32.dll’
17.
18. typealias “WPARAM”, “UINT”
19. typealias “LPARAM”, “UINT”
20.
21. CopyDataStruct = struct [“DWORD dwData”,”DWORD cbData”,”PVOID lpData”,]
22.
23. extern “int SendMessage(HWND, uint, uint, void*)”
24. extern “int FindWindow(const char*, const char*)”
25. extern “BOOL IsWindow(HWND)”
26.
27. WM_COPYDATA = 0x004a
28.
29. def Msn::set_personal_message(str)
30. str=encode(‘\\0Music\\01\\0’+str+’\\0\\0\\0\\0\\0’)
31. if isWindow(hwnd = findWindow(‘MsnMsgrUIManager’, nil))
32. cd = CopyDataStruct.malloc
33. cd.dwData = 0x547
34. cd.cbData =str.length * 2
35. cd.lpData = str.to_ptr
36. sendMessage(hwnd, WM_COPYDATA, 0, cd.to_ptr)
37. end
38. end
39. end
40.
41. Msn.set_personal_message ‘sua mensagem pessoal’ [/ruby]

TAGS:


DEIXE UM COMENTÁRIO

Subscrever

Subscreve o Blog



Publicidade

Comentários Recentes

  • shirley Balazs: Parabéns!! Informações de utilidade publica e de primeira, foi muito útil a mim.Obrigada!!
  • Jefferson Ferreira de brito: eu quero muito
  • thiago valente: Eu quero um para mim
  • Lucas martins balieiro: Eu não fiz o enem mesmo assim eu posso me inscrever no site essa é minha dúvida, só queme...
  • Francisca Marli Oliveira: quero saber quanto tenho no meu fgts

Links

Leitores Recentes

VALE O CLIQUE!

Site Seguro Ocioso

Divulgue o blog Infomaroto em seu site e tenha seu link ou banner aqui.
Blog Infomaroto