Sign in to follow this  
Followers 0
UnHacked

Yahoo Messenger Status Changer

3 posts in this topic

hey guys im new here and im having some problem...

#include <GUIConstants.au3>

#Include <GuiCombo.au3>

#include <String.au3>

$user = "kirakuchi43"

dim $send[13]

$send[0] = "I"

$send[1] = "I'm"

$send[2] = "I'm "

$send[3] = "I'm D"

$send[4] = "I'm Dy"

$send[5] = "I'm Dyi"

$send[6] = "I'm Dyin"

$send[7] = "I'm Dying"

$send[8] = "I'm Dying."

$send[9] = "I'm Dying.."

$send[10] = "I'm Dying..."

$send[11] = "I'm Dying... "

$send[12] = "I'm Dying... "

$i = 0

While $i <= 1000

$read=RegRead("HKEY_CURRENT_USER\SOFTWARE\Yahoo\pager\profiles\" & $user & "\Custom Msgs","1")

$status = $send[$i]

$busy = "1"

$hex=_StringToHex($status)

RegWrite("HKEY_CURRENT_USER\SOFTWARE\Yahoo\pager\profiles\" & $user & "\Custom Msgs", "5_bin", "REG_BINARY", $hex & "00")

RegWrite("HKEY_CURRENT_USER\SOFTWARE\Yahoo\pager\profiles\" & $user & "\Custom Msgs", "5", "REG_SZ", $status)

RegWrite("HKEY_CURRENT_USER\SOFTWARE\Yahoo\pager\profiles\" & $user & "\Custom Msgs", "5_DND", "REG_DWORD", $busy)

$handle = WinGetHandle("Yahoo! Messenger","")

PostMessage($handle, "0x111", "0x188", "0");

Sleep(2500)

RegDelete("HKEY_CURRENT_USER\SOFTWARE\Statuses")

RegDelete("HKEY_CURRENT_USER\SOFTWARE\Yahoo\pager\profiles\" & $user & "\Custom Msgs")

WEnd

Func PostMessage($hWnd, $msg, $wParm, $lParm)

Return DllCall("user32.dll", "int", "PostMessage","hwnd", $hWnd, "int", $msg, "int", $wParm, "int", $lParm)

EndFunc

what this script does is to change the status of yahoomessenger constantly... it works fine but after but a couple of minutes it stop changing my status. yes it change in my yahoo messenger but it doesnt change in my friend's yahoo messenger. i tried everything i could imagine... i try deleting REG every loop but still it didnt work... did i do something wrong? please help me... thanks in advance! :P

Share this post


Link to post
Share on other sites



#2 ·  Posted (edited)

I think something like this:

;#include <GUIConstants.au3>
;#Include <GuiCombo.au3>
#include <String.au3>

$user = "kirakuchi43"
dim $send[13]
$send[0] = "I"
$send[1] = "I'm"
$send[2] = "I'm "
$send[3] = "I'm D"
$send[4] = "I'm Dy"
$send[5] = "I'm Dyi"
$send[6] = "I'm Dyin"
$send[7] = "I'm Dying"
$send[8] = "I'm Dying."
$send[9] = "I'm Dying.."
$send[10] = "I'm Dying..."
$send[11] = "I'm Dying... "
$send[12] = "I'm Dying... "

$read=RegRead("HKEY_CURRENT_USER\SOFTWARE\Yahoo\pager\profiles\" & $user & "\Custom Msgs","1")
$handle = WinGetHandle("Yahoo! Messenger","")
$busy = "1"

While 1
    For $i = 0 To 12
        $status = $send[$i]
        $hex=_StringToHex($status)
        RegWrite("HKEY_CURRENT_USER\SOFTWARE\Yahoo\pager\profiles\" & $user & "\Custom Msgs", "5_bin", "REG_BINARY", $hex & "00")
        RegWrite("HKEY_CURRENT_USER\SOFTWARE\Yahoo\pager\profiles\" & $user & "\Custom Msgs", "5", "REG_SZ", $status)
        RegWrite("HKEY_CURRENT_USER\SOFTWARE\Yahoo\pager\profiles\" & $user & "\Custom Msgs", "5_DND", "REG_DWORD", $busy)
        PostMessage($handle, "0x111", "0x188", "0");
        Sleep(2500)
    Next
    
    RegDelete("HKEY_CURRENT_USER\SOFTWARE\Statuses")
    RegDelete("HKEY_CURRENT_USER\SOFTWARE\Yahoo\pager\profiles\" & $user & "\Custom Msgs")
WEnd

Func PostMessage($hWnd, $msg, $wParm, $lParm)
    Return DllCall("user32.dll", "int", "PostMessage","hwnd", $hWnd, "int", $msg, "int", $wParm, "int", $lParm)
EndFunc
Edited by Zedna

Share this post


Link to post
Share on other sites

still not workin... any ideas? anyone please? :D:P

Share this post


Link to post
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
Sign in to follow this  
Followers 0