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

Pasek - by Daracan

Browse Source
This commit is contained in:
Bartek Stalewski 2019-05-14 15:22:22 +02:00
parent 7910d4e6d9
commit d3b244d9e0
1 changed files with 280 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

283
ftpd-pack.xml
View File

@ -987,14 +987,12 @@ resetFormat()</script>
<regexCodeList>
<string>est.* (bardzo zmeczon.)</string>
<string>est.* (nieco wyczerpan.)</string>
<string>est.* (bardzo wyczerpan.)</string>
<string>est.* (?!mentalnie )(wyczerpan.)</string>
</regexCodeList>
<regexCodePropertyList>
<integer>1</integer>
<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">
@ -1013,10 +1011,12 @@ resetFormat()</script>
<colorTriggerFgColor>#000000</colorTriggerFgColor>
<colorTriggerBgColor>#000000</colorTriggerBgColor>
<regexCodeList>
<string>est.* (bardzo wyczerpan.)</string>
<string>est.* (wycienczon.)</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">
@ -1442,6 +1442,7 @@ resetFormat()
<string>.*Nagle czujesz jak na glowe spada ci ciezki sznur,.*</string>
<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>
</regexCodeList>
<regexCodePropertyList>
<integer>1</integer>
@ -1453,6 +1454,7 @@ resetFormat()
<integer>1</integer>
<integer>1</integer>
<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">
@ -1930,7 +1932,7 @@ end</script>
<time>00:00:00.000</time>
<Timer isActive="no" isFolder="no" isTempTimer="no" isOffsetTimer="no">
<name>ftpd-fight-timer</name>
<script>if ftpd_fight_timer_time == 30 then
<script>if ftpd_fight_timer_time == 35 then
scripts.ui.footer_map:setColor(0,0,0)
scripts.ui.footer_main:setColor(0,0,0)
cecho("\n&lt;yellow&gt;&lt;&lt;&lt; cooldown &gt;&gt;&gt;")
@ -2712,6 +2714,281 @@ end</script>
<string>gmcp.gmcp_msgs</string>
</eventHandlerList>
</Script>
<Script isActive="yes" isFolder="no">
<name>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)
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 = "▉▉▉"
local belki4 = "▉▉▉▉"
local belki5 = "▉▉▉▉▉"
local belki6 = "▉▉▉▉▉▉"
local belki7 = "▉▉▉▉▉▉▉"
local belki8 = "▉▉▉▉▉▉▉▉"
local belki9 = "▉▉▉▉▉▉▉▉▉"
--local fbelki1 = "█"
--local fbelki2 = "██"
--local fbelki3 = "███▌"
if val &lt;= 15 and prefix == "Pos" then
return str2
elseif val == 7 and prefix == "Kon" then
str = str.. ""..belki7
elseif val == 6 and prefix == "Kon" then
str = str.. ""..belki6.."" ..color2.."" ..belki1
elseif val == 5 and prefix == "Kon" then
str = str.. ""..belki5.."" ..color2.."" ..belki2
elseif val == 4 and prefix == "Kon" then
str = str.. ""..belki4.."" ..color2.."" ..belki3
elseif val == 3 and prefix == "Kon" then
str = str.. ""..belki3.."" ..color2.."" ..belki4
elseif val == 2 and prefix == "Kon" then
str = str.. ""..belki2.."" ..color2.."" ..belki5
elseif val == 1 and prefix == "Kon" then
str = str.. ""..belki1.."" ..color2.."" ..belki6
elseif val == 8 and prefix == "Man" then
str = str.. ""..color3.."" ..belki8
elseif val == 7 and prefix == "Man" then
str = str.. ""..color3..""..belki7.."" ..color2.."" ..belki1
elseif val == 6 and prefix == "Man" then
str = str.. ""..belki6.."" ..color2.."" ..belki2
elseif val == 5 and prefix == "Man" then
str = str.. ""..belki5.."" ..color2.."" ..belki3
elseif val == 4 and prefix == "Man" then
str = str.. ""..belki4.."" ..color2.."" ..belki4
elseif val == 3 and prefix == "Man" then
str = str.. ""..belki3.."" ..color2.."" ..belki5
elseif val == 2 and prefix == "Man" then
str = str.. ""..belki2.."" ..color2.."" ..belki6
elseif val == 1 and prefix == "Man" then
str = str.. ""..belki1.."" ..color2.."" ..belki7
elseif val == 0 and prefix == "Man" then
str = str.. ""..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
elseif val == 5 and prefix == "Prz" then
str = str.. ""..belki5.."" ..color2.."" ..belki1
elseif val == 4 and prefix == "Prz" then
str = str.. ""..belki4.."" ..color2.."" ..belki2
elseif val == 3 and prefix == "Prz" then
str = str.. ""..belki3.."" ..color2.."" ..belki3
elseif val == 2 and prefix == "Prz" then
str = str.. ""..belki2.."" ..color2.."" ..belki4
elseif val == 1 and prefix == "Prz" then
str = str.. ""..belki1.."" ..color2.."" ..belki5
elseif val == 0 and prefix == "Prz" then
str = str.. "" ..color2.. ""..belki6
elseif val == 5 and prefix == "Pan" then
str = str.. ""..belki5
elseif val == 4 and prefix == "Pan" then
str = str.. ""..belki4.."" ..color2.."" ..belki1
elseif val == 3 and prefix == "Pan" then
str = str.. ""..belki3.."" ..color2.."" ..belki2
elseif val == 2 and prefix == "Pan" then
str = str.. ""..belki2.."" ..color2.."" ..belki3
elseif val == 1 and prefix == "Pan" then
str = str.. ""..belki1.."" ..color2.."" ..belki4
elseif val == 0 and prefix == "Pan" then
str = str.. ""..color2.."" ..belki5
elseif val == 6 and prefix == "Kac" then
str = str.. ""..belki6
elseif val == 5 and prefix == "Kac" then
str = str.. ""..belki5.."" ..color2.."" ..belki1
elseif val == 4 and prefix == "Kac" then
str = str.. ""..belki4.."" ..color2.."" ..belki2
elseif val == 3 and prefix == "Kac" then
str = str.. ""..belki3.."" ..color2.."" ..belki3
elseif val == 2 and prefix == "Kac" then
str = str.. ""..belki2.."" ..color2.."" ..belki4
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.. ""..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
elseif val == 2 and prefix == "For" then
str = str.. ""..belki2.."" ..color2.."" ..belki4
elseif val == 1 and prefix == "For" then
str = str.. ""..belki1.."" ..color2.."" ..belki5
elseif val == 0 and prefix == "For" then
str = str.. "" ..color2.."" ..belki6
elseif val == 10 and prefix == "Upi" then
str = str.. ""..belki9
elseif val == 9 and prefix == "Upi" then
str = str.. ""..belki9
elseif val == 8 and prefix == "Upi" then
str = str.. ""..belki8.."" ..color2.."" ..belki1
elseif val == 7 and prefix == "Upi" then
str = str.. ""..belki7.."" ..color2.."" ..belki2
elseif val == 6 and prefix == "Upi" then
str = str.. ""..belki6.."" ..color2.."" ..belki3
elseif val == 5 and prefix == "Upi" then
str = str.. ""..belki5.."" ..color2.."" ..belki4
elseif val == 4 and prefix == "Upi" then
str = str.. ""..belki4.."" ..color2.."" ..belki5
elseif val == 3 and prefix == "Upi" then
str = str.. ""..belki3.."" ..color2.."" ..belki6
elseif val == 2 and prefix == "Upi" then
str = str.. ""..belki2.."" ..color2.."" ..belki7
elseif val == 1 and prefix == "Upi" then
str = str.. ""..belki1.."" ..color2.."" ..belki8
elseif val == 0 and prefix == "Upi" then
str = str.. "" ..color2.."" ..belki9
elseif val == 3 and prefix == "Glo" then
str = str.. ""..belki4
elseif val == 2 and prefix == "Glo" then
str = str.. ""..belki3.."" ..color2.."" ..belki1
elseif val == 1 and prefix == "Glo" then
str = str.. ""..belki2.."" ..color2.."" ..belki2
elseif val == 0 and prefix == "Glo" then
str = str.. ""..belki1.."" ..color2.."" ..belki3
elseif val == 3 and prefix == "Pra" then
str = str.. ""..belki4
elseif val == 2 and prefix == "Pra" then
str = str.. ""..belki3..""..color2.."" ..belki1
elseif val == 1 and prefix == "Pra" then
str = str.. ""..belki2.."" ..color2.."" ..belki2
elseif val == 0 and prefix == "Pra" then
str = str.. ""..belki1.."" ..color2.."" ..belki3
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>
</ScriptGroup>
</ScriptPackage>
<KeyPackage>