He's already made the ruby harvest catcher.Quote:
Originally Posted by Silentcore
Barbarian agility would be amazing if you could create a script for it
Printable View
He's already made the ruby harvest catcher.Quote:
Originally Posted by Silentcore
Barbarian agility would be amazing if you could create a script for it
I'll level it for you if you really want... just do the barcrawl and then have it inside the agility place and I can do some leveling for you, no PIN required :)Quote:
Originally Posted by DannyRS
Only if you want though...
Using my accs for other stuff atm tho, thanks anyway :p ;)Quote:
Originally Posted by ___
Will when i have the agil level or an account with reqs ;)Quote:
Originally Posted by SwagDaddy
Tried it ages ago in attachments, not very color viable thoQuote:
Originally Posted by Silentcore
Need tester for Pest Control?
Not quite yet ;)Quote:
Originally Posted by Alligaattor
But i will try keep you guys up to date and let you know when its almost ready :)
If you want to test something for me, in my sig, go test the fightcave trainer, as I will most likely use my combat functions from that in my pest control when its ready :p
Pyramid Plunder is thieving :PQuote:
Originally Posted by DannyRS
Oh lol, I'll google whats required, maybe if i have the requirements :pQuote:
Originally Posted by Uzu
I'd love a simple script for crafting Urns. Possibly in East Varrock(has closable door at pottery place) or Ardougne(walking across the log shortcut), closer is probably Varrock. The idea for it is this: start at bank, take out full inventory of soft clay(need 2 clay per urn), walk to potter's wheel, craft 14 unfired urns, use pottery oven to fire the urns, go back to bank, repeat. I'd like to make the best urns (Decorated Cooking urn). Both beforementioned places have potter's wheel and oven.
made this a long while ago maybe you can add to it, put soft clay top right bank, and make one inv of urns before usingQuote:
Originally Posted by Mr Magic
Never added door opening
(i think thats the setup)
Simba Code:Program UrnMaker;
{$Define SMART8}
{$I SRL/SRL.Simba}
{$I SRL/SRL/Misc/Debug.Simba}
{$I Sps/Sps.Simba}
{$i SRL/SRL/misc/reports.simba}
{$IFDEF SMART8}
{$I SRL/SRL/Misc/SmartGraphics.Simba}
{$ENDIF}
//Setup Variables
Const
Debug = True;
WorldToUse = 31; //What World To Log Into (Recommend Low-Lag)
DMP = True; // *** If the SPS Map is Not found found,
//Download them and save them automatically,
//you should leave this as true ***
ScriptVersion = '1.0'; //Current ScriptVersion For Debug and Paint
Procedure DeclarePlayers;
Begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
Players[0].Name :='';
Players[0].Pass :='';
Players[0].Pin := '';
Players[0].Nick :='';
Players[0].Active:=True;
End;
///////////////////////////////////////////////////////////////////////////////////////////
// //
// End of user setup //
// Don't touch below this line unless you know what you're doing!! //
// //
// Thanks To Ashaman For this message, yes i am that lazy! //
// //
///////////////////////////////////////////////////////////////////////////////////////////
Var
RunsMade: Integer;
StartingExperience,ExperienceEarned: Integer;
SpinTicketDTM: Integer;
ToUrn,ToBank: TPointArray;
//Import painting
Prog: Integer;
PaintArray: TStringArray;
{*******************************-CREDITS-**************************************
All of these mouse movements and typing are credited To benland100 and flight.
Ashaman88 For his edits To benland100's and flight's already great functions
Thanks also To Ashaman88 For his awesome scripts, i used one of
his as a template when i was learning To make my first script
*******************************************************************************}
//By Bandland100, modified by Ashaman88 To shift mouse speeds after every step
//
Procedure SuperWindMouse(xs, ys, xe, ye, gravity, wind, minWait, maxWait, maxStep, targetArea: Extended);
Var
veloX,veloY,windX,windY,veloMag,dist,randomDist,lastDist,step: Extended;
lastX,lastY,MSP,W: Integer;
sqrt2,sqrt3,sqrt5: Extended;
Begin
MSP := MouseSpeed;
sqrt2:= sqrt(2);
sqrt3:= sqrt(3);
sqrt5:= sqrt(5);
While hypot(xs - xe, ys - ye) > 1 Do
Begin
dist:= hypot(xs - xe, ys - ye);
wind:= minE(wind, dist);
If dist >= targetArea Then
Begin
windX:= windX / sqrt3 + (random(round(wind) * 2 + 1) - wind) / sqrt5;
windY:= windY / sqrt3 + (random(round(wind) * 2 + 1) - wind) / sqrt5;
End Else
Begin
windX:= windX / sqrt2;
windY:= windY / sqrt2;
If (maxStep < 3) Then
Begin
maxStep:= random(3) + 3.0;
End Else
Begin
maxStep:= maxStep / sqrt5;
End;
End;
veloX:= veloX + windX;
veloY:= veloY + windY;
veloX:= veloX + gravity * (xe - xs) / dist;
veloY:= veloY + gravity * (ye - ys) / dist;
If hypot(veloX, veloY) > maxStep Then
Begin
randomDist:= maxStep / 2.0 + random(round(maxStep) div 2);
veloMag:= sqrt(veloX * veloX + veloY * veloY);
veloX:= (veloX / veloMag) * randomDist;
veloY:= (veloY / veloMag) * randomDist;
End;
lastX:= Round(xs);
lastY:= Round(ys);
xs:= xs + veloX;
ys:= ys + veloY;
case Random(50) of
1..25: W := (MSP + (Random((MSP/4))));
26..50: W := (MSP - (RandomRange((MSP/2), MSP-1)));
End;
If (W < 1) Then
W := 1;
If (lastX <> Round(xs)) Or (lastY <> Round(ys)) Then
MoveMouse(Round(xs), Round(ys));
step:= hypot(xs - lastX, ys - lastY);
//W := round((maxWait - minWait) * (step / maxStep) + minWait);
wait(W);
lastdist:= dist;
End;
If (Round(xe) <> Round(xs)) Or (Round(ye) <> Round(ys)) Then
MoveMouse(Round(xe), Round(ye));
MouseSpeed := MSP;
End;
Procedure HumanMMouse(eX, eY, ranX, ranY: Integer);
Var
randSpeed: Extended;
X,Y,X2,Y2,j,Dist,MP: Integer;
Begin
j := MouseSpeed;
GetMousePos(X, Y);
Dist := Distance(X, Y, eX, eY);
MP := Round(Dist/150);
If MP < 0 Then
MP := 1;
randSpeed := (random(MouseSpeed) / 2.0 + MouseSpeed) / 10.0;
X2 := RandomRange(eX-(j*MP), eX+(j*MP));
Y2 := RandomRange(eY-(j*MP), eY+(j*MP));
SuperWindMouse(X, Y, X2, Y2, 11, 8, 10.0 / randSpeed, 12.0 / randSpeed, 10.0 * randSpeed, 10.0 * randSpeed);
GetMousePos(X, Y);
MMouse(eX, eY, ranX, ranY);
MouseSpeed := j;
End;
Procedure HumanMouseBox(X1, Y1, X2, Y2: Integer);
Var
FX, FY: Integer;
Begin
GaussBox(FX,FY,X1,Y1,X2,Y2);
HumanMMouse(FX,FY,0,0)
End;
{*******************************************************************************
Procedure FastClick(button: Integer);
By: Flight
Description: Quickly click the mouse.
*******************************************************************************}
Procedure FastClick(button: variant);
Var
x, y: Integer;
ibutton: Integer;
Begin
If VariantIsBoolean(button) Then
Begin
If (button) Then
iButton := mouse_left
Else
iButton := mouse_right;
End Else
iButton := button;
If (iButton = mouse_move) Then Exit;
GetMousePos(x, y);
HoldMouse(x, y, iButton);
Wait(RandomRange(60, 150));
GetMousePos(x, y);
ReleaseMouse(x, y, iButton);
End;
Procedure OffMM(RedTu, LeWait, rWait: Integer);
Var
W,H,RX,RY,T,RT: Integer;
Begin
GetClientDimensions(W,H);
H:=H+50;
RX := RandomRange(0, W);
RY := RandomRange(0, H);
Case (RedTu) Of
0..1: HumanMMouse(W/2, RandomRange(-110,-60), RX, 0);
2: HumanMMouse(RandomRange(-50,-10), H/2, 0, RY);
3: HumanMMouse(W/2, h+RandomRange(10,50), RX, 0);
4: HumanMMouse(W+RandomRange(10,50), H/2, 0, RY);
End;
RT:=(Random(rWait));
MarkTime(T);
Repeat
Wait(Random(100));
Until TimeFromMark(T)>(LeWait+RT);
End;
Procedure TypeFast(Text: String);
Var
I: Integer;
Begin
For I:=1 To Length(Text) Do
SendKeys(Text[I],RandomRange(90,140),RandomRange(90,140));
Wait(RandomRange(10,50));
End;
//
{*******************************************************************************
//
// DannyRS's Part
//
*******************************************************************************}
//
Procedure LeftClickSpot(X1, Y1, X2, Y2: Integer);
Var Y1NOBanner, Y2NOBanner: Integer;
Begin
Y1NOBanner:=Y1 - 50; Y2NOBanner:=Y2 - 50;
HumanMMouse(RandomRange(X1,X2),RandomRange(Y1NOBanner,Y2NOBanner),0,0);
Wait(9+Random(37));
FastClick(true);
Wait(124+Random(193));
End;
Procedure RightClickSpot(X1, Y1, X2, Y2: Integer);
Var Y1NOBanner, Y2NOBanner: Integer;
Begin
Y1NOBanner:=Y1 - 50; Y2NOBanner:=Y2 - 50;
HumanMMouse(RandomRange(X1,X2),RandomRange(Y1NOBanner,Y2NOBanner),0,0);
Wait(9+Random(37));
FastClick(false);
Wait(124+Random(193));
End;
Procedure ClickCurrent(ToDo: Boolean);
Var Y1NOBanner, Y2NOBanner: Integer;
Begin
Wait(9+Random(37));
If ToDo = True Then
Begin FastClick(True); End
Else If ToDo = False Then
Begin FastClick(False); End;
Wait(224+Random(193));
End;
Procedure LoginHandler;
Var Y1NOBanner, Y2NOBanner,x, y: Integer;
Begin
If (Not LoggedIn) Or (LobbyScreen) Then
Begin
If Not LoggedIn Then
LoginPlayerToLob;
If LobbyScreen Then
Begin
SelectWorld(WorldToUse);
If LobbyScreen Then
Begin
Repeat
LeftClickSpot(259, 495, 504, 525);
Wait(2500);
Until (FindColorSpiralTolerance(x, y, 143319, 703, 27, 708, 31, 40)) Or LoggedIn
End;
Wait(1224+Random(193));
End;
End;
End;
Procedure FindCustomObj(HM, SM, TOL, COL, XV, YV, S1, S2: Variant);
Var
tmpCTS, i, l, r, counter:integer;
CustomObjTPA:TPointArray;
CustomObjATPA:T2DPointArray;
x,y:integer;
Begin
tmpCTS := GetToleranceSpeed;
SetColorToleranceSpeed(2);
SetToleranceSpeed2Modifiers(HM, SM);
FindColorsTolerance(CustomObjTPA, COL, MSX1, MSY1, MSX2, MSY2, TOL);
CustomObjATPA := SplitTPAEx(CustomObjTPA, XV, YV);
SortATPASize(CustomObjATPA,True);
SetColorToleranceSpeed(tmpCTS);
SetToleranceSpeed2Modifiers(0.02, 0.02);
L := High(CustomObjATPA)
marktime(counter);
for i := 0 to L do
begin
MiddleTPAEx(CustomObjATPA[i], x, y);
r := random(L);
HumanMMouse(x, y, 3, 5);
if(Debug)then begin Writeln('We Saw The Object'); end;
ClickCurrent(False);
If (ChooseOptionMulti([S1,S2])) then
Break;
wait(randomrange(30, 160));
if (TimeFromMark(counter) > 1500) then
begin
if(Debug)then begin Writeln('We Failed to See The Object'); end;
Break;
end;
end;
End;
Function ClickCraftAll: Boolean;
Var
xpos, ypos: Integer;
x, y: Integer;
attempts: Integer;
done: Boolean;
temprand: Integer;
Begin
done:= false;
temprand:= Random(20);
HumanMMouse(RandomRange(259,483),RandomRange(303,324),0,0);
repeat
If (Not LoggedIn)Then
Exit;
begin
if(FindColorSpiralTolerance(x, y, 8279557, 417, 280, 421, 284, 20))then
begin
if(temprand < 18)then
begin
//click craft
if(Debug)then begin Writeln('Trying to Click Craft...'); end;
Wait(5+Random(17));
FastClick(true);
Wait(1224+Random(293));
if(Debug)then begin Writeln('Moving Cursor Somewhere While Crafting'); end;
HumanMMouse(RandomRange(20,700),RandomRange(40,503),0,0);
done:= true;
end
else
begin
//Rclick craft
if(Debug)then begin Writeln('Trying to RClick Craft...'); end;
xpos:= RandomRange(259,483);
ypos := RandomRange(303,324);
HumanMMouse(xpos,ypos,0,0);
Wait(5+Random(17));
FastClick(false);
Wait(427+Random(193));
xpos:= RandomRange(xpos-67,xpos+67);
ypos := RandomRange((ypos+22),(ypos+35));
HumanMMouse(xpos,ypos,0,0);
Wait(15+Random(17));
FastClick(true);
Wait(1227+Random(193));
if(Debug)then begin Writeln('Moving Cursor Somewhere While Crafting'); end;
HumanMMouse(RandomRange(20,700),RandomRange(40,503),0,0);
done:= true;
end;
end
else
begin
if(Debug)then begin Writeln('Failed to See CraftAll'); end;
attempts:= attempts+1;
Wait(383+Random(193));
end;
end;
until (attempts > 10) or (done);
if(attempts > 10)then
begin
if(Debug)then begin
Writeln('Failed to See CraftAll Within 10 Tries'); end; Result:=False; Exit;
end
else
begin
attempts:= 0;
Result:=True;
end;
End;
Procedure WaitCrafting;
Var
xpos, ypos: Integer;
x, y: Integer;
attempts: Integer;
temprand: Integer;
done: Boolean;
Begin
repeat
begin
if(Debug)then begin Writeln('Crafting...'); end;
Wait(336+Random(197));
Case Random(20) Of
7: begin
if(Debug)then begin Writeln('Moving Cursor Somewhere While Crafting'); end;
HumanMMouse(RandomRange(20,700),RandomRange(40,503),0,0);
end;
end;
end;
until not (FindColorSpiralTolerance(x, y, 263402, 298, 177, 302, 181, 70))
repeat begin
if(Debug)then begin Writeln('waiting for EoC crafting UI to close'); end;
Wait(724+Random(393));
end; until not (FindColorSpiralTolerance(x, y, 2929149, 418, 58, 422, 62, 15))
End;
Procedure LogOutGame;
Var
xpos, ypos: Integer;
x, y: Integer;
attempts: Integer;
done: Boolean;
Begin
done:= false;
Repeat
If (Not LoggedIn)Then
Exit;
Begin
If(FindColorSpiralTolerance(x, y, 143319, 703, 28, 705, 30, 10)) And LoggedIn Then
Begin
//click x
xpos:= RandomRange(746,759);
ypos := RandomRange(3,15);
HumanMMouse(xpos,ypos,0,0);
Wait(5+Random(17));
FastClick(true);
Wait(1427+Random(193));
//click logout
xpos:= RandomRange(572,710);
ypos := RandomRange((351),(372));
HumanMMouse(xpos,ypos,0,0);
Wait(15+Random(17));
FastClick(true);
Wait(1527+Random(193));
done:= true;
End Else
Begin
attempts:= attempts+1;
Wait(263+Random(193));
End;
End;
Until (attempts > 10) Or (done);
If(attempts > 10)Then
Begin
If(Debug)Then Begin Writeln('Failed To Logout'); End; Exit;
End Else
Begin
attempts:= 0;
End;
End;
Procedure CloseBankUp;
Var
x,y: Integer;
Begin
if(FindColorSpiralTolerance(x, y, 4512575, 356, 312, 362, 318, 25))then
begin
//Close Bank
if(Debug)then begin Writeln('Closing Bank'); end;
HumanMMouse(RandomRange(482,494),RandomRange(28,41),0,0);
Wait(9+Random(37));
FastClick(true);
Wait(327+Random(283));
end;
End;
Procedure BankAllButton;
Var
xpos, ypos: Integer;
x, y: Integer;
attempts: Integer;
temprand: Integer;
done: Boolean;
Begin
done:= false;
temprand:= Random(20);
repeat
begin
IF (PinScreen) Then InPin(Players[0].Pin);
if(temprand < 18)then
begin
if(FindColorSpiralTolerance(x, y, 4512575, 358, 313, 360, 316, 20))then
begin
//Bank All
if(Debug)then begin Writeln('Banking All'); end;
HumanMMouse(RandomRange(355,382),RandomRange(299,315),0,0);
Wait(15+Random(17));
FastClick(true);
Wait(627+Random(183));
done:= true;
end
else
begin
if(Debug)then begin Writeln('failed to see bank All button'); end;
attempts:= attempts+1;
Wait(83+Random(193));
end;
end
else
begin
if(FindColorSpiralTolerance(x, y, 4512575, 358, 313, 360, 316, 20))then
begin
if(Debug)then begin Writeln('Banking All via RClick'); end;
xpos:= RandomRange(355,382);
ypos := RandomRange(299,315);
HumanMMouse(xpos,ypos,0,0);
Wait(5+Random(17));
FastClick(false);
Wait(427+Random(193));
xpos:= RandomRange(xpos-74,xpos+74);
ypos := RandomRange((ypos+22),(ypos+36));
HumanMMouse(xpos,ypos,0,0);
Wait(15+Random(17));
FastClick(true);
Wait(627+Random(193));
done:= true;
end
else
begin
if(Debug)then begin Writeln('Failed to See BankAllButton'); end;
attempts:= attempts+1;
Wait(83+Random(193));
end;
end;
end;
until (attempts > 20) or (done);
if(attempts > 20)then
begin
if(Debug)then begin Writeln('Failed to See BankAllButton after 20'); end;
SPS_WalkPath(ToBank);
Wait(1585+Random(257));
Exit;;
end
else
begin
attempts:= 0;
end;
End;
Function CheckSpinTicket: Boolean;
Var
xpos, ypos: Integer;
x, y: Integer;
attempts: Integer;
temprand: Integer;
done: Boolean;
Begin
if (FindDTM(SpinTicketDTM, x, y, MIX1, MIY1, MIX2, MIY2)) then
begin
CloseBankUp;
if(Debug)then begin Writeln('We See a SpinTicket using'); end;
HumanMMouse(RandomRange(x-4,x+4),RandomRange(y-4,y+4),0,0);
ClickCurrent(True);
ClickCurrent(True);
Result:=True;
end else
begin
Result:=False;
end;
End;
Procedure MainLoop;
Var xpos, ypos: Integer;
Var x, y: Integer;
Var Done,UsedExit: Boolean;
Var dead: Boolean;
Var CheckIdle: Integer;
Begin
Writeln('Welcome To UrnMaker by DannyRS');
//Pause Before Start Script
Writeln('Starting in 3...');
Wait(1000);
Writeln('Starting in 2...');
Wait(1000);
Writeln('Starting in 1...');
Wait(1000);
Repeat
If Not(Debug)Then Begin ClearDebug; End;
Done := False;
If (Not LoggedIn) Or LobbyScreen Then
LoginHandler;
SPS_WalkPath(ToBank);
if (FindDTM(SpinTicketDTM, x, y, MIX1, MIY1, MIX2, MIY2)) then
begin
CloseBankUp;
if(Debug)then begin Writeln('We See a SpinTicket using'); end;
HumanMMouse(RandomRange(x-4,x+4),RandomRange(y-4,y+4),0,0);
ClickCurrent(True);
HumanMMouse(RandomRange(x-4,x+4),RandomRange(y-4,y+4),0,0);
ClickCurrent(True);
end;
CloseBankUp;
FindCustomObj(0.17, 0.82, 12, 4007982, 5, 5, 'Bank B', 'ank B');
BankAllButton;
RightClickSpot(438, 146, 458, 160);
if (ChooseOptionMulti(['Withdraw-All','ithdraw-All'])) then
Wait(185+Random(257))
else
Continue;
SPS_WalkPath(ToUrn);
Wait(1885+Random(257));
FindCustomObj(1.20, 0.10, 2, 10066336, 5, 5, 'Form', 'Orm');
Wait(1585+Random(257));
ClickCraftAll;
WaitCrafting;
SPS_WalkPath(ToBank);
Wait(1585+Random(257));
If(Debug)Then Begin Writeln('Reached End of Main Loop'); End;
//Done:=True; //debuging only
Until Done;
End;
{*******************************-CREDIT-***************************************
All Credit To Ashaman and where ever he learned it, For the map grabbing !!
*******************************************************************************}
Procedure DownloadSPSImage(ImageName: String; Location: String);
Var
Image, Path: string;
FP: Integer;
Begin
If(Debug)Then Begin Writeln('Downloading SPS Map Image'); End;
Image:= GetPage(Location);
Path:= IncludePath + 'SPS\img\runescape_other\' + ImageName + '.png';
Path:= Trim(Path);
FP:= CreateFile(Path);
WriteFileString(FP, Image);
CloseFile(FP);
End;
Function GrabSPSMaps: Boolean;
Var
SWMap,SWName: String;
Begin
SWName:= 'URNSPS';
SWMap:= 'http://i.imgur.com/KSeSL.png';
If DMP Then
Begin
If (Not FileExists(IncludePath + 'SPS\img\runescape_other\URNSPS.png')) Then
DownloadSPSImage(SWName, SWMap);
End;
Result:= (FileExists(IncludePath + 'SPS\img\runescape_other\URNSPS.png'));
End;
Procedure RequirementsCheck;
Begin
If (Not GrabSPSMaps) Then
RaiseException(erCustomError, 'SPS Maps Do Not Exist OR They Are Named Incorrectly!');
End;
Procedure FreeGlobals;
Begin
FreeDTM(SpinTicketDTM);
End;
Procedure SetMyGlobals;
Begin
SpinTicketDTM := DTMFromString('mggAAAHicY2NgYMhlYmBIhuIyKC4GYjFGBgYhIJYBYn4oDRKbaqzL0J9ih4JXL1/MwAU0CxtmxIEhAABpRQsg');
ToUrn:= [Point(197, 133), Point(197, 146), Point(196, 152), Point(196, 159), Point(197, 163), Point(198, 171), Point(198, 176), Point(197, 184), Point(196, 189), Point(191, 193), Point(189, 199), Point(188, 203), Point(186, 211), Point(185, 215), Point(183, 220), Point(182, 226), Point(182, 233), Point(184, 239), Point(185, 245)]
ToBank:= [Point(184, 244), Point(184, 235), Point(184, 227), Point(185, 218), Point(186, 211), Point(187, 205), Point(190, 199), Point(193, 192), Point(195, 185), Point(195, 176), Point(196, 167), Point(196, 159), Point(197, 149), Point(194, 143), Point(191, 137), Point(185, 132), Point(176, 131), Point(170, 130), Point(166, 130), Point(163, 138), Point(163, 144), Point(163, 151), Point(163, 163)]
End;
Procedure Setup;
Var x,y: Integer;
Begin
{$IFDEF SIMBAMAJOR980}
SMART_SERVER := 10;
SMART_MEMBERS := TRUE;
SMART_SIGNED := TRUE;
SMART_SUPERDETAIL := FALSE;
{$ELSE}
SRL_SIXHOURFIX := TRUE;
SMART_FIXSPEED := TRUE;
{$ENDIF}
SetupSRL;
ClearDebug;
RequirementsCheck;
DeclarePlayers;
SPS_Setup(RUNESCAPE_OTHER, ['URNSPS']);
SetMyGlobals;
AddOnTerminate('FreeGlobals');
LoginHandler;
ClickNorth(SRL_ANGLE_HIGH);
SmartSetRefresh(90);
End;
Begin
Setup;
ActivateClient;
ClearDebug;
MainLoop;
LogOutGame;
End.
Why not do low level agility for barbarian assault?
I keep coming with a lot of Hints that quite a few variables are never used and an error that Runescape_other is unknown identifier.. Well, I guess I'll try to fix it for myself when I have more time, like in a month or so... :D Thanks anyway ;)Quote:
Originally Posted by DannyRS
do you have simba extensions setup and up to date?Quote:
Originally Posted by Mr Magic
Yes. I managed to somewhat fix it. It had something to do with SPS.dll. Now it just gives the hints that some variables are never used. But I think I'll fix it another time when I have more time, got to go now. Thanks for the script. ;)
hints wont stop it working btw :pQuote:
Originally Posted by Mr Magic
I think anybody can do it, but there are quests to get you there faster I believe.Quote:
Originally Posted by DannyRS
hmmm... how about a kyatt summoning script, like makes pouches, or makes scrolls from pouches.
Really busy atm, I dont know what it would have to do, and i dont have the summoning, but if you learned Very basic simba scripting you could do it ;), if its just inventory clicking or something list what it is and i can probably write itQuote:
Originally Posted by fiery oblivion
hehe. i might give it a shot, tzhaar banking might be a bit hard, afaik they're all black and orange all over lol
Ashaman has a tzhaar banking function in his Altar script, if you want to check that out.Quote:
Originally Posted by chongc
Yesh it is possible to do. Other players are the real annoying partQuote:
Originally Posted by Austin
I might do the kyatt summoner but not totally sure about it
Hey Danny,
I have been following your scripts for a while and am a big fan. I saw a few ideas that I am glad you cant work on since I am trying my hand at one of them for my membership application :). I am not a programmer by nature so what takes you about 1 hour to complete will probably take me a week but I suppose thats how we learn. I also saw you got member status! Congrats!
One script I thought about working on, but it would only be ideal for high levels, is a cannonball maker. It would be for Port Phasmatys and for it to be really effective would require completion of the Morytania Hard tasks which reward the Morytania legs 3. These 1/2 the time it takes to smith cannonballs - http://runescape.wikia.com/wiki/Morytania_legs_3
Essentially you could/would need a ghost speak amulet and steel bars. I see the only hard part is the walking and door opening. Other than that its a simple bank, withdraw bars, walk to furnace, smelt bars, walk to bank, and repeat.
Just an idea though ...
Cheers,
DN
Thanks still can't actually believe i got in to members :)Quote:
Originally Posted by digitalninja
It would be quite easy to do a cannonball maker, but unfortunately i can't get to PP on any acc :(
Not sure if this would be at all possible. But a task completion script? Something that completes the task sets .
Just a thought :)
Would take too long for the gain sorry :(Quote:
Originally Posted by Magic_monkey
a script that charges air orbs and banks thems
I've never done the orb thing, so it banks somewhere for unpowered orbs then runs to that place above edge and uses them then teleports out somehow?Quote:
Originally Posted by aqwyami
If you can explain more maybe I can make something happen :p
You withdraw uncharged orbs, go to that obelisk, use Charge X Orb spell (it used to be one click and wait till all orbs charged) and bank.Quote:
Originally Posted by DannyRS
Seems easy enough, but I dont know how to get there what bank to use what teleport to use, etc, etc, no point making something if its not done right and efficiently :pQuote:
Originally Posted by Shatterhand
http://www.youtube.com/watch?v=UjJ-V5mx7QAQuote:
Originally Posted by DannyRS
This explains it, you use amulet of glory to go back to edge
Quite a long path with a lot of gates, I'll make when I'm done running my soul wars script on all my accounts ;)Quote:
Originally Posted by aqwyami
K thanks , take your time:)Quote:
Originally Posted by DannyRS
Hey, have you thought of making a Summoning Pouch Maker? If not, I'd appreciate one :D
What's it gota do, my sum is 1 on all accsQuote:
Originally Posted by iamorange12
A script burns lighter for gilded house, uses butler when out of marentills for hosting houses :)
Basically run from the taverly bank to the summoning obby then create the pouches - go back to the bank - bank the pouches and repeat xDQuote:
Originally Posted by DannyRS
If you need an account to work with I could lend you mine :D
I'm not sure if anyone has decided to suggest this but, maybe a Khyaat summoning script** With Castle war options. ;)
A script that files all of your script requests so you dont have to read through all the posts :p
An edgevill or falador bonfire log burner.
Sorry Ashaman alters defeats the purpose of this :p, why would you want to host for other people with a bot?Quote:
Originally Posted by liklox
I might not need an account if i can write the logic without having to actually craft the pouches myself to test, if you could find a video to show me the process, would be a great help, and maybe I could do it ;DQuote:
Originally Posted by iamorange12
Whats it supposed to do? I dont know how summoning works other than the abilities you gain with them, whats it for summoning XP? Or is it something like that bat fruit thing?Quote:
Originally Posted by US Marine
Would be handy eh :p I like to read the idea's tho, helps me find out what community scripts are missing or badly broken, and more importantly what people want and will use,Quote:
Originally Posted by Thanatos
Ashamans bonfire script is flawless and firemakings so fast theres not really any point :pQuote:
Originally Posted by ___