Cod Sursa:
#include
#include
#include
#include
#include
#NoTrayIcon
Global $hGUI, $hImage, $hGraphic
$gui = GUICreate("Yahoo_Av_Stealer_by_Cyber", 260, 104)
$input = GUICtrlCreateInput("type the id here", 5, 5, 190, 20)
$ok = GUICtrlCreateButton("Get it!", 200, 5, 55, 20)
$open = GUICtrlCreateButton("--------------------_Open the avatar_--------------------", 5, 30, 250, 20)
$wait = GUICtrlCreateLabel("", 10, 52, 240, 18)
$oth = GUICtrlCreateLabel("", 10, 75, 240, 25)
GUISetState(@SW_SHOW)
GUISetBkColor(0x000000, $gui)
GUICtrlSetBkColor($input, 0x333333)
GUICtrlSetColor($input, 0xFF6600)
GUICtrlSetColor($wait, 0xFFFFFF)
GUICtrlSetColor($oth, 0xFFFFFF)
While 1
$msg = GuiGetMsg()
Select
Case $msg = $ok
GUICtrlSetData($wait, "Please wait...")
$dir = DirCreate(@ScriptDir & "\Avatare")
$id = GUICtrlRead($input)
InetGet ( "http://img.msg.yahoo.com/avatar.php?yids=" & $id, @ScriptDir & "\Avatare\" & $id & ".png")
Sleep(1000)
GUICtrlSetData($wait, "Completed! Click on the button to open the avatar.")
GUICtrlSetData($oth, "The:" & " " & $id & ".png" & " " & "was created!")
Sleep(1000)
$size = WinGetPos($gui)
$size[0] = $size[0] + 270
$hGUI = GUICreate("...", 104 , 104, $size[0], $size[1])
GUISetBkColor(0x000000, $hGUI)
GUISetState()
Sleep(100)
_GDIPlus_StartUp()
Sleep(100)
$hImage = _GDIPlus_ImageLoadFromFile(@ScriptDir & "\Avatare\" & $id & ".png")
Sleep(1000)
$hGraphic = _GDIPlus_GraphicsCreateFromHWND($hGUI)
Sleep(100)
_GDIPlus_GraphicsDrawImage($hGraphic, $hImage, 4, 4)
do
until GUIGetMsg() = $GUI_EVENT_CLOSE
GUISetState(@SW_HIDE, $hGUI)
Case $msg = $open
$id = GUICtrlRead($input)
ShellExecute(@ScriptDir & "\Avatare\" & $id & ".png")
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
EndSelect
WEnd