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

exatox

Members
  • Content Count

    7
  • Joined

  • Last visited

  • Days Won

    1

exatox last won the day on May 12 2013

exatox had the most liked content!

Community Reputation

13 Good

About exatox

  • Rank
    Junior Member
  1. What is this bot most commonly used for? Just curious. Is it profitable in any way? Thanks!
  2. Toby, I'm not completely sure what stopped it from working, but I sure as heck wasn't going to get 80 defense on my own! I believe RS made it necessary to press "click here to continue" to start the caves. Also, to prevent form getting stuck, the player has to start in the middle to keep the NPC from getting stuck. If the player isn't dying around/at wave 7, the chances of NPC Tok-Xil(126) leading your character to a corner to get stuck are very high. As my defense level is increasing I wear less armor This doesn't seem to affect xp/h Janilabo, I still have no clue how to set up smart or how it works. Any chance you can point me to a good thread/guide?
  3. Hmm. I don't know why its doing this for you. I'll ponder on it tonight. In the meantime, I added in Special Attack support for those rangers using magic shorts . I will try and make it more flexible, allowing other special weapons to be used later. program RS07_FightCaveFighter; {$DEFINE RS07} {$I MSSL\MSSL.scar} var X, Y: Integer; const USERNAME = ''; PASSWORD = ''; procedure EnterCave; begin Wait(2000 + Random(1700)); if (FindColorTol(X, Y, 10921906, RS07_GameActionBx.X1, RS07_GameActionBx.Y1, RS07_GameActionBx.X2, RS07_GameActionBx.Y2, 5)) then begin RS07_ClickMouse(X, Y, mbLeft); MSSL_Wait(800 + Random(3000)); end; end; procedure Special; begin //mage short spec if FindColorTol(x, y, 4097340, 700, 420, 710, 430, 2) then repeat begin MSSL_Wait(60000 + Random(25000)); RS07_ClickMouse(572 + Random(120), 417 + Random(11), mbLeft); end; until FindColorTol(x, y, 4097340, 574, 415, 710, 430, 2); end; begin MSSL_Setup; ClearDebug; RS07_SetScreenBrightness(RS07_SCREEN_BRIGHTNESS_VERY_BRIGHT); ColorToleranceSpeed(2); SetColorSpeed2Modifiers(0.28, 0.17); repeat RS07_AutoRetaliate; MSSL_Wait(500); if not RS07_LoggedIn then begin RS07_LogIn(username, password); MSSL_Wait(3000 + Random(43)); RS07_SetCompassDir('S'); end; if RS07_LoggedIn then begin EnterCave; MSSL_Wait(5000 + Random(10000)); Special; end; //start cave if FindColorTol(x, y, 16711680, 81, 369, 480, 459, 2) then RS07_ClickMouse(300 + Random(15), 446 + Random(7), mbLeft); MSSL_Wait(600 + Random(500)); until false; end.[/Code]
  4. I don't know how to use smart. It doesn't seem to work for me! How do I set it up? Is there a good guide somewhere explaining smart? I'd love to make have a smart option for my scripts!
  5. I added some things to Toby1's code to prevent it form getting stuck after Runescape's most recent update. I don't know how to upload a file because I'm very new with Scar but here's the code! Just copy and paste it! Any tips/suggestions to improve the code is encouraged although I'm not sure how much time I will have with school. Warning: Does NOT support randoms although they are very rare. A Runescape ban could result in using this bot. program RS07_FightCaveFighter; {$DEFINE RS07} {$I MSSL\MSSL.scar} var X, Y: Integer; const USERNAME = ''; PASSWORD = ''; procedure EnterCave; begin Wait(2000 + Random(1700)); if (FindColorTol(X, Y, 10921906, RS07_GameActionBx.X1, RS07_GameActionBx.Y1, RS07_GameActionBx.X2, RS07_GameActionBx.Y2, 5)) then begin RS07_ClickMouse(X, Y, mbLeft); MSSL_Wait(800 + Random(3000)); end; end; begin MSSL_Setup; ClearDebug; // RS07_SetScreenBrightness(RS07_SCREEN_BRIGHTNESS_VERY_BRIGHT); ColorToleranceSpeed(2); SetColorSpeed2Modifiers(0.28, 0.17); repeat RS07_AutoRetaliate; MSSL_Wait(500); // if not RS07_LoggedIn then // begin // RS07_LogIn(username, password); // MSSL_Wait(3000 + Random(43)); // RS07_SetCompassDir('S'); // end; if RS07_LoggedIn then begin EnterCave; MSSL_Wait(10000 + Random(5000)); end; if FindColorTol(x, y, 16711680, 81, 369, 480, 459, 2) then RS07_ClickMouse(300 + Random(15), 446 + Random(7), mbLeft); MSSL_Wait(600 + Random(500)); until False; end. You can change the waiting times if you know what you are doing! 1000 = 1 second Enjoy! Exatox's Fight Caves 1.0.scar
  6. Hey guys, I know there's already a fight caves script, but it has broke due to a runescape update! Im trying to write a new one but it wont compile! I'm trying to get it to do the following: works>log in if not already works>set screen pointing south works>turn auto retaliate on <Repeat> works >enter cave Broken>check to see if in cave, if not try entering again Broken>start waves by selecting defence mode (If you know how to press the "click here to continue" that pops up please add it. Ive no idea how to so I improvised) works >once dead, the cave color appears again so it repeats program RS07_FightCaveFighter; {$DEFINE RS07} {$I MSSL\MSSL.scar} var X, Y: Integer; const USERNAME = ''; PASSWORD = ''; Function CheckIfIn(num: byte): Boolean; begin Result := False; case num of 0: result := (FindColorTol(X, Y, 10921906, RS07_GameActionBx.X1, RS07_GameActionBx.Y1, RS07_GameActionBx.X2, RS07_GameActionBx.Y2, 5)); end; end; // procedure Boss; //testttingngingingign // begin // if checkifin = true then // repeat // Wait(455 + Random(50)); // if checkifin = false then // MSSL_Wait(2500 + Random(1500)); // RS07_SetAttackStyle(2) // until checkifin = false; //end; procedure StartCave; //test 2 begin if CheckIfIn := false then MSSL_Wait(2500 + Random(1500)); RS07_SetAttackStyle(2) end; // procedure StartCave; //begin //Wait(455 + Random(50)); //if checkifin = false then // begin // MSSL_Wait(2500 + Random(1500)); // RS07_SetAttackStyle(2) // end; //end; procedure EnterCave; begin Wait(455 + Random(50)); if (FindColorTol(X, Y, 10921906, RS07_GameActionBx.X1, RS07_GameActionBx.Y1, RS07_GameActionBx.X2, RS07_GameActionBx.Y2, 5)) then begin RS07_ClickMouse(X, Y, mbLeft); MSSL_Wait(300 + Random(50)); RS07_ClickMouse(X, Y, mbLeft); MSSL_Wait(10000 + Random(2000)); boss; end; end; begin MSSL_Setup; ClearDebug; RS07_SetScreenBrightness(RS07_SCREEN_BRIGHTNESS_VERY_BRIGHT); ColorToleranceSpeed(2); RS07_SetCompassDir('S'); RS07_SetCameraAngleH; SetColorSpeed2Modifiers(0.28, 0.17); repeat RS07_AutoRetaliate; MSSL_Wait(500); if not RS07_LoggedIn then begin RS07_LogIn(username, password); MSSL_Wait(3000 + Random(43)); RS07_SetCompassDir('S'); end; if RS07_LoggedIn then begin EnterCave; stuck; MSSL_Wait(13200 + Random(3000)); if RS07_InFightHA = False and checkifin = false then repeat begin MSSL_Wait(10000 + Random(1500)); RS07_SetAttackStyle(2) end; until RS07_InFightHA = True end; until False; end. This is my first time programming with scar (Only experience is visual basic) so please go easy on me! Thank you in advance for those who take the time to help find a solution!
  7. Toby! Rs updated something small that stops this bot from working! All it needs to do is click "click here to continue" so the fight caves start. I'd fix it myself but I don't know where to get a list of RS07 functions such as RS07_ClickMouse. I would need to know what the chatbox area is labeled as. For example your RS07_GameActionBx.X1 describes one coordinate of the game box area. For the solution, I was going to say; If (find color of npc eyes that pop up when in cave) = true then begin find color (blue color of text that says "click here to continue") MSSL_Wait(so much time); RS07_ClickMouse(X, Y, mbLeft); end; Please help me! Im a fairly new to programming in Scar, so any tips would be much appreciated! Id also like to know where i can get a list of the RS07 pre-programmed functions and their descriptions, such as RS07_LogIn... I'm not quite sure how that works! I'm excited to try and make my own scripts for the community! FIXED: I've found a solution and posted it in my thread!
×
×
  • Create New...