判断时间_是否符合区间 过年倒计时做项目常用的快捷函数

callme大大

废话不多说，一切为了快速开发，新手老手都能用得到。修改了下过节倒计时，。

  

子程序名	返回值类型	公开	备 注
文本_正则取出匹配文本	文本型		如有子匹配优先返回子匹配，没有子匹配返回匹配文本
参数名	类 型	参考	可空	数组	备 注
文本	文本型
正则表达式	文本型				表达式务必使用（）,数组里将返回（）中的子匹配内容，如果没有括号，将返回匹配文本，而非子匹配文本
返回文本2	文本型				返回文本2
返回文本3	文本型				返回文本3

变量名	类 型	静态	数组	备 注
正则	正则表达式类
i	整数型
数量	整数型
返回文本	文本型

正则.创建 (正则表达式, 文本)
数量 ＝ 正则.取匹配数量 ()
如果 (文本_取出中间文本 (正则表达式, “(”, “)”, , ) ＝ “”)
计次循环首 (数量, i)
如果真 (i ＝ 1)
返回文本 ＝ 正则.取匹配文本 (i, 1)
如果真 (i ＝ 2)
返回文本2 ＝ 正则.取匹配文本 (i, 1)
如果真 (i ＝ 3)
返回文本3 ＝ 正则.取匹配文本 (i, 1)
跳出循环 ()

计次循环尾 ()
计次循环首 (数量, i)
如果真 (i ＝ 1)
返回文本 ＝ 正则.取子匹配文本 (i, 1)
如果真 (i ＝ 2)
返回文本2 ＝ 正则.取子匹配文本 (i, 1)
如果真 (i ＝ 3)
返回文本3 ＝ 正则.取子匹配文本 (i, 1)
跳出循环 ()

计次循环尾 ()
返回 (返回文本)

.版本 2<br /> <br /> .子程序 文本_正则取出匹配文本, 文本型, 公开, 如有子匹配优先返回子匹配，没有子匹配返回匹配文本<br /> .参数 文本, 文本型<br /> .参数 正则表达式, 文本型, , 表达式务必使用（）,数组里将返回（）中的子匹配内容，如果没有括号，将返回匹配文本，而非子匹配文本<br /> .参数 返回文本2, 文本型, 可空, 返回文本2<br /> .参数 返回文本3, 文本型, 可空, 返回文本3<br /> .局部变量 正则, 正则表达式类<br /> .局部变量 i, 整数型<br /> .局部变量 数量, 整数型<br /> .局部变量 返回文本, 文本型<br /> <br /> 正则.创建 (正则表达式, 文本)<br /> 数量 ＝ 正则.取匹配数量 ()<br /> .如果 (文本_取出中间文本 (正则表达式, “(”, “)”, , ) ＝ “”)<br />     .计次循环首 (数量, i)<br />         .如果真 (i ＝ 1)<br />             返回文本 ＝ 正则.取匹配文本 (i, 1)<br />         .如果真结束<br />         .如果真 (i ＝ 2)<br />             返回文本2 ＝ 正则.取匹配文本 (i, 1)<br />         .如果真结束<br />         .如果真 (i ＝ 3)<br />             返回文本3 ＝ 正则.取匹配文本 (i, 1)<br />             跳出循环 ()<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .否则<br />     .计次循环首 (数量, i)<br />         .如果真 (i ＝ 1)<br />             返回文本 ＝ 正则.取子匹配文本 (i, 1)<br />         .如果真结束<br />         .如果真 (i ＝ 2)<br />             返回文本2 ＝ 正则.取子匹配文本 (i, 1)<br />         .如果真结束<br />         .如果真 (i ＝ 3)<br />             返回文本3 ＝ 正则.取子匹配文本 (i, 1)<br />             跳出循环 ()<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> <br /> .如果结束<br /> 返回 (返回文本)

  

子程序名	返回值类型	公开	备 注
时间_是否符合区间	逻辑型		对比下现在时间是否在指定的时间范围内，不符合则返回假   具体看下参数
参数名	类 型	参考	可空	数组	备 注
时间区间文本	文本型				11:30-13:00  比如这个是午休时间，看看现在是不是午休时间
星期几	文本型				返回输入的时间文本里是星期几，可以输入周1-7，周一- 周日都会转化为星期几，如没有包含，则返回空

变量名	类 型	静态	数组	备 注
正则	正则表达式类
开始时间	日期时间型
文本组	文本型		0
现行周几	文本型
结束时间	日期时间型
t	长整数型
t1	长整数型
t2	长整数型

