Jump to content

Need Collaboration With A Script of Mine


Recommended Posts

Ok I have this script I have been working on but it always screws up sometimes it will go through 24 times some times or not even once. It is really bother some as any thing I try to do leads to an other problem or I find a new problem. I am trying to make a bot for 2D game called Dofus but I am always running into problems. I have a working remote desktop and as the game is a simple 2D game I would like to ask some to collaborate with me on this. My remote desktop would let you move my mouse and type and do almost every thing as your in front of the computer. Any ways I am serious about it and here is the script I have made all 664 lines which sorta works.

Basicly what the script dose it creates a character and then sends it over to an NPC which will give you a quest to fight a monster and then the character starts the fight and then I have an other character of mine join in and have it kill it then when the fights over I tell the character I had join in to to sit to heal then I go back to the other character and talk to the NPC again and get a key from him then I trade between the two characters and I have the character I made and get the key and any items and money it got from the fight to that other character then I delete that character and start over again.

CODE
;script below

Global $pix1

Global $pix2

Global $pix3

Global $pix4

Global $pix5

Global $pix6

Global $pix7

Global $count

sleep(2000)

_delcharwait()

Func _delcharwait()

_delchar()

$count = 0

EndFunc

Func _delchar()

If Hex(PixelGetColor(809, 435),6) = "FA952F" Then

MouseClick("Left", 868, 578, 1, 0)

MouseClick("left", 553, 397, 1, 0)

MouseClick("left", 551, 481, 1, 0)

Sleep(2000)

_makechar()

ElseIf Hex(pixelGetColor(792, 551),6) = "FFFFFF" Then

MouseClick("Left", 868, 578, 1, 0)

MouseClick("left", 553, 397, 1, 0)

MouseClick("left", 551, 481, 1, 0)

Sleep(2000)

_makechar()

ElseIf Hex(pixelGetColor(800, 467),6) = "406F96" Then

MouseClick("Left", 868, 578, 1, 0)

MouseClick("left", 553, 397, 1, 0)

MouseClick("left", 551, 481, 1, 0)

Sleep(2000)

_makechar()

Else

Sleep(1000)

_delcharwait()

Endif

EndFunc

Func _makechar()

MouseClick("left", 875, 650)

mouseclick("left", 500, 655)

Send("Silverna")

mouseclick("left", 728, 337, 1, 0)

sleep(2000)

If Hex(PixelGetColor(256, 445),6) = "FF3300" Then ;Feca

Sleep(25)

MouseClick("Left", 949, 654)

ElseIf Hex(pixelGetColor(240, 453),6) = "FE3636" Then ;cra

MouseClick("Left", 792, 338)

Sleep(50)

MouseClick("Left", 949, 654)

ElseIf Hex(pixelGetColor(229, 458),6) = "495E76" Then ;iop

MouseClick("Left", 792, 338)

Sleep(1050)

MouseClick("Left", 792, 338)

Sleep(50)

MouseClick("Left", 949, 654)

ElseIf Hex(pixelGetColor(243, 455),6) = "663300" Then ;eni

MouseClick("Left", 792, 338)

Sleep(1050)

MouseClick("Left", 792, 338)

Sleep(1050)

MouseClick("Left", 792, 338)

Sleep(50)

MouseClick("Left", 949, 654)

ElseIf Hex(pixelGetColor(251, 458),6) = "EED8AA" Then ;ecaflip

MouseClick("Left", 792, 338)

Sleep(1050)

MouseClick("Left", 792, 338)

Sleep(1050)

MouseClick("Left", 792, 338)

Sleep(1050)

MouseClick("Left", 792, 338)

Sleep(50)

MouseClick("Left", 949, 654)

ElseIf Hex(pixelGetColor(255, 434),6) = "9E9E9E" Then ;Panadwa

MouseClick("Left", 792, 338)

Sleep(1050)

MouseClick("Left", 792, 338)

