Code: Select all
;========================================
;== Begin Global Variable Declarations ==
;========================================
Global $LastLine
Global $line
Global $CurrentLogFile
Global $CurrentLine
Global $NextToLastLine
Global $NextToLastLineNO
Global $SecondToLastLine
Global $SecondToLastLineNO
Global $ThirdToLastLine
Global $ThirdToLastLineNO
Global $FourthToLastLine
Global $FourthToLastLineNO
Global $FifthToLastLine
Global $FifthToLastLineNO
Global $LastLineNumber
Global $LoggedChatTab
Global $GameName
Global $PathToLog_INI
Global $CurrentINIFile
Global $WinPOSx
Global $WinPOSy
Global $WinSizeX
Global $WinSizeY
Global $LoggedTabX
Global $LoggedTabY
Global $LogLineInfo
Global $CommanderName
Global $CCMoraleCheckY
Global $CCMoraleFullX
Global $CCMoraleSmallX
Global $CCMoraleMedX
Global $CCMoraleBigX
Global $CCCombatWinMsg
Global $CCMoraleCheckColor
Global $CCCharClickX
Global $CCCharClickY
Global $PHName
Global $PHSelectX
Global $PHSelectY
Global $PHMoraleCheckColor
Global $PHMoraleCheckY
Global $PHMoraleSmallX
Global $PHMoraleBigX
Global $PHCombatWinMsg
Global $PHInCombatMsg
Global $PHCombatCheckX
Global $PHCombatCheckY
Global $PHCombatCheckColor
Global $PHCombatCheckColorN
Global $PHLootMatrixUX
Global $PHLootMatrixUY
Global $PHLootMatrixLX
Global $PHLootMatrixLY
Global $PHLootBindKey
Global $PHAntiAFK_1
Global $PHAntiAFK_2
Global $PHAntiAFK_3
Global $PHAntiAFK_4
Global $TaleOfBattle
Global $WarSpeech
Global $RaiseTheSpirit
Global $BolsterCourage
Global $TriumphantSpirit
Global $InspireFellows
Global $ChordOfSalvation
Global $BalladOfSteel
Global $BalladOfVigour
Global $BalladOfResonance
Global $BalladOfSwiftness
Global $BalladOfBalance
Global $BalladOfTheStout
Global $BalladOfComposure
Global $BalladOfWar
Global $PiercingCry
Global $CallOfTheSecondAge
Global $SongOSoothing
Global $CallOfOrome
Global $EchoesOfBattle
Global $HorseMount
Global $EatFood
Global $CallSoldier
Global $DirectSoldier
Global $AssistCommander
Global $SilvanShadows
Global $ChangeTheorbo
Global $ChangeDrums
Global $EatTrailFood
Global $EatFortifyFood
Global $RaiseTheSpirit_IT
Global $ChordOfSalvation_IT
Global $BolsterCourage_IT
Global $TriumphantSpirit_IT
Global $InspireFellows_IT
Global $RaiseTheSpirit_TI
Global $ChordOfSalvation_TI
Global $BolsterCourage_TI
Global $TriumphantSpirit_TI
Global $InspireFellows_TI
Global $RaiseTheSpirit_DF
Global $ChordOfSalvation_DF
Global $BolsterCourage_DF
Global $TriumphantSpirit_DF
Global $InspireFellows_DF
Global $RaiseTheSpirit_CD
Global $ChordOfSalvation_CD
Global $TriumphantSpirit_CD
Global $InspireFellows_CD
Global $CombatSleepTime
Global $FSManueverX
Global $FSManueverY
Global $FSManueverColor
Global $Check4PinwheelX
Global $Check4PinwheelY
Global $Check4PinwheelColor
Global $Check4PortX
Global $Check4PortY
Global $Check4PortColor
Global $ClickYes4PortX
Global $ClickYes4PortY
Global $AcceptTradeX
Global $AcceptTradeY
Global $Check4SkirmX
Global $Check4SkirmY
Global $Check4SkirmColor
Global $Click4SkirmX
Global $Click4SkirmY
Global $ARFollow
Global $ARTrade
Global $ARCombatEnd
Global $AREatCooked
Global $AREatTrail
Global $AREatFortify
Global $ARBuffing
Global $ARWarSpeechOn
Global $ARWarSpeechOff
Global $ARLooting
Global $ARAssisting
Global $ARMount
Global $ARCallSoldier
Global $ARPrepare4Battle
Global $ARExitScript
Global $ARHealingOn
Global $ARHealingOff
Global $CombatAssist
Global $FCBuffUp
Global $FCWarSpeechOn
Global $FCWarSpeechOff
Global $FCAcceptTrade
Global $FCLootCorpse
Global $FCSkirmishAssist
Global $FCTurnOnHealing
Global $FCTurnOffHealing
Global $FCEatCookedFood
Global $FCEatTrailFood
Global $FCEatFortifyFood
Global $FCMountUnmount
Global $FCCallSoldier
Global $FCFollowMe
Global $FCPrepareforSkirmish
Global $FCExitScript
Global $HealthCheck
Global $HealToggle
Global $WarSpeechOnOff
Global $AntiAFKOnOff
Global $RaiseTheSpirit_YN
Global $TriumphantSpirit_YN
Global $InspireFellows_YN
Global $ChordOfSalvation_YN
Global $InCombat_YN
Global $FCAntiAFKOn
Global $FCAntiAFKOff
Global $ARAntiAFKOn
Global $ARAntiAFKOff
Global $Anti_AFKSelection
Global $Anti_AFKSleep
Global $Anti_AFK_TI
Global $Anti_AFK_DF
Global $Anti_AFK_Response
Global $Anti_AFK_Wait
Global $Anti_AFK_HasFired_0_1
;****************************************************************************************************************************************************************
; [Game Information]
;****************************************************************************************************************************************************************
;$LogLineInfo = "["&$LoggedChatTab&"]"&$CommanderName&": "
$PathToLog_INI = "C:\Users\Gerald Maxwell\Documents\The Lord of the Rings Online\"
$CurrentINIFile = $PathToLog_INI&"healbot.ini"
$GameName = IniRead ($CurrentINIFile, "Game Information", "GameName", 0)
$WinPOSx = IniRead ($CurrentINIFile, "Game Information", "GameX", -1)
$WinPOSy = IniRead ($CurrentINIFile, "Game Information", "GameY", -1)
$WinSizeX = IniRead ($CurrentINIFile, "Game Information", "WinSizeX", -1)
$WinSizeY = IniRead ($CurrentINIFile, "Game Information", "WinSizeY", -1)
;$LoggedChatTab = IniRead ($CurrentINIFile, "Chat Logging Data", "FellowshipTab", 0)
$LoggedChatTab = "Fellowship"
$LoggedTabX = IniRead ($CurrentINIFile, "Chat Logging Data", "FellowshipTabX", 0)
$LoggedTabY = IniRead ($CurrentINIFile, "Chat Logging Data", "FellowshipTabY", 0)
$CurrentLine = 1
$NextToLastLineNO = $CurrentLine - 1
$SecondToLastLineNO = $CurrentLine - 2
$ThirdToLastLineNO = $CurrentLine - 3
$FourthToLastLineNO = $CurrentLine - 4
$FifthToLastLineNO = $CurrentLine - 5
$NextToLastLine = FileReadLine ($CurrentLogFile, $NextToLastLineNO)
$SecondToLastLine = FileReadLine ($CurrentLogFile, $SecondToLastLineNO)
$ThirdToLastLine = FileReadLine ($CurrentLogFile, $ThirdToLastLineNO)
$FourthToLastLine = FileReadLine ($CurrentLogFile, $FourthToLastLineNO)
$FifthToLastLine = FileReadLine ($CurrentLogFile, $FifthToLastLineNO)
;****************************************************************************************************************************************************************
; [Commander Character Data]
;****************************************************************************************************************************************************************
;$CCCommanderName = IniRead ($CurrentINIFile, "Commander Character Data", "Name", 0)
$CCCommanderName = "Kethla"
$CCMoraleCheckY = IniRead ($CurrentINIFile, "Commander Character Data", "MoraleCheckY", 0)
$CCMoraleFullX = IniRead ($CurrentINIFile, "Commander Character Data", "MoraleFullX", 0)
$CCMoraleSmallX = IniRead ($CurrentINIFile, "Commander Character Data", "MoraleSmallX", 0)
$CCMoraleMedX = IniRead ($CurrentINIFile, "Commander Character Data", "MoraleMedX", 0)
$CCMoraleBigX = IniRead ($CurrentINIFile, "Commander Character Data", "MoraleBigX", 0)
$CCMoraleCheckColor = IniRead ($CurrentINIFile, "Commander Character Data", "MoraleCheckColor", 0)
$CCCharClickX = IniRead ($CurrentINIFile, "Commander Character Data", "SelectX", 0)
$CCCharClickY = IniRead ($CurrentINIFile, "Commander Character Data", "SelectY", 0)
$CCCombatWinMsg = IniRead ($CurrentINIFile, "Commander Character Data", "CombatWinMsg", 0)
;****************************************************************************************************************************************************************
; [Pocket Healer Data]
;****************************************************************************************************************************************************************
$PHName = IniRead ($CurrentINIFile, "Pocket Healer Data", "Name", 0)
$PHSelectX = IniRead ($CurrentINIFile, "Pocket Healer Data", "SelectX", 0)
$PHSelectY = IniRead ($CurrentINIFile, "Pocket Healer Data", "SelectY", 0)
$PHMoraleCheckColor = IniRead ($CurrentINIFile, "Pocket Healer Data", "MoraleCheckColor", 0)
$PHMoraleCheckY = IniRead ($CurrentINIFile, "Pocket Healer Data", "MoraleCheckY", 0)
$PHMoraleSmallX = IniRead ($CurrentINIFile, "Pocket Healer Data", "MoraleSmallX", 0)
$PHMoraleBigX = IniRead ($CurrentINIFile, "Pocket Healer Data", "MoraleBigX", 0)
$PHCombatWinMsg = IniRead ($CurrentINIFile, "Pocket Healer Data", "CombatWinMsg", 0)
$PHInCombatMsg = IniRead ($CurrentINIFile, "Pocket Healer Data", "InCombatMsg", 0)
$PHCombatCheckX = IniRead ($CurrentINIFile, "Pocket Healer Data", "CombatCheckX", 0)
$PHCombatCheckY = IniRead ($CurrentINIFile, "Pocket Healer Data", "CombatCheckY", 0)
$PHCombatCheckColor = IniRead ($CurrentINIFile, "Pocket Healer Data", "CombatCheckColor", 0)
$PHCombatCheckColorN = IniRead ($CurrentINIFile, "Pocket Healer Data", "CombatCheckColorN", 0)
$PHLootMatrixUX = IniRead ($CurrentINIFile, "Pocket Healer Data", "LootMatrixUX", 0)
$PHLootMatrixUY = IniRead ($CurrentINIFile, "Pocket Healer Data", "LootMatrixUY", 0)
$PHLootMatrixLX = IniRead ($CurrentINIFile, "Pocket Healer Data", "LootMatrixLX", 0)
$PHLootMatrixLY = IniRead ($CurrentINIFile, "Pocket Healer Data", "LootMatrixLY", 0)
$PHLootBindKey = IniRead ($CurrentINIFile, "Pocket Healer Data", "LootBindKey", 0)
$PHAntiAFK_1 = IniRead ($CurrentINIFile, "Pocket Healer Data", "AntiAFK_1", 0)
$PHAntiAFK_2 = IniRead ($CurrentINIFile, "Pocket Healer Data", "AntiAFK_2", 0)
$PHAntiAFK_3 = IniRead ($CurrentINIFile, "Pocket Healer Data", "AntiAFK_3", 0)
$PHAntiAFK_4 = IniRead ($CurrentINIFile, "Pocket Healer Data", "AntiAFK_4", 0)
;****************************************************************************************************************************************************************
; [HotKey Data]
;****************************************************************************************************************************************************************
$TaleOfBattle = IniRead ($CurrentINIFile, "HotKey Data", "TaleOfBattle", 0)
$WarSpeech = IniRead ($CurrentINIFile, "HotKey Data", "WarSpeech", 0)
$RaiseTheSpirit = IniRead ($CurrentINIFile, "HotKey Data", "RaiseTheSpirit", 0)
$BolsterCourage = IniRead ($CurrentINIFile, "HotKey Data", "BolsterCourage", 0)
$TriumphantSpirit = IniRead ($CurrentINIFile, "HotKey Data", "TriumphantSpirit", 0)
$InspireFellows = IniRead ($CurrentINIFile, "HotKey Data", "InspireFellows", 0)
$ChordOfSalvation = IniRead ($CurrentINIFile, "HotKey Data", "ChordofSalvation", 0)
$BalladOfSteel = IniRead ($CurrentINIFile, "HotKey Data", "BalladOfSteel", 0)
$BalladOfVigour = IniRead ($CurrentINIFile, "HotKey Data", "BalladOfVigour", 0)
$BalladOfResonance = IniRead ($CurrentINIFile, "HotKey Data", "BalladOfResonance", 0)
$BalladOfSwiftness = IniRead ($CurrentINIFile, "HotKey Data", "BalladOfSwiftness", 0)
$BalladOfBalance = IniRead ($CurrentINIFile, "HotKey Data", "BalladOfBallance", 0)
$BalladOfTheStout = IniRead ($CurrentINIFile, "HotKey Data", "BalladOfTheStout", 0)
$BalladOfComposure = IniRead ($CurrentINIFile, "HotKey Data", "BalladOfComposure", 0)
$BalladOfWar = IniRead ($CurrentINIFile, "HotKey Data", "BalladOfWar", 0)
$PiercingCry = IniRead ($CurrentINIFile, "HotKey Data", "PiercingCry", 0)
$CallOfTheSecondAge = IniRead ($CurrentINIFile, "HotKey Data", "CallOfTheSecondAge", 0)
$SongOSoothing = IniRead ($CurrentINIFile, "HotKey Data", "SongOfSoothing", 0)
$CallOfOrome = IniRead ($CurrentINIFile, "HotKey Data", "CallOfOrome", 0)
$EchoesOfBattle = IniRead ($CurrentINIFile, "HotKey Data", "EchoesOfBattle", 0)
$HorseMount = IniRead ($CurrentINIFile, "HotKey Data", "HorseMount", 0)
$EatCookedFood = IniRead ($CurrentINIFile, "HotKey Data", "EatCookedFood", 0)
$EatTrailFood = IniRead ($CurrentINIFile, "HotKey Data", "EatTrailFood", 0)
$EatFortifyFood = IniRead ($CurrentINIFile, "HotKey Data", "EatFortifyFood", 0)
$CallSoldier = IniRead ($CurrentINIFile, "HotKey Data", "CallSoldier", 0)
$DirectSoldier = IniRead ($CurrentINIFile, "HotKey Data", "DirectSoldier", 0)
$AssistCommander = IniRead ($CurrentINIFile, "HotKey Data", "AssistCommander", 0)
$SilvanShadows = IniRead ($CurrentINIFile, "HotKey Data", "SilvanShadows", 0)
$ChangeTheorbo = IniRead ($CurrentINIFile, "HotKey Data", "ChangeTheorbo", 0)
$ChangeDrums = IniRead ($CurrentINIFile, "HotKey Data", "ChangeDrums", 0)
;****************************************************************************************************************************************************************
; [Spell Induction And Cooldown Data]
;****************************************************************************************************************************************************************
$RaiseTheSpirit_IT = IniRead ($CurrentINIFile, "Spell Induction And Cooldown Data", "RaiseTheSpirit_IT", 0)
$ChordOfSalvation_IT = IniRead ($CurrentINIFile, "Spell Induction And Cooldown Data", "ChordOfSalvation_IT", 0)
$BolsterCourage_IT = IniRead ($CurrentINIFile, "Spell Induction And Cooldown Data", "BolsterCourage_IT", 0)
$TriumphantSpirit_IT = IniRead ($CurrentINIFile, "Spell Induction And Cooldown Data", "TriumphantSpirit_IT", 0)
$InspireFellows_IT = IniRead ($CurrentINIFile, "Spell Induction And Cooldown Data", "InspireFellows_IT", 0)
$RaiseTheSpirit_CD = IniRead ($CurrentINIFile, "Spell Induction And Cooldown Data", "RaiseTheSpirit_CD", 0)
$ChordOfSalvation_CD = IniRead ($CurrentINIFile, "Spell Induction And Cooldown Data", "ChordOfSalvation_CD", 0)
$TriumphantSpirit_CD = IniRead ($CurrentINIFile, "Spell Induction And Cooldown Data", "TriumphantSpirit_CD", 0)
$InspireFellows_CD = IniRead ($CurrentINIFile, "Spell Induction And Cooldown Data", "InspireFellows_CD", 0)
$CombatSleepTime = IniRead ($CurrentINIFile, "Spell Induction And Cooldown Data", "CombatSleepTime", 0)
;****************************************************************************************************************************************************************
; [Fellowship Data]
;****************************************************************************************************************************************************************
$FSManueverX = IniRead ($CurrentINIFile, "Fellowship Data", "FSManueverX", 0)
$FSManueverY = IniRead ($CurrentINIFile, "Fellowship Data", "FSManueverY", 0)
$FSManueverColor = IniRead ($CurrentINIFile, "Fellowship Data", "FSManueverColor", 0)
$Check4PinwheelX = IniRead ($CurrentINIFile, "Fellowship Data", "Check4PinwheelX", 0)
$Check4PinwheelY = IniRead ($CurrentINIFile, "Fellowship Data", "Check4PinwheelY", 0)
$Check4PinwheelColor = IniRead ($CurrentINIFile, "Fellowship Data", "Check4PinwheelColor", 0)
$Check4PortX = IniRead ($CurrentINIFile, "Fellowship Data", "Check4PortX", 0)
$Check4PortY = IniRead ($CurrentINIFile, "Fellowship Data", "Check4PortY", 0)
$Check4PortColor = IniRead ($CurrentINIFile, "Fellowship Data", "Check4portColor", 0)
$ClickYes4PortX = IniRead ($CurrentINIFile, "Fellowship Data", "ClickYes4PortX", 0)
$ClickYes4PortY = IniRead ($CurrentINIFile, "Fellowship Data", "ClickYes4PortY", 0)
$AcceptTradeX = IniRead ($CurrentINIFile, "Fellowship Data", "AcceptTradeX", 0)
$AcceptTradeY = IniRead ($CurrentINIFile, "Fellowship Data", "AcceptTradeY", 0)
$Check4SkirmX = IniRead ($CurrentINIFile, "Fellowship Data", "Check4SkirmX", 0)
$Check4SkirmY = IniRead ($CurrentINIFile, "Fellowship Data", "Check4SkirmY", 0)
$Check4SkirmColor = IniRead ($CurrentINIFile, "Fellowship Data", "Check4SkirmColor", 0)
$Click4SkirmX = IniRead ($CurrentINIFile, "Fellowship Data", "Click4SkirmX", 0)
$Click4SkirmY = IniRead ($CurrentINIFile, "Fellowship Data", "Click4SkirmY", 0)
;****************************************************************************************************************************************************************
; [Automated Responses]
;****************************************************************************************************************************************************************
$ARHealingOn = IniRead ($CurrentINIFile, "Automated Responses", "ARHealingOn", 0)
$ARHealingOff = IniRead ($CurrentINIFile, "Automated Responses", "ARHealingOff", 0)
$ARFollow = IniRead ($CurrentINIFile, "Automated Responses", "ARFollow", 0)
$ARTrade = IniRead ($CurrentINIFile, "Automated Responses", "ARTrade", 0)
$ARCombatEnd = IniRead ($CurrentINIFile, "Automated Responses", "ARCombatEnd", 0)
$AREatCooked = IniRead ($CurrentINIFile, "Automated Responses", "AREatCooked", 0)
$AREatTrail = IniRead ($CurrentINIFile, "Automated Responses", "AREatTrail", 0)
$AREatFortify = IniRead ($CurrentINIFile, "Automated Responses", "AREatFortify", 0)
$ARBuffing = IniRead ($CurrentINIFile, "Automated Responses", "ARBuffing", 0)
$ARWarSpeechOn = IniRead ($CurrentINIFile, "Automated Responses", "ARWarSpeechOn", 0)
$ARWarSpeechOff = IniRead ($CurrentINIFile, "Automated Responses", "ARWarSpeechOff", 0)
$ARLooting = IniRead ($CurrentINIFile, "Automated Responses", "ARLooting", 0)
$ARAssisting = IniRead ($CurrentINIFile, "Automated Responses", "ARAssisting", 0)
$ARMount = IniRead ($CurrentINIFile, "Automated Responses", "ARMount", 0)
$ARCallSoldier = IniRead ($CurrentINIFile, "Automated Responses", "ARCallSoldier", 0)
$ARPrepare4Battle = IniRead ($CurrentINIFile, "Automated Responses", "ARPrepare4Battle", 0)
$ARExitScript = IniRead ($CurrentINIFile, "Automated Responses", "ARExitScript", 0)
$ARAntiAFKOn = IniRead ($CurrentINIFile, "Automated Responses", "ARAntiAFKOn", 0)
$ARAntiAFKOff = IniRead ($CurrentINIFile, "Automated Responses", "ARAntiAFKOff", 0)
;****************************************************************************************************************************************************************
; [Chat Log Commands]
;****************************************************************************************************************************************************************
$FCBuffUp = IniRead ($CurrentINIFile, "Chat Log Commands", "BuffUp", 0)
$FCCombatAssist = IniRead ($CurrentINIFile, "Chat Log Commands", "CombatAssist", 0)
$FCWarSpeechOn = IniRead ($CurrentINIFile, "Chat Log Commands", "WarSpeechOn", 0)
$FCWarSpeechOff = IniRead ($CurrentINIFile, "Chat Log Commands", "WarSpeechOff", 0)
$FCAcceptTrade = IniRead ($CurrentINIFile, "Chat Log Commands", "AcceptTrade", 0)
$FCLootCorpse = IniRead ($CurrentINIFile, "Chat Log Commands", "LootCorpse", 0)
$FCSkirmishAssist = IniRead ($CurrentINIFile, "Chat Log Commands", "SkirmishAssist", 0)
$FCTurnOnHealing = IniRead ($CurrentINIFile, "Chat Log Commands", "TurnOnHealing", 0)
$FCTurnOffHealing = IniRead ($CurrentINIFile, "Chat Log Commands", "TurnOffHealing", 0)
$FCEatCookedFood = IniRead ($CurrentINIFile, "Chat Log Commands", "EatCookedFood", 0)
$FCEatTrailFood = IniRead ($CurrentINIFile, "Chat Log Commands", "EatTrailFood", 0)
$FCEatFortifyFood = IniRead ($CurrentINIFile, "Chat Log Commands", "EatFortifyFood", 0)
$FCMountUnmount = IniRead ($CurrentINIFile, "Chat Log Commands", "MountUnmount", 0)
$FCCallSoldier = IniRead ($CurrentINIFile, "Chat Log Commands", "CallSoldier", 0)
$FCFollowMe = IniRead ($CurrentINIFile, "Chat Log Commands", "FollowMe", 0)
$FCPrepareforSkirmish = IniRead ($CurrentINIFile, "Chat Log Commands", "PrepareforSkirmish", 0)
$FCExitScript = IniRead ($CurrentINIFile, "Chat Log Commands", "ExitScript", 0)
$FCAntiAFKOn = IniRead ($CurrentINIFile, "Chat Log Commands", "AntiAFKOn", 0)
$FCAntiAFKOff = IniRead ($CurrentINIFile, "Chat Log Commands", "AntiAFKOff", 0)
;****************************************************************************************************************************************************************
; [Default Toggle Values]
;****************************************************************************************************************************************************************
$Anti_AFKSelection = 1
$Anti_AFK_Wait = 5000
$AntiAFKOnOff = 1 ; 0 Indicates Off, while 1 Indicates On
$InCombat_YN = 0 ; 0 Indicates No, while 1 Indicates Yes
$HealthCheck = 0 ; 0 Indicates Full Health, while 6 Indicates needing largest Heal
$HealToggle = 0 ; 0 Indicates Off, while 1 Indicates On
$WarSpeechOnOff = 0 ; 0 Indicates Off, while 1 Indicates On
$AntiAFKOnOff = 0 ; 0 Indicates Off, while 1 Indicates On
$RaiseTheSpirit_YN = 1 ; 0 Indicates No, while 1 Indicates Yes
$TriumphantSpirit_YN = 1 ; 0 Indicates No, while 1 Indicates Yes
$InspireFellows_YN = 1 ; 0 Indicates No, while 1 Indicates Yes
$ChordOfSalvation_YN = 1 ; 0 Indicates No, while 1 Indicates Yes
; WHEW Why I do declare, that's a lot of !@#$%^&* to declare! Hopefully, all this organization will make it easier to find and change !@#$%^&* if I need to, otherwise,
; what a monumental pain in the freaking !@#$%^&*! I have to admit though, it looks nicer than my previous incarnation.
;****************************************************************************************************************************************************************
;****************************************************************************************************************************************************************
;****************************************************************************************************************************************************************
; ====================================
; == Begin Preliminary Script Setup ==
; ====================================
Opt("WinWaitDelay", 0)
Opt("SendKeyDownDelay", 15)
$LogLineInfo = "[Fellowship] YOURCOMMANDERHERE: "
;$LogLineInfo = "["&$LoggedChatTab&"]"&$CCCommanderName&": "
Sleep(1000)
$pid = WinGetProcess($GameName)
WinActivate ($GameName)
WinMove ($GameName, "", $WinPOSx, $WinPOSy, $WinSizeX, $WinSizeY, 0)
If $pid = -1 Then
MsgBox(0x40000, "Error", "LOTRO Process not found. Please Start LOTRO. Exiting")
Exit
EndIf
FileDelete ($LoggedChatTab&"_*.txt")
Sleep (0500)
MouseMove ($LoggedTabX, $LoggedTabY, 0)
MouseClick("left", $LoggedTabX, $LoggedTabY, 3, 2)
Sleep (0500)
Send ("{ENTER}/f Entering Fellowship Chat.{ENTER}")
Sleep (0500)
Send ("{ENTER}/Chatlog ON{ENTER}")
Sleep (0500)
Send ("{ENTER}/F Previous log deleted, Fellowship Tab Selected, Current Session logged.{ENTER}")
Sleep (0500)
;$CurrentLogFile = $PathToLog_INI&$LoggedChatTab&"_"&@YEAR&@MON&@MDAY&"_1.txt"
$CurrentLogFile = $LoggedChatTab&"_"&@YEAR&@MON&@MDAY&"_1.txt"
GetLastLine()
PerformCommandChecks()
;****************************************************************************************************************************************************************
;****************************************************************************************************************************************************************
;****************************************************************************************************************************************************************
; ==================================
; == Begin Primary Scripting Loop ==
; ==================================
While 1 = 1
GetLastLine()
PerformCommandChecks()
Select
Case $HealToggle = 0
GetLastLine()
Check4Pinwheel()
PerformCommandChecks()
Check4Pinwheel()
Case $HealToggle = 1
GetLastLine()
Check4Pinwheel()
PerformHealing()
PerformCommandChecks()
Check4Pinwheel()
Case Else
EndSelect
WEnd
;****************************************************************************************************************************************************************
;****************************************************************************************************************************************************************
;****************************************************************************************************************************************************************
; ================================
; == Begin Function Definitions ==
; ================================
;*************************************************************************************************************
; Anti_AFKSelection() Chooses an Anti-AFK function to perform while in game. These options are chosen at **
; random using the AntiAFKSelect() function **
;*************************************************************************************************************
Func Anti_AFKSelection()
If $Anti_AFKSelection = 1 Then $Anti_AFK_Response = $PHAntiAFK_1
If $Anti_AFKSelection = 2 Then $Anti_AFK_Response = $PHAntiAFK_2
If $Anti_AFKSelection = 3 Then $Anti_AFK_Response = $PHAntiAFK_3
If $Anti_AFKSelection = 4 Then $Anti_AFK_Response = $PHAntiAFK_4
EndFunc
;*************************************************************************************************************
; AntiAFKSelect() Checks to see if the toggle is on, if it is, it randomly sleeps and randomly chooses an **
; action to perform while the toggle is on. **
;*************************************************************************************************************
Func AntiAFKSelect()
Select
Case $AntiAFKOnOff = 0
Case $AntiAFKOnOff = 1
Select
Case $Anti_AFK_HasFired_0_1 = 0
;$Anti_AFKSelection = (Random(1,4)*1)
;If $Anti_AFKSelection = 1 Then Send ($PHAntiAFK_1)
;If $Anti_AFKSelection = 2 Then Send ($PHAntiAFK_2)
;If $Anti_AFKSelection = 3 Then Send ($PHAntiAFK_3)
;If $Anti_AFKSelection = 4 Then Send ($PHAntiAFK_4)
Send ($PHAntiAFK_2)
$Anti_AFK_TI = TimerInit()
$Anti_AFK_HasFired_0_1 = 1
Case $Anti_AFK_HasFired_0_1 = 1
$Anti_AFK_Wait = 60000
$Anti_AFK_DF = TimerDiff($Anti_AFK_TI)
If $Anti_AFK_DF >= $Anti_AFK_Wait Then
$Anti_AFK_HasFired_0_1 = 0
EndIf
Case Else
EndSelect
Case Else
EndSelect
EndFunc
;*************************************************************************************************************
; AntiAFKToggle() Checks for a specified text string to know if we need to change the $AntiAFKOnOff from 0 **
; to 1 and back again. **
;*************************************************************************************************************
Func AntiAFKToggle_On()
If $LastLine = $LogLineInfo&$FCAntiAFKOn Then
$AntiAFKOnOff = 1
Send ($ARAntiAFKOn)
EndIf
EndFunc
Func AntiAFKToggle_Off()
If $LastLine = $LogLineInfo&$FCAntiAFKOff Then
$AntiAFKOnOff = 0
Send ($ARAntiAFKOff)
EndIf
EndFunc
;*************************************************************************************************************
; PerformCommandChecks() Runs through the log to check for any Fellowship chat commands that may have been **
; sent, and it also check any and all of the automatic PixelGetColor functions **
;*************************************************************************************************************
Func PerformCommandChecks()
BuffUp()
AntiAFKToggle_On()
AntiAFKToggle_Off()
AntiAFKSelect()
WarSpeechOn()
WarSpeechOff()
Check4Port()
Check4Pinwheel()
Exit_Script()
LootMob()
EatCookedMeal()
EatTrailMeal()
EatFortifyMeal()
Mount_Unmount()
CheckHealToggle_On()
CheckHealToggle_Off()
Check4Port()
Check4Pinwheel()
CombatAssist()
Prepare_Battle()
Ask_Follow()
Call_Soldier()
ClickAssist()
Check4Skirm()
AcceptTrade()
Check4Port()
Check4Pinwheel()
EndFunc
;*************************************************************************************************************
; Check4Combat() Performs a GetPixelColor check at a specific area of the screen, if the arguement is sated **
; then it changes the $InCombat_YN toggle from 0 to 1 and vise versa **
;*************************************************************************************************************
Func Check4Combat()
If PixelGetColor ($PHCombatCheckX, $PHCombatCheckY) <> $PHCombatCheckColor Then
; $InCombat_YN = 1
;Else
$InCombat_YN = 0
EndIf
EndFunc
;*************************************************************************************************************
; CombatAssist() Checks for a specified text string in the log and then commits to attacking. Right now it **
; does not break combat in favor of healing, but it will cease combat if combat stops. **
;*************************************************************************************************************
Func CombatAssist()
If $LastLine = $LogLineInfo&$FCCombatAssist Then
$InCombat_YN = 1
Send ($AssistCommander)
ChangeDrums()
Sleep(500)
DirectSoldier()
Sleep(1000)
Send("{NUMPAD0}")
Check4Combat()
EchoesOfBattle()
CallOfOrome()
CallOfTheSecondAge()
PiercingCry()
BalladOfSteel()
BalladOfVigour()
BalladOfResonance()
BalladOfSwiftness()
BalladOfBalance()
BalladOfTheStout()
Check4Combat()
Target_Follow()
ChangeThoerbo()
;Send ("{ENTER}/F It's Dead Jim!{ENTER}")
EndIf
;If $InCombat_YN = 0 Then
; Send ($ARCombatEnd)
;EndIf
EndFunc
;*************************************************************************************************************
; Combat Spells These functions will call upon each of the combat abilities your PH has, and check to see if**
; are still in combat, if you are not, it will stop casting **
;*************************************************************************************************************
Func EchoesOfBattle()
Check4Combat()
If $InCombat_YN = 0 Then Return
If $InCombat_YN = 1 Then
Send ($EchoesOfBattle)
Sleep($CombatSleepTime)
PerformHealing()
Check4Combat()
EndIf
EndFunc
Func CallOfOrome()
Check4Combat()
If $InCombat_YN = 0 Then Return
If $InCombat_YN = 1 And $WarSpeechOnOff = 1 Then
Send ($CallOfOrome)
Sleep($CombatSleepTime)
PerformHealing()
Check4Combat()
EndIf
EndFunc
Func CallOfTheSecondAge()
Check4Combat()
If $InCombat_YN = 0 Then Return
If $InCombat_YN = 1 And $WarSpeechOnOff = 1 Then
Send ($CallOfTheSecondAge)
Sleep($CombatSleepTime)
PerformHealing()
Check4Combat()
EndIf
EndFunc
Func PiercingCry()
Check4Combat()
If $InCombat_YN = 0 Then Return
If $InCombat_YN = 1 Then
Send ($PiercingCry)
Sleep($CombatSleepTime)
PerformHealing()
Check4Combat()
EndIf
EndFunc
Func BalladOfSteel()
Check4Combat()
If $InCombat_YN = 0 Then Return
If $InCombat_YN = 1 Then
Send ($BalladOfSteel)
Sleep($CombatSleepTime)
PerformHealing()
Check4Combat()
EndIf
EndFunc
Func BalladOfVigour()
Check4Combat()
If $InCombat_YN = 0 Then Return
If $InCombat_YN = 1 Then
Send ($BalladOfVigour)
Sleep($CombatSleepTime)
PerformHealing()
Check4Combat()
EndIf
EndFunc
Func BalladOfResonance()
Check4Combat()
If $InCombat_YN = 0 Then Return
If $InCombat_YN = 1 Then
Send ($BalladOfResonance)
Sleep($CombatSleepTime)
PerformHealing()
Check4Combat()
EndIf
EndFunc
Func BalladOfSwiftness()
Check4Combat()
If $InCombat_YN = 0 Then Return
If $InCombat_YN = 1 Then
Send ($BalladOfSwiftness)
Sleep($CombatSleepTime)
PerformHealing()
Check4Combat()
EndIf
EndFunc
Func BalladOfBalance()
Check4Combat()
If $InCombat_YN = 0 Then Return
If $InCombat_YN = 1 Then
Send ($BalladOfBalance)
Sleep($CombatSleepTime)
PerformHealing()
Check4Combat()
EndIf
EndFunc
Func BalladOfTheStout()
Check4Combat()
If $InCombat_YN = 0 Then Return
If $InCombat_YN = 1 Then
Send ($BalladOfTheStout)
Sleep($CombatSleepTime)
PerformHealing()
Check4Combat()
EndIf
EndFunc
;*************************************************************************************************************
; CheckFullHealth() Performs a GetPixelColor check at a specific area of the screen, if the if the arguement**
; is false, then it calls upon AssessHealth() so we can send an appropriate heal **
; *****Not used right now, placing the PixelGetColor as the Case Select functions better **
;*************************************************************************************************************
Func CheckFullHealth()
If PixelGetColor ($CCMoraleFullX, $CCMoraleCheckY) = $CCMoraleCheckColor Then
$HealthCheck = 0
Else
AssessHealth()
EndIf
EndFunc
;*************************************************************************************************************
; AssessHealth() Performs a PixelGetColor check at several points on the Moral Bar, if the any of the **
; arguements come back true, then it assings the appropriate flag to $HealthCheck so we can send the right **
; healing spell **
; *****Not used right now, placing the PixelGetColor as the Case Select functions better **
;*************************************************************************************************************
Func AssessHealth()
If PixelGetColor ($CCMoraleSmallX,$CCMoraleCheckY)<>$CCMoraleCheckColor Then
$CheckHealth = 1
ElseIf PixelGetColor ($CCMoraleMedX,$CCMoraleCheckY)<>$CCMoraleCheckColor Then
$CheckHealth = 2
ElseIf PixelGetColor ($CCMoraleBigX,$CCMoraleCheckY)<>$CCMoraleCheckColor Then
$CheckHealth = 3
ElseIf PixelGetColor ($CCMoraleSmallX,$CCMoraleCheckY)<>$CCMoraleCheckColor And PixelGetColor ($PHMoraleSmallX, $PHMoraleCheckY) <> $PHMoraleCheckColor Then
$CheckHealth = 4
ElseIf PixelGetColor ($CCMoraleBigX,$CCMoraleCheckY)<>$CCMoraleCheckColor And PixelGetColor ($PHMoraleBigX, $PHMoraleCheckY) <> $PHMoraleCheckColor Then
$CheckHealth = 5
EndIf
EndFunc
;*************************************************************************************************************
; PerformHealing() Uses the Flag settings from CheckFullHealth() and AssessHealth() to choose which healing **
; spell should be sent at any given time. The higher the flag value, the heavier the healing spell **
;*************************************************************************************************************
Func PerformHealing()
Select
Case PixelGetColor ($CCMoraleSmallX,$CCMoraleCheckY)<>$CCMoraleCheckColor
Target()
BolsterCourage_Cast()
Case PixelGetColor ($CCMoraleMedX,$CCMoraleCheckY)<>$CCMoraleCheckColor
Target()
RaiseTheSpirit_Cast()
Case PixelGetColor ($CCMoraleBigX,$CCMoraleCheckY)<>$CCMoraleCheckColor
Target()
ChordofSalvation_Cast()
Case PixelGetColor ($CCMoraleSmallX,$CCMoraleCheckY)<>$CCMoraleCheckColor And PixelGetColor ($PHMoraleSmallX, $PHMoraleCheckY) <> $PHMoraleCheckColor
Target()
InspireFellows_Cast()
Case PixelGetColor ($CCMoraleBigX,$CCMoraleCheckY)<>$CCMoraleCheckColor And PixelGetColor ($PHMoraleBigX, $PHMoraleCheckY) <> $PHMoraleCheckColor
Target()
TriumphantSpirit_Cast()
Case Else
EndSelect
EndFunc
;*************************************************************************************************************
; Healing Functions Below are all the healing spells which will fire by hotkey and sleep for the duration of**
; the Induction timers. **
;*************************************************************************************************************
Func BolsterCourage_Cast()
Send ($BolsterCourage)
Sleep($BolsterCourage_IT)
EndFunc
Func InspireFellows_Cast()
Send ($InspireFellows)
Sleep($InspireFellows_IT)
EndFunc
Func RaiseTheSpirit_Cast()
Send ($RaiseTheSpirit)
Sleep($RaiseTheSpirit_IT)
EndFunc
Func ChordofSalvation_Cast()
Send ($ChordOfSalvation)
Sleep($ChordOfSalvation_IT)
EndFunc
Func TriumphantSpirit_Cast()
Send ($TriumphantSpirit)
Sleep($TriumphantSpirit_IT)
EndFunc
;*************************************************************************************************************
; GetLastLine() Parses the Chat Log and records the last line of the log in $Line. It also sets a "place" **
; holder so the entire log doesn't have to be parsed, it will simply start from the last point recorded **
;*************************************************************************************************************
Func GetLastLine()
While 1
$line = FileReadLine($CurrentLogFile, $CurrentLine)
If @error = -1 Then ExitLoop
$CurrentLine = $CurrentLine + 1
WEnd
$LastLineNumber = $CurrentLine - 1
$LastLine = FileReadLine($CurrentLogFile, $LastLineNumber)
EndFunc
;*************************************************************************************************************
; Exit_Script() Checks for a specfied text string and if the arguement is satisfied, it will end the script **
; from running period. This does not pause features, IT KILLS THE APPLICATION RUNNING IN THE SYSTEM TRAY!! **
; You must "re-run" the script if you would like to turn it on again. **
;*************************************************************************************************************
Func Exit_Script()
If $LastLine = $LogLineInfo&$FCExitScript Then
Send($ARExitScript)
Sleep(500)
Exit
EndIf
EndFunc
;*************************************************************************************************************
; Prepare_Battle() Checks for a specified text string and beings preperation for battle in a Skirmish **
; instance it should ONLY be used in a Skirmish, although it can be used outside, it simply won't call your **
; Skirmish Soldier **
;*************************************************************************************************************
Func Prepare_Battle()
If $LastLine = $LogLineInfo&$FCPrepareforSkirmish Then
Send($CallSoldier)
Sleep(0500)
Send($EatCookedFood)
Sleep(0500)
Target_Follow()
Sleep(2000)
Send($ARPrepare4Battle)
EndIf
EndFunc
;*************************************************************************************************************
; Target() Automatically Targets your commanding character, this function does not use a log check or **
; keyboard command, it is called from other functions or the script itself **
;*************************************************************************************************************
Func Target()
MouseMove ($CCCharClickX,$CCCharClickY,0)
MouseClick("left", $CCCharClickX,$CCCharClickY, 2, 0)
EndFunc
;*************************************************************************************************************
; Target_Follow() Automatically Targets your commanding character and follows them, this function does not **
; use a log check or keyboard command, it is called from other functions or the script itself **
;*************************************************************************************************************
Func Target_Follow()
Target()
Sleep(500)
Send("{ENTER}/follow{ENTER}")
EndFunc
;*************************************************************************************************************
; Ask_Follow() Checks for a specified text string and sets the bot to follow the Commanding Character **
;*************************************************************************************************************
Func Ask_Follow()
If $LastLine = $LogLineInfo&$FCFollowMe Then
Target_Follow()
Sleep(0500)
Send($ARFollow)
EndIf
EndFunc
;*************************************************************************************************************
; Call_Soldier() Checks for a specified text string and sends the keyboard shortcut to call your skirmish **
; Soldier. **
;*************************************************************************************************************
Func Call_Soldier()
If $LastLine = $LogLineInfo&$FCCallSoldier Then
Send($CallSoldier)
Sleep(0500)
Send($ARCallSoldier)
EndIf
EndFunc
;*************************************************************************************************************
; Mount_Unmount() Checks for a specified text string and sends the keyboard shortcut to mount or unmount **
; your horse. upon mounting, it will then target your commanding character and /follow them **
;*************************************************************************************************************
Func Mount_Unmount()
If $LastLine = $LogLineInfo&$FCMountUnmount Then
Send($HorseMount)
Sleep(5000)
Target_Follow()
Sleep(0500)
Send($ARMount)
EndIf
EndFunc
;*************************************************************************************************************
; Eat_Meal() Checks for specified text string and sends the keyboard shortcut to eat food that has been **
; quickslotted @ that shortcut location **
;*************************************************************************************************************
Func EatCookedMeal()
If $LastLine = $LogLineInfo&$FCEatCookedFood Then
Send($EatCookedFood)
Sleep(2505)
Send($AREatCooked)
EndIf
EndFunc
;*************************************************************************************************************
; Eat_Meal() Checks for specified text string and sends the keyboard shortcut to eat food that has been **
; quickslotted @ that shortcut location **
;*************************************************************************************************************
Func EatTrailMeal()
If $LastLine = $LogLineInfo&$FCEatTrailFood Then
Send($EatTrailFood)
Sleep(2505)
Send($AREatTrail)
EndIf
EndFunc
;*************************************************************************************************************
; Eat_Meal() Checks for specified text string and sends the keyboard shortcut to eat food that has been **
; quickslotted @ that shortcut location **
;*************************************************************************************************************
Func EatFortifyMeal()
If $LastLine = $LogLineInfo&$FCEatFortifyFood Then
Send($EatFortifyFood)
Sleep(2505)
Send($AREatFortify)
EndIf
EndFunc
;*************************************************************************************************************
; CheckHealToggle_On() Checks for specified text string and changes the value of $HealToggle from 0 to 1 **
; if it see it. If it sees this change in the Big Loop, then it will allow the Healing Check and Continue**
; Healing Loops to proceed. **
;*************************************************************************************************************
Func CheckHealToggle_On()
If $LastLine = $LogLineInfo&$FCTurnOnHealing Then
$HealToggle = 1
Send($ARHealingOn)
EndIf
EndFunc
;*************************************************************************************************************
; CheckHealToggle_Off() Checks for specified text string and changes the value of $HealToggle from 1 to 0 if it
; see it. If it sees this change in the Big Loop, it will stop all healing.
;*************************************************************************************************************
Func CheckHealToggle_Off()
If $LastLine = $LogLineInfo&$FCTurnOffHealing Then
$HealToggle = 0
Send($ARHealingOff)
EndIf
EndFunc
;*************************************************************************************************************
; ClickAssist() Checks for a specified text string and then orders the Pocket Healer to command her Soldier **
; to Assist you in combat. Then it returns to following you and healing you. **
;*************************************************************************************************************
Func DirectSoldier()
Send ($AssistCommander)
Send ($DirectSoldier)
Sleep(500)
EndFunc
;*************************************************************************************************************
; ClickAssist() Checks for a specified text string and then orders the Pocket Healer to command her Soldier **
; to Assist you in combat. Then it returns to following you and healing you. **
;*************************************************************************************************************
Func ClickAssist()
If $LastLine = $LogLineInfo&$FCSkirmishAssist Then
DirectSoldier()
Sleep(500)
Target_Follow()
Send ($ARAssisting)
EndIf
EndFunc
;*************************************************************************************************************
; FIX THIS FUNCTION, MAKE IT WORK PROPERLY!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!**
;*************************************************************************************************************
Func Check4Pinwheel()
If $LastLine = "["&$LoggedChatTab&"] "&$CommanderName&": fm" Then
MouseMove (880,502,0)
Sleep (500)
Mouseclick ("left", 880,502, 2, 0)
MouseClick ("left", 0,0, 2, 2)
Send ("{ENTER}/f Done{ENTER}")
Target_Follow()
EndIf
EndFunc
;*************************************************************************************************************
; While assisting in combat, check the coordinates of the screen that the Fellowship Manuever pops up, if we**
; see a red color, then click on it automatically **
;*************************************************************************************************************
Func CheckForManuever()
If PixelGetColor ($FSManueverX, $FSManueverY) = $FSManueverColor Then
MouseClick ("left", $FSManueverX, $FSManueverY, 2, 2)
EndIf
EndFunc
;*************************************************************************************************************
; LootMob() checks for a specified text string and begins to make the Pocket Healer look downwards, Then it **
; Will move the mouse to the following coordinates and send an autoloot command key **
; *** YOU MUST BIND YOUR AUTOLOOT FUNCTION TO THE PERIOD [.] KEY IN ORDER FOR THIS TO WORK **
; *** YOU MAY USE ANOTHER KEY, BUT YOU WILL HAVE TO CHANGE EACH OF THE SEND COMMANDS TO YOUR HOTKEY **
;*************************************************************************************************************
Func LootMob()
If $LastLine = $LogLineInfo&$FCLootCorpse Then
Opt ("SendKeyDownDelay",3000)
Send("{NUMPAD8}")
Opt ("SendKeyDownDelay", 15)
For $X = $PHLootMatrixUX To $PHLootMatrixUY Step -25
For $Y = $PHLootMatrixLX To $PHLootMatrixLY Step 25
MouseMove ($X, $Y, 0)
Send ($PHLootBindKey)
Next
Next
;Send ("{ENTER}/F Get Da Paper G!{ENTER}")
Send("{NUMPAD0}")
Send ($ARLooting)
Target_Follow()
EndIf
EndFunc
;*************************************************************************************************************
; Check4Port() Checks to see if the "Would you like to Port to This location" pane is up, and if it is, it **
; will automatically click on "YES" so that you don't have to **
;*************************************************************************************************************
Func Check4Port()
If PixelGetColor ($Check4PortX, $Check4PortY) = $Check4PortColor Then
MouseMove ($ClickYes4PortX, $ClickYes4PortY, 0)
MouseClick ("left", $ClickYes4PortX, $ClickYes4PortY, 2, 2)
EndIf
EndFunc
;*************************************************************************************************************
; Check4Skirm() Checks to see if a Join Skirmish pane is open and will automatically accept it and travel **
;*************************************************************************************************************
Func Check4Skirm()
If PixelGetColor ($Check4SkirmX, $Check4SkirmY) = $Check4SkirmColor Then
MouseMove ($Click4SkirmX, $Click4SkirmY, 0)
MouseClick("left", $Click4SkirmX, $Click4SkirmY, 2, 0)
EndIf
EndFunc
;*************************************************************************************************************
; AcceptTrade() Checks for a specified text string and clicks in the corrisponding spot to accept a trade **
;*************************************************************************************************************
Func AcceptTrade()
If $LastLine = $LogLineInfo&$FCAcceptTrade Then
MouseClick ("left", $AcceptTradeX, $AcceptTradeY, 2, 0)
Sleep(500)
Send ("{NUMPAD0}")
Sleep(500)
Send ($ARTrade)
EndIf
EndFunc
;*************************************************************************************************************
; BuffUp() Checks for a specified text string and sends the hotkey for Tale of Battle **
;*************************************************************************************************************
Func BuffUp()
If $LastLine = $LogLineInfo&$FCBuffUp Then
Send ($TaleOfBattle)
Sleep(500)
Send ($ARBuffing)
Sleep (500)
EndIf
EndFunc
;*************************************************************************************************************
; WarSpeechOn() Checks for a specified text string and sends the hotkey for War Speech. It will also turn **
; it off if called upon again. **
;*************************************************************************************************************
Func WarSpeechOn()
If $LastLine = $LogLineInfo&$FCWarSpeechOn Then
Send ($WarSpeech)
$WarSpeechOnOff = 1
Sleep(500)
Send ($ARWarSpeechOn)
Sleep (500)
EndIf
EndFunc
;*************************************************************************************************************
; WarSpeechOff() Checks for a specified text string and sends the hotkey for War Speech. It will also turn **
; it off if called upon again. **
;*************************************************************************************************************
Func WarSpeechOff()
If $LastLine = $LogLineInfo&$FCWarSpeechOff Then
Send ($WarSpeech)
$WarSpeechOnOff = 0
Sleep(500)
Send ($ARWarSpeechOff)
Sleep (500)
EndIf
EndFunc
;*************************************************************************************************************
; ChangeThoerbo() Sends the Hotkey for your Thoerbo to for healing, it is called upon from another Function **
;*************************************************************************************************************
Func ChangeThoerbo()
Send ($ChangeTheorbo)
Sleep(500)
EndFunc
;*************************************************************************************************************
; ChangeDrums() Sends the Hotkey for your Drums to for Combat, it is called upon from another Function **
;*************************************************************************************************************
Func ChangeDrums()
Send ($ChangeDrums)
Sleep(500)
EndFunc