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

Search the Community

Showing results for tags 'slacky'.



More search options

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Forums

  • General
    • Forum Rules
    • Announcements
    • General Discussion
    • Forum Discussion
  • Support
    • Download SCAR Divi
    • SCAR Divi Manual
    • General Help
    • Scripting Help
    • Script Help
    • Tutorials and FAQ
  • Scripts
    • Scripts For Games
    • Game Scripts
    • Other Scripts
    • Requests
  • Include Libraries
    • OSI
    • MSSL
    • GMRL
    • SSIL
    • Archive
  • Code Bin
    • Mouse & Keyboard
    • Screen & Client
    • Color, Bitmap, DTM & OCR
    • Points & Boxes
    • Files & Networking
    • Math
    • Other Snippets
  • Development
    • Development Roadmap
    • Bugtracker
    • Development Discussion
  • Games
    • RuneScape
    • Seafight
    • Other Games
  • Misc
    • Native Corner
    • Programming
    • Graphics
    • Music
    • Movies & TV

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Joined

  • Start

    End


Group


About Me


Location


Interests


Occupation


Studies


Skype

Found 1 result

  1. SimplePowerMiner - Test Stage It's a SimplePowerMiner that will theoreticaly work wherever there is ORE spesefied by the color you set. I've only tested it 3-4 places but should work just fine. Never been tested using OSI, but should work fine There might come some updates to this script, but it's hard to develop for OSI, without getting OSI to work properly for me. {=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= || Note: Ive never had it running more than 5-6 hours. Reason: No AntiRandom. So || you need to do that part you'r self. The bot is VERY basic. || =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= || Note 2: I do NOT use OSI in my script, i used my own include, because || OSI does NOT work (perfectly) for me. But with implemented OSI for you guys. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=} program SimplePowerMiner; {$DEFINE RS2} //{$DEFINE SMART} //Remove "//" to use SMART, if you'r smart. {$DEFINE OSI_Color_Anti_Randoms} {$I OSI\OSI.scar} {$I OSI\RS2\Misc\Anti-Ban.scar} procedure ScriptTerminate; begin FreeOSI; end; procedure print(text:string); begin WriteLn('>>> ' + text); end; var x,y:Integer; const color = 2570337; //This is a perfect IRON-color. timer = 3000; //Works from 40-80 mining at Al Kharid - Iron. {=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= || procedure InitPlayer; || Description: Startup fixes: Face North .::. Angle MAX .::. Set InventoryTab. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=} procedure InitPlayer; begin SetGameTab(Tab_Inv); SetAngle(True); MakeCompass(Dir_North); end; {=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= || procedure AntiBan; || doesn't do shit atm =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=} procedure AntiBan; begin (* nothing *) end; {=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= || procedure ClickTarget; || Description: Click The target, found by FindTarget. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=} procedure ClickTarget; begin if InvFull Then DropAll; if IsUpTextMulti(['Mine', 'ine','Min']) then begin GetMousePos(x, y); Mouse(x, y, 1, 1, True); Wait(timer + Random(1200)); end; end; {=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= || procedure FindTarget; || Description: Find a target color: Eg. a rock. Spesefied by color. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=} procedure FindTarget; var TPA: TPointArray; TP: TPoint; begin ColorToleranceSpeed(2); SetColorspeed2Modifiers(0.14, 0.70); if FindColorsTolerance(TPA, color, MSX1, MSY1, MSX2, MSY2, 6) then begin TP := TPA[Random(Length(TPA))]; MMouse(TP.x, TP.y,1,1); Wait(100 + Random(200)); end; end; {=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= || MainLoop || Description: Runs the script, until stopped. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=} begin SetupOSI; InitPlayer; repeat FindTarget; ClickTarget; if Random(15) = 1 Then AntiBan; until False; end.
×
×
  • Create New...