Using Sum's Path Maker, with Bobbo's map.
None are tested.
edit: considering the difference in numbers from my path to marpis' path I suspect this map might be wrong……..
If someone could test.
[php]
//Varrock West Mine
function LoadPath: TPointArray;
begin
SetLength(Result, 11);
Result[0] := Point(3187, 3437);
Result[1] := Point(3183, 3429);
Result[2] := Point(3174, 3427);
Result[3] := Point(3171, 3418);
Result[4] := Point(3173, 3408);
Result[5] := Point(3170, 3397);
Result[6] := Point(3173, 3387);
Result[7] := Point(3174, 3377);
Result[8] := Point(3171, 3367);
Result[9] := Point(3176, 3361);
Result[10] := Point(3181, 3367);
end;
//Draynor to West Lumby Swamp
function LoadPath: TPointArray;
begin
Result := [Point(3094, 3242), Point(3105, 3246), Point(3108, 3233),
Point(3117, 3219), Point(3124, 3213), Point(3132, 3207),
Point(3144, 3201), Point(3147, 3191), Point(3147, 3181),
Point(3148, 3170), Point(3149, 3161), Point(3150, 3153),
Point(3149, 3146)];
end;
//East Lumby Swamp to Draynor (needs reverting)
Result := [Point(3230, 3143), Point(3219, 3155), Point(3208, 3164),
Point(3198, 3174), Point(3185, 3181), Point(3172, 3186),
Point(3158, 3192), Point(3146, 3199), Point(3138, 3208),
Point(3127, 3214), Point(3117, 3223), Point(3106, 3231),
Point(3096, 3240)];
// VWB to Barbarian
Result := [Point(3188, 3437), Point(3176, 3429), Point(3164, 3421),
Point(3150, 3416), Point(3135, 3416), Point(3121, 3417),
Point(3109, 3419), Point(3096, 3419), Point(3081, 3419)];
end;
//AKB to Al-Kharid Mine
Result := [Point(3271, 3164), Point(3278, 3175), Point(3282, 3189),
Point(3285, 3203), Point(3285, 3216), Point(3286, 3230),
Point(3289, 3245), Point(3292, 3258), Point(3298, 3270),
Point(3299, 3282), Point(3300, 3298), Point(3302, 3311)];
{
The last 3 points are the 3 parts of the mine. This will require some scripting, to go to the correct location, otherwise it'll always go to the end of the mine
}
//Port Sarim to Rimmington
Result := [Point(3048, 3234), Point(3036, 3233), Point(3023, 3239),
Point(3011, 3239), Point(3000, 3238), Point(2986, 3237),
Point(2978, 3237)];
//Fally to Rimmington
Result := [Point(3014, 3354), Point(3008, 3347), Point(3008, 3334),
Point(3007, 3325), Point(3009, 3311), Point(3007, 3303),
Point(3008, 3296), Point(3005, 3285), Point(2993, 3279),
Point(2981, 3272), Point(2976, 3261), Point(2976, 3253),
Point(2978, 3239)];
[/php]
I'll make them into TScripts when I have time, if none have done it in the mean time.
Let's get this added somewhere:
Function MirrorTPA(TPA: TPointArray): TPointArray;
var
i, h: integer;
begin
h := 0;
for i:= High(TPA) DownTo 0 do
begin
Result[h] := TPA[i];
Inc(h);
end;
end;
[php]
{WoodCutters}
SCRIPT_POWER_CHOP = 10;
SCRIPT_VE_TREES = 11;
SCRIPT_VE_OAKS = 12;
SCRIPT_GE_YEWS = 13;
SCRIPT_DB_WILLOWS = 14;
SCRIPT_RM_YEWS = 15;
SCRIPT_PS_WILLOWS = 16;
{Miners}
SCRIPT_POWER_MINE = 20;
SCRIPT_VE_MINER = 21;
SCRIPT_VW_MINER = 22;
SCRIPT_LWS_MINER = 23;
SCRIPT_LES_MINER = 24;
SCRIPT_BBV_MINER = 25;
SCRIPT_PSRM_MINER = 26;
SCRIPT_RM_MINER = 27;
SCRIPT_AK_MINER = 28;
{Globals.scar}
ORE_CLAY = 18;
ORE_COPPER = 19;
ORE_TIN = 20;
ORE_IRON = 21;
ORE_SILVER = 22;
ORE_COAL = 23;
ORE_GOLD = 24;
ORE_MITH = 25;
ORE_ADDY = 26;
ORE_RUNE = 27;
FISH_SHRIMP = 28;
FISH_CRAYFISH = 29;
FISH_ANCHOVIES = 30;
FISH_SARDINES = 31;
FISH_HERRING = 32;
[/php]
edit: check the numbering consts thread
[php]
SCRIPT_VE_MINER:
with MSI_Scripts[SCRIPT_VE_MINER] do
begin
ScriptName := 'Varrock East Miner';
ScriptTools := [TOOL_PICKAXE];
SkillName := 'Mining';
SkillConstant := SKILL_MINING;
ObjectConstants := [ROCK_TIN, ROCK_COPPER, ROCK_IRON];
ItemConstants := [[ORE_TIN], [ORE_COPPER], [ORE_IRON]];
BankType := Bank;
CompassAng := 'N';
PathRefFrom := [ Point(3293, 3379), Point(3292, 3394), Point(3291, 3409),
Point(3287, 3423), Point(3278, 3429), Point(3264, 3429),
Point(3254, 3422) ];
PathRefTo := [ Point(3266, 3429), Point(3280, 3429), Point(3287, 3417),
Point(3292, 3404), Point(3292, 3391), Point(3294, 3380),
Point(3287, 3368) ];
pathColorTo := [];
pathColorFrom := [];
end;
SCRIPT_VW_MINER:
with MSI_Scripts[SCRIPT_VW_MINER] do
begin
ScriptName := 'Varrock West Miner';
ScriptTools := [TOOL_PICKAXE];
SkillName := 'Mining';
SkillConstant := SKILL_MINING;
ObjectConstants := [ROCK_TIN, ROCK_CLAY, ROCK_IRON, ROCK_SILVER];
ItemConstants := [[ORE_TIN], [ORE_CLAY], [ORE_IRON], [ORE_SILVER]];
BankType := Bank;
CompassAng := 'N';
PathRefTo := [ Point(3187, 3437), Point(3183, 3429), Point(3174, 3427),
Point(3171, 3418), Point(3173, 3408), Point(3170, 3397),
Point(3173, 3387), Point(3174, 3377), Point(3171, 3367),
Point(3176, 3361), Point(3181, 3367) ];
PathRefFrom := MirrorTPA(PathRefTo);
pathColorTo := [];
pathColorFrom := [];
end;
SCRIPT_LWS_MINER:
with MSI_Scripts[SCRIPT_LWS_MINER] do
begin
//Banks in Draynor
ScriptName := 'Lumby West Swamp Miner';
ScriptTools := [TOOL_PICKAXE];
SkillName := 'Mining';
SkillConstant := SKILL_MINING;
ObjectConstants := [ROCK_COAL, ROCK_MITH, ROCK_ADDY];
ItemConstants := [[ORE_COAL], [ORE_MITH], [ORE_ADDY]];
BankType := Bank;
CompassAng := 'N';
PathRefTo := [ Point(3094, 3242), Point(3105, 3246), Point(3108, 3233),
Point(3117, 3219), Point(3124, 3213), Point(3132, 3207),
Point(3144, 3201), Point(3147, 3191), Point(3147, 3181),
Point(3148, 3170), Point(3149, 3161), Point(3150, 3153),
Point(3149, 3146) ];
PathRefFrom := MirrorTPA(PathRefTo);
pathColorTo := [];
pathColorFrom := [];
end;
SCRIPT_LES_MINER:
with MSI_Scripts[SCRIPT_LES_MINER] do
begin
//Banks in Draynor
ScriptName := 'Lumby East Swamp Miner';
ScriptTools := [TOOL_PICKAXE];
SkillName := 'Mining';
SkillConstant := SKILL_MINING;
ObjectConstants := [ROCK_TIN, ROCK_COPPER];
ItemConstants := [[ORE_TIN], [ORE_COPPER]];
BankType := Bank;
CompassAng := 'N';
PathRefTo := [ Point(3187, 3437), Point(3183, 3429), Point(3174, 3427),
Point(3171, 3418), Point(3173, 3408), Point(3170, 3397),
Point(3173, 3387), Point(3174, 3377), Point(3171, 3367),
Point(3176, 3361), Point(3181, 3367) ];
PathRefFrom := MirrorTPA(PathRefTo);
pathColorTo := [];
pathColorFrom := [];
end;
SCRIPT_BBV_MINER:
with MSI_Scripts[SCRIPT_BBV_MINER] do
begin
//banks at VWB
ScriptName := 'Barbarian Miner';
ScriptTools := [TOOL_PICKAXE];
SkillName := 'Mining';
SkillConstant := SKILL_MINING;
ObjectConstants := [ROCK_TIN, ROCK_COAL];
ItemConstants := [[ORE_TIN], [ORE_COAL]];
BankType := Bank;
CompassAng := 'N';
PathRefTo := [ Point(3188, 3437), Point(3176, 3429), Point(3164, 3421),
Point(3150, 3416), Point(3135, 3416), Point(3121, 3417),
Point(3109, 3419), Point(3096, 3419), Point(3081, 3419) ];
PathRefFrom := MirrorTPA(PathRefTo);
pathColorTo := [];
pathColorFrom := [];
end;
SCRIPT_PSRM_MINER:
with MSI_Scripts[SCRIPT_PSRM_MINER] do
begin
//banks at Port Sarim Deposit Box
ScriptName := 'PS-Rimmy Miner';
ScriptTools := [TOOL_PICKAXE];
SkillName := 'Mining';
SkillConstant := SKILL_MINING;
ObjectConstants := [ROCK_TIN, ROCK_GOLD, ROCK_IRON, ROCK_COPPER, ROCK_CLAY];
ItemConstants := [[ORE_TIN], [ORE_GOLD], [ORE_IRON], [ORE_COPPER], [ORE_CLAY]];
BankType := DBox;
CompassAng := 'N';
PathRefTo := [ Point(3048, 3234), Point(3036, 3233), Point(3023, 3239),
Point(3011, 3239), Point(3000, 3238), Point(2986, 3237),
Point(2978, 3237) ];
PathRefFrom := MirrorTPA(PathRefTo);
pathColorTo := [];
pathColorFrom := [];
end;
SCRIPT_RM_MINER:
with MSI_Scripts[SCRIPT_RM_MINER] do
begin
//banks in Fally
ScriptName := 'Fally-Rimmy Miner';
ScriptTools := [TOOL_PICKAXE];
SkillName := 'Mining';
SkillConstant := SKILL_MINING;
ObjectConstants := [ROCK_TIN, ROCK_GOLD, ROCK_IRON, ROCK_COPPER, ROCK_CLAY];
ItemConstants := [[ORE_TIN], [ORE_GOLD], [ORE_IRON], [ORE_COPPER], [ORE_CLAY]];
BankType := Bank;
CompassAng := 'N';
PathRefTo := [ Point(3014, 3354), Point(3008, 3347), Point(3008, 3334),
Point(3007, 3325), Point(3009, 3311), Point(3007, 3303),
Point(3008, 3296), Point(3005, 3285), Point(2993, 3279),
Point(2981, 3272), Point(2976, 3261), Point(2976, 3253),
Point(2978, 3239) ];
PathRefFrom := MirrorTPA(PathRefTo);
pathColorTo := [];
pathColorFrom := [];
end;
SCRIPT_AK_MINER:
with MSI_Scripts[SCRIPT_AK_MINER] do
begin
//banks in AKB
ScriptName := 'AK Miner';
ScriptTools := [TOOL_PICKAXE];
SkillName := 'Mining';
SkillConstant := SKILL_MINING;
ObjectConstants := [ROCK_TIN, ROCK_COPPER, ROCK_IRON, ROCK_SILVER, ROCK_COAL, ROCK_MITH, ROCK_ADDY];
ItemConstants := [[ORE_TIN], [ORE_COPPER], [ORE_IRON], [ORE_SILVER], [ORE_COAL], [ORE_MITH], [ROCK_ADDY]];
BankType := Bank;
CompassAng := 'N';
PathRefTo := [ Point(3271, 3164), Point(3278, 3175), Point(3282, 3189),
Point(3285, 3203), Point(3285, 3216), Point(3286, 3230),
Point(3289, 3245), Point(3292, 3258), Point(3298, 3270),
Point(3299, 3282), Point(3300, 3298), Point(3302, 3311) ];
{
The last 3 points are the 3 parts of the mine.
This will require some scripting,
to go to the correct location,
otherwise itll always go to the end of the mine
}
PathRefFrom := MirrorTPA(PathRefTo);
pathColorTo := [];
pathColorFrom := [];
end;
[/php]
~RM