UnHacked Posted December 28, 2006 Posted December 28, 2006 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!
Zedna Posted December 28, 2006 Posted December 28, 2006 (edited) I think something like this: expandcollapse popup;#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 December 28, 2006 by Zedna Resources UDF ResourcesEx UDF AutoIt Forum Search
UnHacked Posted December 30, 2006 Author Posted December 30, 2006 still not workin... any ideas? anyone please?
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now