背景：前几天经网友帖子看到这个每日诗词API，感觉放在桌面上看看也蛮有意义的
该诗词网的一些API：
https://v2.jinrishici.com/info 天气
https://v1.jinrishici.com/all.json 简单
https://v2.jinrishici.com/one.json 详细
https://v2.jinrishici.com/sentence跟上面那个似乎是一模一样的
皮肤：
1、更新时会置顶55秒
2、点击打开诗词对应的百科
3、鼠标移至皮肤上时显示背景色及置顶，移开后取消背景色与置顶
[Rainmeter]
Update=1000
DynamicWindowSize=1
AccurateText=1
Group=今日诗词|显示隐藏
[Metadata]
Author=somi, [email protected]
Version=1.0.2301
[Variables]
[MS取消置顶]
Measure=Loop
StartValue=55
EndValue=0
Increment=-1
LoopCount=1
IfEqualValue=0
IfEqualAction=[!DisableMeasure
#CurrentSection#
][!ZPos 0]
;-------------------
[MS每日诗词]
Measure=WebParser
UpdateRate=600
Url=https://v1.jinrishici.com/all.jsonRegExp=(?siU) .*"content".*"(.*)".*"origin".*"(.*)".*"author".*"(.*)"
FinishAction=[!ZPos 1][!EnableMeasure MS取消置顶][!CommandMeasure MS取消置顶 "Reset"][!SetOption 测量诗词高宽 Text "[MS诗词]
#CRLF#
[MS诗名] - [MS作者]。"][!SetOption 测量诗词高宽 InlinePattern "[MS诗名] - [MS作者]"][!SetOption 每日诗词 Text "[MS诗词]
#CRLF#
[MS诗名] - [MS作者]。"][!SetOption 每日诗词 InlinePattern "[MS诗名] - [MS作者]"][!SetOption 每日诗词 InlinePattern2 "[MS诗名] - [MS作者]"][!SetOption 每日诗词 InlinePattern3 "[MS作者](。)"][!UpdateMeter *][!Redraw]
[MS诗词]
Measure=WebParser
Url=[MS每日诗词]
StringIndex=1
;RegexpSubstitute=1
;Substitute="。$":""
[MS诗名]
Measure=WebParser
Url=[MS每日诗词]
StringIndex=2
[MS作者]
Measure=WebParser
Url=[MS每日诗词]
StringIndex=3
;-------------------
[测量诗词高宽]
Meter=String
X=0
Y=0
FontFace=Segoe UI
FontColor=0,0,0,0
FontSize=12
;诗名与作者
InlineSetting=Size|10
;行距
InlinePattern2=\R
InlineSetting2=Size|20
Padding=8,-3,0,5
UpdateDivider=-1
[每日诗词]
Meter=String
X=([测量诗词高宽:W]/2)
Y=([测量诗词高宽:H]/2)
W=[测量诗词高宽:W]
H=[测量诗词高宽:H]
StringAlign=CenterCenter
FontFace=Segoe UI
FontColor=230,230,230,230
FontSize=12
;诗名与作者
InlineSetting=Size|10
InlineSetting2=Color|211,211,211,230
;将添加到作者后面的句号透明化
InlineSetting3=Color|0,0,0,0
;行距
InlinePattern4=\R
InlineSetting4=Size|20
;字体阴影
InlineSetting5=Shadow|1|1|1|80,80,80,160
InlineSetting6=Shadow|-1|-1|1|80,80,80,160
Padding=8,-3,0,5
SolidColor=0,0,0,1
Antialias=1
DynamicVariables=1
UpdateDivider=-1
LeftMouseUpAction=https://baike.baidu.com/item/[MS诗名]
MouseOverAction=[!ZPos 1][!SetOption
#CurrentSection#
SolidColor 2D79C4][!UpdateMeter
#CurrentSection#
][!Redraw]
MouseLeaveAction=[!ZPos 0][!SetOption
#CurrentSection#
SolidColor 0,0,0,1][!UpdateMeter
#CurrentSection#
][!Redraw]

再来个含全诗的
跟上面的皮肤差不多，区别就是鼠标移至皮肤上时以提示的方式显示全诗
[Rainmeter]
Update=1000
DynamicWindowSize=1
AccurateText=1
Group=今日诗词|显示隐藏
[Metadata]
Author=somi, [email protected]
Version=1.0.2301
[Variables]
[MS取消置顶]
Measure=Loop
StartValue=55
EndValue=0
Increment=-1
LoopCount=1
IfEqualValue=0
IfEqualAction=[!DisableMeasure
#CurrentSection#
][!ZPos 0]
;-------------------
[MS今日诗词]
Measure=WebParser
UpdateRate=600
Url=https://v2.jinrishici.com/one.jsonRegExp=(?siU)"content":"(.*)","popularity":.*,"origin":{"title":"(.*)","dynasty":"(.*)","author":"(.*)","content":\[(.*)\],"translate":(.*)},"matchTags":\[(.*)\],"recommendedReason"
FinishAction=[!ZPos 1][!EnableMeasure MS取消置顶][!CommandMeasure MS取消置顶 "Reset"][!SetOption 测量高宽 Text "[MS诗句]
#CRLF#
[MS诗名] - [MS作者] [[MS朝代]]。"][!SetOption 测量高宽 InlinePattern "[MS诗名] - [MS作者] \[[MS朝代]\]"][!SetOption 今日诗词 Text "[MS诗句]
#CRLF#
[MS诗名] - [MS作者] [[MS朝代]]。"][!SetOption 今日诗词 InlinePattern "[MS诗名] - [MS作者] \[[MS朝代]\]"][!SetOption 今日诗词 InlinePattern2 "[MS诗名] - [MS作者] \[[MS朝代]\]"][!SetOption 今日诗词 InlinePattern3 "\[[MS朝代]\](。)"][!UpdateMeter *][!Redraw]
[MS诗句]
Measure=WebParser
Url=[MS今日诗词]
StringIndex=1
[MS诗名]
Measure=WebParser
Url=[MS今日诗词]
StringIndex=2
[MS朝代]
Measure=WebParser
Url=[MS今日诗词]
StringIndex=3
Substitute="唐代":"唐","宋代":"宋","清代":"清"
[MS作者]
Measure=WebParser
Url=[MS今日诗词]
StringIndex=4
[MS全诗]
Measure=WebParser
Url=[MS今日诗词]
StringIndex=5
;简单的断行对诗原结构的重现不是很理想
Substitute='","':"","。":"。
#CRLF#
",'"':""
[MS解读]
Measure=WebParser
Url=[MS今日诗词]
StringIndex=6
Substitute='","':"","。":"。
#CRLF#
",'"':""
[MS场境]
Measure=WebParser
Url=[MS今日诗词]
StringIndex=7
Substitute='","':"",'"':""
;-------------------
[测量高宽]
Meter=String
X=0
Y=0
FontFace=Segoe UI
FontColor=0,0,0,0
FontSize=12
;诗名与作者
InlineSetting=Size|10
;行距
InlinePattern2=\R
InlineSetting2=Size|20
Padding=8,-3,0,5
UpdateDivider=-1
[今日诗词]
Meter=String
X=([测量高宽:W]/2)
Y=([测量高宽:H]/2)
W=[测量高宽:W]
H=[测量高宽:H]
StringAlign=CenterCenter
FontFace=Segoe UI
FontColor=230,230,230,230
FontSize=12
;诗名与作者
InlineSetting=Size|10
InlineSetting2=Color|211,211,211,230
;将添加到作者后面的句号透明化
InlineSetting3=Color|0,0,0,0
;行距
InlinePattern4=\R
InlineSetting4=Size|20
;字体阴影
InlineSetting5=Shadow|1|1|1|80,80,80,160
InlineSetting6=Shadow|-1|-1|1|80,80,80,160
ToolTipTitle=[MS诗名] - [MS作者] [[MS朝代]]
TooltipText=[MS全诗]
Padding=8,-3,0,5
SolidColor=0,0,0,1
Antialias=1
DynamicVariables=1
UpdateDivider=-1
LeftMouseUpAction=https://baike.baidu.com/item/[MS诗名]
MouseOverAction=[!ZPos 1][!SetOption
#CurrentSection#
SolidColor 2D79C4][!UpdateMeter
#CurrentSection#
][!Redraw]
MouseLeaveAction=[!ZPos 0][!DisableMeasure MS取消置顶][!SetOption
#CurrentSection#
SolidColor 0,0,0,1][!UpdateMeter
#CurrentSection#
][!Redraw]

支持下。不错。

这个我装了为啥没显示，要搭配别的什么吗？

想把字调大一点，但是调大之后显示不全怎么办

我把你的内容和吧里另一个大佬的融合了一下

大佬，我想把诗名与作者那一栏左对齐怎么办啊

local str = "这是一个测试，看看效果。" --------- 修改位置1
local new_str = ""
local chinese_pattern = "[%z\1-\127]"
for i = 1, #str do
local c = string.sub(str, i, i)
if not string.find(c, chinese_pattern) or c == "，" or c == "。" then
new_str = new_str.. c.. "\n"
else
new_str = new_str.. c
end
end
print(new_str) --------修改位置2
如果上面的代码无误能实现所要的效果，那位置1改成：
local str = SKIN:GetMeasure('MS今日诗词'):GetStringValue()
位置2改成：
SKIN:Bang(‘[!SetOption 每日诗词 Text '..new_str..']’）
-----------------
又或者可以使用 Substitute 来实现，
在 [MS每日诗词] 下面最后加上
;RegexpSubstitute=1
Substitute="，":"，#CTRL#","。":"。#CTRL#","[中文码范围怎表示我忘了]":"[中文码范围怎表示我忘了]#CTRL#"