Sleep(1050)

MouseClick("Left", 792, 338)

Sleep(1050)

MouseClick("Left", 792, 338)

Sleep(1050)

MouseClick("Left", 792, 338)

Sleep(50)

MouseClick("Left", 949, 654)

ElseIf Hex(pixelGetColor(249, 453),6) = "FFCC00" Then ;xelor

MouseClick("Left", 499, 338)

Sleep(1050)

MouseClick("Left", 499, 338)

Sleep(1050)

MouseClick("Left", 499, 338)

Sleep(1050)

MouseClick("Left", 499, 338)

Sleep(1050)

MouseClick("Left", 499, 338)

Sleep(1050)

MouseClick("Left", 499, 338)

Sleep(50)

MouseClick("Left", 949, 654)

ElseIf Hex(pixelGetColor(253, 449),6) = "000033" Then ;sram

MouseClick("Left", 499, 338)

Sleep(1050)

MouseClick("Left", 499, 338)

Sleep(1050)

MouseClick("Left", 499, 338)

Sleep(1050)

MouseClick("Left", 499, 338)

Sleep(1050)

MouseClick("Left", 499, 338)

Sleep(50)

MouseClick("Left", 949, 654)

ElseIf Hex(pixelGetColor(256, 443),6) = "784B01" Then ;entrof

MouseClick("Left", 499, 338)

Sleep(1050)

MouseClick("Left", 499, 338)

Sleep(1050)

MouseClick("Left", 499, 338)

Sleep(1050)

MouseClick("Left", 499, 338)

Sleep(50)

MouseClick("Left", 949, 654)

ElseIf Hex(pixelGetColor(258, 464),6) = "FFCC00" Then ; osa

MouseClick("Left", 499, 338)

Sleep(1050)

MouseClick("Left", 499, 338)

Sleep(1050)

MouseClick("Left", 499, 338)

Sleep(50)

MouseClick("Left", 949, 654)

ElseIf Hex(pixelGetColor(259, 446),6) = "FF66FF" Then

MouseClick("Left", 499, 338)

Sleep(1050)

MouseClick("Left", 499, 338)

Sleep(50)

MouseClick("Left", 949, 654)

ElseIf Hex(pixelGetColor(251, 439),6) = "D2221A" Then

MouseClick("Left", 499, 338)

Sleep(100)

MouseClick("Left", 949, 654)

EndIf

_loopstoptrail()

EndFunc

Func _loopstoptrail()

Sleep(2000)

_stoptrailer()

EndFunc

Func _stoptrailer()

If Hex(pixelGetColor(177, 67),6) = "FFFFFF" Then

MouseClick("Left", 177, 69, 1, 0);STOP TRAILER

Sleep(1500)

MouseClick("Left", 556, 371)

Sleep(70)

MouseClick("Left", 657, 503)

_stopmiscount()

ElseIf Hex(pixelGetColor(178, 72),6) = "E45600" Then

MouseClick("Left", 177, 69);STOP TRAILER

Sleep(1500)

MouseClick("Left", 556, 371)

Sleep(70)

MouseClick("Left", 657, 503)

_stopmiscount()

Else

_loopstoptrail()

EndIf

EndFunc

Func _stopmiscount()

_countmove()

EndFunc

Func _countmove()

$count = $count + 1

If $count <= 3 Then

_moveme()

Else

Sleep(1500)

_charselecter()

EndIf

EndFunc

Func _moveme()

Sleep(70)

MouseClick("Left", 987, 483)

MouseClick("Left", 1091, 557)

Sleep(4800)

MouseClick("Left", 1091, 557)

Sleep(4800)

MouseClick("Left", 813, 606)

Sleep(4800)

MouseClick("Left", 1005, 575)

Sleep(4800)

;Incarman Map (-1,3) Temple

MouseClick("Left", 1119, 593)

Sleep(4800)

;Incarman Map (0,3) exit Temple

