ftpd/mudlet-scripts
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

.

Browse Source
This commit is contained in:
Bartek Stalewski 2019-06-26 23:55:07 +02:00
parent 1739dbed2c
commit bd8e3e0cca
1 changed files with 292 additions and 262 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

306
ftpd-pack.xml
View File

@ -62,7 +62,7 @@ end</script>
<integer>1</integer>
</regexCodePropertyList>
</Trigger>
<Trigger isActive="no" isFolder="no" isTempTrigger="no" isMultiline="no" isPerlSlashGOption="no" isColorizerTrigger="no" isFilterTrigger="no" isSoundTrigger="no" isColorTrigger="no" isColorTriggerFg="no" isColorTriggerBg="no">
<Trigger isActive="yes" isFolder="no" isTempTrigger="no" isMultiline="no" isPerlSlashGOption="no" isColorizerTrigger="no" isFilterTrigger="no" isSoundTrigger="no" isColorTrigger="no" isColorTriggerFg="no" isColorTriggerBg="no">
<name>ftpd-idle-beep</name>
<script>raiseEvent("playBeep")</script>
<triggerType>0</triggerType>
@ -231,7 +231,7 @@ resetFormat()</script>
<colorTriggerBgColor>#000000</colorTriggerBgColor>
<regexCodeList>
<string>( ledwo muska| lekko rani| rani| powaznie rani| bardzo ciezko rani| masakruje) (?!cie)</string>
<string>(ledwo muskajac|lekko raniac|raniac|powaznie raniac|bardzo ciezko raniac|masakrujac) (go|ja)</string>
<string>(ledwo muskajac|nieznacznie raniac|lekko raniac|raniac|bolesnie raniac|powaznie raniac|bardzo ciezko raniac|masakrujac) (go|ja)</string>
</regexCodeList>
<regexCodePropertyList>
<integer>1</integer>
@ -742,7 +742,7 @@ resetFormat()</script>
<string>.* (ledwo zywe)</string>
</regexCodeList>
<regexCodePropertyList>
<integer>0</integer>
<integer>1</integer>
</regexCodePropertyList>
</Trigger>
<Trigger isActive="yes" isFolder="no" isTempTrigger="no" isMultiline="no" isPerlSlashGOption="no" isColorizerTrigger="no" isFilterTrigger="no" isSoundTrigger="no" isColorTrigger="no" isColorTriggerFg="no" isColorTriggerBg="no">
@ -761,7 +761,7 @@ resetFormat()</script>
<colorTriggerFgColor>#000000</colorTriggerFgColor>
<colorTriggerBgColor>#000000</colorTriggerBgColor>
<regexCodeList>
<string>.* (w nieziemskiej formie)</string>
<string>.* (w doskonalej formie)</string>
</regexCodeList>
<regexCodePropertyList>
<integer>1</integer>
@ -783,14 +783,10 @@ resetFormat()</script>
<colorTriggerFgColor>#000000</colorTriggerFgColor>
<colorTriggerBgColor>#000000</colorTriggerBgColor>
<regexCodeList>
<string>.* (w doskonalej formie)</string>
<string>.* (w bardzo dobrej formie)</string>
<string>.* (w dobrej formie)</string>
</regexCodeList>
<regexCodePropertyList>
<integer>1</integer>
<integer>1</integer>
<integer>1</integer>
</regexCodePropertyList>
</Trigger>
<Trigger isActive="yes" isFolder="no" isTempTrigger="no" isMultiline="no" isPerlSlashGOption="no" isColorizerTrigger="no" isFilterTrigger="no" isSoundTrigger="no" isColorTrigger="no" isColorTriggerFg="no" isColorTriggerBg="no">
@ -809,12 +805,10 @@ resetFormat()</script>
<colorTriggerFgColor>#000000</colorTriggerFgColor>
<colorTriggerBgColor>#000000</colorTriggerBgColor>
<regexCodeList>
<string>.* (w dosc dobrej formie)</string>
<string>.* (w niezlej formie)</string>
</regexCodeList>
<regexCodePropertyList>
<integer>1</integer>
<integer>1</integer>
</regexCodePropertyList>
</Trigger>
<Trigger isActive="yes" isFolder="no" isTempTrigger="no" isMultiline="no" isPerlSlashGOption="no" isColorizerTrigger="no" isFilterTrigger="no" isSoundTrigger="no" isColorTrigger="no" isColorTriggerFg="no" isColorTriggerBg="no">
@ -1093,6 +1087,124 @@ raiseEvent("playBeep")</script>
<integer>1</integer>
</regexCodePropertyList>
</Trigger>
<Trigger isActive="yes" isFolder="no" isTempTrigger="no" isMultiline="no" isPerlSlashGOption="no" isColorizerTrigger="no" isFilterTrigger="no" isSoundTrigger="no" isColorTrigger="no" isColorTriggerFg="no" isColorTriggerBg="no">
<name>ftpd-stan-panika-ok</name>
<script>selectString(matches[2],1)
fg("green")
resetFormat()</script>
<triggerType>0</triggerType>
<conditonLineDelta>0</conditonLineDelta>
<mStayOpen>0</mStayOpen>
<mCommand></mCommand>
<packageName></packageName>
<mFgColor>#ff0000</mFgColor>
<mBgColor>#ffff00</mBgColor>
<mSoundFile></mSoundFile>
<colorTriggerFgColor>#000000</colorTriggerFgColor>
<colorTriggerBgColor>#000000</colorTriggerBgColor>
<regexCodeList>
<string>Czujesz sie (bezpiecznie).</string>
<string>Czujesz sie (spokojnie).</string>
</regexCodeList>
<regexCodePropertyList>
<integer>1</integer>
<integer>1</integer>
</regexCodePropertyList>
</Trigger>
<Trigger isActive="yes" isFolder="no" isTempTrigger="no" isMultiline="no" isPerlSlashGOption="no" isColorizerTrigger="no" isFilterTrigger="no" isSoundTrigger="no" isColorTrigger="no" isColorTriggerFg="no" isColorTriggerBg="no">
<name>ftpd-stan-panika-warn</name>
<script>selectString(matches[2],1)
fg("yellow")
resetFormat()</script>
<triggerType>0</triggerType>
<conditonLineDelta>0</conditonLineDelta>
<mStayOpen>0</mStayOpen>
<mCommand></mCommand>
<packageName></packageName>
<mFgColor>#ff0000</mFgColor>
<mBgColor>#ffff00</mBgColor>
<mSoundFile></mSoundFile>
<colorTriggerFgColor>#000000</colorTriggerFgColor>
<colorTriggerBgColor>#000000</colorTriggerBgColor>
<regexCodeList>
<string>Czujesz sie (nieswojo).</string>
<string>Czujesz sie (nerwowo).</string>
</regexCodeList>
<regexCodePropertyList>
<integer>1</integer>
<integer>1</integer>
</regexCodePropertyList>
</Trigger>
<Trigger isActive="yes" isFolder="no" isTempTrigger="no" isMultiline="no" isPerlSlashGOption="no" isColorizerTrigger="no" isFilterTrigger="no" isSoundTrigger="no" isColorTrigger="no" isColorTriggerFg="no" isColorTriggerBg="no">
<name>ftpd-stan-panika-crit</name>
<script>selectString(matches[2],1)
fg("red")
resetFormat()</script>
<triggerType>0</triggerType>
<conditonLineDelta>0</conditonLineDelta>
<mStayOpen>0</mStayOpen>
<mCommand></mCommand>
<packageName></packageName>
<mFgColor>#ff0000</mFgColor>
<mBgColor>#ffff00</mBgColor>
<mSoundFile></mSoundFile>
<colorTriggerFgColor>#000000</colorTriggerFgColor>
<colorTriggerBgColor>#000000</colorTriggerBgColor>
<regexCodeList>
<string>Czujesz sie (przerazon.).</string>
</regexCodeList>
<regexCodePropertyList>
<integer>1</integer>
</regexCodePropertyList>
</Trigger>
<Trigger isActive="yes" isFolder="no" isTempTrigger="no" isMultiline="no" isPerlSlashGOption="no" isColorizerTrigger="no" isFilterTrigger="no" isSoundTrigger="no" isColorTrigger="no" isColorTriggerFg="no" isColorTriggerBg="no">
<name>ftpd-stan-panika-zero-m</name>
<script>selectString(matches[2],1)
bg("red")
fg("white")
replace("BARDZO PRZERAZONY")
resetFormat()</script>
<triggerType>0</triggerType>
<conditonLineDelta>0</conditonLineDelta>
<mStayOpen>0</mStayOpen>
<mCommand></mCommand>
<packageName></packageName>
<mFgColor>#ff0000</mFgColor>
<mBgColor>#ffff00</mBgColor>
<mSoundFile></mSoundFile>
<colorTriggerFgColor>#000000</colorTriggerFgColor>
<colorTriggerBgColor>#000000</colorTriggerBgColor>
<regexCodeList>
<string>Czujesz sie (bardzo przerazony).</string>
</regexCodeList>
<regexCodePropertyList>
<integer>1</integer>
</regexCodePropertyList>
</Trigger>
<Trigger isActive="yes" isFolder="no" isTempTrigger="no" isMultiline="no" isPerlSlashGOption="no" isColorizerTrigger="no" isFilterTrigger="no" isSoundTrigger="no" isColorTrigger="no" isColorTriggerFg="no" isColorTriggerBg="no">
<name>ftpd-stan-panika-zero-f</name>
<script>selectString(matches[2],1)
bg("red")
fg("white")
replace("BARDZO PRZERAZONA")
resetFormat()</script>
<triggerType>0</triggerType>
<conditonLineDelta>0</conditonLineDelta>
<mStayOpen>0</mStayOpen>
<mCommand></mCommand>
<packageName></packageName>
<mFgColor>#ff0000</mFgColor>
<mBgColor>#ffff00</mBgColor>
<mSoundFile></mSoundFile>
<colorTriggerFgColor>#000000</colorTriggerFgColor>
<colorTriggerBgColor>#000000</colorTriggerBgColor>
<regexCodeList>
<string>Czujesz sie (bardzo przerazona).</string>
</regexCodeList>
<regexCodePropertyList>
<integer>1</integer>
</regexCodePropertyList>
</Trigger>
<Trigger isActive="yes" isFolder="no" isTempTrigger="no" isMultiline="no" isPerlSlashGOption="no" isColorizerTrigger="no" isFilterTrigger="no" isSoundTrigger="no" isColorTrigger="no" isColorTriggerFg="no" isColorTriggerBg="no">
<name>ftpd-fight_zaslaniasz</name>
<script>selectCurrentLine()
@ -1443,6 +1555,7 @@ resetFormat()
<string>.*pochyla kosmaty leb i rzuca sie do przodu, z pelnym impetem trafiajac wprost w ciebie. Uderzenie w glowe oglusza cie i powala na ziemie.</string>
<string>Nagle czujesz, ze tracisz kontrole nad swym cialem - nie mozesz sie poruszyc!</string>
<string>.* oglusza cie.</string>
<string>.* czujesz, ze tracisz przytomnosc.</string>
</regexCodeList>
<regexCodePropertyList>
<integer>1</integer>
@ -1455,6 +1568,7 @@ resetFormat()
<integer>1</integer>
<integer>0</integer>
<integer>1</integer>
<integer>1</integer>
</regexCodePropertyList>
</Trigger>
<Trigger isActive="yes" isFolder="no" isTempTrigger="no" isMultiline="no" isPerlSlashGOption="no" isColorizerTrigger="no" isFilterTrigger="no" isSoundTrigger="no" isColorTrigger="no" isColorTriggerFg="no" isColorTriggerBg="no">
@ -2300,7 +2414,8 @@ send("zamknij przytroczona " .. scripts.inv:get_bag_string_biernik("money"), fal
</Alias>
<Alias isActive="yes" isFolder="no">
<name>ftpd-get</name>
<script>sendAll("wez " .. matches[2] .. " z ciala",
<script>sendAll("wez " .. matches[2],
"wez " .. matches[2] .. " z ciala",
"wez " .. matches[2] .. " z drugiego ciala",
"wez " .. matches[2] .. " z trzeciego ciala",
"wez " .. matches[2] .. " z czwartego ciala",
@ -2919,63 +3034,16 @@ end</script>
<Script isActive="yes" isFolder="no">
<name>ftpd_daracan_main_footer_updater</name>
<packageName></packageName>
<script>function scripts.ui:update_bars_mode(mode)
if not mode and mode ~= "gauge" and mode ~= "label" then
error("Invalid input")
end
for k, v in pairs(gmcp.char.state) do
-- k_index is the name of the ui item for this k (hp/fatigue etc)
local k_index = k .. mode
if k == "hp" then
v = v + 1
end
if scripts.ui.footer_bar[k] and scripts.ui[k_index] then
if mode == "gauge" then
-- change color and set the right value
scripts.ui[k_index]:setValue(v, scripts.ui.footer_bar[k].max)
scripts.ui.gauge_front:set("background-color", scripts.ui.footer_bar[k].background[v])
scripts.ui[k_index].front:setStyleSheet(scripts.ui.gauge_front:getCSS())
elseif mode == "label" then
local msg = scripts.ui:process_label_text(scripts.ui.state_key_to_label_pre[k], v, scripts.ui.footer_bar[k].max, scripts.ui.footer_bar[k].background[v])
scripts.ui[k_index]:echo(msg)
end
end
end
end
function scripts.ui:process_label_text(prefix, val, max, color)
<script>function scripts.ui:process_label_text(prefix, val, max, color)
if val == -1 then
-- this happens at the start
return
end
---------------------------
-- local str = [[&lt;center&gt;&lt;font color='#b3b3b3'&gt;]] .. prefix .. [[: &lt;font color="]] .. color .. [["&gt;]]
-- str = str .. "[" .. val .. ":" .. max .. "]&lt;/font&gt;&lt;/center&gt;"
-- return str
--end
------------------------------
local str = [[&lt;font color='#b3b3b3'&gt;]] .. prefix .. [[:&lt;font color="]] .. color .. [["&gt;]]
local str2 = str.. "[" .. val .. ":" .. max .. "]&lt;/font&gt;"
local color2 = "&lt;font color='#404040'&gt;"
local color3 = "&lt;font color='#00b3b5'&gt;"
--▍ ▌ ▋ ▉ █
--local belki1 = "▋"
--local belki2 = "▋▋"
--local belki3 = "▋▋▋"
--local belki4 = "▋▋▋▋"
--local belki5 = "▋▋▋▋▋"
--local belki6 = "▋▋▋▋▋▋"
--local belki7 = "▋▋▋▋▋▋▋"
--local belki8 = "▋▋▋▋▋▋▋▋"
--local belki9 = "▋▋▋▋▋▋▋▋▋"
local belki1 = "▉"
local belki2 = "▉▉"
local belki3 = "▉▉▉"
@ -2986,12 +3054,6 @@ local belki7 = "▉▉▉▉▉▉▉"
local belki8 = "▉▉▉▉▉▉▉▉"
local belki9 = "▉▉▉▉▉▉▉▉▉"
--local fbelki1 = "█"
--local fbelki2 = "██"
--local fbelki3 = "███▌"
if val &lt;= 15 and prefix == "Pos" then
return str2
@ -3008,13 +3070,13 @@ elseif val == 3 and prefix == "Kon" then
elseif val == 2 and prefix == "Kon" then
str = str.. ""..belki2.."" ..color2.."" ..belki5
elseif val == 1 and prefix == "Kon" then
str = str.. ""..belki1.."" ..color2.."" ..belki6
-- str = str.. ""..belki1.."" ..color2.."" ..belki6
str = str.. ""..belki7
elseif val == 8 and prefix == "Man" then
str = str.. ""..color3.."" ..belki8
str = str.. ""..belki8
elseif val == 7 and prefix == "Man" then
str = str.. ""..color3..""..belki7.."" ..color2.."" ..belki1
str = str.. ""..belki7.."" ..color2.."" ..belki1
elseif val == 6 and prefix == "Man" then
str = str.. ""..belki6.."" ..color2.."" ..belki2
elseif val == 5 and prefix == "Man" then
@ -3028,30 +3090,29 @@ elseif val == 2 and prefix == "Man" then
elseif val == 1 and prefix == "Man" then
str = str.. ""..belki1.."" ..color2.."" ..belki7
elseif val == 0 and prefix == "Man" then
str = str.. ""..color2.."" ..belki8
-- str = str.. ""..color2.."" ..belki8
str = str.. ""..belki8
elseif val == 0 and prefix == "Zme" then
str = str.. ""..belki9
elseif val == 1 and prefix == "Zme" then
str = str.. ""..belki8.."" ..color2.."" ..belki1
elseif val == 2 and prefix == "Zme" then
str = str.. ""..belki7.."" ..color2.."" ..belki2
elseif val == 3 and prefix == "Zme" then
str = str.. ""..belki6.."" ..color2.."" ..belki3
elseif val == 4 and prefix == "Zme" then
str = str.. ""..belki5.."" ..color2.."" ..belki4
elseif val == 5 and prefix == "Zme" then
str = str.. ""..belki4.."" ..color2.."" ..belki5
elseif val == 6 and prefix == "Zme" then
str = str.. ""..belki3.."" ..color2.."" ..belki6
elseif val == 7 and prefix == "Zme" then
str = str.. ""..belki2.."" ..color2.."" ..belki7
elseif val == 8 and prefix == "Zme" then
str = str.. ""..belki1.."" ..color2.."" ..belki8
elseif val == 9 and prefix == "Zme" then
str = str.. ""..belki9
elseif val == 8 and prefix == "Zme" then
str = str.. ""..belki8.."" ..color2.."" ..belki1
elseif val == 7 and prefix == "Zme" then
str = str.. ""..belki7.."" ..color2.."" ..belki2
elseif val == 6 and prefix == "Zme" then
str = str.. ""..belki6.."" ..color2.."" ..belki3
elseif val == 5 and prefix == "Zme" then
str = str.. ""..belki5.."" ..color2.."" ..belki4
elseif val == 4 and prefix == "Zme" then
str = str.. ""..belki4.."" ..color2.."" ..belki5
elseif val == 3 and prefix == "Zme" then
str = str.. ""..belki3.."" ..color2.."" ..belki6
elseif val == 2 and prefix == "Zme" then
str = str.. ""..belki2.."" ..color2.."" ..belki7
elseif val == 1 and prefix == "Zme" then
str = str.. ""..belki1.."" ..color2.."" ..belki8
elseif val == 0 and prefix == "Zme" then
str = str.. "" ..color2.."" ..belki9
elseif val == 6 and prefix == "Prz" then
str = str.. ""..belki6
@ -3066,7 +3127,8 @@ elseif val == 2 and prefix == "Prz" then
elseif val == 1 and prefix == "Prz" then
str = str.. ""..belki1.."" ..color2.."" ..belki5
elseif val == 0 and prefix == "Prz" then
str = str.. "" ..color2.. ""..belki6
-- str = str.. "" ..color2.. ""..belki6
str = str.. "" ..belki6
elseif val == 5 and prefix == "Pan" then
str = str.. ""..belki5
@ -3079,7 +3141,8 @@ elseif val == 2 and prefix == "Pan" then
elseif val == 1 and prefix == "Pan" then
str = str.. ""..belki1.."" ..color2.."" ..belki4
elseif val == 0 and prefix == "Pan" then
str = str.. ""..color2.."" ..belki5
-- str = str.. ""..color2.."" ..belki5
str = str.. ""..belki5
elseif val == 6 and prefix == "Kac" then
str = str.. ""..belki6
@ -3094,22 +3157,18 @@ elseif val == 2 and prefix == "Kac" then
elseif val == 1 and prefix == "Kac" then
str = str.. ""..belki1.."" ..color2.."" ..belki5
elseif val == 0 and prefix == "Kac" then
str = str.. "" ..color2.."" ..belki6
elseif val == 6 and prefix == "For" then
-- str = str.. "" ..color2.."" ..belki6
str = str.. ""..belki6
elseif val == 5 and prefix == "For" then
str = str.. ""..belki5.."" ..color2.."" ..belki1
elseif val == 4 and prefix == "For" then
str = str.. ""..belki4.."" ..color2.."" ..belki2
elseif val == 3 and prefix == "For" then
str = str.. ""..belki3.."" ..color2.."" ..belki3
str = str.. ""..belki3
elseif val == 2 and prefix == "For" then
str = str.. ""..belki2.."" ..color2.."" ..belki4
str = str.. ""..belki2.."" ..color2.."" ..belki1
elseif val == 1 and prefix == "For" then
str = str.. ""..belki1.."" ..color2.."" ..belki5
str = str.. ""..belki1.."" ..color2.."" ..belki2
elseif val == 0 and prefix == "For" then
str = str.. "" ..color2.."" ..belki6
-- str = str.. "" ..color2.."" ..belki6
str = str.. "" ..belki3
elseif val == 10 and prefix == "Upi" then
str = str.. ""..belki9
@ -3132,7 +3191,8 @@ elseif val == 2 and prefix == "Upi" then
elseif val == 1 and prefix == "Upi" then
str = str.. ""..belki1.."" ..color2.."" ..belki8
elseif val == 0 and prefix == "Upi" then
str = str.. "" ..color2.."" ..belki9
-- str = str.. "" ..color2.."" ..belki9
str = str.. "" ..belki9
elseif val == 3 and prefix == "Glo" then
str = str.. ""..belki4
@ -3141,8 +3201,8 @@ elseif val == 2 and prefix == "Glo" then
elseif val == 1 and prefix == "Glo" then
str = str.. ""..belki2.."" ..color2.."" ..belki2
elseif val == 0 and prefix == "Glo" then
str = str.. ""..belki1.."" ..color2.."" ..belki3
-- str = str.. ""..belki1.."" ..color2.."" ..belki3
str = str.. ""..belki4
elseif val == 3 and prefix == "Pra" then
str = str.. ""..belki4
@ -3151,43 +3211,13 @@ elseif val == 2 and prefix == "Pra" then
elseif val == 1 and prefix == "Pra" then
str = str.. ""..belki2.."" ..color2.."" ..belki2
elseif val == 0 and prefix == "Pra" then
str = str.. ""..belki1.."" ..color2.."" ..belki3
-- str = str.. ""..belki1.."" ..color2.."" ..belki3
str = str.. ""..belki4
elseif val == 0 and prefix == "Pos" then
str = str.. ""..str2
end
return str
end
function scripts.ui:disable_guard()
if scripts.ui.cfg["footer_mode"] == "mode1" then
scripts.ui.gauge_front:set("background-color","red")
scripts.ui.guardgauge.front:setStyleSheet(scripts.ui.gauge_front:getCSS())
elseif scripts.ui.cfg["footer_mode"] == "mode2" then
scripts.ui.guardlabel:echo([[&lt;center&gt;&lt;font color="red"&gt;STOP&lt;/font&gt;&lt;/center&gt;]] )
end
if scripts.ui.timer_id then
killTimer(scripts.ui.timer_id)
end
scripts.ui.timer_id = tempTimer(5, function() scripts.ui:enable_guard() end)
end
function scripts.ui:enable_guard()
if scripts.ui.cfg["footer_mode"] == "mode1" then
scripts.ui.gauge_front:set("background-color","green")
scripts.ui.guardgauge.front:setStyleSheet(scripts.ui.gauge_front:getCSS())
scripts.ui.timer_id = nil
elseif scripts.ui.cfg["footer_mode"] == "mode2" then
scripts.ui.guardlabel:echo([[&lt;center&gt;&lt;font color="green"&gt;OK&lt;/font&gt;&lt;/center&gt;]] )
scripts.ui.timer_id = nil
end
end</script>
<eventHandlerList />
</Script>