2022-06-06 22:04:52 +00:00

443 lines
14 KiB
Lua

setDefaultTab("Main")
local panelName = "combobot"
local ui = setupUI([[
Panel
height: 19
BotSwitch
id: title
anchors.top: parent.top
anchors.left: parent.left
text-align: center
width: 130
!text: tr('ComboBot')
Button
id: combos
anchors.top: prev.top
anchors.left: prev.right
anchors.right: parent.right
margin-left: 3
height: 17
text: Setup
]])
ui:setId(panelName)
if not storage[panelName] then
storage[panelName] = {
enabled = false,
onSayEnabled = false,
onShootEnabled = false,
onCastEnabled = false,
followLeaderEnabled = false,
attackLeaderTargetEnabled = false,
attackSpellEnabled = false,
attackItemToggle = false,
sayLeader = "",
shootLeader = "",
castLeader = "",
sayPhrase = "",
spell = "",
serverLeader = "",
item = 3155,
attack = "",
follow = "",
commandsEnabled = true,
serverEnabled = false,
serverLeaderTarget = false,
serverTriggers = true
}
end
local config = storage[panelName]
ui.title:setOn(config.enabled)
ui.title.onClick = function(widget)
config.enabled = not config.enabled
widget:setOn(config.enabled)
end
ui.combos.onClick = function(widget)
comboWindow:show()
comboWindow:raise()
comboWindow:focus()
end
rootWidget = g_ui.getRootWidget()
if rootWidget then
comboWindow = UI.createWindow('ComboWindow', rootWidget)
comboWindow:hide()
-- bot item
comboWindow.actions.attackItem:setItemId(config.item)
comboWindow.actions.attackItem.onItemChange = function(widget)
config.item = widget:getItemId()
end
-- switches
comboWindow.actions.commandsToggle:setOn(config.commandsEnabled)
comboWindow.actions.commandsToggle.onClick = function(widget)
config.commandsEnabled = not config.commandsEnabled
widget:setOn(config.commandsEnabled)
end
comboWindow.server.botServerToggle:setOn(config.serverEnabled)
comboWindow.server.botServerToggle.onClick = function(widget)
config.serverEnabled = not config.serverEnabled
widget:setOn(config.serverEnabled)
end
comboWindow.server.Triggers:setOn(config.serverTriggers)
comboWindow.server.Triggers.onClick = function(widget)
config.serverTriggers = not config.serverTriggers
widget:setOn(config.serverTriggers)
end
comboWindow.server.targetServerLeaderToggle:setOn(config.serverLeaderTarget)
comboWindow.server.targetServerLeaderToggle.onClick = function(widget)
config.serverLeaderTarget = not config.serverLeaderTarget
widget:setOn(config.serverLeaderTarget)
end
-- buttons
comboWindow.closeButton.onClick = function(widget)
comboWindow:hide()
end
-- combo boxes
comboWindow.actions.followLeader:setOption(config.follow)
comboWindow.actions.followLeader.onOptionChange = function(widget)
config.follow = widget:getCurrentOption().text
end
comboWindow.actions.attackLeaderTarget:setOption(config.attack)
comboWindow.actions.attackLeaderTarget.onOptionChange = function(widget)
config.attack = widget:getCurrentOption().text
end
-- checkboxes
comboWindow.trigger.onSayToggle:setChecked(config.onSayEnabled)
comboWindow.trigger.onSayToggle.onClick = function(widget)
config.onSayEnabled = not config.onSayEnabled
widget:setChecked(config.onSayEnabled)
end
comboWindow.trigger.onShootToggle:setChecked(config.onShootEnabled)
comboWindow.trigger.onShootToggle.onClick = function(widget)
config.onShootEnabled = not config.onShootEnabled
widget:setChecked(config.onShootEnabled)
end
comboWindow.trigger.onCastToggle:setChecked(config.onCastEnabled)
comboWindow.trigger.onCastToggle.onClick = function(widget)
config.onCastEnabled = not config.onCastEnabled
widget:setChecked(config.onCastEnabled)
end
comboWindow.actions.followLeaderToggle:setChecked(config.followLeaderEnabled)
comboWindow.actions.followLeaderToggle.onClick = function(widget)
config.followLeaderEnabled = not config.followLeaderEnabled
widget:setChecked(config.followLeaderEnabled)
end
comboWindow.actions.attackLeaderTargetToggle:setChecked(config.attackLeaderTargetEnabled)
comboWindow.actions.attackLeaderTargetToggle.onClick = function(widget)
config.attackLeaderTargetEnabled = not config.attackLeaderTargetEnabled
widget:setChecked(config.attackLeaderTargetEnabled)
end
comboWindow.actions.attackSpellToggle:setChecked(config.attackSpellEnabled)
comboWindow.actions.attackSpellToggle.onClick = function(widget)
config.attackSpellEnabled = not config.attackSpellEnabled
widget:setChecked(config.attackSpellEnabled)
end
comboWindow.actions.attackItemToggle:setChecked(config.attackItemEnabled)
comboWindow.actions.attackItemToggle.onClick = function(widget)
config.attackItemEnabled = not config.attackItemEnabled
widget:setChecked(config.attackItemEnabled)
end
-- text edits
comboWindow.trigger.onSayLeader:setText(config.sayLeader)
comboWindow.trigger.onSayLeader.onTextChange = function(widget, text)
config.sayLeader = text
end
comboWindow.trigger.onShootLeader:setText(config.shootLeader)
comboWindow.trigger.onShootLeader.onTextChange = function(widget, text)
config.shootLeader = text
end
comboWindow.trigger.onCastLeader:setText(config.castLeader)
comboWindow.trigger.onCastLeader.onTextChange = function(widget, text)
config.castLeader = text
end
comboWindow.trigger.onSayPhrase:setText(config.sayPhrase)
comboWindow.trigger.onSayPhrase.onTextChange = function(widget, text)
config.sayPhrase = text
end
comboWindow.actions.attackSpell:setText(config.spell)
comboWindow.actions.attackSpell.onTextChange = function(widget, text)
config.spell = text
end
comboWindow.server.botServerLeader:setText(config.serverLeader)
comboWindow.server.botServerLeader.onTextChange = function(widget, text)
config.serverLeader = text
end
end
-- bot server
-- [[ join party made by Frosty ]] --
local shouldCloseWindow = false
local firstInvitee = true
local isInComboTeam = false
macro(10, function()
if shouldCloseWindow and config.serverEnabled and config.enabled then
local channelsWindow = modules.game_console.channelsWindow
if channelsWindow then
local child = channelsWindow:getChildById("buttonCancel")
if child then
child:onClick()
shouldCloseWindow = false
isInComboTeam = true
end
end
end
end)
comboWindow.server.partyButton.onClick = function(widget)
if config.serverEnabled and config.enabled then
if config.serverLeader:len() > 0 and storage.BotServerChannel:len() > 0 then
talkPrivate(config.serverLeader, "request invite " .. storage.BotServerChannel)
else
error("Request failed. Lack of data.")
end
end
end
onTextMessage(function(mode, text)
if config.serverEnabled and config.enabled then
if mode == 20 then
if string.find(text, "invited you to") then
local regex = "[a-zA-Z]*"
local regexData = regexMatch(text, regex)
if regexData[1][1]:lower() == config.serverLeader:lower() then
local leader = getCreatureByName(regexData[1][1])
if leader then
g_game.partyJoin(leader:getId())
g_game.requestChannels()
g_game.joinChannel(1)
shouldCloseWindow = true
end
end
end
end
end
end)
onTalk(function(name, level, mode, text, channelId, pos)
if config.serverEnabled and config.enabled then
if mode == 4 then
if string.find(text, "request invite") then
local access = string.match(text, "%d.*")
if access and access == storage.BotServerChannel then
local minion = getCreatureByName(name)
if minion then
g_game.partyInvite(minion:getId())
if firstInvitee then
g_game.requestChannels()
g_game.joinChannel(1)
shouldCloseWindow = true
firstInvitee = false
end
end
else
talkPrivate(name, "Incorrect access key!")
end
end
end
end
-- [[ End of Frosty's Code ]] --
if config.enabled and config.enabled then
if name:lower() == config.sayLeader:lower() and string.find(text, config.sayPhrase) and config.onSayEnabled then
startCombo = true
end
if (config.castLeader and name:lower() == config.castLeader:lower()) and isAttSpell(text) and config.onCastEnabled then
startCombo = true
end
end
if config.enabled and config.commandsEnabled and (config.shootLeader and name:lower() == config.shootLeader:lower()) or (config.sayLeader and name:lower() == config.sayLeader:lower()) or (config.castLeader and name:lower() == config.castLeader:lower()) then
if string.find(text, "ue") then
say(config.spell)
elseif string.find(text, "sd") then
local params = string.split(text, ",")
if #params == 2 then
local target = params[2]:trim()
if getCreatureByName(target) then
useWith(3155, getCreatureByName(target))
end
end
elseif string.find(text, "att") then
local attParams = string.split(text, ",")
if #attParams == 2 then
local atTarget = attParams[2]:trim()
if getCreatureByName(atTarget) and config.attack == "COMMAND TARGET" then
g_game.attack(getCreatureByName(atTarget))
end
end
end
end
if isAttSpell(text) and config.enabled and config.serverEnabled then
BotServer.send("trigger", "start")
end
end)
onMissle(function(missle)
if config.enabled and config.onShootEnabled then
if not config.shootLeader or config.shootLeader:len() == 0 then
return
end
local src = missle:getSource()
if src.z ~= posz() then
return
end
local from = g_map.getTile(src)
local to = g_map.getTile(missle:getDestination())
if not from or not to then
return
end
local fromCreatures = from:getCreatures()
local toCreatures = to:getCreatures()
if #fromCreatures ~= 1 or #toCreatures ~= 1 then
return
end
local c1 = fromCreatures[1]
local t1 = toCreatures[1]
leaderTarget = t1
if c1:getName():lower() == config.shootLeader:lower() then
if config.attackItemEnabled and config.item and config.item > 100 and findItem(config.item) then
useWith(config.item, t1)
end
if config.attackSpellEnabled and config.spell:len() > 1 then
say(config.spell)
end
end
end
end)
macro(10, function()
if not config.enabled or not config.attackLeaderTargetEnabled then return end
if leaderTarget and config.attack == "LEADER TARGET" then
if not getTarget() or (getTarget() and getTarget():getName() ~= leaderTarget:getName()) then
g_game.attack(leaderTarget)
end
end
if config.enabled and config.serverEnabled and config.attack == "SERVER LEADER TARGET" and serverTarget then
if serverTarget and not getTarget() or (getTarget() and getTarget():getname() ~= serverTarget)
then
g_game.attack(serverTarget)
end
end
end)
local toFollow
local toFollowPos = {}
macro(100, function()
toFollow = nil
if not config.enabled or not config.followLeaderEnabled then return end
if leaderTarget and config.follow == "LEADER TARGET" and leaderTarget:isPlayer() then
toFollow = leaderTarget:getName()
elseif config.follow == "SERVER LEADER TARGET" and config.serverLeader:len() ~= 0 then
toFollow = serverTarget
elseif config.follow == "SERVER LEADER" and config.serverLeader:len() ~= 0 then
toFollow = config.serverLeader
elseif config.follow == "LEADER" then
if config.onSayEnabled and config.sayLeader:len() ~= 0 then
toFollow = config.sayLeader
elseif config.onCastEnabled and config.castLeader:len() ~= 0 then
toFollow = config.castLeader
elseif config.onShootEnabled and config.shootLeader:len() ~= 0 then
toFollow = config.shootLeader
end
end
if not toFollow then return end
local target = getCreatureByName(toFollow)
if target then
local tpos = target:getPosition()
toFollowPos[tpos.z] = tpos
end
if player:isWalking() then return end
local p = toFollowPos[posz()]
if not p then return end
if CaveBot.walkTo(p, 20, {ignoreNonPathable=true, precision=1, ignoreStairs=false}) then
delay(100)
end
end)
onCreaturePositionChange(function(creature, oldPos, newPos)
if creature:getName() == toFollow and newPos then
toFollowPos[newPos.z] = newPos
end
end)
local timeout = now
macro(10, function()
if config.enabled and startCombo then
if config.attackItemEnabled and config.item and config.item > 100 and findItem(config.item) then
useWith(config.item, getTarget())
end
if config.attackSpellEnabled and config.spell:len() > 1 then
say(config.spell)
end
startCombo = false
end
-- attack part / server
if BotServer._websocket and config.enabled and config.serverEnabled then
if target() and now - timeout > 500 then
targetPos = target():getName()
BotServer.send("target", targetPos)
timeout = now
end
end
end)
onUseWith(function(pos, itemId, target, subType)
if BotServer._websocket and itemId == 3155 then
BotServer.send("useWith", target:getPosition())
end
end)
if BotServer._websocket and config.enabled and config.serverEnabled then
BotServer.listen("trigger", function(name, message)
if message == "start" and name:lower() ~= player:getName():lower() and name:lower() == config.serverLeader:lower() and config.serverTriggers then
startCombo = true
end
end)
BotServer.listen("target", function(name, message)
if name:lower() ~= player:getName():lower() and name:lower() == config.serverLeader:lower() then
if not target() or target():getName() == getCreatureByName(message) then
if config.serverLeaderTarget then
serverTarget = getCreatureByName(message)
g_game.attack(getCreatureByName(message))
end
end
end
end)
BotServer.listen("useWith", function(name, message)
local tile = g_map.getTile(message)
if config.serverTriggers and name:lower() ~= player:getName():lower() and name:lower() == config.serverLeader:lower() and config.attackItemEnabled and config.item and findItem(config.item) then
useWith(config.item, tile:getTopUseThing())
end
end)
end