MouseClick("Left", 1104, 521)

Sleep(4800)

;Incarman Map (1,3)

MouseClick("Left", 1115, 380)

Sleep(4800)

;Incarman Map (2,3)

MouseClick("Left", 1107, 343)

Sleep(4800)

;Incarman Map (3,3)

MouseClick("Left", 1116, 485)

Sleep(4800)

;Incarman Map (4,3)

MouseClick("Left", 397, 598)

Sleep(4800)

;Incarman Map (4,4)

MouseClick("Left", 901, 437)

Sleep(2700)

_groupus()

EndFunc

Func _groupus()

MouseClick("left", 367, 760)

MouseClick("right", 367, 760)

MouseClick("left", 406, 748)

Send("/w Tsunechika Hello")

Send("{ENTER}")

MouseClick("left", 241, 727)

MouseClick("left", 302, 678)

Sleep(250)

MouseClick("left", 133, 781)

MouseClick("left", 554, 352)

MouseClick("left", 288,786)

sleep(50)

_backup()

EndFunc

Func _backup()

_khfinder()

EndFunc

Func _khfinder()

$pix1 = PixelSearch(0,0,@DesktopWidth, @DesktopHeight, 0xCAC056)

$pix2 = PixelSearch(0,0,@DesktopWidth, @DesktopHeight, 0x6D9160)

$pix3 = PixelSearch(0,0,@DesktopWidth, @DesktopHeight, 0x7FA066)

$pix4 = PixelSearch(0,0,@DesktopWidth, @DesktopHeight, 0x91AD6B)

$pix5 = PixelSearch(0,0,@DesktopWidth, @DesktopHeight, 0xD3DF65)

$pix6 = PixelSearch(0,0,@DesktopWidth, @DesktopHeight, 0xB7A24D)

$pix7 = PixelSearch(0,0,@DesktopWidth, @DesktopHeight, 0x919A57)

If IsArray($pix1) Then ; If $pix1 is an array, then it found key holder

MouseClick("left", $pix1[0], $pix1[1])

MouseClick("Left", $pix1[0] + 12, $pix1[1] + 12)

If Hex(PixelGetColor(250, 144),6) = "F8C3B7" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

ElseIf Hex(PixelGetColor(237, 92),6) = "E0B300" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

ElseIf Hex(PixelGetColor(190,253),6) = "FFFFCE" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

Else

_backup()

EndIf

ElseIf IsArray($pix2) Then ; If $pix2 is an array, then it found key holder

MouseClick("left", $pix2[0], $pix2[1])

MouseClick("Left", $pix2[0] + 12, $pix2[1] + 12)

If Hex(PixelGetColor(250, 144),6) = "F8C3B7" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

ElseIf Hex(PixelGetColor(237, 92),6) = "E0B300" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

ElseIf Hex(PixelGetColor(190,253),6) = "FFFFCE" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

Else

_backup()

EndIf

ElseIf IsArray($pix3) Then ; If $pix3 is an array, then it found key holder

MouseClick("left", $pix3[0], $pix3[1])

MouseClick("Left", $pix3[0] + 12, $pix3[1] + 12)

If Hex(PixelGetColor(250, 144),6) = "F8C3B7" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

ElseIf Hex(PixelGetColor(237, 92),6) = "E0B300" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

ElseIf Hex(PixelGetColor(190,253),6) = "FFFFCE" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

Else

_backup()

EndIf

ElseIf IsArray($pix4) Then ; If $pix4 is an array, then it found key holder

MouseClick("left", $pix4[0], $pix4[1])

MouseClick("Left", $pix4[0] + 12, $pix4[1] + 12)

If Hex(PixelGetColor(250, 144),6) = "F8C3B7" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

ElseIf Hex(PixelGetColor(237, 92),6) = "E0B300" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

ElseIf Hex(PixelGetColor(190,253),6) = "FFFFCE" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

Else

