Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- program YuffieRagbot; {99HP} {BREWS} {43 PRAYER} {SANFEWS}
- {$I AeroLib/AeroLib.simba}
- const
- USER = 'b';
- PASS = 'o';
- COL = 1332571;
- TOL = 25;
- HUE = 0.17;
- SAT = 0.24;
- playerAFK = false; {will afk if a player is visible on map}
- RunToNPC = false; {will run to closest npc on minimap if it can't find any}
- var
- brew, sanfew, x, y: integer;
- procedure load();
- begin
- brew := DTMFromString('mkwEAAHicrc5JCoRADIXhZwmCw0IU2mt5WhEnhB5AvJGg9C+VpcsKfCRVSSC1pNVJPToMmJ3/+2AzP3u/8bW82OyIyXbrSCpQ4YXG3PXdK5EjQQzhJB244KyXYt9aPxBApnAR5iLvIf6PihRh');
- sanfew := DTMFromString('mKgEAAHiclc1NCkBQGIXhcy3A6G5GfmKAZCUGNiJFKSkmSrZge14xMbynnsHX+er4kjJPChEhQYwUOUoUqFB/99MHOI20YsGEAR16jJixYTfv7+PA1TasGmdWbrEf96XXPzcizw4X');
- mousespeed := 60;
- end;
- procedure proggy;
- begin
- cleardebug;
- writeln('OS-Scape YuffieThieving');
- writeln(' Time Running: ' + MsToTime(GetTimeRunning, 3));
- Writeln('');
- wait(30);
- end;
- procedure free();
- begin
- freedtm(brew);
- freedtm(sanfew)
- end;
- procedure login();
- var
- count: integer;
- begin
- wait(500);
- mouse(Point(455, 296), 0, 0, mouse_left);
- wait(500);
- mouse(Point(340, 259), 0, 0, mouse_left);
- wait(500);
- count := 0;
- repeat
- Inc(count);
- PressKey(VK_Back);
- until count > 25;
- wait(200);
- sendkeys(user, 50, 10);
- wait(200);
- mouse(Point(340, 275), 0, 0, mouse_left);
- count := 0;
- repeat
- Inc(count);
- PressKey(VK_Back);
- until count > 25;
- wait(200);
- sendkeys(pass, 50, 10);
- wait(200);
- mouse(Point(294, 320), 0, 0, mouse_left);
- waitfunc(@ isloggedin, 100, 10000);
- if (isloggedin()) then
- begin
- end;
- end;
- procedure eat();
- var
- I, x, y: Integer;
- spot : Tpoint;
- begin
- gameTab(TAB_INV);
- begin
- if (findDTM(brew, x, y, MIX1, MIY1, MIX2, MIY2)) then
- begin
- Spot := (point(x, y));
- AccurateMMouse(Spot, 0, 0);
- fastClick(MOUSE_LEFT);
- SendKeys('Ahhhhhh! What a nice sip of Saradomin brew! Keep hitting me broder!', 1, 1)
- begin
- PressKey(13)
- end;
- end
- else
- begin
- writeln('No brews found');
- terminatescript;
- end;
- end;
- end;
- procedure drink();
- var
- I, x, y: Integer;
- spot : Tpoint;
- begin
- gameTab(TAB_INV);
- begin
- if (findDTM(sanfew, x, y, MIX1, MIY1, MIX2, MIY2)) then
- begin
- Spot := (point(x, y));
- AccurateMMouse(Spot, 0, 0);
- fastClick(MOUSE_LEFT);
- SendKeys('Ahhhhhh! What a nice sip of Sanfew serum! Keep hitting me broder!', 1, 1)
- begin
- PressKey(13)
- end;
- end
- else
- begin
- writeln('No Sanfews found');
- terminatescript;
- end;
- end;
- end;
- procedure loop();
- begin
- if (getMiniMapDotsIn('player', Area_MM)) then
- if (playerAFK = true) then
- while (getMiniMapDotsIn('player', Area_MM)) do
- begin
- wait(300);
- writeln('Player Visible - Pretending to be afk');
- end;
- if (not isloggedin()) then
- login();
- begin
- if FindColor(X,Y,1535,521,54,540,67) then eat(); {1}
- if FindColor(X,Y,2815,521,54,540,67) then eat(); {2}
- if FindColor(X,Y,4095,521,54,540,67) then eat(); {3}
- if FindColor(X,Y,5375,521,54,540,67) then eat(); {4}
- if FindColor(X,Y,6911,521,54,540,67) then eat(); {5}
- if FindColor(X,Y,8191,521,54,540,67) then eat(); {6}
- if FindColor(X,Y,9471,521,54,540,67) then eat(); {7}
- if FindColor(X,Y,10751,521,54,540,67) then eat(); {8}
- if FindColor(X,Y,12031,521,54,540,67) then eat(); {9}
- if FindColor(X,Y,13567,521,54,540,67) then eat(); {10}
- if FindColor(X,Y,14847,521,54,540,67) then eat(); {11}
- if FindColor(X,Y,16127,521,54,540,67) then eat(); {12}
- if FindColor(X,Y,17407,521,54,540,67) then eat(); {13}
- if FindColor(X,Y,18687,521,54,540,67) then eat(); {14}
- if FindColor(X,Y,20223,521,54,540,67) then eat(); {15}
- if FindColor(X,Y,21503,521,54,540,67) then eat(); {16}
- if FindColor(X,Y,22783,521,54,540,67) then eat(); {17}
- if FindColor(X,Y,24063,521,54,540,67) then eat(); {18}
- if FindColor(X,Y,25343,521,54,540,67) then eat(); {19}
- if FindColor(X,Y,26879,521,54,540,67) then eat(); {20}
- if FindColor(X,Y,28159,521,54,540,67) then eat(); {21}
- if FindColor(X,Y,29439,521,54,540,67) then eat(); {22}
- if FindColor(X,Y,30719,521,54,540,67) then eat(); {23}
- if FindColor(X,Y,31999,521,54,540,67) then eat(); {24}
- if FindColor(X,Y,33535,521,54,540,67) then eat(); {25}
- if FindColor(X,Y,34815,521,54,540,67) then eat(); {26}
- if FindColor(X,Y,36095,521,54,540,67) then eat(); {27}
- if FindColor(X,Y,37375,521,54,540,67) then eat(); {28}
- if FindColor(X,Y,38655,521,54,540,67) then eat(); {29}
- if FindColor(X,Y,40191,521,54,540,67) then eat(); {30}
- if FindColor(X,Y,41471,521,54,540,67) then eat(); {31}
- if FindColor(X,Y,42751,521,54,540,67) then eat(); {32}
- if FindColor(X,Y,44031,521,54,540,67) then eat(); {33}
- if FindColor(X,Y,45311,521,54,540,67) then eat(); {34}
- if FindColor(X,Y,46847,521,54,540,67) then eat(); {35}
- if FindColor(X,Y,48127,521,54,540,67) then eat(); {36}
- if FindColor(X,Y,49407,521,54,540,67) then eat(); {37}
- if FindColor(X,Y,50687,521,54,540,67) then eat(); {38}
- if FindColor(X,Y,51967,521,54,540,67) then eat(); {39}
- if FindColor(X,Y,53503,521,54,540,67) then eat(); {40}
- if FindColor(X,Y,54783,521,54,540,67) then eat(); {41}
- if FindColor(X,Y,56063,521,54,540,67) then eat(); {42}
- if FindColor(X,Y,57343,521,54,540,67) then eat(); {43}
- if FindColor(X,Y,58623,521,54,540,67) then eat(); {44}
- if FindColor(X,Y,60159,521,54,540,67) then eat(); {45}
- if FindColor(X,Y,61439,521,54,540,67) then eat(); {46}
- if FindColor(X,Y,62719,521,54,540,67) then eat(); {47}
- if FindColor(X,Y,63999,521,54,540,67) then eat(); {48}
- if FindColor(X,Y,65535,521,54,540,67) then eat(); {49}
- if FindColor(X,Y,65530,521,54,540,67) then eat(); {50}
- if FindColor(X,Y,65525,521,54,540,67) then eat(); {51}
- if FindColor(X,Y,65520,521,54,540,67) then eat(); {52}
- if FindColor(X,Y,65515,521,54,540,67) then eat(); {53}
- if FindColor(X,Y,65509,521,54,540,67) then eat(); {54}
- if FindColor(X,Y,65504,521,54,540,67) then eat(); {55}
- if FindColor(X,Y,65499,521,54,540,67) then eat(); {56}
- if FindColor(X,Y,65494,521,54,540,67) then eat(); {57}
- if FindColor(X,Y,65489,521,54,540,67) then eat(); {58}
- if FindColor(X,Y,65483,521,54,540,67) then eat(); {59}
- if FindColor(X,Y,65478,521,54,540,67) then eat(); {60}
- if FindColor(X,Y,65473,521,54,540,67) then eat(); {61}
- if FindColor(X,Y,65468,521,54,540,67) then eat(); {62}
- if FindColor(X,Y,65463,521,54,540,67) then eat(); {63}
- if FindColor(X,Y,65457,521,54,540,67) then eat(); {64}
- if FindColor(X,Y,65452,521,54,540,67) then eat(); {65}
- if FindColor(X,Y,65447,521,54,540,67) then eat(); {66}
- if FindColor(X,Y,65442,521,54,540,67) then eat(); {67}
- if FindColor(X,Y,65437,521,54,540,67) then eat(); {68}
- if FindColor(X,Y,65431,521,54,540,67) then eat(); {69}
- if FindColor(X,Y,65426,521,54,540,67) then eat(); {70}
- if FindColor(X,Y,65421,521,54,540,67) then eat(); {71}
- if FindColor(X,Y,65416,521,54,540,67) then eat(); {72}
- if FindColor(X,Y,65411,521,54,540,67) then eat(); {73}
- if FindColor(X,Y,65405,521,54,540,67) then eat(); {74}
- if FindColor(X,Y,65400,521,54,540,67) then eat(); {75}
- if FindColor(X,Y,65395,521,54,540,67) then eat(); {76}
- if FindColor(X,Y,65390,521,54,540,67) then eat(); {77}
- if FindColor(X,Y,65385,521,54,540,67) then eat(); {78}
- if FindColor(X,Y,65379,521,54,540,67) then eat(); {79}
- if FindColor(X,Y,65374,521,54,540,67) then eat(); {80}
- if FindColor(X,Y,65369,521,54,540,67) then eat(); {81}
- if FindColor(X,Y,65364,521,54,540,67) then eat(); {82}
- if FindColor(X,Y,65359,521,54,540,67) then eat(); {83}
- if FindColor(X,Y,65353,521,54,540,67) then eat(); {84}
- if FindColor(X,Y,65348,521,54,540,67) then eat(); {85}
- if FindColor(X,Y,65343,521,54,540,67) then eat(); {86}
- if FindColor(X,Y,65338,521,54,540,67) then eat(); {87}
- if FindColor(X,Y,65333,521,54,540,67) then eat(); {88}
- if FindColor(X,Y,65327,521,54,540,67) then eat(); {89}
- if FindColor(X,Y,65322,521,54,540,67) then eat(); {90}
- if FindColor(X,Y,65317,521,54,540,67) then eat(); {91}
- if FindColor(X,Y,65312,521,54,540,67) then eat(); {92}
- if FindColor(X,Y,65307,521,54,540,67) then eat(); {93}
- if FindColor(X,Y,65301,521,54,540,67) then eat(); {94}
- if FindColor(X,Y,65296,521,54,540,67) then eat(); {95}
- if FindColor(X,Y,65291,521,54,540,67) then eat(); {96}
- if FindColor(X,Y,65286,521,54,540,67) then eat(); {97}
- end;
- begin
- if FindColor(X,Y,3327,521,99,540,111) then drink(); {1}
- if FindColor(X,Y,6399,521,99,540,111) then drink(); {2}
- if FindColor(X,Y,9471,521,99,540,111) then drink(); {3}
- if FindColor(X,Y,12543,521,99,540,111) then drink(); {4}
- if FindColor(X,Y,15615,521,99,540,111) then drink(); {5}
- if FindColor(X,Y,18687,521,99,540,111) then drink(); {6}
- if FindColor(X,Y,22015,521,99,540,111) then drink(); {7}
- if FindColor(X,Y,25087,521,99,540,111) then drink(); {8}
- if FindColor(X,Y,28159,521,99,540,111) then drink(); {9}
- if FindColor(X,Y,31231,521,99,540,111) then drink(); {10}
- if FindColor(X,Y,34303,521,99,540,111) then drink(); {11}
- if FindColor(X,Y,37375,521,99,540,111) then drink(); {12}
- if FindColor(X,Y,40447,521,99,540,111) then drink(); {13}
- if FindColor(X,Y,43775,521,99,540,111) then drink(); {14}
- if FindColor(X,Y,46847,521,99,540,111) then drink(); {15}
- if FindColor(X,Y,49919,521,99,540,111) then drink(); {16}
- if FindColor(X,Y,52991,521,99,540,111) then drink(); {17}
- if FindColor(X,Y,56063,521,99,540,111) then drink(); {18}
- if FindColor(X,Y,59135,521,99,540,111) then drink(); {19}
- if FindColor(X,Y,59135,521,99,540,111) then drink(); {20}
- if FindColor(X,Y,65535,521,99,540,111) then drink(); {21}
- if FindColor(X,Y,65523,521,99,540,111) then drink(); {22}
- if FindColor(X,Y,65511,521,99,540,111) then drink(); {23}
- if FindColor(X,Y,65499,521,99,540,111) then drink(); {24}
- if FindColor(X,Y,65487,521,99,540,111) then drink(); {25}
- if FindColor(X,Y,65475,521,99,540,111) then drink(); {26}
- end;
- end;
- begin
- initAL();
- load();
- AddOnTerminate('free');
- if (not isloggedin()) then
- login();
- setangle(0);
- repeat
- loop();
- until (false)
- end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement