elitemadzone.org - Ko moze vise? -

Fuzz
Bojan Vukovic
Novi Sad

Član broj: 8631
Poruke: 3866
*.dialup.neobee.net.

+9 Profil

^{29.11.2005. u 09:44 - pre 223 meseci}

167...mozete da klikcete na oba dugmeta misa ako niste primetili...

Hm...evo uspeo sam i 227 u medjuvremenu....

_{[Ovu poruku je menjao Fuzz dana 29.11.2005. u 10:49 GMT+1]}

anti-heroin spree

Odgovor na temu

acafcrs
Aleksandar
Beograd

Član broj: 61373
Poruke: 10
212.200.27.*

Jabber: acafcrs@hotmail.com

Profil

Re: Ko moze vise? -

^{29.11.2005. u 11:58 - pre 223 meseci}

jel' frka ako idem preko hiljadu!?

Odgovor na temu

djordje
Novi Sad

Član broj: 3704
Poruke: 1725
..mtsns-ns.customer.sbb.co.yu.

+3 Profil

Re: Ko moze vise? -

^{29.11.2005. u 12:13 - pre 223 meseci}

Citat:

Dajte link da probam, ja klikcem otprilike 5,6 puta po sekundi :)

Imas u prvoj poruci ispod texta

Citat:

jel' frka ako idem preko hiljadu!?

Za misa jeste

Odgovor na temu

reiser

Član broj: 7895
Poruke: 2314

+102 Profil

Re: Ko moze vise? -

^{29.11.2005. u 12:22 - pre 223 meseci}

6527

Odgovor na temu

Shadowed
Vojvodina

Član broj: 649
Poruke: 12849

+4784 Profil

Re: Ko moze vise? -

^{29.11.2005. u 12:43 - pre 223 meseci}

Kako ono bese...?

Code:

private sub Command1_Click()
    timer1.interval=10000
    timer1.enabled=true
    do until timer1.enabled
        mouse_event(MOUSEEVENTF_LEFTDOWN,50,50,0,0)
        mouse_event(MOUSEEVENTF_LEFTUP,50,50,0,0)
    loop
End sub

Private sub timer1_timer()
    timer1.enabled=false
end sub

I staviti taj prozor gde se klikce u ugao ekrana. Ovo pod pretpostavkom da je dato vreme od 10sec. Ako nije malo prepraviti kod...

Nebojsa Milanovic: Što se tiče Trumpa, smatram ga vrhunskim predsednikom i voleo bih da živim u državi na čijem je on čelu.
Nebojsa Milanovic: Rusija ne laže, ne vodi osvajačke ratove
Nebojsa Milanovic: Trump je svetla tačka u USA blatu.

Odgovor na temu

Marko_L
Beograd

Član broj: 20532
Poruke: 2885
*.yubc.net.

Jabber: Marko_L@elitesecurity.org

+828 Profil

Re: Ko moze vise? -

^{30.11.2005. u 10:13 - pre 223 meseci}

hahahahaha, dobraaaa :)
Elem, još je bolje ako napadneš dugme direktno

Code:
Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hWnd _
    As Long, ByVal Msg As Long, wParam As Any, lParam As Any) As Long
Private Declare Function SetActiveWindow Lib "user32.dll" (ByVal hWnd As Long) As Long
Private Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" (ByVal _
    lpClassName As Any, ByVal lpWindowName As Any) As Long
Private Declare Function FindWindowEx Lib "user32.dll" Alias "FindWindowExA" (ByVal _
    hwndParent As Long, ByVal hwndChildAfter As Long, ByVal lpszClass As Any, _
    ByVal lpszWindow As Any) As Long
    Private Const BM_CLICK = &HF5
    Dim petlja As Boolean

Private Sub Command1_Click()
If petlja = False Then petlja = True Else petlja = True
   Dim hwndDialog As Long
    Dim hwndButton As Long
    Dim retval As Long
Do Until petlja = False
DoEvents
    hwndDialog = FindWindow(CLng(0), "Clickometer v1.0")
    If hwndDialog = 0 Then Exit Sub
    hwndButton = FindWindowEx(hwndDialog, 0, CLng(0), "Click on me as fast as You can!")
    retval = SetActiveWindow(hwndDialog)
    retval = SendMessage(hwndButton, BM_CLICK, ByVal CLng(0), ByVal CLng(0))
Loop
End Sub

Ide do 2000 bez problema :) Ili, ako hoćeš da ga zbuniš, samo prebaciš petlju malo niže i onda ide preko 5000, nekoliko puta :)

_{[Ovu poruku je menjao Marko_L dana 30.11.2005. u 11:15 GMT+1]}

-Odracuonogakomijedrpiorazmaknicu.
-Ne rxdi mi txstxturx, kxd god hocu dx
ukucxm "x" onx ukucx "x".
-Ko kaaz e da ja neuummem da kuuca
m.
-Piše "Insert disk 3", a jedva sam i ova
dva ugurao u drajv
-Postoje samo dve osobe kojima
verujem, jedna sam ja, a druga nisi ti

Odgovor na temu