_backup()

EndIf

ElseIf IsArray($pix5) Then ; If $pix5 is an array, then it found key holder

MouseClick("left", $pix5[0], $pix5[1])

MouseClick("Left", $pix5[0] + 12, $pix5[1] + 12)

If Hex(PixelGetColor(250, 144),6) = "F8C3B7" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

ElseIf Hex(PixelGetColor(237, 92),6) = "E0B300" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

ElseIf Hex(PixelGetColor(190,253),6) = "FFFFCE" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

Else

_backup()

EndIf

ElseIf IsArray($pix6) Then ; If $pix6 is an array, then it found key holder

MouseClick("left", $pix6[0], $pix6[1])

MouseClick("Left", $pix6[0] + 12, $pix6[1] + 12)

If Hex(PixelGetColor(250, 144),6) = "F8C3B7" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

ElseIf Hex(PixelGetColor(237, 92),6) = "E0B300" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

ElseIf Hex(PixelGetColor(190,253),6) = "FFFFCE" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

Else

_backup()

EndIf

ElseIf IsArray($pix7) Then ; If $pix7 is an array, then it found key holder

MouseClick("left", $pix7[0], $pix7[1])

MouseClick("Left", $pix7[0] + 12, $pix7[1] + 12)

If Hex(PixelGetColor(250, 144),6) = "F8C3B7" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

ElseIf Hex(PixelGetColor(237, 92),6) = "E0B300" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

ElseIf Hex(PixelGetColor(190,253),6) = "FFFFCE" Then

MouseClick("Left", 193, 326)

MouseClick("Left", 323, 376)

_join()

Else

_backup()

EndIf

Else

_stopmiscount()

EndIf

EndFunc

Func _join()

MouseClick("Left", 121, 786)

Sleep(1000)

MouseClick("Left", 918, 382)

MouseClick("Left", 928, 392)

MouseClick("Left", 1048, 572)

Sleep(1000)

MouseClick("Left", 241, 785)

MouseClick("Left", 1048, 572)

MouseClick("Left", 121, 786)

_check()

EndFunc

Func _check()

If Hex(PixelGetColor(785, 748),6) = "FF6600" Then

_attack()

ElseIf Hex(PixelGetColor(795,740),6) = "FFFFFF" Then

_attack()

ElseIf Hex(PixelGetColor(708, 734),6) = "FF6A00" Then

_attack()

Else

MouseClick("Left", 987, 483)

MouseClick("left", 367, 760)

MouseClick("right", 367, 760)

MouseClick("left", 406, 748)

MouseClick("left", 1100, 58)

Sleep(2000)

Send("/sit")

Send("{ENTER}")

Mousemove(241, 785, 0)

MouseClick("Left")

MouseClick("Left", 987, 483)

_getkey()

EndIf

EndFunc

Func _attack()

Sleep(2500)

If Hex(PixelGetColor(845, 694),6) = "161614" Then ;Boozer

MouseClick("Left", 845, 694)

MouseClick("Left", 985, 581)

_pass()

ElseIf Hex(PixelGetColor(852, 692),6) = "7D7DAE" Then ;Hang Over

MouseClick("Left", 1067, 703)

MouseClick("Left", 1029, 578)

MouseClick("Left", 1067, 703)

MouseClick("Left", 1029, 578)

_pass()

ElseIf Hex(PixelGetColor(1062, 696),6) = "0A0A0D" Then ;Boozer

MouseClick("Left", 845, 694)

MouseClick("Left", 985, 581)

_pass()

ElseIf Hex(PixelGetColor(1067, 703),6) = "FBFBFB" Then ;Hang Over

MouseClick("Left", 1067, 703)

MouseClick("Left", 1029, 578)

MouseClick("Left", 1067, 703)

MouseClick("Left", 1029, 578)

_pass()

Else

If Hex(PixelGetColor(816, 697),6) = "FFFFFF" Then ;Boozer

