WAYPOINTNAME = "Tier_Maker"
WAYPOINTVERSION = "v1.3.9"
-- MailSenders Names
MailSender1 = "CharName1"
MailSender2 = "CharName2"
MailSender3 = "CharName3"
MailSender4 = "CharName4"
LastMailSender = MailSender4
MailRecipient = MailSender2
-- Messages
TierChannelName = "Tiermaker"
TierMessage1 = "SendMe"
TierMessage2 = "Go."
-- Waypoint setings
Make2StatTier = false;
RestartAfterAllError = true;
-- Set Twink Client for restart.
TierTwinkClient = "C_Tirodel"
-- Set whait time in seconds
MailSenderWhaitTime = 3500;
MailReceiverWhaitTime = 120;
-- Names table of Tier Mana stones Receivers on same account.
TierReceiver = {
"Tierreiver1", -- Name of Tier Receiver 1. T10 and above
"Tierreiver2", -- Name of Tier Receiver 2. T4, T5 and T6
"Tierreiver3", -- Name of Tier Receiver 3. T4, T5 and T6
"Tierreiver4", -- Name of Tier Receiver 4. T4, T5 and T6
"Tierreiver5", -- Name of Tier Receiver 5. T4, T5 and T6
"Tierreiver6", -- Name of Tier Receiver 6. T7, T8 and T9
};
LastManaStoneSender = TierReceiver[#TierReceiver]
-- Set CharList. Account grope of MailSender1 must be ferst and account grope Fusion Stone Sender must be second
-- for Set account and character number for MailSender and FusionSender
CharList = {
{ -- Mail Sender 1
{account=50,chars={2}},
},
{ -- Fusion Stone Sender
{account=51,chars={1}},
},
{ -- Mana Stone Sender and resivers
{account=55,chars={}},
},
{ -- Mail Sender 2-4
{account=56,chars={1,2,3,4}},
},
{ -- 2 Stat Fusion Stone Senders
{account=39,chars={}}, {account=40,chars={}}, {account=41,chars={}},
},
{ -- 2 Stat Mana Stone Senders
{account=60,chars={}}, {account=61,chars={}}, {account=62,chars={}},
},
{ -- account group 1
{account=1,chars={}}, {account=2,chars={}}, {account=3,chars={}}, {account=4,chars={}}, {account=5,chars={}},
{account=6,chars={}}, {account=7,chars={}}, {account=8,chars={}}, {account=9,chars={}},
},
{ -- account group 2
{account=20,chars={}}, {account=21,chars={}}, {account=22,chars={}}, {account=23,chars={}}, {account=24,chars={}},
{account=25,chars={}}, {account=26,chars={}}, {account=27,chars={}}, {account=28,chars={}},
},
{ -- account group 3
{account=71,chars={}}, {account=72,chars={}}, {account=73,chars={}}, {account=74,chars={}}, {account=75,chars={}},
{account=76,chars={}}, {account=77,chars={}}, {account=78,chars={}}, {account=79,chars={}},
},
{ -- account group 4
{account=90,chars={}}, {account=91,chars={}}, {account=92,chars={}}, {account=93,chars={}}, {account=94,chars={}},
{account=95,chars={}}, {account=96,chars={}}, {account=97,chars={}}, {account=98,chars={}},
},
{ -- account group 5
{account=11,chars={}}, {account=12,chars={}}, {account=13,chars={}}, {account=14,chars={}}, {account=15,chars={}},
{account=16,chars={}}, {account=17,chars={}}, {account=18,chars={}}, {account=19,chars={}},
},
{ -- account group 6
{account=30,chars={}}, {account=31,chars={}}, {account=32,chars={}}, {account=33,chars={}}, {account=34,chars={}},
{account=35,chars={}}, {account=36,chars={}}, {account=37,chars={}}, {account=38,chars={}},
},
{ -- account group 7
{account=81,chars={}}, {account=82,chars={}}, {account=83,chars={}}, {account=84,chars={}}, {account=85,chars={}},
{account=66,chars={}}, {account=87,chars={}}, {account=88,chars={}}, {account=89,chars={}},
},
{ -- account group 8
{account=100,chars={}}, {account=101,chars={}}, {account=102,chars={}}, {account=103,chars={}}, {account=104,chars={}},
{account=105,chars={}}, {account=106,chars={}}, {account=107,chars={}}, {account=108,chars={}},
},
};
SetCharList(CharList);
--PrintCharList();
-- Variants table for Send Mana Stones
SendVariants = {--4,5,6,7,8,9,10 -- Amount of Mana Stones
{18,6,0,0,0,0,0}, -- Variant1, T4 and T5
{6,18,0,0,0,0,0}, -- Variant2, T5 and T4
{0,18,6,0,0,0,0}, -- Variant3, T5 and T6
{0,6,18,0,0,0,0}, -- Variant4, T6 and T5
{0,0,18,6,0,0,0}, -- Variant5, T6 and T7
{0,0,6,18,0,0,0}, -- Variant6, T7 and T6
{0,0,18,0,6,0,0}, -- Variant7, T6 and T8
{0,0,0,18,6,0,0}, -- Variant8, T7 and T8
{0,0,0,24,0,6,0}, -- Variant9, T7 and T9
{0,0,0,6,18,0,0}, -- Variant10, T8 and T7
{0,0,0,0,6,22,0}, -- Variant11, T9 and T8
{0,0,0,0,18,12,0}, -- Variant12, T8 and T9
{0,0,0,12,0,18,0}, -- Variant13, T9 and T7
{0,0,0,6,0,24,0}, -- Variant14, T9 and T7
{0,0,0,0,12,18,0}, -- Variant15, T9 and T8
{0,0,0,9,9,5,0}, -- Variant16, T7, T8 and T9
{0,0,0,6,10,8,0}, -- Variant17, T8, T9 and T7
{24,0,0,0,0,0,0}, -- Variant18, T4
{0,24,0,0,0,0,0}, -- Variant19, T5
{0,0,24,0,0,0,0}, -- Variant20, T6
{0,0,0,24,0,0,0}, -- Variant21, T7
{0,0,0,0,24,0,0}, -- Variant22, T8
{0,0,0,0,0,30,0}, -- Variant23, T9
};
-- tables for send stones and orb
StonesOrbs = {202999, 203001, 203276}
ManaStones1 = {202843, 202844, 202845}
ManaStones2 = {202846, 202847, 202848}
ManaStones3 = {202849, 202850, 202851}
-- Mana Stones table. T5, T6, T7, T8, T9, T10, T11 and T12
ManaStones = {202844, 202845, 202846, 202847, 202848, 202849, 202850, 202851}
-- =======================================END===================================== --
-- Set to use FusionSender and Set to Buy Random Fusion Stones or Fusion Stones with stats.
UseFusionSender = false
BuyFusionStoneWithStat = false
FusionSender = "Charstone"
-- Names table of Fusion Stones with 2 stats Receivers.
FusionStonesReceiver = {
-- Fusion stones receiver account 1
"Charstreg", -- 1. Выносливость + Сила, Stamina I + Strength I
"Charsexte", -- 2. Выносливость + Ловкость, Stamina I + Dexterity I
"Charsnell", -- 3. Выносливость + Интелект, Stamina I + Intellect I
"Charspirt", -- 4. Выносливость + Мудрость, Stamina I + Spirit I
"Charsaili", -- 5. Выносливость + Все параметры, Stamina I + Ability I
"Charsleme", -- 6. Выносливость + Защита от всех стихий, Stamina I + Element I
-- Fusion stones receiver account 2
"Charsartx", -- 7. Выносливость + Устойчивость к Земле, Stamina I + Earth I
"Charsmser", -- 8. Выносливость + Устойчивость к Воде, Stamina I + Mist I
"Charsfamd", -- 9. Выносливость + Устойчивость к Огню, Stamina I + Flame I
"Charswife", -- 10. Выносливость + Устойчивость к Ветру, Stamina I + Whiff I
"Charsighh", -- 11. Выносливость + Устойчивость к Свету, Stamina I + Light I
"Charsdake", -- 12. Выносливость + Устойчивость к Тьме, Stamina I + Dark I
-- Fusion stones receiver account 3
"Charseegy", -- 13. Выносливость + Магическая атака, Stamina I + Energy I
"Charsomad", -- 14. Выносливость + Физическая атака, Stamina I + Command I
"Charslfel", -- 15. Выносливость + Максимум здоровья, Stamina I + Life I
"Charspelt", -- 16. Выносливость + Максимум маны, Stamina I + Spell I
"Charsarrc", -- 17. Выносливость + Магическая защита, Stamina I + Barricade I
"Charsolii", -- 18. Выносливость + Физическая защита, Stamina I + Solidity I
};
-- Names table of Mana Stones with stats Receivers.
ManaStonesReceiver = {
-- Mana stones receiver group 1
"Tierssten", -- 1. Выносливость + Сила, Stamina + Strength
"Tiersdxte", -- 2. Выносливость + Ловкость, Stamina + Dexterity
"Tiersntel", -- 3. Выносливость + Интелект, Stamina + Intellect
"Tierspirt", -- 4. Выносливость + Мудрость, Stamina + Spirit
"Tiersbilt", -- 5. Выносливость + Все параметры, Stamina I + Ability I
"Tierslemn", -- 6. Выносливость + Защита от всех стихий, Stamina I + Element I
-- Mana stones receiver group 2
"Tiersartx", -- 7. Выносливость + Устойчивость к Земле, Stamina I + Earth I
"Tiersistr", -- 8. Выносливость + Устойчивость к Воде, Stamina I + Mist I
"Tierslaed", -- 9. Выносливость + Устойчивость к Огню, Stamina I + Flame I
"Tiershife", -- 10. Выносливость + Устойчивость к Ветру, Stamina I + Whiff I
"Tiersighh", -- 11. Выносливость + Устойчивость к Свету, Stamina I + Light I
"Tiersarde", -- 12. Выносливость + Устойчивость к Тьме, Stamina I + Dark I
-- Mana stones receiver group 3
"Tierseery", -- 13. Выносливость + Магическая атака, Stamina I + Energy I
"Tierscman", -- 14. Выносливость + Физическая атака, Stamina I + Command I
"Tierslfel", -- 15. Выносливость + Максимум здоровья, Stamina I + Life I
"Tiersspll", -- 16. Выносливость + Максимум маны, Stamina I + Spell I
"Tiersbari", -- 17. Выносливость + Магическая защита, Stamina I + Barricade I
"Tierssodi", -- 18. Выносливость + Физическая защита, Stamina I + Solidity I
};
-- Stats tables.
SendOneStat = 510360 -- 0 Выносливость
StatsTables = { -- table of Sended 2 Stats Stones
510380, -- 1 Выносливость + Сила
510060, -- 2 Выносливость + Ловкость
510320, -- 3 Выносливость + Интелект
510340, -- 4 Выносливость + Мудрость
510300, -- 5 Выносливость + Все параметры
510560, -- 6 Выносливость + Защита от всех стихий
510500, -- 7 Выносливость + Устойчивость к Земле
510440, -- 8 Выносливость + Устойчивость к Воде
510460, -- 9 Выносливость + Устойчивость к Огню
510520, -- 10 Выносливость + Устойчивость к Ветру
510480, -- 11 Выносливость + Устойчивость к Свету
510540, -- 12 Выносливость + Устойчивость к Тьме
510400, -- 13 Выносливость + Магическая атака
510100, -- 14 Выносливость + Физическая атака
510020, -- 15 Выносливость + Максимум здоровья
510040, -- 16 Выносливость + Максимум маны
510420, -- 17 Выносливость + Магическая защита
510120, -- 18 Выносливость + Физическая защита
};
-- =======================================END===================================== --
--[[ Stat table.
510020 "Жизнь I", "Life I"
510040 "Заклятье I", "Spell I"
510060 "Сноровка I", "Dexterity I"
510100 "Повеление I", "Command I"
510120 "Твердость I", "Solidity I"
510140 "Меткость I", "Accuracy I"
510200 "Уклонение I", "Dodge I"
510300 "Умение I", "Ability I"
510320 "Интеллект I", "Intellect I"
510340 "Дух I", "Spirit I"
510360 "Выносливость I", "Stamina I"
510400 "Энергия I", "Energy I"
510420 "Заграждение I", "Barricade I"
510440 "Туман I", "Mist I"
510460 "Пламя I", "Flame I"
510480 "Свет I", "Light I"
510500 "Земля I", "Earth I"
510520 "Дуновение I", "Whiff I"
510540 "Тьма I", "Dark I"
510560 "Стихия I", "Element I"
510820 "Скорость I", "Speed I"
510840 "Клык I", "Fang I"
510860 "Реакция I", "Reflex I"
510880 "Ловкость I", "Agility I"
510900 "Точность I", "Precision I"
510920 "Соблюдение I", "Observance I"
510940 "Сообразительность I", "Keen I"
-- max stats in fusions stones = 18
510360 "Выносливость I", "Stamina I" -- 0
510380 "Сила I", "Strength I"
510060 "Сноровка I", "Dexterity I"
510320 "Интеллект I", "Intellect I" -- 1
510340 "Дух I", "Spirit I"
510300 "Умение I", "Ability I"
510560 "Стихия I", "Element I" -- 2
510500 "Земля I", "Earth I"
510440 "Туман I", "Mist I"
510460 "Пламя I", "Flame I" -- 3
510520 "Дуновение I", "Whiff I"
510480 "Свет I", "Light I"
510540 "Тьма I", "Dark I" -- 4
510400 "Энергия I", "Energy I"
510100 "Повеление I", "Command I"
510020 "Жизнь I", "Life I" -- 5
510040 "Заклятье I", "Spell I"
510420 "Заграждение I", "Barricade I"
510120 "Твердость I", "Solidity I" -- 6
--]]
-- Variables for onClientCrash
local currAcc = RoMScript("LogID");
local currChar = RoMScript("CHARACTER_SELECT.selectedIndex");
local dirPath = string.gsub( getExecutionPath()," ","\" \"" );
local currPath = __WPL.FileName;
local Clientlink = TierTwinkClient; -- specify you client shortcut links name if it not contains *client*
cprintf(cli.white, "Current Acc: %s, Char: %s, Path: %s, dirPath: %s, Client: %s\n\n", currAcc, currChar, currPath, dirPath, Clientlink)
-- onClientCrash
function onClientCrash()
if RestartAfterAllError then
killClient()
else
yrest(5000)
end
if( not windowValid(getAttachedHwnd()) or RestartAfterAllError ) then
-- write Crash Log
local filename = ""..dirPath.."/logs/CrashLog.log";
local file, err = io.open(filename, "a+");
if file then
file:write("Account: "..currAcc.." \tName: " ..string.format("%-10s",player.Name ).." \tDate: "..os.date().." \tPath: "..currPath.." \n")
file:close()
end
-- Restart client and Bot
os.execute("START "..dirPath.."/../../micromacro.exe "..dirPath.."/login acc:"..currAcc.." char:"..currChar.." client:"..Clientlink.." path:"..currPath.."")
--os.exit()
--elseif( TryRestartBot == 0 ) then
-- Restart Bot
--include("bot.lua")
--TryRestartBot = 1
end
end;
-- check Clientlink
if( Clientlink ) then
atError(onClientCrash)
end;
-- Start Crash Window Killer
local name, version = "Crash Window Killer", "v0.1"
local windowname = name.." ["..version.."] started."
local crashwinkiller = findWindow(windowname)
if( crashwinkiller == 0 ) then
local a,b,c = os.execute("START "..dirPath.."/../../micromacro.exe "..dirPath.."/CrashWindowKiller.lua")
if not a then
error("Trouble executing file. Values returned were: "..(a or "nil")..", "..(b or "nil")..", "..(c or "nil"))
end
end;
include("waypoints/Tier_Maker_onLoad.lua",true)
KampelTownMailbox();
FreudDinksStore();
__WPL:setWaypointIndex(__WPL:findWaypointTag("KampelTownMailbox"));
SasciliaSteppesMailbox();
SpiderfootStore();
if( CheckTierItems() >= 8 ) then
WailingFjordMailbox();
end;
__WPL:setWaypointIndex(__WPL:findWaypointTag("SpiderfootStore"));
__WPL:setWaypointIndex(__WPL:findWaypointTag("WailingFjordMailbox"));
StartTwink();
-- Elven Island Mailbox
ElvenIslandMailbox();
__WPL:setWaypointIndex(__WPL:findWaypointTag("ElvenIslandMailbox"));
__WPL:setWaypointIndex(__WPL:findWaypointTag("VaranasTwinkUnstick"));
-- Tp to Varanas
player:target_NPC(118002); yrest(1000); -- Упрямый снуп
RoMScript("ChoiceOption(1);"); yrest(1000);
RoMScript("StaticPopup_OnClick(StaticPopup1, 1);");
print(" Tp to Varanas");
waitForLoadingScreen(60);
player:update();
-- Check error
local Cur_Gold = RoMScript("GetPlayerMoney('copper');");
if( 20 > Cur_Gold ) then
inventory:update();
inventory:useItem(201843); -- 1 Lvl Giftbag
inventory:useItem(201844); -- 2 Lvl Giftbag
yrest(1500);
end;
if ( getZoneId() ~= 2 and getZoneId() ~= 1002 ) then
__WPL:setWaypointIndex(__WPL:findWaypointTag("CoastOpp"));
end;
inventory:update();
player:mount();
VaranasTwinkUnstick()
__WPL:setWaypointIndex(__WPL:findWaypointTag("Escape"));
__WPL:setWaypointIndex(__WPL:findWaypointTag("Escape"));
__WPL:setWaypointIndex(__WPL:findWaypointTag("Escape"));
__WPL:setWaypointIndex(__WPL:findWaypointTag("Escape"));
__WPL:setWaypointIndex(__WPL:findWaypointTag("StartTwink"));
ElfCheckError()
-- Tp to Varanas
TptoVaranas()
-- Take Giftbags
--inventory:useItem(201849); -- 7 Lvl Giftbag
-- Check for Error Send Stone
if( ErrorSendStone == true ) then
if( player.Class1 == CLASS_ROGUE ) then
player:target_NPC(110008); yrest(1000); -- Энгер
RoMScript("ChoiceOption(1);"); yrest(500);
RoMScript("ChoiceOption(1);");
else
player:target_NPC(110307); yrest(1000); -- Эльсон
RoMScript("ChoiceOption(1);"); yrest(500);
RoMScript("ChoiceOption(1);");
end
__WPL:setWaypointIndex(__WPL:findWaypointTag("ErrorSendMail"));
end;
-- Varanas Charges
VaranasCharges();
VaranasLyeve();
__WPL:setWaypointIndex(__WPL:findWaypointTag("VaranasBuyFusionStone"));
-- Check for Varanas Error
if not player:findNearestNameOrId(110576) then TirodelUnstick() end
local Odeley = player:findNearestNameOrId(110576)
if (Odeley.Y - player.Y) > 30 then TirodelUnstick() end
-- Varanas Buy Fusion Stone
VaranasBuyFusionStone()
__WPL:setWaypointIndex(__WPL:findWaypointTag("VaranasMailbox"));
-- Varanas Mailbox
TierMakerMailbox("Varanas");
-- Set faceDirection and Rotation
local angle = math.atan2(31925 - player.Z, 3391 - player.X)
player:faceDirection(angle)
camera:setRotation(angle)
-- Elven Island Mailbox2
TierMakerMailbox("ElvenIsland");
player:target_NPC(110484) -- Лейф Синдай
AcceptQuestByName(420660) -- СђЕђЯђЫђЬђСђФ Рѕ РїТђСђЩђТ‘Р›ТђУђЩђШЌ
player:target_NPC(110482) -- Лейтон
CompleteQuestByName(420660) -- СђЕђЯђЫђЬђСђФ Рѕ РїТђСђЩђТ‘Р›ТђУђЩђШЌ
player:target_NPC(110482) -- Лейтон
AcceptQuestByName(420661) -- СђРђЯђЬ‘Р“ТђШђЦђЮђЩђХ РѕТђС‘Р“Р¶РёТђЯЌ
player:target_NPC(110658) -- Мэллор
CompleteQuestByName(420661) -- СђРђЯђЬ‘Р“ТђШђЦђЮђЩђХ РѕТђС‘Р“Р¶РёТђЯЌ
player:target_NPC(110658) -- Мэллор
AcceptQuestByName(420662) -- СђРђЯђЬ‘Р“ТђШђЦђЮђЩђХ РґРѕТђТђа ђЦ‘Р•РѕРІ
player:target_NPC(110657) -- РЁСЌРјРї
CompleteQuestByName(420662) -- СђРђЯђЬ‘Р“ТђШђЦђЮђЩђХ РґРѕТђТђа ђЦ‘Р•РѕРІ
player:target_NPC(110657) -- РЁСЌРјРї
AcceptQuestByName(420663) -- СђРђЯђЬ‘Р“ТђШђЦђЮђЩђХ Р·РµР»РёР№
player:target_NPC(110489) -- Рейдин
CompleteQuestByName(420663) -- СђРђЯђЬ‘Р“ТђШђЦђЮђЩђХ Р·РµР»РёР№
player:target_NPC(110489) -- Рейдин
AcceptQuestByName(420665) -- СђИђСђУђЦ‘РђТђЩђЦђЮђЩђХ РїТђСђЩђФђЯ‘Р’РѕРІР»РµРЅРёР№
StartTwink() -- StartTwink
player:target_NPC(110482) -- Лейтон
CompleteQuestByName(420665) -- СђИђСђУђЦ‘РђТђЩђЦђЮђЩђХ РїТђСђЩђФђЯ‘Р’РѕРІР»РµРЅРёР№
-- Take Giftbags
local starttimer = os.clock()
repeat
if( inventory:itemTotalCount(201843) ) then
inventory:useItem(201843); yrest(2500); -- 1 Lvl Giftbag
end
inventory:useItem(201844); yrest(2500); -- 2 Lvl Giftbag
player:rest(math.random(5));
inventory:update();
player:mount();
player:update();
until player.Mounted or os.clock() - starttimer > 30
ElvenIslandMailbox()
__WPL:setWaypointIndex(__WPL:findWaypointTag("VaranasSnup"));
MassBuyFusionStones()
ToGuildHouse()
GuildFortressGate()
GuildFortressMailbox()
__WPL:setWaypointIndex(__WPL:findWaypointTag("MassBuyFusionStones"))
ManaStonesLogarMailbox()