时间区间文本 ＝ 文本_替换 (时间区间文本, , , , “：”, “:”, “;”, “:”, “ ”, “”, “周”, “星期”, “礼拜”, “星期”)
正则.创建 (“(星期[1-7一二三四五六七日天]{1})”, 时间区间文本)
如果真 (正则.取子匹配数量 () ＞ 0)
星期几 ＝ 正则.取子匹配文本 (1, 1)
星期几 ＝ 文本_替换 (星期几, , , , “1”, “一”, “2”, “二”, “3”, “三”, “4”, “四”)
星期几 ＝ 文本_替换 (星期几, , , , “5”, “五”, “6”, “六”, “7”, “日”, “天”, “日”)
现行周几 ＝ 时间_取中国星期几 (取现行时间 ())
调试输出 (星期几)
如果真 (现行周几 ≠ 星期几)
返回 (假)

文本_正则取出匹配文本组 (时间区间文本, “(\d{2}:\d{2})”, 文本组)
调试输出 (时间区间文本)
如果 (取数组成员数 (文本组) ＞ 1)
t ＝ 到长整数 (时间_取现行时间戳 (真))
开始时间 ＝ 到时间 (时间_取现行日期格式化 () ＋ “ ” ＋ 文本组 [1])
结束时间 ＝ 到时间 (时间_取现行日期格式化 () ＋ “ ” ＋ 文本组 [2])
t1 ＝ 到长整数 (时间_到时间戳 (开始时间, 真))
t2 ＝ 到长整数 (时间_到时间戳 (结束时间, 真))
调试输出 (开始时间, 结束时间)
判断 (t ≥ t1 且 t ≤ t2)
返回 (真)
返回 (假)

返回 (假)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 时间_是否符合区间, 逻辑型, 公开, 对比下现在时间是否在指定的时间范围内，不符合则返回假   具体看下参数<br /> .参数 时间区间文本, 文本型, , 11:30-13:00  比如这个是午休时间，看看现在是不是午休时间<br /> .参数 星期几, 文本型, 参考 可空, 返回输入的时间文本里是星期几，可以输入周1-7，周一- 周日都会转化为星期几，如没有包含，则返回空<br /> .局部变量 正则, 正则表达式类<br /> .局部变量 开始时间, 日期时间型<br /> .局部变量 文本组, 文本型, , "0"<br /> .局部变量 现行周几, 文本型<br /> .局部变量 结束时间, 日期时间型<br /> .局部变量 t, 长整数型<br /> .局部变量 t1, 长整数型<br /> .局部变量 t2, 长整数型<br /> <br /> 时间区间文本 ＝ 文本_替换 (时间区间文本, , , , “：”, “:”, “;”, “:”, “ ”, “”, “周”, “星期”, “礼拜”, “星期”)<br /> 正则.创建 (“(星期[1-7一二三四五六七日天]{1})”, 时间区间文本)<br /> <br /> .如果真 (正则.取子匹配数量 () ＞ 0)<br />     星期几 ＝ 正则.取子匹配文本 (1, 1)<br />     星期几 ＝ 文本_替换 (星期几, , , , “1”, “一”, “2”, “二”, “3”, “三”, “4”, “四”)<br />     星期几 ＝ 文本_替换 (星期几, , , , “5”, “五”, “6”, “六”, “7”, “日”, “天”, “日”)<br />     现行周几 ＝ 时间_取中国星期几 (取现行时间 ())<br />     调试输出 (星期几)<br />     .如果真 (现行周几 ≠ 星期几)<br />         返回 (假)<br />     .如果真结束<br /> <br /> .如果真结束<br /> 文本_正则取出匹配文本组 (时间区间文本, “(\d{2}:\d{2})”, 文本组)<br /> 调试输出 (时间区间文本)<br /> .如果 (取数组成员数 (文本组) ＞ 1)<br />     t ＝ 到长整数 (时间_取现行时间戳 (真))<br />     开始时间 ＝ 到时间 (时间_取现行日期格式化 () ＋ “ ” ＋ 文本组 [1])<br />     结束时间 ＝ 到时间 (时间_取现行日期格式化 () ＋ “ ” ＋ 文本组 [2])<br />     t1 ＝ 到长整数 (时间_到时间戳 (开始时间, 真))<br />     t2 ＝ 到长整数 (时间_到时间戳 (结束时间, 真))<br />     调试输出 (开始时间, 结束时间)<br />     .判断开始 (t ≥ t1 且 t ≤ t2)<br />         返回 (真)<br />     .默认<br />         返回 (假)<br />     .判断结束<br /> <br /> .否则<br />     返回 (假)

  

子程序名	返回值类型	公开	备 注
时间_过年倒计时	文本型