MouseClick("Left", 845, 694)

MouseClick("Left", 985, 581)

_pass()

Else

MouseClick("Left", 1067, 703)

MouseClick("Left", 1029, 578)

MouseClick("Left", 1067, 703)

MouseClick("Left", 1029, 578)

_pass()

EndIf

EndIf

EndFunc

Func _pass()

MouseClick("Left",794, 742);pass

MouseClick("Left",241, 785);Chang window

Sleep(3500)

MouseClick("Left",794, 742);pass

MouseClick("Left",121, 786);Chang window

_check()

EndFunc

Func _backup2()

_getkey()

EndFunc

Func _getkey()

$pix1 = PixelSearch(0,0,@DesktopWidth, @DesktopHeight, 0xCAC056)

$pix2 = PixelSearch(0,0,@DesktopWidth, @DesktopHeight, 0x6D9160)

$pix3 = PixelSearch(0,0,@DesktopWidth, @DesktopHeight, 0x7FA066)

$pix4 = PixelSearch(0,0,@DesktopWidth, @DesktopHeight, 0x91AD6B)

$pix5 = PixelSearch(0,0,@DesktopWidth, @DesktopHeight, 0xD3DF65)

$pix6 = PixelSearch(0,0,@DesktopWidth, @DesktopHeight, 0xB7A24D)

$pix7 = PixelSearch(0,0,@DesktopWidth, @DesktopHeight, 0x919A57)

If IsArray($pix1) Then ; If $pix1 is an array, then it found key holder

MouseClick("left", $pix1[0], $pix1[1])

MouseClick("Left", $pix1[0] + 12, $pix1[1] + 12)

If Hex(PixelGetColor(250, 144),6) = "F8C3B7" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

ElseIf Hex(PixelGetColor(237, 92),6) = "E0B300" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

ElseIf Hex(PixelGetColor(190,253),6) = "FFFFCE" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

Else

_backup2()

EndIf

ElseIf IsArray($pix2) Then ; If $pix2 is an array, then it found key holder

MouseClick("left", $pix2[0], $pix2[1])

MouseClick("Left", $pix2[0] + 12, $pix2[1] + 12)

If Hex(PixelGetColor(250, 144),6) = "F8C3B7" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

ElseIf Hex(PixelGetColor(237, 92),6) = "E0B300" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

ElseIf Hex(PixelGetColor(190,253),6) = "FFFFCE" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

Else

_backup2()

EndIf

ElseIf IsArray($pix3) Then ; If $pix3 is an array, then it found key holder

MouseClick("left", $pix3[0], $pix3[1])

MouseClick("Left", $pix3[0] + 12, $pix3[1] + 12)

If Hex(PixelGetColor(250, 144),6) = "F8C3B7" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

ElseIf Hex(PixelGetColor(237, 92),6) = "E0B300" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

ElseIf Hex(PixelGetColor(190,253),6) = "FFFFCE" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

Else

_backup2()

EndIf

ElseIf IsArray($pix4) Then ; If $pix4 is an array, then it found key holder

MouseClick("left", $pix4[0], $pix4[1])

MouseClick("Left", $pix4[0] + 12, $pix4[1] + 12)

If Hex(PixelGetColor(250, 144),6) = "F8C3B7" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

ElseIf Hex(PixelGetColor(237, 92),6) = "E0B300" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

ElseIf Hex(PixelGetColor(190,253),6) = "FFFFCE" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

Else

_backup2()

EndIf

ElseIf IsArray($pix5) Then ; If $pix5 is an array, then it found key holder

MouseClick("left", $pix5[0], $pix5[1])

MouseClick("Left", $pix5[0] + 12, $pix5[1] + 12)

If Hex(PixelGetColor(250, 144),6) = "F8C3B7" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

ElseIf Hex(PixelGetColor(237, 92),6) = "E0B300" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

