istance difficult change automatic
istance difficult change automatic
i have a big problem...i use rombot for farm 1 boss dod....i have automatic istance difficult,invite last group e accept auto invite as addons......i invite may alt player and i set difficult on easy but when i'm inside and my alt enter him is in normal,but i never change this all time....i'd like to know how can i set always in auto 8when i make apt)difficult istance set in easy.....i can't bot dod if i have this problem...any solution?ty
-
- Posts: 446
- Joined: Wed Aug 03, 2011 7:37 pm
Re: istance difficult change automatic
you could always add in a call to:
Code: Select all
RoMScript("SetInstanceLevel('easy')")
Re: istance difficult change automatic
i add but i read whe you use invite last group istance change automatically when enter,infact my alt enter in normal...how can i don't use invite last group but only write in a macro invite alt without addon?
Re: istance difficult change automatic
maybe addon have a priority on script
-
- Posts: 446
- Joined: Wed Aug 03, 2011 7:37 pm
Re: istance difficult change automatic
hm...looks like you are trying to setin the instance difficulty BEFORE you are inside. Therefore once you get inside, the ILG addon will set it and override your setting
I'd probably change Waypoint 5 from:
note the else addition to the if statement. I assume you want easy mode? not normal? the autoInvite() function defined in the onLoad section was only ever setting it to normal anyway. I assume you added that in?
This way, you don't need to add in your own mechanism for replacing ILG, which while doable, is a real PITA.
I'd probably change Waypoint 5 from:
Code: Select all
<!-- # 5 --><waypoint x="1793" z="2880" y="433" tag="exit">
if __WPL.Direction == WPT_BACKWARD then
__WPL:setForcedWaypointType("RUN")
GoThroughPortal(200)
player:update()
if getZoneId() ~= 209 then
if RoMScript("GetNumPartyMembers()") > 1 then
RoMScript("LeaveParty()")
waitForLoadingScreen(15)
else
RoMScript("SendWedgePointReport()")
waitForLoadingScreen(75)
end
__WPL:setDirection(WPT_FORWARD)
end
__WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X,player.Z,player.Y))
end
</waypoint>
Code: Select all
<!-- # 5 --><waypoint x="1793" z="2880" y="433" tag="exit">
if __WPL.Direction == WPT_BACKWARD then
__WPL:setForcedWaypointType("RUN")
GoThroughPortal(200)
player:update()
if getZoneId() ~= 209 then
if RoMScript("GetNumPartyMembers()") > 1 then
RoMScript("LeaveParty()")
waitForLoadingScreen(15)
else
RoMScript("SendWedgePointReport()")
waitForLoadingScreen(75)
end
__WPL:setDirection(WPT_FORWARD)
end
__WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X,player.Z,player.Y))
else
RoMScript("SetInstanceLevel('easy')")
end
</waypoint>
This way, you don't need to add in your own mechanism for replacing ILG, which while doable, is a real PITA.
Re: istance difficult change automatic
i try it but i have the problem....i enter in easy (with another id zone),before enter istance is easy but when i'm enter and i have a monitor charge my friend ca see change istance in normal......but i don't have only this problem,when i enter i can target the mobs and kill,loot and go to the boss....but when i'm there my rogue don't attack and rombot say me"lot skipped because for aggro".i loot all and there aren't any boss alive....why this?can you help me pls?
Re: istance difficult change automatic
i have same problem before... and i found out it come from xbar addon///...... but i love xbar addon coz it help a lot...so i try to find alternative.. i try to ,use individual xbar.... same as "xafk", "xframe", "xmap", "romba" and "ibf" and i also found "aid" or "autoinstancedifficulty"
Re: istance difficult change automatic
I use newxbar http://rom.curseforge.com/addons/new-xbar/. It has always worked for me, but I use an older version 1.5. I don't like the changes in 1.6.
- Please consider making a small donation to me to support my continued contributions to the bot and this forum. Thank you. Donate
- I check all posts before reading PMs. So if you want a fast reply, don't PM me but post a topic instead. PM me for private or personal topics only.
- How to: copy and paste in micromacro
________________________
Quote:- “They say hard work never hurt anybody, but I figure, why take the chance.”
- Ronald Reagan
Re: istance difficult change automatic
do you think if with xbar resolve my problem?i try....i'd like to know or to see who to use invitebyname without ilg invite....can you link me the part of the your xml leader i must change pls?ty
Re: istance difficult change automatic
im sorry.. i noticed that i have ibf but i dont use in dod... i use aid for this
i remember i use ibf for my alt for auto accept invitation "/ibf on" "/ibf friend"
Code: Select all
function ireset()
SlashCommand("rdd")
yrest(500)
SlashCommand("rdi")
yrest(1000)
SlashCommand("aid normal")
end
i remember i use ibf for my alt for auto accept invitation "/ibf on" "/ibf friend"
Re: istance difficult change automatic
ok but with you leader xml how can i insert this script and remove old?leader xml is with ilg how can i chanhe if all xml is based for ilg?ty
Re: istance difficult change automatic
Code: Select all
function autoInvite()
if DOD_SOLO then
while ( RoMScript("GetNumPartyMembers()") > 1 ) do
RoMScript("LeaveParty()")
yrest(2000)
end
for i = 1, 3 do
if( RoMScript("GetNumPartyMembers()") < 2 ) then
RoMScript("InviteByName('"..joinname.."')")
printf("Waiting for party join...\n")
end
yrest(2000)
if RoMScript("GetNumPartyMembers()") > 1 then
break
end
if i == 3 then
error("Party join failed!",0)
end
end
else
while RoMScript("GetNumPartyMembers()") > 1 do
SlashCommand("rdd")
cprintf(cli.yellow,"rdd destroy\n")
yrest(2000)
end
SlashCommand("rdi")
cprintf(cli.yellow,"rdi inv\n")
yrest(2000)
if RoMScript("GetNumPartyMembers()") <= #DOD_PARTY_MEMBERS then
for i = 1, #DOD_PARTY_MEMBERS do
cprintf(cli.yellow,"Inviting "..DOD_PARTY_MEMBERS[i].."\n")
RoMScript("InviteByName('"..DOD_PARTY_MEMBERS[i].."')")
yrest(2000)
end
end
end
SlashCommand("aid easy")
end
try this
and make sure that you dont have xbar version with autonormal.. i cant recall what version of xbar that include autonormal
Re: istance difficult change automatic
<?xml version="1.0" encoding="utf-8"?><waypoints>
<onLoad><![CDATA[
function autoInvite()
if DOD_SOLO then
while ( RoMScript("GetNumPartyMembers()") > 1 ) do
RoMScript("LeaveParty()")
yrest(2000)
end
for i = 1, 3 do
if( RoMScript("GetNumPartyMembers()") < 1 ) then
RoMScript("InviteByName('"name friend in pt"')")
printf("Waiting for party join...\n")
end
yrest(2000)
if RoMScript("GetNumPartyMembers()") > 1 then
break
end
if i == 3 then
error("Party join failed!",0)
end
end
else
while RoMScript("GetNumPartyMembers()") > 1 do
SlashCommand("rdd")
cprintf(cli.yellow,"rdd destroy\n")
yrest(2000)
end
SlashCommand("rdi")
cprintf(cli.yellow,"rdi inv\n")
yrest(2000)
if RoMScript("GetNumPartyMembers()") <= #DOD_PARTY_MEMBERS then
for i = 1, #DOD_PARTY_MEMBERS do
cprintf(cli.yellow,"Inviting "..DOD_PARTY_MEMBERS.."\n")
RoMScript("InviteByName('"name friend in pt"')")
yrest(2000)
end
end
end
SlashCommand("aid easy")
end
function waitForParty()
repeat
local we_ready = true
player:update()
for i = 1, #DOD_PARTY_MEMBERS do
local _partymember = player:findNearestNameOrId(DOD_PARTY_MEMBERS)
if not _partymember or (_partymember and distance(player.X,player.Z,player.Y,_partymember.X,_partymember.Z,_partymember.Y) > 150) then
we_ready = false
cprintf(cli.lightred,"Waiting for "..DOD_PARTY_MEMBERS.."\n")
end
end
yrest(2000)
until we_ready
cprintf(cli.lightgreen,"Party is ready!\n")
end
function CountObjectsNearPoint(_nameorid, _point, inrange, printnames)
if type(_point) ~= "table" then _point = {player.X,player.Z,player.Y} end
local objectList = CObjectList();
local detected = {}
objectList:update()
for i = 0,objectList:size() do
local obj = objectList:getObject(i)
if obj ~= nil and (obj.Id == _nameorid or obj.Name == _nameorid) and obj.Address ~= player.Address and obj.Name ~= "<UNKNOWN>" and (inrange == nil or inrange >= distance(_point.X,_point.Z,_point.Y,obj.X,obj.Z,obj.Y) ) then
if printnames then
table.insert(detected,obj.Name)
end
end
end
if #detected > 0 then
cprintf(cli.yellow,"Objects in range:\n")
for i = 1, #detected do
cprintf(cli.pink,detected.."\t")
end
printf("\n")
end
return #detected
end
npcName = GetIdName(115536) -- Isaac Haden
function visitmerchant()
return true
end
mentos = 0
settings.profile.mobs = {
"Experimental Item No. 21",
"Incomplete Bloody Beast",
"Strange Cask",
"Rat for Experimentation",
}
]]></onLoad>
<!-- # 1 --><waypoint x="1645" z="-4908" y="752">
__WPL:setDirection(WPT_FORWARD)
if visitmerchant() then
__WPL:setWaypointIndex(11)
end
</waypoint>
<!-- # 2 --><waypoint x="1662" z="-4970" y="760"> </waypoint>
<!-- # 3 --><waypoint x="1660" z="-5072" y="760"> </waypoint>
<!-- # 4 --><waypoint x="1667" z="-5124" y="761" tag="entrance">
if not DOD_SOLO then waitForParty() end
__WPL:setForcedWaypointType("RUN")
autoInvite()
if not DOD_SOLO then sendPartyChat("enter") end
GoThroughPortal(200)
__WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X,player.Z,player.Y))
</waypoint>
<!-- # 5 --><waypoint x="1793" z="2880" y="433" tag="exit">
if __WPL.Direction == WPT_BACKWARD then
__WPL:setForcedWaypointType("RUN")
GoThroughPortal(200)
player:update()
if getZoneId() ~= 209 then
if RoMScript("GetNumPartyMembers()") > 1 then
RoMScript("LeaveParty()")
waitForLoadingScreen(15)
else
RoMScript("SendWedgePointReport()")
waitForLoadingScreen(75)
end
__WPL:setDirection(WPT_FORWARD)
end
__WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X,player.Z,player.Y))
end
</waypoint>
<!-- # 6 --><waypoint x="1892" z="2887" y="433"> </waypoint>
<!-- # 7 --><waypoint x="2043" z="2699" y="433"> </waypoint>
<!-- # 8 --><waypoint x="2124" z="2602" y="432">
if __WPL.Direction == WPT_FORWARD then
mentos = inventory:itemTotalCount("Ancient Memento")
if not DOD_SOLO then
waitForParty()
sendPartyChat("okander")
end
end
</waypoint>
<!-- # 9 --><waypoint x="2153" z="2569" y="421"> </waypoint>
<!-- # 10 --><waypoint x="2331" z="2361" y="401" tag="okander">
if CountObjectsNearPoint("Okander") > 0 then
if not player.Battling then
yrest(250)
end
__WPL:setWaypointIndex(10)
else
__WPL:setDirection(WPT_BACKWARD)
repeat
yrest(500*math.random(4))
local okander = player:findNearestNameOrId("Okander")
if not okander then break end
player:target(okander)
player:update()
player:loot()
until inventory:itemTotalCount("Ancient Memento") > mentos
end
</waypoint>
<!-- # 11 --><waypoint x="1704" z="-4756" y="752" tag="merchant">
player:merchant(npcName)
RoMScript("CloseAllWindows()")
__WPL:setWaypointIndex(2)
</waypoint>
<!-- To the Sewers -->
<!-- # 1 --><waypoint x="-3813" z="5117" y="19" tag="res">
__WPL:setForcedWaypointType("RUN")
player:mount()
</waypoint>
<!-- # 2 --><waypoint x="-3722" z="5220" y="12"> </waypoint>
<!-- # 3 --><waypoint x="-3664" z="5311" y="11"> </waypoint>
<!-- # 4 --><waypoint x="-3564" z="5362" y="11"> </waypoint>
<!-- # 5 --><waypoint x="-3458" z="5434" y="9"> </waypoint>
<!-- # 6 --><waypoint x="-3356" z="5530" y="10"> </waypoint>
<!-- # 7 --><waypoint x="-3252" z="5629" y="3"> </waypoint>
<!-- # 8 --><waypoint x="-3164" z="5736" y="4"> </waypoint>
<!-- # 9 --><waypoint x="-3025" z="5864" y="2"> </waypoint>
<!-- # 10 --><waypoint x="-2903" z="5980" y="10"> </waypoint>
<!-- # 11 --><waypoint x="-2842" z="6059" y="9"> </waypoint>
<!-- # 12 --><waypoint x="-2782" z="6170" y="10"> </waypoint>
<!-- # 13 --><waypoint x="-2712" z="6284" y="4"> </waypoint>
<!-- # 14 --><waypoint x="-2622" z="6353" y="6"> </waypoint>
<!-- # 15 --><waypoint x="-2524" z="6397" y="15"> </waypoint>
<!-- # 16 --><waypoint x="-2469" z="6465" y="19"> </waypoint>
<!-- # 17 --><waypoint x="-2472" z="6526" y="30"> </waypoint>
<!-- # 18 --><waypoint x="-2517" z="6567" y="38"> </waypoint>
<!-- # 19 --><waypoint x="-2595" z="6612" y="49"> </waypoint>
<!-- # 20 --><waypoint x="-2726" z="6687" y="32"> </waypoint>
<!-- # 21 --><waypoint x="-2786" z="6721" y="42"> </waypoint>
<!-- # 22 --><waypoint x="-2847" z="6764" y="40"> </waypoint>
<!-- # 23 --><waypoint x="-2865" z="6824" y="40"> </waypoint>
<!-- # 24 --><waypoint x="-2826" z="6956" y="40"> </waypoint>
<!-- # 25 --><waypoint x="-2851" z="7047" y="15"> </waypoint>
<!-- # 26 --><waypoint x="-2838" z="7121" y="-24"> </waypoint>
<!-- # 27 --><waypoint x="-2912" z="7231" y="-96">
GoThroughPortal(200)
__WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X,player.Z,player.Y))
</waypoint>
<!-- # 28 --><waypoint x="43" z="-882" y="857">
local jake = GetIdName(115572)
NPCTeleport(jake,"Please transport me.")
__WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X,player.Z,player.Y))
</waypoint>
</waypoints>
this is waypoints file but rombot say me "failsed to compile and run lua code for waypoint on load event
why this ?how can i change it ?help pls
<onLoad><![CDATA[
function autoInvite()
if DOD_SOLO then
while ( RoMScript("GetNumPartyMembers()") > 1 ) do
RoMScript("LeaveParty()")
yrest(2000)
end
for i = 1, 3 do
if( RoMScript("GetNumPartyMembers()") < 1 ) then
RoMScript("InviteByName('"name friend in pt"')")
printf("Waiting for party join...\n")
end
yrest(2000)
if RoMScript("GetNumPartyMembers()") > 1 then
break
end
if i == 3 then
error("Party join failed!",0)
end
end
else
while RoMScript("GetNumPartyMembers()") > 1 do
SlashCommand("rdd")
cprintf(cli.yellow,"rdd destroy\n")
yrest(2000)
end
SlashCommand("rdi")
cprintf(cli.yellow,"rdi inv\n")
yrest(2000)
if RoMScript("GetNumPartyMembers()") <= #DOD_PARTY_MEMBERS then
for i = 1, #DOD_PARTY_MEMBERS do
cprintf(cli.yellow,"Inviting "..DOD_PARTY_MEMBERS.."\n")
RoMScript("InviteByName('"name friend in pt"')")
yrest(2000)
end
end
end
SlashCommand("aid easy")
end
function waitForParty()
repeat
local we_ready = true
player:update()
for i = 1, #DOD_PARTY_MEMBERS do
local _partymember = player:findNearestNameOrId(DOD_PARTY_MEMBERS)
if not _partymember or (_partymember and distance(player.X,player.Z,player.Y,_partymember.X,_partymember.Z,_partymember.Y) > 150) then
we_ready = false
cprintf(cli.lightred,"Waiting for "..DOD_PARTY_MEMBERS.."\n")
end
end
yrest(2000)
until we_ready
cprintf(cli.lightgreen,"Party is ready!\n")
end
function CountObjectsNearPoint(_nameorid, _point, inrange, printnames)
if type(_point) ~= "table" then _point = {player.X,player.Z,player.Y} end
local objectList = CObjectList();
local detected = {}
objectList:update()
for i = 0,objectList:size() do
local obj = objectList:getObject(i)
if obj ~= nil and (obj.Id == _nameorid or obj.Name == _nameorid) and obj.Address ~= player.Address and obj.Name ~= "<UNKNOWN>" and (inrange == nil or inrange >= distance(_point.X,_point.Z,_point.Y,obj.X,obj.Z,obj.Y) ) then
if printnames then
table.insert(detected,obj.Name)
end
end
end
if #detected > 0 then
cprintf(cli.yellow,"Objects in range:\n")
for i = 1, #detected do
cprintf(cli.pink,detected.."\t")
end
printf("\n")
end
return #detected
end
npcName = GetIdName(115536) -- Isaac Haden
function visitmerchant()
return true
end
mentos = 0
settings.profile.mobs = {
"Experimental Item No. 21",
"Incomplete Bloody Beast",
"Strange Cask",
"Rat for Experimentation",
}
]]></onLoad>
<!-- # 1 --><waypoint x="1645" z="-4908" y="752">
__WPL:setDirection(WPT_FORWARD)
if visitmerchant() then
__WPL:setWaypointIndex(11)
end
</waypoint>
<!-- # 2 --><waypoint x="1662" z="-4970" y="760"> </waypoint>
<!-- # 3 --><waypoint x="1660" z="-5072" y="760"> </waypoint>
<!-- # 4 --><waypoint x="1667" z="-5124" y="761" tag="entrance">
if not DOD_SOLO then waitForParty() end
__WPL:setForcedWaypointType("RUN")
autoInvite()
if not DOD_SOLO then sendPartyChat("enter") end
GoThroughPortal(200)
__WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X,player.Z,player.Y))
</waypoint>
<!-- # 5 --><waypoint x="1793" z="2880" y="433" tag="exit">
if __WPL.Direction == WPT_BACKWARD then
__WPL:setForcedWaypointType("RUN")
GoThroughPortal(200)
player:update()
if getZoneId() ~= 209 then
if RoMScript("GetNumPartyMembers()") > 1 then
RoMScript("LeaveParty()")
waitForLoadingScreen(15)
else
RoMScript("SendWedgePointReport()")
waitForLoadingScreen(75)
end
__WPL:setDirection(WPT_FORWARD)
end
__WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X,player.Z,player.Y))
end
</waypoint>
<!-- # 6 --><waypoint x="1892" z="2887" y="433"> </waypoint>
<!-- # 7 --><waypoint x="2043" z="2699" y="433"> </waypoint>
<!-- # 8 --><waypoint x="2124" z="2602" y="432">
if __WPL.Direction == WPT_FORWARD then
mentos = inventory:itemTotalCount("Ancient Memento")
if not DOD_SOLO then
waitForParty()
sendPartyChat("okander")
end
end
</waypoint>
<!-- # 9 --><waypoint x="2153" z="2569" y="421"> </waypoint>
<!-- # 10 --><waypoint x="2331" z="2361" y="401" tag="okander">
if CountObjectsNearPoint("Okander") > 0 then
if not player.Battling then
yrest(250)
end
__WPL:setWaypointIndex(10)
else
__WPL:setDirection(WPT_BACKWARD)
repeat
yrest(500*math.random(4))
local okander = player:findNearestNameOrId("Okander")
if not okander then break end
player:target(okander)
player:update()
player:loot()
until inventory:itemTotalCount("Ancient Memento") > mentos
end
</waypoint>
<!-- # 11 --><waypoint x="1704" z="-4756" y="752" tag="merchant">
player:merchant(npcName)
RoMScript("CloseAllWindows()")
__WPL:setWaypointIndex(2)
</waypoint>
<!-- To the Sewers -->
<!-- # 1 --><waypoint x="-3813" z="5117" y="19" tag="res">
__WPL:setForcedWaypointType("RUN")
player:mount()
</waypoint>
<!-- # 2 --><waypoint x="-3722" z="5220" y="12"> </waypoint>
<!-- # 3 --><waypoint x="-3664" z="5311" y="11"> </waypoint>
<!-- # 4 --><waypoint x="-3564" z="5362" y="11"> </waypoint>
<!-- # 5 --><waypoint x="-3458" z="5434" y="9"> </waypoint>
<!-- # 6 --><waypoint x="-3356" z="5530" y="10"> </waypoint>
<!-- # 7 --><waypoint x="-3252" z="5629" y="3"> </waypoint>
<!-- # 8 --><waypoint x="-3164" z="5736" y="4"> </waypoint>
<!-- # 9 --><waypoint x="-3025" z="5864" y="2"> </waypoint>
<!-- # 10 --><waypoint x="-2903" z="5980" y="10"> </waypoint>
<!-- # 11 --><waypoint x="-2842" z="6059" y="9"> </waypoint>
<!-- # 12 --><waypoint x="-2782" z="6170" y="10"> </waypoint>
<!-- # 13 --><waypoint x="-2712" z="6284" y="4"> </waypoint>
<!-- # 14 --><waypoint x="-2622" z="6353" y="6"> </waypoint>
<!-- # 15 --><waypoint x="-2524" z="6397" y="15"> </waypoint>
<!-- # 16 --><waypoint x="-2469" z="6465" y="19"> </waypoint>
<!-- # 17 --><waypoint x="-2472" z="6526" y="30"> </waypoint>
<!-- # 18 --><waypoint x="-2517" z="6567" y="38"> </waypoint>
<!-- # 19 --><waypoint x="-2595" z="6612" y="49"> </waypoint>
<!-- # 20 --><waypoint x="-2726" z="6687" y="32"> </waypoint>
<!-- # 21 --><waypoint x="-2786" z="6721" y="42"> </waypoint>
<!-- # 22 --><waypoint x="-2847" z="6764" y="40"> </waypoint>
<!-- # 23 --><waypoint x="-2865" z="6824" y="40"> </waypoint>
<!-- # 24 --><waypoint x="-2826" z="6956" y="40"> </waypoint>
<!-- # 25 --><waypoint x="-2851" z="7047" y="15"> </waypoint>
<!-- # 26 --><waypoint x="-2838" z="7121" y="-24"> </waypoint>
<!-- # 27 --><waypoint x="-2912" z="7231" y="-96">
GoThroughPortal(200)
__WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X,player.Z,player.Y))
</waypoint>
<!-- # 28 --><waypoint x="43" z="-882" y="857">
local jake = GetIdName(115572)
NPCTeleport(jake,"Please transport me.")
__WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X,player.Z,player.Y))
</waypoint>
</waypoints>
this is waypoints file but rombot say me "failsed to compile and run lua code for waypoint on load event
why this ?how can i change it ?help pls
Re: istance difficult change automatic
aw im sorry i forgot /rdd are from raid save addon
- Attachments
-
- RaidSave_1.01.zip
- (1.21 KiB) Downloaded 168 times
Re: istance difficult change automatic
ok now all work,invite and select mobs,but i have only one problem....my player don't target boss (i add okander mallen in selection mobs too)
and rombot say me "loot skipped because for aggro....maybe i must add script target nearest or? ty for your help till now
and rombot say me "loot skipped because for aggro....maybe i must add script target nearest or? ty for your help till now
Re: istance difficult change automatic
not important raid save i add frien'd name in section and all work only boss target is a prob
Re: istance difficult change automatic
this is my waypoint file,only one problem for target malle and retry to attack when him do his skill.how can i resolve it?is there any change must i do for target him?look my waypoint pls and try to find a kind of solution for aggro boss(rombot say me only loot skip because of aggro and combat finish when him do his skill)
<?xml version="1.0" encoding="utf-8"?><waypoints>
<onLoad><![CDATA[
DOD_SOLO = true
DOD_PARTY_MEMBERS = {"party friend"}
if not DOD_SOLO then
SlashCommand("rdd")
end
changeProfileOption("AUTO_ELITE_FACTOR",1000)
changeProfileOption("LOOT_IN_COMBAT",false)
if DOD_SOLO then
if player.Name == "player" then
joinname = "party friend"
elseif player.Name == "Char3" then
joinname = "Char4"
else
error("No party match!",0)
end
end
function autoInvite()
if DOD_SOLO then
while ( RoMScript("GetNumPartyMembers()") > 1 ) do
RoMScript("LeaveParty()")
yrest(2000)
end
for i = 1, 3 do
if( RoMScript("GetNumPartyMembers()") < 2 ) then
RoMScript("InviteByName('"..joinname.."')")
printf("Waiting for party join...\n")
end
yrest(2000)
if RoMScript("GetNumPartyMembers()") > 1 then
break
end
if i == 3 then
error("Party join failed!",0)
end
end
else
while RoMScript("GetNumPartyMembers()") > 1 do
SlashCommand("rdd")
cprintf(cli.yellow,"rdd destroy\n")
yrest(2000)
end
SlashCommand("rdi")
cprintf(cli.yellow,"rdi inv\n")
yrest(2000)
if RoMScript("GetNumPartyMembers()") <= #DOD_PARTY_MEMBERS then
for i = 1, #DOD_PARTY_MEMBERS do
cprintf(cli.yellow,"Inviting "..DOD_PARTY_MEMBERS.."\n")
RoMScript("InviteByName('"..DOD_PARTY_MEMBERS.."')")
yrest(2000)
end
end
end
RoMScript("SetInstanceLevel('easy')")
end
function waitForParty()
repeat
local we_ready = true
player:update()
for i = 1, #DOD_PARTY_MEMBERS do
local _partymember = player:findNearestNameOrId(DOD_PARTY_MEMBERS)
if not _partymember or (_partymember and distance(player.X,player.Z,player.Y,_partymember.X,_partymember.Z,_partymember.Y) > 150) then
we_ready = false
cprintf(cli.lightred,"Waiting for "..DOD_PARTY_MEMBERS.."\n")
end
end
yrest(2000)
until we_ready
cprintf(cli.lightgreen,"Party is ready!\n")
end
function CountObjectsNearPoint(_nameorid, _point, inrange, printnames)
if type(_point) ~= "table" then _point = {player.X,player.Z,player.Y} end
local objectList = CObjectList();
local detected = {}
objectList:update()
for i = 0,objectList:size() do
local obj = objectList:getObject(i)
if obj ~= nil and (obj.Id == _nameorid or obj.Name == _nameorid) and obj.Address ~= player.Address and obj.Name ~= "<UNKNOWN>" and (inrange == nil or inrange >= distance(_point.X,_point.Z,_point.Y,obj.X,obj.Z,obj.Y) ) then
if printnames then
table.insert(detected,obj.Name)
end
end
end
if #detected > 0 then
cprintf(cli.yellow,"Objects in range:\n")
for i = 1, #detected do
cprintf(cli.pink,detected.."\t")
end
printf("\n")
end
return #detected
end
npcName = GetIdName(115536) -- Isaac Haden
function visitmerchant()
return true
end
mentos = 0
]]></onLoad>
<!-- # 1 --><waypoint x="1645" z="-4908" y="752">
__WPL:setDirection(WPT_FORWARD)
if visitmerchant() then
__WPL:setWaypointIndex(11)
end
</waypoint>
<!-- # 2 --><waypoint x="1662" z="-4970" y="760"> </waypoint>
<!-- # 3 --><waypoint x="1660" z="-5072" y="760"> </waypoint>
<!-- # 4 --><waypoint x="1667" z="-5124" y="761" tag="entrance">
if not DOD_SOLO then waitForParty() end
__WPL:setForcedWaypointType("NORMAL")
autoInvite()
if not DOD_SOLO then sendPartyChat("enter") end
GoThroughPortal(200)
__WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X,player.Z,player.Y))
</waypoint>
<!-- # 5 --><waypoint x="1793" z="2880" y="433" tag="exit">
if __WPL.Direction == WPT_BACKWARD then
__WPL:setForcedWaypointType("NORMAL")
GoThroughPortal(200)
player:update()
if getZoneId() ~= 209 then
if RoMScript("GetNumPartyMembers()") > 1 then
RoMScript("LeaveParty()")
waitForLoadingScreen(15)
else
RoMScript("SendWedgePointReport()")
waitForLoadingScreen(75)
end
__WPL:setDirection(WPT_FORWARD)
end
__WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X,player.Z,player.Y))
end
</waypoint>
<!-- # 6 --><waypoint x="1892" z="2887" y="433"> </waypoint>
<!-- # 7 --><waypoint x="2043" z="2699" y="433"> </waypoint>
<!-- # 8 --><waypoint x="2124" z="2602" y="432">
if __WPL.Direction == WPT_FORWARD then
mentos = inventory:itemTotalCount("Ancient Memento")
if not DOD_SOLO then
waitForParty()
sendPartyChat("okander")
end
end
</waypoint>
<!-- # 9 --><waypoint x="2153" z="2569" y="421"> </waypoint>
<!-- # 10 --><waypoint x="2299" z="2397" y="401" tag="okander">
if CountObjectsNearPoint("Okander") > 0 then
if not player.Battling then
yrest(250)
end
__WPL:setWaypointIndex(10)
else
__WPL:setDirection(WPT_BACKWARD)
repeat
yrest(500*math.random(4))
local okander = player:findNearestNameOrId("Okander")
if not okander then break end
player:target(okander)
player:update()
player:loot()
until inventory:itemTotalCount("Ancient Memento") > mentos
end
</waypoint>
<!-- # 11 --><waypoint x="1704" z="-4756" y="752" tag="merchant">
player:merchant(npcName)
RoMScript("CloseAllWindows()")
__WPL:setWaypointIndex(2)
</waypoint>
<!-- To the Sewers -->
<!-- # 1 --><waypoint x="-3813" z="5117" y="19" tag="res">
__WPL:setForcedWaypointType("NORMAL")
player:mount()
</waypoint>
<!-- # 2 --><waypoint x="-3722" z="5220" y="12"> </waypoint>
<!-- # 3 --><waypoint x="-3664" z="5311" y="11"> </waypoint>
<!-- # 4 --><waypoint x="-3564" z="5362" y="11"> </waypoint>
<!-- # 5 --><waypoint x="-3458" z="5434" y="9"> </waypoint>
<!-- # 6 --><waypoint x="-3356" z="5530" y="10"> </waypoint>
<!-- # 7 --><waypoint x="-3252" z="5629" y="3"> </waypoint>
<!-- # 8 --><waypoint x="-3164" z="5736" y="4"> </waypoint>
<!-- # 9 --><waypoint x="-3025" z="5864" y="2"> </waypoint>
<!-- # 10 --><waypoint x="-2903" z="5980" y="10"> </waypoint>
<!-- # 11 --><waypoint x="-2842" z="6059" y="9"> </waypoint>
<!-- # 12 --><waypoint x="-2782" z="6170" y="10"> </waypoint>
<!-- # 13 --><waypoint x="-2712" z="6284" y="4"> </waypoint>
<!-- # 14 --><waypoint x="-2622" z="6353" y="6"> </waypoint>
<!-- # 15 --><waypoint x="-2524" z="6397" y="15"> </waypoint>
<!-- # 16 --><waypoint x="-2469" z="6465" y="19"> </waypoint>
<!-- # 17 --><waypoint x="-2472" z="6526" y="30"> </waypoint>
<!-- # 18 --><waypoint x="-2517" z="6567" y="38"> </waypoint>
<!-- # 19 --><waypoint x="-2595" z="6612" y="49"> </waypoint>
<!-- # 20 --><waypoint x="-2726" z="6687" y="32"> </waypoint>
<!-- # 21 --><waypoint x="-2786" z="6721" y="42"> </waypoint>
<!-- # 22 --><waypoint x="-2847" z="6764" y="40"> </waypoint>
<!-- # 23 --><waypoint x="-2865" z="6824" y="40"> </waypoint>
<!-- # 24 --><waypoint x="-2826" z="6956" y="40"> </waypoint>
<!-- # 25 --><waypoint x="-2851" z="7047" y="15"> </waypoint>
<!-- # 26 --><waypoint x="-2838" z="7121" y="-24"> </waypoint>
<!-- # 27 --><waypoint x="-2912" z="7231" y="-96">
GoThroughPortal(200)
__WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X,player.Z,player.Y))
</waypoint>
<!-- # 28 --><waypoint x="43" z="-882" y="857">
local jake = GetIdName(115572)
NPCTeleport(jake,"Please transport me.")
__WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X,player.Z,player.Y))
</waypoint>
</waypoints>
<?xml version="1.0" encoding="utf-8"?><waypoints>
<onLoad><![CDATA[
DOD_SOLO = true
DOD_PARTY_MEMBERS = {"party friend"}
if not DOD_SOLO then
SlashCommand("rdd")
end
changeProfileOption("AUTO_ELITE_FACTOR",1000)
changeProfileOption("LOOT_IN_COMBAT",false)
if DOD_SOLO then
if player.Name == "player" then
joinname = "party friend"
elseif player.Name == "Char3" then
joinname = "Char4"
else
error("No party match!",0)
end
end
function autoInvite()
if DOD_SOLO then
while ( RoMScript("GetNumPartyMembers()") > 1 ) do
RoMScript("LeaveParty()")
yrest(2000)
end
for i = 1, 3 do
if( RoMScript("GetNumPartyMembers()") < 2 ) then
RoMScript("InviteByName('"..joinname.."')")
printf("Waiting for party join...\n")
end
yrest(2000)
if RoMScript("GetNumPartyMembers()") > 1 then
break
end
if i == 3 then
error("Party join failed!",0)
end
end
else
while RoMScript("GetNumPartyMembers()") > 1 do
SlashCommand("rdd")
cprintf(cli.yellow,"rdd destroy\n")
yrest(2000)
end
SlashCommand("rdi")
cprintf(cli.yellow,"rdi inv\n")
yrest(2000)
if RoMScript("GetNumPartyMembers()") <= #DOD_PARTY_MEMBERS then
for i = 1, #DOD_PARTY_MEMBERS do
cprintf(cli.yellow,"Inviting "..DOD_PARTY_MEMBERS.."\n")
RoMScript("InviteByName('"..DOD_PARTY_MEMBERS.."')")
yrest(2000)
end
end
end
RoMScript("SetInstanceLevel('easy')")
end
function waitForParty()
repeat
local we_ready = true
player:update()
for i = 1, #DOD_PARTY_MEMBERS do
local _partymember = player:findNearestNameOrId(DOD_PARTY_MEMBERS)
if not _partymember or (_partymember and distance(player.X,player.Z,player.Y,_partymember.X,_partymember.Z,_partymember.Y) > 150) then
we_ready = false
cprintf(cli.lightred,"Waiting for "..DOD_PARTY_MEMBERS.."\n")
end
end
yrest(2000)
until we_ready
cprintf(cli.lightgreen,"Party is ready!\n")
end
function CountObjectsNearPoint(_nameorid, _point, inrange, printnames)
if type(_point) ~= "table" then _point = {player.X,player.Z,player.Y} end
local objectList = CObjectList();
local detected = {}
objectList:update()
for i = 0,objectList:size() do
local obj = objectList:getObject(i)
if obj ~= nil and (obj.Id == _nameorid or obj.Name == _nameorid) and obj.Address ~= player.Address and obj.Name ~= "<UNKNOWN>" and (inrange == nil or inrange >= distance(_point.X,_point.Z,_point.Y,obj.X,obj.Z,obj.Y) ) then
if printnames then
table.insert(detected,obj.Name)
end
end
end
if #detected > 0 then
cprintf(cli.yellow,"Objects in range:\n")
for i = 1, #detected do
cprintf(cli.pink,detected.."\t")
end
printf("\n")
end
return #detected
end
npcName = GetIdName(115536) -- Isaac Haden
function visitmerchant()
return true
end
mentos = 0
]]></onLoad>
<!-- # 1 --><waypoint x="1645" z="-4908" y="752">
__WPL:setDirection(WPT_FORWARD)
if visitmerchant() then
__WPL:setWaypointIndex(11)
end
</waypoint>
<!-- # 2 --><waypoint x="1662" z="-4970" y="760"> </waypoint>
<!-- # 3 --><waypoint x="1660" z="-5072" y="760"> </waypoint>
<!-- # 4 --><waypoint x="1667" z="-5124" y="761" tag="entrance">
if not DOD_SOLO then waitForParty() end
__WPL:setForcedWaypointType("NORMAL")
autoInvite()
if not DOD_SOLO then sendPartyChat("enter") end
GoThroughPortal(200)
__WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X,player.Z,player.Y))
</waypoint>
<!-- # 5 --><waypoint x="1793" z="2880" y="433" tag="exit">
if __WPL.Direction == WPT_BACKWARD then
__WPL:setForcedWaypointType("NORMAL")
GoThroughPortal(200)
player:update()
if getZoneId() ~= 209 then
if RoMScript("GetNumPartyMembers()") > 1 then
RoMScript("LeaveParty()")
waitForLoadingScreen(15)
else
RoMScript("SendWedgePointReport()")
waitForLoadingScreen(75)
end
__WPL:setDirection(WPT_FORWARD)
end
__WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X,player.Z,player.Y))
end
</waypoint>
<!-- # 6 --><waypoint x="1892" z="2887" y="433"> </waypoint>
<!-- # 7 --><waypoint x="2043" z="2699" y="433"> </waypoint>
<!-- # 8 --><waypoint x="2124" z="2602" y="432">
if __WPL.Direction == WPT_FORWARD then
mentos = inventory:itemTotalCount("Ancient Memento")
if not DOD_SOLO then
waitForParty()
sendPartyChat("okander")
end
end
</waypoint>
<!-- # 9 --><waypoint x="2153" z="2569" y="421"> </waypoint>
<!-- # 10 --><waypoint x="2299" z="2397" y="401" tag="okander">
if CountObjectsNearPoint("Okander") > 0 then
if not player.Battling then
yrest(250)
end
__WPL:setWaypointIndex(10)
else
__WPL:setDirection(WPT_BACKWARD)
repeat
yrest(500*math.random(4))
local okander = player:findNearestNameOrId("Okander")
if not okander then break end
player:target(okander)
player:update()
player:loot()
until inventory:itemTotalCount("Ancient Memento") > mentos
end
</waypoint>
<!-- # 11 --><waypoint x="1704" z="-4756" y="752" tag="merchant">
player:merchant(npcName)
RoMScript("CloseAllWindows()")
__WPL:setWaypointIndex(2)
</waypoint>
<!-- To the Sewers -->
<!-- # 1 --><waypoint x="-3813" z="5117" y="19" tag="res">
__WPL:setForcedWaypointType("NORMAL")
player:mount()
</waypoint>
<!-- # 2 --><waypoint x="-3722" z="5220" y="12"> </waypoint>
<!-- # 3 --><waypoint x="-3664" z="5311" y="11"> </waypoint>
<!-- # 4 --><waypoint x="-3564" z="5362" y="11"> </waypoint>
<!-- # 5 --><waypoint x="-3458" z="5434" y="9"> </waypoint>
<!-- # 6 --><waypoint x="-3356" z="5530" y="10"> </waypoint>
<!-- # 7 --><waypoint x="-3252" z="5629" y="3"> </waypoint>
<!-- # 8 --><waypoint x="-3164" z="5736" y="4"> </waypoint>
<!-- # 9 --><waypoint x="-3025" z="5864" y="2"> </waypoint>
<!-- # 10 --><waypoint x="-2903" z="5980" y="10"> </waypoint>
<!-- # 11 --><waypoint x="-2842" z="6059" y="9"> </waypoint>
<!-- # 12 --><waypoint x="-2782" z="6170" y="10"> </waypoint>
<!-- # 13 --><waypoint x="-2712" z="6284" y="4"> </waypoint>
<!-- # 14 --><waypoint x="-2622" z="6353" y="6"> </waypoint>
<!-- # 15 --><waypoint x="-2524" z="6397" y="15"> </waypoint>
<!-- # 16 --><waypoint x="-2469" z="6465" y="19"> </waypoint>
<!-- # 17 --><waypoint x="-2472" z="6526" y="30"> </waypoint>
<!-- # 18 --><waypoint x="-2517" z="6567" y="38"> </waypoint>
<!-- # 19 --><waypoint x="-2595" z="6612" y="49"> </waypoint>
<!-- # 20 --><waypoint x="-2726" z="6687" y="32"> </waypoint>
<!-- # 21 --><waypoint x="-2786" z="6721" y="42"> </waypoint>
<!-- # 22 --><waypoint x="-2847" z="6764" y="40"> </waypoint>
<!-- # 23 --><waypoint x="-2865" z="6824" y="40"> </waypoint>
<!-- # 24 --><waypoint x="-2826" z="6956" y="40"> </waypoint>
<!-- # 25 --><waypoint x="-2851" z="7047" y="15"> </waypoint>
<!-- # 26 --><waypoint x="-2838" z="7121" y="-24"> </waypoint>
<!-- # 27 --><waypoint x="-2912" z="7231" y="-96">
GoThroughPortal(200)
__WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X,player.Z,player.Y))
</waypoint>
<!-- # 28 --><waypoint x="43" z="-882" y="857">
local jake = GetIdName(115572)
NPCTeleport(jake,"Please transport me.")
__WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X,player.Z,player.Y))
</waypoint>
</waypoints>
Re: istance difficult change automatic
look...
only not kill or attack
Code: Select all
ocal okander = player:findNearestNameOrId("Okander")
if not okander then break end
player:target(okander)
player:update()
player:loot()
until inventory:itemTotalCount("Ancient Memento") > mentos
end
Code: Select all
player:target(okander)
Re: istance difficult change automatic
try to put in your onload
and edit the skill with your killing skill
also put in your onload for buff
change the skill buff to your skill buff potion etc.
try this
Code: Select all
function trash_boss()
local target = player:getTarget()
local _tb = false
local spawnboss = player:findNearestNameOrId("Okander \"Mad Man\" Mallen")
if spawnboss then
Boss_buff()
player:target(spawnboss)
if target.HP > 0 then
player:update();
player:cast("MAGE_FLAME");
yrest(1000);
cprintf(cli.pink, "Kame Hame Wave!!!\n")
if( arg1.Name == "MAGE_FLAME" ) then
player:cast("MAGE_FLAME");
cprintf(cli.pink, "Kame Hame Wave!!!!!\n")
yrest(1000);
end
player:cast("MAGE_FLAME");
yrest(1000);
cprintf(cli.pink, "Kame Hame Wave!!!\n")
player:cast("MAGE_FLAME");
yrest(1000);
_tb = false
else
_tb = true
end
else
_tb = true
end
return _tb
end
also put in your onload for buff
Code: Select all
function Boss_buff()
if Magic_Tambourine == true then
if inventory:itemTotalCount(204463) >= 1 then
inventory:useItem(204463) -- 3 days
yrest(5500)
elseif inventory:itemTotalCount(204571) >= 1 then
inventory:useItem(204571) -- 7 days
yrest(5500)
elseif inventory:itemTotalCount(206420) >= 1 then
inventory:useItem(206420) -- 30 days
yrest(5500)
end
elseif Magic_Tambourine == party_true then
yrest(5500)
end
if Magic_Guitar == true then
if inventory:itemTotalCount(204461) >= 1 then
inventory:useItem(204461) -- 3 days
yrest(5500)
elseif inventory:itemTotalCount(206418) >= 1 then
inventory:useItem(206418) -- 7 days
yrest(5500)
elseif inventory:itemTotalCount(204569) >= 1 then
inventory:useItem(204569) -- 30 days
yrest(5500)
end
elseif Magic_Tambourine == party_true then
yrest(5500)
end
changeProfileSkill("MAGE_FLAME", "AutoUse", true);
changeProfileSkill("MAGE_FIREBALL", "AutoUse", true);
changeProfileSkill("MAGE_FLAME", "Priority", 90);
changeProfileSkill("MAGE_FIREBALL", "Priority", 100);
useGoodie("matt");
useGoodie("mdmg2");
useGoodie("mdmg");
useGoodie("matt3");
useGoodie("casting");
useGoodie("speed");
useGoodie("defense");
useGoodie("luck");
player:cast("MAGE_ESSENCE_OF_MAGIC");
player:cast("PRIEST_MAGIC_BARRIER");
player:cast("MAGE_ENERGY_INFLUX");
player:cast("MAGE_ELECTROSTATIC_CHARGE");
player:cast("MAGE_INTENSIFICATION");
player:cast("MAGE_ELEMENTAL_CATALYSIS");
player:cast("PRIEST_REGENERATE");
end
change the skill buff to your skill buff potion etc.
try this
Code: Select all
local okander = player:findNearestNameOrId("Okander")
if not okander then break end
trash_boss()
player:update()
player:loot()
until inventory:itemTotalCount("Ancient Memento") > mentos
end
Who is online
Users browsing this forum: Bing [Bot] and 4 guests