Register for your free account! | Forgot your password?

You last visited: Today at 13:09

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



sell bot

Discussion on sell bot within the Guild Wars forum part of the MMORPGs category.

Reply
 
Old   #1
 
_revo's Avatar
 
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
_revo is offline  
Old 06/22/2007, 18:00   #2
 
_revo's Avatar
 
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
_revo is offline  
Old 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 ( "...")"
Ganf is offline  
Old 06/22/2007, 19:44   #4
 
_revo's Avatar
 
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 ? (:
_revo is offline  
Old 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
Ganf is offline  
Old 06/22/2007, 21:32   #6
 
_revo's Avatar
 
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 ?
_revo is offline  
Old 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
Ganf is offline  
Reply


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


Powered by vBulletin®
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2025 elitepvpers All Rights Reserved.