ElseIf Hex(PixelGetColor(190,253),6) = "FFFFCE" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

Else

_backup2()

EndIf

ElseIf IsArray($pix6) Then ; If $pix6 is an array, then it found key holder

MouseClick("left", $pix6[0], $pix6[1])

MouseClick("Left", $pix6[0] + 12, $pix6[1] + 12)

If Hex(PixelGetColor(250, 144),6) = "F8C3B7" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

ElseIf Hex(PixelGetColor(237, 92),6) = "E0B300" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

ElseIf Hex(PixelGetColor(190,253),6) = "FFFFCE" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

Else

_backup2()

EndIf

ElseIf IsArray($pix7) Then ; If $pix7 is an array, then it found key holder

MouseClick("left", $pix7[0], $pix7[1])

MouseClick("Left", $pix7[0] + 12, $pix7[1] + 12)

If Hex(PixelGetColor(250, 144),6) = "F8C3B7" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

ElseIf Hex(PixelGetColor(237, 92),6) = "E0B300" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

ElseIf Hex(PixelGetColor(190,253),6) = "FFFFCE" Then

MouseClick("Left", 643, 380)

MouseClick("Left", 594, 234)

_asktrade()

Else

_backup2()

EndIf

Else

_stopmiscount()

EndIf

EndFunc

Func _asktrade()

MouseClick("left", 367, 760)

MouseClick("right", 367, 760)

MouseClick("left", 406, 748)

Send("/w Tsunechika Hello")

Send("{ENTER}")

MouseClick("left", 241, 727)

MouseClick("left", 276,708)

Sleep(250)

MouseClick("left", 133, 781)

MouseClick("left", 554, 352)

MouseClick("left", 288,786)

sleep(50)

_tradeus()

EndFunc

Func _tradeus()

MouseClick("left", 770, 418)

MouseClick("left", 621, 401)

MouseClick("left", 755, 401)

MouseClick("left", 768, 208)

MouseClickDrag("left", 719, 258, 754, 463, 0)

MouseClickDrag("left", 760, 245, 793, 464, 0)

MouseClickDrag("left", 719, 258, 754, 463, 0)

sleep(2200)

MouseClick("left", 1020, 563)

MouseClick("left", 121, 786)

sleep(2200)

MouseClick("left", 1020, 563)

MouseClick("left", 241, 785)

_charselecter()

EndFunc

Func _charselecter()

MouseClick("left", 1110, 56)

MouseClick("left", 641, 279)

MouseClick("left", 553, 375)

_waitingloop()

EndFunc

Func _waitingloop()

_waitingcheck()

EndFunc

Func _waitingcheck()

If Hex(PixelGetColor(250, 557),6) = "00CC00" Then

MouseMove(305, 445, 0)

MouseClick("left")

Sleep(400)

MouseClick("left")

_loopwaiting()

ElseIf Hex(PixelGetColor(254, 552),6) = "00CC00" Then

MouseMove(305, 445, 0)

MouseClick("left")

Sleep(400)

MouseClick("left")

_loopwaiting()

Else

Sleep(1000)

_waitingloop()

EndIf

EndFunc

;seperate

Func _loopwaiting()

_checkwaiting()

EndFunc

Func _checkwaiting()

If Hex(PixelGetColor(632, 409),6) = "E72EFD" Then

Sleep(25)

_delcharwait()

ElseIf Hex(PixelGetColor(635, 386),6) = "E72EFD" Then

Sleep(25)

_delcharwait()

Else

Sleep(1000)

_loopwaiting()

EndIf

EndFunc

Edited by trippdoctor
Link to comment
Share on other sites

you need to be a little more descriptive about what you want done. Perhaps a link to the game. Or what you want the bot to accomplish. Also i don't know if giving a random person over the internet control of your computer is a good idea. Also post the .au3 file as is is much easier to read the code in scite.

Also waiting an hour and expecting replies is a little demanding.