变量名	类 型	静态	数组	备 注
年份	整数型
是否闰月	逻辑型
公历日期	日期时间型
现行时间	日期时间型
闰月	整数型

现行时间 ＝ 取现行时间 ()
年份 ＝ 取年份 (现行时间) ＋ 1
闰月 ＝ 取农历闰月 (年份)
如果 (闰月 ＝ 1)
是否闰月 ＝ 真
是否闰月 ＝ 假
农历转公历 (年份, 1, 1, 是否闰月, 公历日期)
返回 (时间_取时间间隔 (公历日期, 现行时间))
[e=0].版本 2

子程序名	返回值类型	公开	备 注
时间_过节倒计时	文本型
参数名	类 型	参考	可空	数组	备 注
农历月	整数型
农历日	整数型
年份	整数型				默认为今年,如果时间设定的时间是过去的时间，将自动累加为明年，比如现在是2021年11月5日，要cha询2021年10月1日的倒计时显然是不行，的则自动cha询2022年10月1日

变量名	类 型	静态	数组	备 注
是否闰月	逻辑型
公历日期	日期时间型
现行时间	日期时间型
闰月	整数型

现行时间 ＝ 取现行时间 ()
闰月 ＝ 取农历闰月 (年份)
如果 (取农历闰月 (年份) ＝ 闰月)
是否闰月 ＝ 真
是否闰月 ＝ 假
如果真 (是否为空 (年份))
年份 ＝ 取年份 (现行时间)
农历转公历 (年份, 农历月, 农历日, 是否闰月, 公历日期)
如果 (到整数 (时间_到时间戳 (现行时间, 真)) ＞ 到整数 (时间_到时间戳 (公历日期, 真)))
年份 ＝ 年份 ＋ 1



农历转公历 (年份, 农历月, 农历日, 是否闰月, 公历日期)
返回 (时间_取时间间隔 (公历日期, 现行时间))

i支持库列表	支持库注释
CnCalendar	农历日期支持库

.版本 2<br /> .支持库 CnCalendar<br /> <br /> .子程序 时间_过年倒计时, 文本型, 公开,  <br /> .局部变量 年份, 整数型<br /> .局部变量 是否闰月, 逻辑型<br /> .局部变量 公历日期, 日期时间型<br /> .局部变量 现行时间, 日期时间型<br /> .局部变量 闰月, 整数型<br /> <br /> 现行时间 ＝ 取现行时间 ()<br /> 年份 ＝ 取年份 (现行时间) ＋ 1<br /> 闰月 ＝ 取农历闰月 (年份)<br /> .如果 (闰月 ＝ 1)<br />     是否闰月 ＝ 真<br /> .否则<br />     是否闰月 ＝ 假<br /> .如果结束<br /> 农历转公历 (年份, 1, 1, 是否闰月, 公历日期)<br /> 返回 (时间_取时间间隔 (公历日期, 现行时间))<br /> [e=0].版本 2<br /> .支持库 CnCalendar<br /> <br /> .子程序 时间_过节倒计时, 文本型, 公开,  <br /> .参数 农历月, 整数型<br /> .参数 农历日, 整数型<br /> .参数 年份, 整数型, 可空, 默认为今年,如果时间设定的时间是过去的时间，将自动累加为明年，比如现在是2021年11月5日，要cha询2021年10月1日的倒计时显然是不行，的则自动cha询2022年10月1日<br /> .局部变量 是否闰月, 逻辑型<br /> .局部变量 公历日期, 日期时间型<br /> .局部变量 现行时间, 日期时间型<br /> .局部变量 闰月, 整数型<br /> <br /> 现行时间 ＝ 取现行时间 ()<br /> 闰月 ＝ 取农历闰月 (年份)<br /> .如果 (取农历闰月 (年份) ＝ 闰月)<br />     是否闰月 ＝ 真<br /> .否则<br />     是否闰月 ＝ 假<br /> .如果结束<br /> .如果真 (是否为空 (年份))<br />     年份 ＝ 取年份 (现行时间)<br />     农历转公历 (年份, 农历月, 农历日, 是否闰月, 公历日期)<br />     .如果 (到整数 (时间_到时间戳 (现行时间, 真)) ＞ 到整数 (时间_到时间戳 (公历日期, 真)))<br />         年份 ＝ 年份 ＋ 1<br />     .否则<br /> <br />     .如果结束<br /> <br /> .如果真结束<br /> 农历转公历 (年份, 农历月, 农历日, 是否闰月, 公历日期)<br /> 返回 (时间_取时间间隔 (公历日期, 现行时间))

  

