You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
147 lines
3.5 KiB
147 lines
3.5 KiB
<?xml version="1.0" encoding="iso-8859-1"?>
|
|
<!DOCTYPE muclient>
|
|
<!-- Saved on Thursday, December 26, 2019, 8:20 AM -->
|
|
<!-- MuClient version 5.07-pre -->
|
|
|
|
<muclient>
|
|
<plugin
|
|
name="SlotStats"
|
|
author="Crowley"
|
|
id="8df191366dbc56f8e3ec6c1c"
|
|
language="Lua"
|
|
purpose="Displays stats for playing Slots"
|
|
save_state="y"
|
|
date_written="2019-12-26 08:18:35"
|
|
requires="4.80"
|
|
version="1.1"
|
|
>
|
|
|
|
</plugin>
|
|
|
|
|
|
<!-- Get our standard constants -->
|
|
|
|
<include name="constants.lua"/>
|
|
|
|
<!-- Triggers -->
|
|
|
|
<triggers>
|
|
<trigger
|
|
enabled="y"
|
|
group="Slots"
|
|
match="^You put ([\d,]+) coins into the machine and spin!$"
|
|
regexp="y"
|
|
script="slotStart"
|
|
sequence="100"
|
|
>
|
|
</trigger>
|
|
<trigger
|
|
group="Slots"
|
|
match="^Congratulations! You win ([\d,]+) gold coins!$"
|
|
name="slotWin"
|
|
regexp="y"
|
|
script="slotsWin"
|
|
sequence="100"
|
|
>
|
|
</trigger>
|
|
<trigger
|
|
group="Slots"
|
|
match="^Sorry, you're not a winner\. Try again soon!$"
|
|
name="noWin"
|
|
regexp="y"
|
|
script="noPay"
|
|
sequence="100"
|
|
>
|
|
</trigger>
|
|
</triggers>
|
|
|
|
<!-- Aliases -->
|
|
|
|
<aliases>
|
|
<alias
|
|
match="slot(?:s|S)tats"
|
|
enabled="y"
|
|
regexp="y"
|
|
group="Slots"
|
|
script="showStats"
|
|
sequence="100"
|
|
>
|
|
</alias>
|
|
</aliases>
|
|
|
|
<!-- Script -->
|
|
<script>
|
|
<![CDATA[
|
|
require 'commas'
|
|
|
|
function OnPluginInstall()
|
|
if not GetVariable("slotTries") then
|
|
SetVariable("slotTries", 0)
|
|
end
|
|
|
|
if not GetVariable("coinsSpent") then
|
|
SetVariable("coinsSpent", 0)
|
|
end
|
|
|
|
if not GetVariable("slotPay") then
|
|
SetVariable("slotPay", 0)
|
|
end
|
|
|
|
ColourNote("white", "blue", "Type '", "yellow", "blue", "slotStats", "white", "blue", "' to view stats.")
|
|
end
|
|
|
|
function slotStart(name, line, args)
|
|
EnableTrigger("noWin")
|
|
EnableTrigger("slotWin")
|
|
SetVariable("slotTries", tonumber(GetVariable("slotTries")) + 1)
|
|
|
|
local current, spent = tonumber(GetVariable("coinsSpent")), string.gsub(args[1], ",", "")
|
|
local totalSpent = current + tonumber(spent)
|
|
|
|
SetVariable("coinsSpent", totalSpent)
|
|
end
|
|
|
|
function slotsWin(name, line, args)
|
|
EnableTrigger("noWin", false)
|
|
EnableTrigger("slotWin", false)
|
|
|
|
local current, pay = tonumber(GetVariable("slotPay")), string.gsub(args[1], ",", "")
|
|
local totalPay = current+tonumber(pay)
|
|
SetVariable("slotPay", totalPay)
|
|
end
|
|
|
|
function noPay(name, line, args)
|
|
EnableTrigger("noWin", false)
|
|
EnableTrigger("slotWin", false)
|
|
end
|
|
|
|
function showStats()
|
|
local spent, pay, tries = tonumber(GetVariable("coinsSpent")), tonumber(GetVariable("slotPay")), tonumber(GetVariable("slotTries"))
|
|
local aheadBehind = ""
|
|
local aheadBehindColour = "cyan"
|
|
|
|
local difference = pay-spent
|
|
|
|
print(string.rep("=",80))
|
|
ColourNote("white", "", "You have spent ", "yellow", "", commas(spent), "white", "", " gold coins over ", "cyan", "", commas(tries), "white", "", " spins, winning ", "yellow", "", commas(pay), "white", "", " gold.")
|
|
|
|
if difference < 0 then
|
|
aheadBehind = "behind"
|
|
aheadBehindColour = "red"
|
|
elseif difference > 0 then
|
|
aheadBehind = "ahead of"
|
|
aheadBehindColour = "green"
|
|
elseif difference == 0 then
|
|
aheadBehind = "even with"
|
|
end
|
|
|
|
ColourNote("white", "", "You are ", aheadBehindColour, "", aheadBehind, "white", "", " the House by ", "yellow", "", commas(difference), "white", "", " gold.")
|
|
ColourNote("white", "", "Average winnings: ", "yellow", "", commas(math.floor(pay/tries)), "white", "", " gold.")
|
|
print(string.rep("=", 80))
|
|
end
|
|
|
|
]]>
|
|
</script>
|
|
|
|
</muclient>
|