Edited by qazwsx
Link to comment
Share on other sites

you need to be a little more descriptive about what you want done. Perhaps a link to the game. Or what you want the bot to accomplish. Also i don't know if giving a random person over the internet control of your computer is a good idea. Also post the .au3 file as is is much easier to read the code in scite.

Lol I have done many times when I have worked on other projects since I can see what there doing and if they do something I can just always unplug the Ethernet cable. I said the game is called Dofus and I provided the script their above that I have I guess I could explain a little better what intend to do.

Link to comment
Share on other sites

Not to be rude but that's like the biggest joke I've read today... "since you can see what they're doing" .. hum.. are you aware if they're connected (with a nice soft like VNC or R-Admin) to your PC they can (with a little knowledge) send you stuff (namely, Trojan..keylogger..whatever) without you seeing it since it ain't visual actions at all.. ? Look.. when you're playing a game on the internet.. you can't see the data packets (unless using the correct tools ^^) going from your PC to the other player's computer and vice versa.. but still, there's communication. Give me access to your computer I'll show you lol. (joke.. I won't waste time with this)

Edited by MikeP
Link to comment
Share on other sites

Not to be rude but that's like the biggest joke I've read today... "since you can see what they're doing" .. hum.. are you aware if they're connected (with a nice soft like VLC or R-Admin) to your PC they can (with a little knowledge) send you stuff (namely, Trojan..keylogger..whatever) without you seeing it since it ain't visual actions at all.. ? Look.. when you're playing a game on the internet.. you can't see the data packets (unless using the correct tools ^^) going from your PC to the other player's computer and vice versa.. but still, there's communication. Give me access to your computer I'll show you lol. (joke.. I won't waste time with this)

Umm VLC is a media player which I use quite frequently and besides I am running Linux even though I do have a windows on the drive too along with other linux distros.

http://www.videolan.org/vlc/

Also by the way the remote desktop is a virtual machine.

Edited by trippdoctor
Link to comment
Share on other sites

Umm VLC is a media player which I use quite frequently and besides I am running Linux even though I do have a windows on the drive too along with other linux distros.

http://www.videolan.org/vlc/

Also by the way the remote desktop is a virtual machine.

A remote desktop is not a virtual machine. And by VLC I'm sure he meant VNC.

A virtual machine (X86 Virtuaization) is essentially running another operating system (A guest operating system) within your current one without interaction from a physical machine other than the one that the virtualization software (QEmu, VirtualBox, VMWare, Etc) is running on.

A VNC connection (Or Virtual Network Computing) is essentially using a graphical display (Generally a screencast of the server computer) to control said server computer.

Link to comment
Share on other sites

A remote desktop is not a virtual machine. And by VLC I'm sure he meant VNC.

A virtual machine (X86 Virtuaization) is essentially running another operating system (A guest operating system) within your current one without interaction from a physical machine other than the one that the virtualization software (QEmu, VirtualBox, VMWare, Etc) is running on.

A VNC connection (Or Virtual Network Computing) is essentially using a graphical display (Generally a screencast of the server computer) to control said server computer.

Yes I am already aware of that... I know what VNC is and I know what virtual operating system software is...

Edited by trippdoctor
Link to comment
Share on other sites

A remote desktop is not a virtual machine. And by VLC I'm sure he meant VNC.

A virtual machine (X86 Virtuaization) is essentially running another operating system (A guest operating system) within your current one without interaction from a physical machine other than the one that the virtualization software (QEmu, VirtualBox, VMWare, Etc) is running on.

A VNC connection (Or Virtual Network Computing) is essentially using a graphical display (Generally a screencast of the server computer) to control said server computer.

it was a typo.. of course I meant VNC :)
Link to comment
Share on other sites

Sooo complicated.. let me guess, that's because you wanna run two accounts on your game? did you try openin an other session for another user on your system ? sometimes games are so stupidly coded this allows 2 instances of the game..

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...