|
You last visited: Today at 13:09
Advertisement
sell bot
Discussion on sell bot within the Guild Wars forum part of the MMORPGs category.
06/20/2007, 18:07
|
#1
|
elite*gold: 57
Join Date: Jun 2007
Posts: 10,720
Received Thanks: 5,092
|
huhu
ich bin grad dabei mit nen sellbot zu bauen, der mir sachen verkauft.
jedoch habe ich das problem dass er beim spammen statt den text zu senden immer zwischen vollbild - fenster wechselt als wäre alt gedrückt beim enter drücken
hier der part der für das spammen verantwortlich ist:
Code:
while PixelGetColor (1149, 114) == $AA
Sleep (Random (50, 1000))
Send ("{enter}")
Sleep ( Random (500, 1230))
Send ( "W T S ---!" )
Send ("{enter}")
Sleep (Random(50, 300))
Send ("{enter}")
Send ( "W T S ---!" )
Send ("{enter}")
Sleep (Random(50, 300))
Send ("{enter}")
Send ( "W T S ---!" )
Send ("{enter}")
Sleep (Random (9000, 15000))
WEnd
wär nice wenn jemand sagen könnte wie ich das wegbekomm ^^
cya
gipsy
|
|
|
06/22/2007, 18:00
|
#2
|
elite*gold: 57
Join Date: Jun 2007
Posts: 10,720
Received Thanks: 5,092
|
weiß niemand bescheid ? ^^
ich habe versucht den spambot der schon vorhanden is in .au3 zu convertieren mit dem prog das gwgamer gepostet hatte um zu sehen was er gemacht hat jedoch funktioniert das irgendwie nicht.
die sleeps zwischen dem enter drücken kann ich auch hoch und runtersetzen wie ich will es ändert sich nichts : /
wens interressiert hier der komplette code:
Code:
;
; AutoIt Version: 3.0
; Language: English
; Author: gipsy
;
ConsoleWrite ( "[Script]: Started ")
$answer = MsgBox(4, "SPAMBOT", " This Script will sell your -------. Run?")
; Check the user's answer to the prompt
; If "No" was clicked (7) then exit the script
If $answer = 7 Then
MsgBox(0, "End Script", "OK. Cya!")
Exit
EndIf
WinActivate ("Guild Wars")
global $NumberOfSets = InputBox("AutoIt", "Please type in the Number of ------- you wanna sell!")
MsgBox (0, "AutoIt Macro", " starting... ")
global $DD = Random ( 100, 800)
Sleep (3000)
Func MoreThan2---Left()
global $AA = 0x000000;Position des Handelsfensters öffnen button
while $NumberOf---- > 2
while PixelGetColor (1149, 114) == $AA
global $Wait4Offer = 0
Sleep (Random(2500, 4000))
Send ("{enter}")
Send ( "W T S ---- 20k (NO ECTOS) trade me!" )
Send ("{enter}")
Sleep (Random(2500, 4000))
Send ("{enter}")
Send ( "W T S ---- 20k (NO ECTOS) trade me!" )
Send ("{enter}")
Sleep (Random(2500, 4000))
Send ("{enter}")
Send ( "W T S ---- 20k (NO ECTOS) trade me!" )
Send ("{enter}")
Sleep (Random(2500, 4000))
WEnd
If PixelGetColor (1149, 114) <> $AA Then
Sleep (Random (200, 2000))
MouseClick ("left", 1149, 114)
Sleep (random (200,1300))
while PixelGetColor (1247, 90) == 0x7F7F7F and ($Wait4Offer <= 15)
global $Wait4Offer = $Wait4Offer +1
Sleep (Random(800,1200))
WEnd
If PixelGetColor (1247, 90) == 0x808080 Then
Sleep (Random(100,2000))
If $Wait4Offer >= 15 Then
Sleep (Random(10,500))
MouseClick ("left", 1219, 247)
$Wait4Offer = 0
ConsoleWrite ("[Script] Trade Canceled -> no offer")
EndIf
One----()
Two----()
Three----()
EndIf
EndIf
WEnd
EndFunc
Func Two----Left()
global $AA = 0x000000;Position des Handelsfensters öffnen button
while $NumberOf---- == 2
while PixelGetColor (1149, 114) == $AA
global $Wait4Offer = 0
Sleep (Random(2500, 4000))
Send ("{enter}")
Sleep (Random(2500, 4000))
Send ( "W T S ---- 20k (NO ECTOS) 2remaining - trade me!" )
Sleep (Random(2500, 4000))
Send ("{enter}")
Sleep (Random(2500, 4000))
Send ("{enter}")
Sleep (Random(2500, 4000))
Send ( "W T S ---- 20k (NO ECTOS) 2remaining - trade me!" )
Sleep (Random(2500, 4000))
Send ("{enter}")
Sleep (Random(2500, 4000))
Send ("{enter}")
Sleep (Random(2500, 4000))
Send ( "W T S ---- 20k (NO ECTOS) 2remaining - trade me!" )
Sleep (Random(2500, 4000))
Send ("{enter}")
Sleep (Random(2500, 4000))
WEnd
If PixelGetColor (1149, 114) <> $AA Then
Sleep (Random (200, 2000))
MouseClick ("left", 1149, 114)
Sleep (random (200,1300))
while PixelGetColor (1247, 90) == 0x7F7F7F and ($Wait4Offer <= 15)
global $Wait4Offer = $Wait4Offer +1
Sleep (Random(800,1200))
WEnd
If PixelGetColor (1247, 90) == 0x808080 Then
Sleep (Random(100,2000))
If $Wait4Offer >= 15 Then
Sleep (Random(10,500))
MouseClick ("left", 1219, 247)
$Wait4Offer = 0
ConsoleWrite ("[Script] Trade Canceled -> no offer")
EndIf
One----()
Two----()
EndIf
EndIf
WEnd
EndFunc
Func One----Left()
global $AA = 0x000000;Position des Handelsfensters öffnen button
while $NumberOf---- == 1
while PixelGetColor (1149, 114) == $AA
global $Wait4Offer = 0
Sleep (Random(2500, 4000))
Send ("{enter}")
Sleep (Random(2500, 4000))
Send ( "W T S my LAST ---- 20k (NO ECTOS) trade me!" )
Sleep (Random(2500, 4000))
Send ("{enter}")
Sleep (Random(2500, 4000))
Send ("{enter}")
Sleep (Random(2500, 4000))
Send ( "W T S my LAST ---- 20k (NO ECTOS) trade me!" )
Sleep (Random(2500, 4000))
Send ("{enter}")
Sleep (Random(2500, 4000))
Send ("{enter}")
Sleep (Random(2500, 4000))
Send ( "W T S my LAST ---- 20k (NO ECTOS) trade me!" )
Sleep (Random(2500, 4000))
Send ("{enter}")
Sleep (Random(2500, 4000))
WEnd
If PixelGetColor (1149, 114) <> $AA Then
Sleep (Random (200, 2000))
MouseClick ("left", 1149, 114)
Sleep (random (200,1300))
while PixelGetColor (1247, 90) == 0x7F7F7F and ($Wait4Offer <= 15)
global $Wait4Offer = $Wait4Offer +1
Sleep (Random(800,1200))
WEnd
If PixelGetColor (1247, 90) == 0x808080 Then
Sleep (Random(100,2000))
If $Wait4Offer >= 15 Then
Sleep (Random(10,500))
MouseClick ("left", 1219, 247)
$Wait4Offer = 0
ConsoleWrite ("[Script] Trade Canceled -> no offer")
EndIf
One----()
EndIf
EndIf
WEnd
EndFunc
func ----()
if PixelGetColor (1177, 54) == 0x67604C and PixelGetColor (1177, 53) == 0x8A8165 and PixelGetColor (1178, 53) == 0xFFEEBB and PixelGetColor (1179, 53) == 0xFFEEBB and PixelGetColor (1180, 53) == 0xFFEEBB and PixelGetColor (1181, 53) == 0x68614C and PixelGetColor (1182, 59) == 0x675849 then
if PixelGetColor (1186, 53) == 0x68614C and PixelGetColor (1187, 53) == 0x68614C and PixelGetColor (1185, 54) == 0x898065 and PixelGetColor (1186, 54) == 0xFFEEBB and PixelGetColor (1187, 54) == 0x675D48 and PixelGetColor (1185, 55) == 0x887F64 and PixelGetColor (1186, 56) == 0xDECE9E then
MouseClickDrag ("left", 1096, 809, 954, 199); ---- ins handelsfenster ziehen
Sleep ($DD)
Send ("{enter}")
Sleep ($DD)
MouseClick ("left", 1118, 247);angebot anzeigen
While PixelGetColor (990, 247) == 0x3C3C3C
Sleep (10)
WEnd
Mouseclick ("left", 1014, 248);angebot annehmen
while PixelGetColor (43, 920) <> 0x77FF77
Sleep (10)
WEnd
if PixelGetColor (43, 920) == 0x77FF77 then
$NumberOf---- = $NumberOf---- - 1
MouseClick ("left", 107, 89)
Sleep (100, 2000)
MouseClick ("left", 639, 522)
Sleep (100, 2000)
Mouseclick ("left", 586, 555)
EndIf
EndIf
EndIf
EndFunc
func Two----()
if PixelGetColor (1181, 53) == 0xCCBF96 and PixelGetColor (1179, 54) == 0xEEDEAE and PixelGetColor (1178, 55) == 0x887F64 and PixelGetColor (1176, 57) == 0x887F64 and PixelGetColor (1180, 56) == 0xFFEEBB and PixelGetColor (1182, 57) == 0x848467 then
If PixelGetColor (1184, 54) == 0x787058 and PixelGetColor (1184, 53) == 0x68614C and PixelGetColor (1188, 54) == 0xAE9E7F and PixelGetColor (1187, 57) == 0xCCBE95 and PixelGetColor (1186, 59) == 0x665C47 and PixelGetColor (1189, 60) == 0xAA9E7C Then
MouseClickDrag ("left", 1096, 809, 954, 199); ---- ins handelsfenster ziehen
Sleep ($DD)
Send ("2")
Sleep ($DD)
Send ("{enter}")
Sleep ($DD)
MouseClick ("left", 1118, 247);angebot anzeigen
While PixelGetColor (990, 247) == 0x3C3C3C
Sleep (10)
WEnd
Mouseclick ("left", 1014, 248);angebot annehmen
while PixelGetColor (43, 920) <> 0x77FF77
Sleep (10)
WEnd
if PixelGetColor (43, 920) == 0x77FF77 then
$NumberOf---- = $NumberOf---- - 2
MouseClick ("left", 107, 89)
Sleep (100, 2000)
MouseClick ("left", 639, 522)
Sleep (100, 2000)
Mouseclick ("left", 586, 555)
EndIf
EndIf
EndIf
EndFunc
Func Three---()
if PixelGetColor (1177, 60) == 0xAA9E7C and PixelGetColor (1179, 60) == 0x655E4A and PixelGetColor (1182, 57) == 0x95886C and PixelGetColor (1182, 54) == 0x675D48 and PixelGetColor (1181, 54) == 0xEECCAA and PixelGetColor (1177, 53) == 0x68614C and then
if PixelGetColor (1184, 54) == 0x67604C and PixelGetColor (1188, 53) == 0x68614C and PixelGetColor (1188, 55) == 0xB1A284 and PixelGetColor (1185, 56) == 0xCCBE95 and PixelGetColor (1189, 57) == 0x665C47 and PixelGetColor (1187, 59) == 0x655E4A and then
MouseClickDrag ("left", 1096, 809, 954, 199); ---- ins handelsfenster ziehen
Sleep ($DD)
Send ("3")
Sleep ($DD)
Send ("{enter}")
Sleep ($DD)
MouseClick ("left", 1118, 247);angebot anzeigen
While PixelGetColor (990, 247) == 0x3C3C3C
Sleep (10)
WEnd
Mouseclick ("left", 1014, 248);angebot annehmen
while PixelGetColor (43, 920) <> 0x77FF77
Sleep (10)
WEnd
if PixelGetColor (43, 920) == 0x77FF77 then
$NumberOf---- = $NumberOf---- - 3
MouseClick ("left", 107, 89)
Sleep (100, 2000)
MouseClick ("left", 639, 522)
Sleep (100, 2000)
Mouseclick ("left", 586, 555)
EndIf
EndIf
EndIf
EndFunc
func main()
MoreThan2----Left()
Two----Left()
One----Left()
EndFunc
main()
cya
gipsy
|
|
|
06/22/2007, 19:05
|
#3
|
elite*gold: 0
Join Date: Mar 2007
Posts: 567
Received Thanks: 48
|
Das selbe Problem hatte ich auch, liegt an dem "!". Weiß zur Zeit aber keine Lösung, muss gucken.
Sonst mach einfach nen Punkt "." xD
Ganfi
PS: Wie kann man das verstehen, hab auch schon in den AutoIt Docs nachgeschaut, seh aber keinen wirklichen sinn draus " ConsoleWrite ( "...")"
|
|
|
06/22/2007, 19:44
|
#4
|
elite*gold: 57
Join Date: Jun 2007
Posts: 10,720
Received Thanks: 5,092
|
naja wird halt in die console geschrieben dass zB der trade abgebrochen wurde
macht insofern sinn dass ich dann wenn ich nicht mehr afk nachschauen kann wie viele trades abgebrochen wurden 
zwar egtl uninteressant aber warum nicht ? (:
|
|
|
06/22/2007, 21:14
|
#5
|
elite*gold: 0
Join Date: Mar 2007
Posts: 567
Received Thanks: 48
|
hmm, ist das genau so sicher wie in ne .ini nen wert erhöhen?
Ich probs mal aus!
PS: Naja, hats gefunct?
MFG
Brandy
|
|
|
06/22/2007, 21:32
|
#6
|
elite*gold: 57
Join Date: Jun 2007
Posts: 10,720
Received Thanks: 5,092
|
Quote:
Originally posted by Ganf@Jun 22 2007, 21:14
hmm, ist das genau so sicher wie in ne .ini nen wert erhöhen?
Ich probs mal aus!
PS: Naja, hats gefunct?
MFG
Brandy
|
weiß jetzt net was du meinst mit .ini ^^
auf jedenfall hab ich jetzt hinter das ausrufezeichen noch ne 1 gesetzt ("WTS ... !1")
jetzt schreibt er weder das ausrufezeichen noch die 1 ich weiß zwar nicht warum aber es funktioniert ^^
ty schonmal
btw kenn ich mich wenig mit proggen aus ich hab als bei requia das mit den contributoren eingeführt wurde angefangen mich in lua einzuarbeiten... vorher hatte ich noch nie etwas programmiert 
auf jeden hab ich dann meinen wammo multifarmer gemacht und seit requia down is nie mehr was gemacht
jetzt das autoit is ja im grunde nicht viel anders und genauso einfach wie requia :>
aber ich kenn halt atm nur die grundfunktionen
cya
gipsy
edit: oben im code hab ich mal paar fehler die ich beim copy pasten übersehen hab ausgebessert ^-^
edit2: gibt es egtl ne möglichkeit gw und den das script im hintergrund laufen zu lassen und derweil was weiß ich im internet surfen kann bzw was anderes zokken ?
|
|
|
06/23/2007, 09:31
|
#7
|
elite*gold: 0
Join Date: Mar 2007
Posts: 567
Received Thanks: 48
|
schau dir mal die "user32.dll" an!
Ganfi
|
|
|
Similar Threads
|
[SELL]Nice S4 league acc[SELL] oder Tausche gegen Cmbat arms acc
01/15/2011 - S4 League Trading - 6 Replies
Hey Leute!
Ich möchte mein acc vk. Die bilder sind in dem ordener Link------>MEGAUPLOAD - The leading online storage and file delivery service
Macht einfach angebote nehme nur psc doer einen Combat arms acc mit permwaffen!!!
|
[Sell] Wr Retail Account [Sell] [English Please]
07/28/2010 - WarRock Trading - 9 Replies
1) Lev 42 Ratio 1.38 30k dinars, RETAIL m134 (original whit card if want)
only 25€
2) Lev 34 Ratio 1.9 30k Dinars RETAIL AI AW
Only 35 €
3) Lev 50 Ratio 1.56 5k Dinars
|
All times are GMT +1. The time now is 13:11.
|
|