Jump to content
  • Sky
  • Blueberry
  • Slate
  • Blackcurrant
  • Watermelon
  • Strawberry
  • Orange
  • Banana
  • Apple
  • Emerald
  • Chocolate
  • Charcoal

Leo

Members
  • Content Count

    21
  • Joined

  • Last visited

  • Days Won

    1

Leo last won the day on April 10 2013

Leo had the most liked content!

Community Reputation

12 Good

About Leo

  • Rank
    Junior Member
  1. https://villavu.com/forum/showthread.php?t=60127
  2. Leosleep doesn't work with anything but OG RSC as far as I'm aware of. Best I could do is have an alarm go off alerting you to sleep then, Kakkarot. Also, VPN a char to 40 fishing if you're willing to provide me a test character. Do this to keep your other accounts safe
  3. Are characters allowed to be shared on rsce? If so, if you provide me with a character that has the required fishing level I would be willing to try to make the script in my spare time(don't have much of it). Is there a fatigue system? Are there sleep words? Does 100% fatigue stop you from preforming actions in-game?
  4. Yeah using colors or color counts would be a bit more difficult. I would personally use the minimap with bitmaps to know where you are and where to click.
  5. Is there a banker on the island? Do you have access to Ardy boats(p2p area)? How do you plan on doing the walking/pathing procedures?
  6. I figured this. I just found it weird because the file I'm downloading(not any of the mirrors) is directly from this site. It felt as if a company binded some bloatware/adware to it and then hosted it. Maybe I'll do some more digging later. Thanks for the dev link
  7. To address your first issue you could just change the area in which the mouse operates in by defining the area using a command like: findbitmap(x,y,closewindow, 6, 37, 509, 325) Where "6, 37" represents the upper left most region to check. And "509, 325" representing the bottom right most. This is the "window" that the script will check within and if the bitmap above is found within that window your script will excute whatever code you have to compliment it. Ideally on most RSC windows you want the window to be just under the menu tabs at the top and right above the Messages/Report buttons along the bottom. This varies very slightly depending on which client you're using. This is kind of a work around and hopefully a solution to your idea. As far as botting goes, I think the help you'd get here is extremely limited. I have nothing to offer for you here. OCR's mmmm yeah this was actually the last project I worked on with Janilabo We were working on a SCAR based OCR that was actually.. somewhat... kind of working. haha. I don't know if he ever got around to finishing it or if we both ended up moving onto other things. But Janilabo was definitely the scripting genius and I was more of the idea guy I still learned a hell of a lot from that script/program though. Go ahead and send him a PM to see if it was ever finished. The method it used was pretty awesome under the circumstances given by RSCE/RSCR's sleeping system. If I remember correctly Janilabo ended up getting banned for sleeping too much. haha. - - - Updated - - - Also if you want to post or PM me the script with what you want done to it, I wouldn't mind trying to help you.
  8. Leo

    scar 3.22 bug?

    Post the script.
  9. Unless you're using an include you would have to write your own code to do something like "open the bank" I don't believe there are any included "commands" in SCAR as is. And I don't know what Legacy Mode is so...
  10. What exactly is trying to be downloaded from "mickyfastdl" when installing the newest 3.40 version of scar? And why does my anti virus say Potential Threat is "InstallMonetizer.AU"? The earlier versions of scar didn't have any of this.
  11. If you want to expand on your script and have it set the compass you can do something simple like... procedure rotatesouth; begin while not(findbitmap(south,x,y)) and (a = 1) and not(findbitmap(okbutton,x,y)) do //While the map isn't South-facing-North then do: begin movemouse(460,40); //Moves mouse to map tab wait(100); SendArrowWait(1, 10); //This is what Scar 3.15 used I believe it's VK_Arrowleft/right? Or something similar now. if(findbitmap(south,x,y)) then //The bitmap used here was just south being your "new" north. movemouse(141,121); clickherescan; //procedures used to get out of loop incase of logout during map rotation. okscan; //primitive but worked. closewindowscan; end; end; This is from a script I wrote as a refresher course to scar. It was part of my Guild Fisher on "# Comments = Tested on Piru(Tewl's Version)." Ofcourse this is very... primitive but it worked at the time. Took maybe 1-5 full map rotations to get it centered properly.
  12. You might not want to post your ign here
  13. Hey man, glad you got it working. You could just make your own bitmap of "Click Here To continue" and then use scar's built in Picture to String tool. You should really learn how to script in scar
  14. Found it! Keep in mind this is pretty outdated and only works with Scar 3.15 This will only solve the "correct color" question. This is completely untouched since it was made back in '07 except for I added a wait in the main loop. Other than that... and the fact that it was my first or second script.. Edit it as needed and try to update it so it's 3.38+ compatible. {.Script Info: # ScriptName = AfkStork # Author = Tyler aka *retracted* # Description = # Version = 2.0 Added Mod Protection & Screenshots # Date = Saturday, Dec 3rd, 2007 # Comments = Lags a bit with the bitmaps. (added a wait at end of main loop April 10th, 2013) /Script Info} // SETUP'S ON LINES 58 AND 59 -- Screenshots are saved to your main scar folder(C:\Program Files\Scar***) {~~READ THE FUCKING COMMENTS & KNOWN BUGS IF YOUR HAVING PROBLEMS~~} //////////////////// Known Bugs ///////////////////////// /////////////////////// LAG /////////////////////////////// //Lag, yep lag, caused by bitmap images within the script//// //It was the only way I could find out how to actually have// //the script select a specific color/image.(bitmap)////////// /////////////////////////////////////////////////////////// ///////////////////// "White" /////////////////////////////// //When any white text or white image is placed ontop of the// //StorkPk window it will click on the white and you will get//////// //A read out in the debug box saying "Found White, Clicking White"// //If you want to fix this, string your own images. Or just don't//// //Put any windows ontop of the stork pk window!/////////////////// //////////////////////////////////////////////////////////////// //////////////////// Other Colors //////////////////////////////// //Some of the colors such as Dark Red and Green are not selected/////////// //If they are the correct word & at the top of the list of colored words.// /////////////////////////////////////////////////////////////////////////// ////////////////// Hazelmere ////////////////////////////// //If you notice you are not selecting him quick enough or/// //If it's to quick change the Waits on line 223 and 235 to// //Whatever you want, faster or slower, 1000 = 1 second////// ////////////////////////////////////////////////////////// //IMPORTANT: Have your map set up so it looks like this: // If you dont understand the drawing below go here: // http://img139.imageshack.us/my.php?image=mapix9.png // OR // *retracted* // N // ' , // , . //W______,_____E // . , // , // , ' // S //The reason this is done is so that Hazelmere's body is still visible even if he's under you, most of the time. program AfkStork; const Hazel=8437792; //The color of Hazelmere's legs seem to work the best, Try his green arms if you want. WaitToLogin=20000; //Set a wait time to login, dont make it to short or else it's obvious you have autologin. var a, x, y: Integer; // A is used to stop the repeat if mod's are detected. login, loginOk, TalkToHazel, Blue, DarkRed, Green, Magenta, Orange, Red, White, Yellow, Stork, Tob3, Tia, Xpheus, Ddr, S_1_u_r_r_y, Ukpka: Integer; procedure loadBmps; begin { 'Click here to login' button } login := BitmapFromString(63, 10, 'beNrVkkEKwlAMRD2uoihWK4p' + 'ijyCKiCL2rH4MhpBJ5telIYuXyUx+F+360afGzcn26FsoWiBm3Gap' + 'LIgPYUp5sjpLu+e4npl/SoVBtWWnSk3bi4LjcJVtceQ2cnbI68Kzz' + 'VVB2ZVdCVfNaMvGUEE9TM23N9ELKLuyK+GqGW3ZGCqoh6nF7i56Ac' + 'eucUXMxDb8Dv+wMi73D9ELKLsRuWpGG09Vg2GqOTwVpN1v4HQduTn' + 'zhCkezN4qtT6+FLTt1olWIeaqx30DSYV3RG+7/l/7De14NTY='); { 'Ok' button } loginOk := BitmapFromString(70, 18, 'beNrtlN8HAkEQx++P7KGXe0lO+u' + 'Wcc9Y5R5KuSOJEEkmk/7Jh+Jpmt/exWp+H787Mw3xYm7rRrAPJ9/F' + 'bsmKNYdYNUkeMF3smCR3VxdUgMMryAwEFvvqVX9kOMJoUR4KX5Axk' + 'ETk4aQEYTcsTwXtyBrIon6IaMwKM5lVP8KqcgSxKIzVmBBgt3ZngV' + 'TkDWVQ/hpq0AIzy+kJgVb76FWQ1ZgcYFc2VCf7equtnO8CobG9A6f' + 'gtP9sBRtXqHgcwcutHHMCo3jzjAEbN9hUHMGp37ziAEYVoYKM/1vk' + 'ARwaenA=='); { 'Blue' Color & Word } Blue := BitmapFromString(19, 6, 'beNpjYGBg+A9GWBn4BYlRg0sj8' + 'TZiIpJsxCWFaQuRfiTCawAD6Ea6'); { 'DarkRed' Color & Word } DarkRed := BitmapFromString(48, 7, 'beNqtUkEOADAE6/9f5Wlbto' + 'sMrcTEqYSqAjvs5A1zmSKx5ONB+GSosbKT4Gg3R9DomUSQ6sy0Wq2' + 'QUnfIVxuJPtWz+nwk+OVfmIkmLfrXP0YNMOSTLmWEF97dgoE='); { 'Green' Color & Word } Green := BitmapFromString(31, 9, 'beNpjYEAB/5EQLhE8yhgwVGIa' + 'jpWLVTuaIC4F/6lhOH4X4vE+piP/U8Nw/EHHQA3DyQsWPJaSkVrwJ' + '5ihAgCo3W+R'); { 'Magenta' Color & Word } Magenta := BitmapFromString(43, 8, 'beNq9UkEKACAI2/8/bQcvYu' + 'lYRkNiyJyKAQbzAOCvIyYjSUkqSMrdP/HoQ3upyaM/LeyXlUadr9D' + 'sJZXf9Xp4F8qrG1XKoX+P6uv+hDqzgAWQjDTa'); { 'Orange' Color & Word } Orange := BitmapFromString(36, 8, 'beNpjYPg/wQGIGBgQDAhAYyO' + 'rQVOPXxaPSgZUANdOjAnEC2LahV8NMYK4nIoZhlTxAprjMQ2nJGTw' + 'qMRqOGZk4TcBjwKsHiQb4AoNGgGivAAAY+Plsg=='); { 'Red' Color & Word } Red := BitmapFromString(20, 9, 'beNpjYICA/2CEzEYWQVaAJo5LCl' + 'PwPw5bGIjQy4DbPWgOJkYvfu+Qp5egf3FpJz6c6Q0AfclIuA=='); { 'White' Color & Word } White := BitmapFromString(26, 7, 'beNpjYPj//z8DA4hEZmAVRGbg' + 'YhOjnm6mIQM0r5HtNjigimnkuQ2PZxmoDgCv5g//'); { 'Yellow' Color & Word } Yellow := BitmapFromString(35, 9, 'beNpjYACC//9BCAIgbEwR4pV' + 'B2FgF8bPxMPDIYlUJB3S2CC1YyLAImSToI0xB/BZh9Qua4VQJOpIs' + 'oiTVYRqONXyGDwAAocgNAg=='); {Selects the 'Talk-To Hazelmere' option} TalkToHazel := BitmapFromString(91, 8, 'beNrtleEKwCAIhH3/l2' + '6wWEm7O0UK9mP+sjDEz9PMurXbvLP4w9pjyxFFmr/zx+6zmzAMOix' + 'jPu+oCAKBNQpi73gGhFFiJQsOzA+fsx4xIIxGAQhsPWyNaHdeGEeB' + 'HFJIQfBlIOy5TBGPjOezZWR0LWyaygrJ9Mh3vLBUtwMRy+QLIyOAM' + 'PGUfxmo8PwvE/pChGyV/TbtAhs59Cg='); {Kills Client if Stork talks} Stork := BitmapFromString(42, 9, 'beNqtU9EOACAE9P8/rbcmh46' + 'y1hZxHEQyUT2O1fPifJ2J9NrPIloLHYsaeCE5ToMmvnbMIYuWkVPo' + '7W3jFH2foTPdD/+QTDLorYEJCf/FfGtW39FnCYT7fp15Fn0BKIQc8' + 'g=='); {Kills Client if Tob3 Talks} Tob3 := BitmapFromString(38, 9, 'beNpjYPj/H4SQATEimACrGmRB' + 'NAVwLoSBSxZNBKuBuJyHqRjNEDw24rEIq6W43IbJJsNGYkJ45NiIJ' + 'xIpiUeC0YeZSilPq1gTP678RRMAADBhHvA='); {Kills Client if Tia Talks} Tia := BitmapFromString(28, 8, 'beNr7zwAH//+jIGSAJgWRxVSGB' + 'nCZg18Ev4FourA6GA8XUz2mOciGEzQTUxAzcDCtI+hOrNFBoZmYgU' + 'ahmVgDlpjAJMFMAEvV1Ss='); {Kills Client if Xpheus Talks} Xpheus := BitmapFromString(54, 7, 'beNqtUkEKACAI6/+fNiIIcW' + '4aJR1kpc41GzvM1vHhEczDY1b4K5DJocGubkHdk4ngkYD7KViV6on' + 'bve+VtsIcRdBO+AKGKR2GQsOruU1Z8B+bDMu2TU9qHzKepQmZN94t' + 'p4SdG92OgA=='); {Kills Client if Ddr Talks} Ddr := BitmapFromString(30, 8, 'beNpjYACC//9BCBkgi+Bi41KPL' + 'IgmC2GgcfFbilUvVhG4IB6TMfUS6QziTcYlOKRNxhrIxKQTPOGMSx' + 'lWe/HoQjEZAFeI/QM='); {Kills Client if S1urry Talks} S_1_u_r_r_y := BitmapFromString(63, 7, 'beNrNlFkKACAIRLv/p' + 'S1/YnAZI2iRPkrNXoPV2jARHWjoMVGfjP4wdM485MTAZVkkgyc6kI' + '3E7ytjMjo5mKm5DZ+pQaQODzVzrwO/wgV4w1zCl73xPzwv+xY+bPj' + '136aEJw9zQyKNdkxUNtg='); {Kills Client if Ukpka Talks} Ukpka := BitmapFromString(46, 8, 'beNqtUlsKACAI6/6XtiII0a3' + 'WQ/ownTpbVpqZ9ePNR0J2XnMVMxGZJw6HTYTxHGS7ZN+XhCBMLZjA' + '5gpS3E5kwrJbJHuWRyZrISDyVNM7dR6R8JPc/ViFgM6Kqflr/di2A' + 'taFjII='); end; procedure StorkScan; begin if (findbitmap(Stork, x, y)) then begin SaveScreenShot(AppPath+'StorkWasNear.bmp'); wait(2000); A := 0; writeln('Stork Was Near, Killing Client, ScreenShot Saved'); wait(1000); MoveMouseSmooth(497, 16); wait(1000); ClickMouse(497, 16, true); end; end; procedure Tob3Scan; begin if (findbitmap(Tob3, x, y)) then begin SaveScreenShot(AppPath+'Tob3WasNear.bmp'); wait(2000); A := 0; writeln('Tob3 Was Near, Killing Client, ScreenShot saved'); wait(1000); MoveMouseSmooth(497, 16); wait(1000); ClickMouse(497, 16, true); end; end; procedure UkpkaScan; begin if (findbitmap(Ukpka, x, y)) then begin SaveScreenShot(AppPath+'UkpkaWasNear.bmp'); wait(2000); A := 0; writeln('Ukpka Was Near, Killing Client, ScreenShot Saved'); wait(1000); MoveMouseSmooth(497, 16); wait(1000); ClickMouse(497, 16, true); end; end; procedure TiaScan; begin if (findbitmap(Tia, x, y)) then begin SaveScreenShot(AppPath+'TiaWasNear.bmp'); wait(2000); A := 0; writeln('Tia Was Near, Killing Client, ScreenShot saved'); wait(1000); MoveMouseSmooth(497, 16); wait(1000); ClickMouse(497, 16, true); end; end; procedure XpheusScan; begin if (findbitmap(Xpheus, x, y)) then begin SaveScreenShot(AppPath+'XpheusWasNear.bmp'); wait(2000); A := 0; writeln('Xpheus Was Near, Killing Client, ScreenShot Saved'); wait(1000); MoveMouseSmooth(497, 16); wait(1000); ClickMouse(497, 16, true); end; end; procedure DdrScan; begin if (findbitmap(Ddr, x, y)) then begin SaveScreenShot(AppPath+'DdrWasNear.bmp'); wait(2000); A := 0; writeln('Ddr Was Near, Killing Client, ScreenShot Saved'); wait(1000); MoveMouseSmooth(497, 16); wait(1000); ClickMouse(497, 16, true); end; end; procedure S1urryScan; begin if (findbitmap(S_1_u_r_r_y, x, y)) then begin SaveScreenShot(AppPath+'S1urryWasNear.bmp'); wait(2000); A := 0; writeln('S1urry Was Near, Killing Client, ScreenShot Saved'); wait(1000); MoveMouseSmooth(497, 16); wait(1000); ClickMouse(497, 16, true); end; end; procedure logoutScan; begin if (findbitmap(login, x, y)) then begin wait(WaitToLogin+random(2000)); writeln('Logged out - Found login box'); MoveMouseSmooth(x, y); wait(1000); clickmouse(x, y, true); wait(100); end; end; procedure okScan; begin if (findbitmap(loginOk, x, y)) then begin writeln('Found ok box'); MoveMouseSmooth(x, y); wait(1000); clickmouse(x, y, true); wait(5000); moveMouseSmooth(133,133) end; end; procedure FindHazelScan; begin if (findcolorspiral(x,y,Hazel,20,20,500,350)) then begin moveMouseSmooth(x, y); wait(100); clickmouse(x, y, false); //false = right click wait(1000); end; end; procedure TalkToScan; begin if (findbitmap(TalkToHazel, x, y)) then begin writeln('Found Hazelmere trying to Talk-To the Nigger'); moveMouseSmooth(x, y); wait(100); clickmouse(x, y, true); //Clicks on the Talk-To Hazelmere wait(1000); end; end; procedure BlueWordScan; begin if (findbitmap(Blue, x, y)) then begin writeln('Found Blue, Clicking Blue'); moveMouseSmooth(x, y); wait(2000); clickmouse(x, y, true); wait(10000); end; end; procedure DarkRedWordScan; begin if (findbitmap(DarkRed, x, y)) then begin writeln('Found Dark Red, Clicking Dark Red'); moveMouseSmooth(x, y); wait(2000); clickmouse(x, y, true); wait(10000); end; end; procedure GreenWordScan; begin if (findbitmap(Green, x, y)) then begin writeln('Found Green, Clicking Green'); moveMouseSmooth(x, y); wait(2000); clickmouse(x, y, true); wait(10000); end; end; procedure MagentaWordScan; begin if (findbitmap(Magenta, x, y)) then begin writeln('Found Magenta/Pink, Clicking Magenta/Pink'); moveMouseSmooth(x, y); wait(2000); clickmouse(x, y, true); wait(10000); end; end; procedure OrangeWordScan; begin if (findbitmap(Orange, x, y)) then begin writeln('Found Orange, Clicking Orange'); moveMouseSmooth(x, y); wait(2000); clickmouse(x, y, true); wait(10000); end; end; procedure RedWordScan; begin if (findbitmap(Red, x, y)) then begin writeln('Found Red, Clicking Red'); moveMouseSmooth(x, y); wait(2000); clickmouse(x, y, true); wait(10000); end; end; procedure WhiteWordScan; begin if (findbitmap(White, x, y)) then begin writeln('Found White, Clicking White'); moveMouseSmooth(x, y); wait(2000); clickmouse(x, y, true); wait(10000); end; end; procedure YellowWordScan; begin if (findbitmap(Yellow, x, y)) then begin writeln('Found Yellow, Clicking Yellow'); moveMouseSmooth(x, y); wait(2000); clickmouse(x, y, true); wait(10000); end; end; begin loadBmps; A := 1; repeat DdrScan; TiaScan; Tob3Scan; StorkScan; UkpkaScan; XpheusScan; S1urryScan; logoutScan; okScan; BlueWordScan; DarkRedWordScan; GreenWordScan; MagentaWordScan; OrangeWordScan; RedWordScan; WhiteWordScan; YellowWordScan; FindHazelScan; TalkToScan; wait(1000); until(A=0); end. {Var x, y : Integer; Kane : Boolean; Extra bit of code I found intresting. Begin If(getcolor(x, y)=0)then Kane := True Else Kane := False; If(Kane=True)Then Writeln('Found The Color!'); End.}
×
×
  • Create New...