blademonkey Posted September 14, 2006 Share Posted September 14, 2006 How do you know if you are flagged?The point is you dont. ---"Educate the Mind, Make Savage the Body" -Mao Tse Tung Link to comment Share on other sites More sharing options...
Bert Posted September 14, 2006 Share Posted September 14, 2006 The Vollatran project My blog: http://www.vollysinterestingshit.com/ Link to comment Share on other sites More sharing options...
evilelf Posted September 15, 2006 Author Share Posted September 15, 2006 (edited) Hey for The PickIt i can add this if i think i am right. for $i = 1 to 20 Sleep(500) $coord = PixelSearch(XTop, Ytop, XBottom, YBottem, Hex Color of Items, 1) If Not @error Then MouseClick("left", $coord[0], $coord[1], 1) EndIf next I asked how would you Repeart stuff and they told me that code. Thought about it when i made a little Spam Bot for my Guild " Inviten people" Hey I can Just Research the Screen for the items. Now if i did that it may just work right? If thats how i should do it then i have to Restart all over for the Pixels. Edited September 15, 2006 by evilelf Link to comment Share on other sites More sharing options...
salter Posted September 15, 2006 Share Posted September 15, 2006 (edited) best way to write a bot would be too first figure out what you can all do with autoit then figure out how you could make the bot attack monsters and things like that. once you have figured out abit how ur gonna make the bot, then look up some other autoit script bots and look at thier code and use the help file. once you have abit of something then you can keep adding new things on. heres the first bot i made it took me abit of time and its pretty simple. all the green writing is just something i added so you could tell what some things do and how they work. expandcollapse popup; Script Start - Add your code below here ;NOO NEED TO TAKE THE EXPLANATIONS OUT THEY ARE ALL COMMENTS AND WILL NOT AFFECT HOW THE PROGRAM RUNS ;---------------------SETUP-------------------------------------------------- Dim $Color_One = 0xD4D2CE ;THE MONSTER PIXEL Dim $Color1_tolerance = 1 ;SHADE VARIATION ON THE MONSTER PIXEL SO IT DOESNT HAVE TO BE EXACTLY THAT COLOR BUT JUST ;A SHADE OF IT SO IT COULD BE LIGHTER OR DARKER AND IT WILL STILL CLICK IT JUST DEPENDS ON WHAT NUMBER YOU PUT DECIDES ;HOW MANY SHADES IT WILL GO DOWN AND UP ;--------------Search Area Coords---------------------------------------------- Dim $Coord1_X = 288 ;TOP LEFT OF THE SCREEN TO SEARCH Dim $Coord2_Y = 281 ;TOP LEFT OF THE SCREEN TO SEARCH Dim $Coord3_X = 669 ;BOTTOM RIGHT OF THE SCREEN TO SEARCH Dim $Coord4_Y = 553 ;BOTTOM RIGHT OF THE SCREEN TO SEARCH ;ALL OF THOSE EQUAL A RECTANGLE YOU ONLY NEED THE TOP LEFT AND BOTTOM RIGHT COORDINATES ;TO MAKE THE RECTANGLE TO SERACH FOR THE MONSTER ;Dims are used as shortcuts kind of so then the user can just quikly change the rectangle shape here. ;------------------------------------------------------------------------------- Opt("MouseCoordMode", 0); Read the help file for "Opt" to see if you need to keep the '2' a '2', '1', or '0' Opt("PixelCoordMode", 0); Read the help file for "Opt" to see if you need to keep the '2' a '2', '1', or '0' Hotkeyset("{HOME}","start"); WHEN YOU PRESS HOME IT GOES TO WHERE IT SAYS "SCRIPT STARTS" Hotkeyset("{END}","stop"); WHEN YOU PRESS END IT GOES TO WHERE IT SAYS "EXIT SCRIPT" AT THE BOTTOM Global $stop Func start(); SCRIPT STARTS WinActivate ( 'SRO_Client' ) ;WAITS FOR THE SILKROAD CLIENT WINDOW Sleep ( 300 ) $stop = NOT $stop While $stop ; Script Start - Add your code below here $coord = PixelSearch($Coord1_X,$Coord2_Y,$Coord3_X,$Coord4_Y, $Color_One, $Color1_tolerance, 1); SEARCHES THE RECANGLE FOR THE COLOR OF THE MONSTER If Not @error And IsArray($coord) Then Sleep(75);WAITS THIS IS IN MILISECONDS SO ITS A VERY SHORT WAIT ITS ABOUT 1000 EQUALS 1 SECOND SO ITS LIKE .0075 OF A SECOND MouseClick("left", $coord[0],$coord[1],1, 0);IF IT FINDS THE PIXEL THEN IT WILL CLICK IT ONCE Sleep(75);WAITS #comments-end PixelSearch(441,42,608,52,0xFF3131,2,1); IN THE RECTANGLE (FIRST 4 COMMAS)FOR THE COLOR(NEXT COMMA) WITH ;AND A SHADE VARIATION OF 2 OF THE COLOR AND IT SKIPS A PIXEL EACH TIME, THIS IS T0 HELP REDUCE LAG If Not @error Then Send("1") ; IF IT FINDS THE PIXEL IT SENDS THE NUMBER 1 which is the attack key in this game Sleep(500) ; SLEEPS HALF A SECOND EndIf EndIf WEnd EndFunc Func stop(); EXIT SCRIPT Exit EndFunc While 1 Sleep(50) WEnd Edited September 15, 2006 by salter Link to comment Share on other sites More sharing options...
evilelf Posted September 15, 2006 Author Share Posted September 15, 2006 well its close 2 done. I just need to learn how to make it pick up items. I cant find GW bots i was going to do that. Look them up and Learn more about them but cant find one. Link to comment Share on other sites More sharing options...
salter Posted September 15, 2006 Share Posted September 15, 2006 (edited) well is there a hotkey to pickup? if so then just make it send that key once or twice after the monster is killed, you can usually check if a monster is dead by the hp bar that comes up in most games you can use a pixel search on the very start of the hp bar and if its red then its still alive (usually) heres my fight function in one of my scripts: Func Fight() $timer2 = TimerStart() ; the timer is incase my char gets stuck so he doesnt just keep trying to attack the monster and not moving anywhere. Sleep(Random(450, 600)) While PixelGetColor(424, 25) = 0xD63839 ; here it searches the hp bar for red and if it is red then it just keeps waiting. if timerdiff($timer2) > 15 * 1000 then return ; If it takes longer then 15 seconds to kill the monster then it will start my search function and find a new monster. Sleep(Random(100, 200)) WEnd Sleep(Random(95, 135)) EndFunc oÝ÷ Ø ÝêÞ²l©É.¥û§rب)íë®*mjëh×6 Func Getitems() $var = PixelGetColor(19, 32) ; here it is checking if im in a autoloot group If $var = 0xA32728 then ; and if i am it doesnt pick up anything cuz the game does it automatically Sleep(Random(100, 180)) Else ; if not then it does everything else Sleep(Random(300, 350)) Send("{SPACE}") Sleep(Random(300, 350)) Send("{SPACE}") Sleep(Random(350, 350)) Send("{SPACE}") Sleep(Random(350, 350)) EndIf EndFunc Edited September 15, 2006 by salter Link to comment Share on other sites More sharing options...
evilelf Posted September 15, 2006 Author Share Posted September 15, 2006 (edited) Well to come and think of it. Targeting: Items - Nearest. that would be the items on the groud I hope. Action: Attack/Interact (Do It) Thats word for word so i think if i made it some what like this. for $i = 1 to 20 Send("{; down}") ;Holds the ; key down sleep(2000) ; added this little sec so it looks like a real Person Send("{Space}") ; This will walk to item. sleep(8000) ; Added this to Give it time if item is a longer walk Send("{; up}") ;Releases the ; key nextoÝ÷ ØêåG²¢êìjëh×6Func Getitems() $var = PixelGetColor(19, 32) ; here it is checking if im in a autoloot group If $var = 0xA32728 then ; and if i am it doesnt pick up anything cuz the game does it automatically Sleep(Random(100, 180)) Else ; if not then it does everything else Sleep(Random(300, 350)) Send("{SPACE}") Sleep(Random(300, 350)) Send("{SPACE}") Sleep(Random(350, 350)) Send("{SPACE}") Sleep(Random(350, 350)) EndIf EndFunc Mine Would Work Right? Also i will be doing this with a none Melee Char. so there for i dont need to toggle monsters they spawn att he same spot just need him/Here to walk to the spot and cast skills. Edited September 15, 2006 by evilelf Link to comment Share on other sites More sharing options...
salter Posted September 15, 2006 Share Posted September 15, 2006 not sure how this game picks up but it should Link to comment Share on other sites More sharing options...
evilelf Posted September 15, 2006 Author Share Posted September 15, 2006 Ok well now. I think i have a bot done. It should be in about 1 hour but i am not going to be back tell sunday night maybe. Later Thnx for all the help. Link to comment Share on other sites More sharing options...
VicTT Posted September 16, 2006 Share Posted September 16, 2006 (edited) I'm only quite curious as to why anyone actually helped you..Seeing as your programming skills and profanity lack the same thing your skull should contain, I seriously find no reason for helping such an illiterate fool such as yourself..Even if, of course, the "garden gnome" (if I may quote my beloved Valik), has now learned the basics of a programming language and is merrily coding bots for MMORPG's.. I hope all of you know what mighty terror you have unleashed, ladies and gentlemen..The sheer stupidity of the evilelf simply gives me the willies..Evilelf..Do you think you could be a bit more stupid, so that we may teach you Frisbee? And this gives me an idea..How about we make evielf our forum-pet? He's dumb, n00b'ish, and enviromentally-friendly, not to mention that he's got such a fast train of thought that the use of something even remotely similar to a comma frightens him. He wouldn't want to forget what his 3 next words were supposed to be. I hope you rot in hell, you illiterate piece of bio-trash. Edited September 16, 2006 by VicTT Quote Together we might liveDivided we must fall Link to comment Share on other sites More sharing options...
the_doc735 Posted September 16, 2006 Share Posted September 16, 2006 (edited) ...strange that I thought this was a place to learn and get support, but the first post I read is nothing more than one long slanging match! Needless to say this does nothing for my first impressions of the site. If all the posts are like this then there is little point in taking things further. I would like help, not threads full of swearing and anger! You who reply to the swearing and insults as just as bad as the aggressor. Be more constructive and ignore this rude person - why waste your time? "An eye for an eye and the whole World will be blind". STOP SLANGING - START TEACHING AND LEARNING! The admin should have deleted this thread BEFORE it became an intolerable farce. Surely there are more deserving cases who genuinely appreciate your assistance? Edited September 16, 2006 by the_doc735 Link to comment Share on other sites More sharing options...
Paulie Posted September 16, 2006 Share Posted September 16, 2006 (edited) I'm only quite curious as to why anyone actually helped you..Seeing as your programming skills and profanity lack the same thing your skull should contain, I seriously find no reason for helping such an illiterate fool such as yourself..Even if, of course, the "garden gnome" (if I may quote my beloved Valik), has now learned the basics of a programming language and is merrily coding bots for MMORPG's..I hope all of you know what mighty terror you have unleashed, ladies and gentlemen..The sheer stupidity of the evilelf simply gives me the willies..Evilelf..Do you think you could be a bit more stupid, so that we may teach you Frisbee?And this gives me an idea..How about we make evielf our forum-pet? He's dumb, n00b'ish, and enviromentally-friendly, not to mention that he's got such a fast train of thought that the use of something even remotely similar to a comma frightens him. He wouldn't want to forget what his 3 next words were supposed to be.I hope you rot in hell, you illiterate piece of bio-trash.Thats a little harsh, but in all honesty, I agree. ...strange that I thought this was a place to learn and get support, but the first post I read is nothing more than one long slanging match! Needless to say this does nothing for my first impressions of the site. If all the posts are like this then there is little point in taking things further. I would like help, not threads full of swearing and anger! You who reply to the swearing and insults as just as bad as the aggressor. Be more constructive and ignore this rude person - why waste your time? "An eye for an eye and the whole World will be blind". STOP SLANGING - START TEACHING AND LEARNING! The admin should have deleted this thread BEFORE it became an intolerable farce. Surely there are more deserving cases who genuinely appreciate your assistance?However this, I do NOT agree withIf you bothered to read any of the other threads, you'd see that this useless argument crap is few and far between, and therefore isn't tolerated and taken lightly when it occursThis forum does Way more helping people then you seem to realize, anda Valik quote comes to mind here(Pertaining to evilelf)"People pay lots of money to get the advice we throw around for free and now we got a real winner who thinks he's too right to be wrong." Edited September 16, 2006 by Paulie Link to comment Share on other sites More sharing options...
evilelf Posted September 20, 2006 Author Share Posted September 20, 2006 i am going to Delete all my Scrips for this bot and Restart over. I can do alot of Clean up apond this scrip. Take a look at this. $answer i never thought i can make it like this but hey after a try or five times you have to get it right. I thought i can Clean the Bot up so it will be easyer to set up. $answer = InputBox("Account", "Type Your Account Name.", "" , "", _ -1, -1, 0, 0) $password = InputBox("PassWord", "Type Your Accounts PassWord.", "" , "", _ -1, -1, 0, 0) Run("D:\Guild Wars\GW.EXE") ; Edit this to your Guild Wars File ... Most of the time it should look like this. "C:\Programfiles\Guild Wars\GW.EXE" WinWaitActive("Guild Wars") Sleep(7000) MouseClick("left", 430, 269, 1) Send($answer) Sleep(1000) MouseClick("left", 431, 315, 1) Sleep(3000) Send($password) MouseClick("left", 556, 299, 1) When i make this new bot i am going to just do it not tell you all so I am not rushed. "need to learn this not get rushed in it". Going to make it so Players can just set up the bot with out Clicking Edit AutoIt. Account NAme will be asked. Password will be asked. Were at on the Screen your Charr/ Bot player is at. then it will ask are you Running A:) MM N/Monk - 55 life monk. B:) 55 Life Monk ------- As We go on Scrips will be inported. The Bot will have the top the same for account info. Then later down the Scrip it will ask what file/ Auto Scrip it need to run at this time. Thats for the Skills/ Pre Cast. -------------------- I know i can get this done Just need to work hard and Try. Due to i will be doing here and you all are helpping me i will give out to you if u have over 50 post that are helpful. Sounds Good right? Link to comment Share on other sites More sharing options...
AutoItWannabe Posted September 20, 2006 Share Posted September 20, 2006 (edited) Well i wish i could help you :/ But i just finnished my L2 bot (just to test my newbie skills) If i would know how GuildWars looks/works i could probably try and make a bot for you. Too bad im still a newbie and cant help :/ who knows maybe in the future Edited September 20, 2006 by AutoItWannabe Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now