Allmost foolproof KS run

[OneofMany]

For the ppl that are patience with money farming and without luckypot are satisfied with 80 - 100k each run when lvl62.

Script will ask u before which boss to stop. Will take Lucky potion / Speed Potion / Clear Thought if the buff doesnt exist.

At Line 358 in the script. fill out the name of the character to invite. U will need an addon that auto accepts invites, then u can farm whole night.

EDIT: Version 25-05-2011

KS.xml

(19.44 KiB) Downloaded 2491 times

Credits (made the, and helped with the waypointfile):
OneofMany
Lisa
Rock5

[Giram]

You might want to remove your char name from that file.

I have been using function on every waypoint to check if inv is full then it would leave party and go sell items. Someone said that it might be better to do after each fight. Like onleavecombat on profile.

[OneofMany]

Thanks, didnt thought about that.

Edited

[OneofMany]

I got one question about my script.

It tells the client that when at revive point, if i dont have the lucky pot on, put it on.

Code: Select all

player:updateBuffs();
	 if not player.Buffs["Turn of Luck Powder Dust"] then
    inventory:useItem(207203);
end
 

But each time i get out of KS it will take a lucky pot...

What am i doing wrong there?

OneofMany

[OneofMany]

You might want to remove your char name from that file.

I have been using function on every waypoint to check if inv is full then it would leave party and go sell items. Someone said that it might be better to do after each fight. Like onleavecombat on profile.

Was thinking about making that too. probably will be in the near feature. started to make the waypoints some weeks back. so have to get used to it

[Germangold]

replacement for selling items to npc pancer

Code: Select all

--player:merchant("Pancer");
	if player:openStore("Pancer") then -- opens the store, then continues if it opened.
	    for i, item in pairs(inventory.BagSlot) do
			if (item.Worth > 222) then
				item:use() -- sells it to the store
			end
		end
	end

expl: it uses sell on every single item that worth more than 222 Gold. its like 3x faster than the normal selling

Onload Options: Party and start at nearest Waypoint

Code: Select all

<onLoad> 
		  __WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X, player.Z));
	 while not RoMScript("UnitExists('party1')") do
        sendMacro('InviteByName("YOURTOONHERE")');
        yrest(400)
    end
 </onLoad>

Mounting doesnt really works for me because i use macrotriggered "regeneration sigil" and "fast heal" so it dismount me every time

[Germangold]

what i am working on is a additional option to run home to get addtional lucky potions

