SolarStrike Software

Posted: **Mon May 09, 2011 4:44 am**

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 2493 times

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

Posted: **Mon May 09, 2011 5:19 am**

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.

Posted: **Mon May 09, 2011 6:10 am**

Thanks, didnt thought about that.

Edited

Posted: **Wed May 11, 2011 8:32 am**

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

Posted: **Wed May 11, 2011 9:14 am**

Giram wrote: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

Posted: **Wed May 11, 2011 3:26 pm**

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

Posted: **Wed May 11, 2011 4:09 pm**

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?

Posted: **Wed May 11, 2011 9:15 pm**

OneofMany wrote: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.

Posted: **Wed May 11, 2011 10:33 pm**

lisa wrote: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

Posted: **Thu May 12, 2011 4:32 am**

Germangold wrote: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?

Posted: **Thu May 12, 2011 4:36 am**

rock5 wrote: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

Posted: **Thu May 12, 2011 6:35 am**

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

Posted: **Thu May 12, 2011 7:15 am**

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

Posted: **Thu May 12, 2011 7:57 am**

Copy that. changed. updated scripts in 1st post

Posted: **Thu May 12, 2011 8:29 am**

Germangold wrote: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

Posted: **Thu May 12, 2011 9:12 am**

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

Posted: **Thu May 12, 2011 9:25 am**

lisa wrote: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.

Posted: **Thu May 12, 2011 10:41 am**

lisa wrote: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

Posted: **Thu May 12, 2011 10:47 am**

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

Posted: **Thu May 12, 2011 10:53 am**

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

SolarStrike Software

Allmost foolproof KS run

Allmost foolproof KS run

Re: Allmost foolproof KS run

Re: Allmost foolproof KS run

Re: Allmost foolproof KS run

Re: Allmost foolproof KS run

Re: Allmost foolproof KS run

Re: Allmost foolproof KS run

Re: Allmost foolproof KS run

Re: Allmost foolproof KS run

Re: Allmost foolproof KS run

Re: Allmost foolproof KS run

Re: Allmost foolproof KS run

Re: Allmost foolproof KS run

Re: Allmost foolproof KS run

Re: Allmost foolproof KS run

Re: Allmost foolproof KS run

Re: Allmost foolproof KS run

Re: Allmost foolproof KS run

Re: Allmost foolproof KS run

Re: Allmost foolproof KS run