function WriteFile(FilePath,Content)
	FilePath = SKIN:MakePathAbsolute(FilePath)
	local File = io.open(FilePath, 'a')
	File:write(Content)
	File:close()
end

function DeleteFile(FilePath)
	FilePath = SKIN:MakePathAbsolute(FilePath)
	local file = io.open(FilePath, "r+")
	local content = file:read("*all")
	local t = string.gmatch(content, "([^\n]+)[\n]*$")()
	local content_len = string.len(content)
	local t_len = string.len(t)
	file:close()
	local str = string.sub(content, 0, content_len-t_len-1)
	file = io.open(FilePath, 'w')
	file:write(str)
	file:close()
end

function DetectValue(String1,String2)
	if(String1 == "null")
	then
		return ""
	else
		return String2
	end
end

;——————————————————————————————————————
;设置全局

[Rainmeter]
Update=#Update（ms）#
DynamicWindowSize=1
AccurateText=1

;——————————————————————————————————————
;设置变量

[Variables]
Scale=1
Update（ms）=100
RefreshTime（s）=300
FontFace=微软雅黑
FontColor=255,255,255,255
FontColorChangeTo=0,255,0,255
Time="（[MeasureDay] [MeasureTime]）"
FilePath_Like="C\:\\Users\\（这里填用户名）\\Documents\\Hitokoto_Favorites.txt"
FilePath_Auto="C\:\\Users\\（这里填用户名）\\Documents\\Hitokoto_AutoSave.txt"
Output="[MeasureChild1]——[&MeasureScript:DetectValue('[&MeasureChild3]','[MeasureChild3]')]「[MeasureChild2]」"

;修改FilePath需要保证路径上的文件夹存在，否则会报错。txt如果不存在，会自动创建
;“：”和“\”需要用“\”转义
;——————————————————————————————————————
;加载脚本

[MeasureScript]
Measure=Script
ScriptFile=EditFile.lua
Disabled=1

;——————————————————————————————————————
;设置文本属性

[TextStyle]
FontFace=#FontFace#
FontColor=#FontColor#
Group=StringGroup
StringEffect=Shadow
SolidColor=0,0,0,1
AntiAlias=1

;——————————————————————————————————————
;获取一言

[GetText]
Measure=Plugin
Plugin=WebParser
UpdateRate=(#RefreshTime（s）#*1000/#Update（ms）#)
Url=https://v1.hitokoto.cn/?c=a&c=d&c=g&c=h&c=i&c=k
RegExp="hitokoto":"(.*)","type":".*","from":"(.*)","from_who":["]{0,1}(?U)(.*)["]{0,1},"creator":"
OnChangeAction=[!CommandMeasure MeasureScript "WriteFile('#FilePath_Auto#','#Time##Output#\n')"][!DisableMouseAction StringOne "RightMouseDownAction"][!EnableMouseAction StringOne "RightMouseUpAction"][!SetOptionGroup StringGroup FontColor #FontColor#]

;Url=https://v1.hitokoto.cn/		获取全部分类
;Url=https://v1.hitokoto.cn/?c=x	其中x取值a~l，可选择多个分类，比如	?c=a&c=c	即为获取“动画”以及“游戏”分类的句子
;a=动画 b=漫画 c=游戏 d=文学 e=原创 f=来自网络 g=其他 h=影视 i=诗歌 j=网易云 k=哲学 l=抖机灵 其他字符=动画

[MeasureChild1]
Measure=Plugin
Plugin=WebParser
URL=[GetText]
StringIndex=1

[MeasureChild2]
Measure=Plugin
Plugin=WebParser
URL=[GetText]
StringIndex=2

[MeasureChild3]
Measure=Plugin
Plugin=WebParser
URL=[GetText]
StringIndex=3

;——————————————————————————————————————
;获取时间

[MeasureDay]
Measure=Time
Format=%F

[MeasureTime]
Measure=Time
Format=%X

;——————————————————————————————————————
;呈现桌面文本（在[StringOne]处编辑鼠标响应事件）

[StringOne]
Meter=String
Text=『 [MeasureChild1]』
MeterStyle=TextStyle
FontSize=(17*#Scale#)
X=0
Y=(8*#Scale#)
LeftMouseUpAction=!CommandMeasure GetText "Update"
RightMouseDownAction=[!CommandMeasure MeasureScript "DeleteFile('#FilePath_Like#')"][!SetOptionGroup StringGroup FontColor #FontColor#][!DisableMouseAction StringOne "RightMouseDownAction"][!Delay 16][!EnableMouseAction StringOne "RightMouseUpAction"]
RightMouseUpAction=[!SetClip #Output#][!CommandMeasure MeasureScript "WriteFile('#FilePath_Like#','#Time##Output#\n')"][!SetOptionGroup StringGroup FontColor #FontColorChangeTo#][!DisableMouseAction StringOne "RightMouseUpAction"][!EnableMouseAction StringOne "RightMouseDownAction"]

[StringTwo]
Meter=String
Text=——[&MeasureScript:DetectValue('[&MeasureChild3]','[MeasureChild3]')]「[MeasureChild2]」
FontSize=(14*#Scale#)
MeterStyle=TextStyle
X=0R
Y=(-15*#Scale#)R

LeftMouseUpAction=!CommandMeasure GetText "Update"
  
RightMouseDownAction=[!CommandMeasure MeasureScript "DeleteFile('#FilePath_Like#')"][!SetOptionGroup StringGroup FontColor #FontColor#][!DisableMouseAction StringOne "RightMouseDownAction"][!Delay 16][!EnableMouseAction StringOne "RightMouseUpAction"]

RightMouseUpAction=[!SetClip #Output#][!CommandMeasure MeasureScript "WriteFile('#FilePath_Like#','#Time##Output#\n')"][!SetOptionGroup StringGroup FontColor #FontColorChangeTo#][!DisableMouseAction StringOne "RightMouseUpAction"][!EnableMouseAction StringOne "RightMouseDownAction"]

OnChangeAction=[!CommandMeasure MeasureScript "WriteFile('#FilePath_Auto#','#Time##Output#\n')"][!DisableMouseAction StringOne "RightMouseDownAction"][!EnableMouseAction StringOne "RightMouseUpAction"][!SetOptionGroup StringGroup FontColor #FontColor#]