子程序名	返回值类型	公开	备 注
文本_正则取出匹配文本组	整数型		如有子匹配优先返回子匹配，没有子匹配返回匹配文本
参数名	类 型	参考	可空	数组	备 注
文本	文本型
正则表达式	文本型				表达式务必使用（）,数组里将返回（）中的子匹配内容，如果没有括号，将返回匹配文本，而非子匹配文本
返回文本组	文本型

变量名	类 型	静态	数组	备 注
正则	正则表达式类
i	整数型
数量	整数型

正则.创建 (正则表达式, 文本)
重定义数组 (返回文本组, 假, 0)
数量 ＝ 正则.取匹配数量 ()
如果 (文本_取出中间文本 (正则表达式, “(”, “)”, , ) ＝ “”)
计次循环首 (数量, i)
加入成员 (返回文本组, 正则.取匹配文本 (i, 1))
计次循环尾 ()
计次循环首 (数量, i)
加入成员 (返回文本组, 正则.取子匹配文本 (i, 1))
计次循环尾 ()
返回 (数量)

.版本 2<br /> <br /> .子程序 文本_正则取出匹配文本组, 整数型, 公开, 如有子匹配优先返回子匹配，没有子匹配返回匹配文本<br /> .参数 文本, 文本型<br /> .参数 正则表达式, 文本型, , 表达式务必使用（）,数组里将返回（）中的子匹配内容，如果没有括号，将返回匹配文本，而非子匹配文本<br /> .参数 返回文本组, 文本型, 可空 数组<br /> .局部变量 正则, 正则表达式类<br /> .局部变量 i, 整数型<br /> .局部变量 数量, 整数型<br /> <br /> 正则.创建 (正则表达式, 文本)<br /> 重定义数组 (返回文本组, 假, 0)<br /> 数量 ＝ 正则.取匹配数量 ()<br /> .如果 (文本_取出中间文本 (正则表达式, “(”, “)”, , ) ＝ “”)<br />     .计次循环首 (数量, i)<br />         加入成员 (返回文本组, 正则.取匹配文本 (i, 1))<br />     .计次循环尾 ()<br /> .否则<br />     .计次循环首 (数量, i)<br />         加入成员 (返回文本组, 正则.取子匹配文本 (i, 1))<br />     .计次循环尾 ()<br /> <br /> .如果结束<br /> 返回 (数量)

  

子程序名	返回值类型	公开	备 注
时间_取现行时间格式化	文本型		返回一般的年月日时分秒
参数名	类 型	参考	可空	数组	备 注
欲转换的时间	日期时间型				留空则为现行时间

如果真 (是否为空 (欲转换的时间))
欲转换的时间 ＝ 取现行时间 ()
返回 (时间_格式化 (欲转换的时间, “yyyy-M-d ”, “hh:mm:ss”, 真))

子程序名	返回值类型	公开	备 注
时间_取现行日期格式化	文本型		返回年月日，不带时分秒的单日日期
参数名	类 型	参考	可空	数组	备 注
欲转换的时间	日期时间型				留空则为现行时间

如果真 (是否为空 (欲转换的时间))
欲转换的时间 ＝ 取现行时间 ()
返回 (时间_格式化 (欲转换的时间, “yyyy-M-d”, “”, 真))

.版本 2<br /> <br /> .子程序 时间_取现行时间格式化, 文本型, 公开, 返回一般的年月日时分秒<br /> .参数 欲转换的时间, 日期时间型, 可空, 留空则为现行时间<br /> <br /> .如果真 (是否为空 (欲转换的时间))<br />     欲转换的时间 ＝ 取现行时间 ()<br /> .如果真结束<br /> 返回 (时间_格式化 (欲转换的时间, “yyyy-M-d ”, “hh:mm:ss”, 真))<br /> <br /> <br /> .子程序 时间_取现行日期格式化, 文本型, 公开, 返回年月日，不带时分秒的单日日期<br /> .参数 欲转换的时间, 日期时间型, 可空, 留空则为现行时间<br /> <br /> .如果真 (是否为空 (欲转换的时间))<br />     欲转换的时间 ＝ 取现行时间 ()<br /> .如果真结束<br /> 返回 (时间_格式化 (欲转换的时间, “yyyy-M-d”, “”, 真))

曜辉

很实用的一个东西,不错的说,赞一个!

xh1020

很实用的一个东西,不错的说,赞一个!

likeliang123

感谢分享,楼主辛苦了.

fusiyon

  感谢发布原创作品

wuqingg

  感谢发布原创作品，精易有你更精彩

crary06

感谢分享！~~~~~~~

qq303533398

感谢分享！~~~~~~~

lwbzuiai

感谢感谢