pseudocode:
if (Potion: Lucky Target) == 0 or not player:hasBuff("Turn of Luck Powder Dust") then
player:cast("RECALL:); -- Recall position should be Obsidian Stronghold
yrest(20000); -- or waitForLoadingScreen();
some waypoint from the teleporter to npc


player:target_NPC("Maylee");
sendMacro("ChoiceOption(3);"); --crafting square
yrest(15000);
some waypoint to Mishia Sister
player:target_NPC(" Mishia Sister");
sendMacro("ChoiceOption(1);"); --enter the house
yrest(10000);

wander around in the house
player:target_NPC("YOUR PAID HOUSE MAID2");
sendMacro("SpeakFrame_ListDialogOption(1, 6)")
sendMacro("SpeakFrame_ListDialogOption(1, 6)")
sendMacro("SpeakFrame_ListDialogOption(1, 6)")
sendMacro("SpeakFrame_ListDialogOption(1, 6)")
sendMacro("SpeakFrame_ListDialogOption(1, 6)")
sendMacro("SpeakFrame_ListDialogOption(1, 6)")

player:target_NPC("YOUR PAID HOUSE MAID2");
sendMacro("SpeakFrame_ListDialogOption(1, 6)")
sendMacro("SpeakFrame_ListDialogOption(1, 6)")
sendMacro("SpeakFrame_ListDialogOption(1, 6)")
sendMacro("SpeakFrame_ListDialogOption(1, 6)")
sendMacro("SpeakFrame_ListDialogOption(1, 6)")
sendMacro("SpeakFrame_ListDialogOption(1, 6)")

player:targe_NPC("Housekeeper"); -- talk to her to leave
sendMacro("SpeakFrame_ListDialogOption(1, 6)")


What i am missing is to how to use a transport rune to get back to KS ?

how should i do that?

[lisa]

I got one question about my script.

It tells the client that when at revive point, if i dont have the lucky pot on, put it on.

Code: Select all

player:updateBuffs();
	 if not player.Buffs["Turn of Luck Powder Dust"] then
    inventory:useItem(207203);
end
 

But each time i get out of KS it will take a lucky pot...

What am i doing wrong there?

OneofMany

I gave the KS a try and it uses a luck potion every time, I'd say the buff check is incorrect. I'd suguest using the buff ID instead of the name. Should be a few posts around on how to get buff ID, it's a simple in game script.

[rock5]

Should be a few posts around on how to get buff ID, it's a simple in game script.

To get the players buffs use

Code: Select all

/script i=1 while UnitBuff( "player", i) ~= nil do name, __, __, ID = UnitBuff( "player", i) SendSystemChat(name.." "..ID) i = i + 1 end

[OneofMany]

replacement for selling items to npc pancer

Code: Select all

--player:merchant("Pancer");
	if player:openStore("Pancer") then -- opens the store, then continues if it opened.
	    for i, item in pairs(inventory.BagSlot) do
			if (item.Worth > 222) then
				item:use() -- sells it to the store
			end
		end
	end

expl: it uses sell on every single item that worth more than 222 Gold. its like 3x faster than the normal selling

And the items u loot that are worth less? i dont have the lootfilter on. Can imagine more ppl dont have that. Then its not gonna be foolproof again i think? suppose i can leave out the

Code: Select all

if (item.Worth > 222) then
End

and check if it wil sell faster?

[OneofMany]

To get the players buffs use

Code: Select all

/script i=1 while UnitBuff( "player", i) ~= nil do name, __, __, ID = UnitBuff( "player", i) SendSystemChat(name.." "..ID) i = i + 1 end

And thats the part i needed for the buffs im gonna alter that when i got time, and test, if works upload it.
Thnx lisa and rock5

[OneofMany]

Ok, i found that the buffs ID = 506687

Now i do:

Code: Select all

	player:updateBuffs();
	 if not player.Buffs[506687] then (i tried ["506687"] too)
    	inventory:useItem(207203);
    	end 

Still it takes its Lucky Pot each time. What am i doing wrong with the code?

EDIT: Got it

Code: Select all

player:updateBuffs();
	 if not player:hasBuff(506687) then
    	inventory:useItem(207203);
    	end

was the solution

[rock5]

player:hasBuff updates the buffs already. You don't need to run "player:updateBuffs()"

[OneofMany]

Copy that. changed. updated scripts in 1st post

[OneofMany]

what i am working on is a additional option to run home to get addtional lucky potions

lot of code....

What i am missing is to how to use a transport rune to get back to KS ?

how should i do that?

It would be very cool to get this working but.... if ur unlucky and dont get lucky potions? then everytime it enters, or finishes the run it will go to housemaids? Dont think it will work for most ppl. 9 of the 10 times i get them with 4 housemaids making them. That 1 time failure would be long runs i think

[lisa]

I see the issue you used [ ] instead of ( )

[rock5]

I see the issue you used [ ] instead of ( )

I think his issue was he was trying to access the player.Buffs table instead of using the player:hasBuff function.

[OneofMany]

I see the issue you used [ ] instead of ( )

Allready found that out. starting to like the scripting if i got more time i will go more into it. Looks a lot like VB and C++ so think i will get the hang of it.

All depends on time

Will try to keep the KS waypoints updated with tips and tricks from others when i think they are usefull and "foolproof". Its a nice way to make money

[lisa]

this works for me, clear thought, luck and speed. I forget which is which.

Code: Select all

if (not player:hasBuff("506687")) then
    inventory:useItem(207203);
    end  

if (not player:hasBuff("506686")) then
    inventory:useItem(207202);
    end 

if (not player:hasBuff("506684")) then
    inventory:useItem(207200);
    end 

[rock5]

Why not have just the 1 file and an option to choose which boss you want to go to?