精易论坛

标题: 工作日增减，也可做为股票交易日增减 [打印本页]

---

作者: sksksz    时间: 2020-10-8 05:23
标题: 工作日增减，也可做为股票交易日增减


工作日增减.e (772.78 KB, 下载次数: 58)

2020-10-8 07:25 上传

点击文件名下载附件
下载积分: 精币 -2 枚

  

子程序名	返回值类型	公开	备 注
工作日增减	日期时间型
参数名	类 型	参考	可空	数组	备 注
原日期	日期时间型
增减值	整数型

变量名	类 型	静态	数组	备 注
增减标记	整数型
增减计次	整数型
临时日期	日期时间型

判断 (增减值 ≥ 1)
增减标记 ＝ 1
判断 (增减值 ≤ -1)
增减标记 ＝ -1
返回 (原日期)
临时日期 ＝ 原日期
判断循环首 (增减计次 ＜ 取绝对值 (增减值))
临时日期 ＝ 增减时间 (临时日期, #日, 增减标记)
如果真 (是否为工作日 (临时日期) ＝ 真 且 是否为节假日 (临时日期) ＝ 假)
增减计次 ＝ 增减计次 ＋ 1

判断循环尾 ()
返回 (临时日期)

子程序名	返回值类型	公开	备 注
是否为工作日	逻辑型
参数名	类 型	参考	可空	数组	备 注
日期	日期时间型

如果真 (取星期几 (日期) ≠ 7 且 取星期几 (日期) ≠ 1)
返回 (真)
返回 (假)

子程序名	返回值类型	公开	备 注
是否为节假日	逻辑型
参数名	类 型	参考	可空	数组	备 注
日期	日期时间型

变量名	类 型	静态	数组	备 注
文本日期	文本型

文本日期 ＝ 取简洁年月日A (日期)
判断 (文本日期 ＝ “20200101”)  ' 元旦
返回 (真)
判断 (文本日期 ＝ “20200124”)  ' 春节
返回 (真)
判断 (文本日期 ＝ “20200125”)  ' 春节
返回 (真)
判断 (文本日期 ＝ “20200126”)  ' 春节
返回 (真)
判断 (文本日期 ＝ “20200127”)  ' 春节
返回 (真)
判断 (文本日期 ＝ “20200128”)  ' 春节
返回 (真)
判断 (文本日期 ＝ “20200129”)  ' 春节
返回 (真)
判断 (文本日期 ＝ “20200130”)  ' 春节
返回 (真)
判断 (文本日期 ＝ “20200404”)  ' 清明节
返回 (真)
判断 (文本日期 ＝ “20200405”)  ' 清明节
返回 (真)
判断 (文本日期 ＝ “20200406”)  ' 清明节
返回 (真)
判断 (文本日期 ＝ “20200501”)  ' 劳动节
返回 (真)
判断 (文本日期 ＝ “20200502”)  ' 劳动节
返回 (真)
判断 (文本日期 ＝ “20200503”)  ' 劳动节
返回 (真)
判断 (文本日期 ＝ “20200504”)  ' 劳动节
返回 (真)
判断 (文本日期 ＝ “20200505”)  ' 劳动节
返回 (真)
判断 (文本日期 ＝ “20200625”)  ' 端午节
返回 (真)
判断 (文本日期 ＝ “20200626”)  ' 端午节
返回 (真)
判断 (文本日期 ＝ “20200627”)  ' 端午节
返回 (真)
判断 (文本日期 ＝ “20201001”)  ' 国庆节、中秋节
返回 (真)
判断 (文本日期 ＝ “20201002”)  ' 国庆节、中秋节
返回 (真)
判断 (文本日期 ＝ “20201003”)  ' 国庆节、中秋节
返回 (真)
判断 (文本日期 ＝ “20201004”)  ' 国庆节、中秋节
返回 (真)
判断 (文本日期 ＝ “20201005”)  ' 国庆节、中秋节
返回 (真)
判断 (文本日期 ＝ “20201006”)  ' 国庆节、中秋节
返回 (真)
判断 (文本日期 ＝ “20201007”)  ' 国庆节、中秋节
返回 (真)
判断 (文本日期 ＝ “20201008”)  ' 国庆节、中秋节
返回 (真)


返回 (假)

.版本 2<br /> <br /> .子程序 工作日增减, 日期时间型<br /> .参数 原日期, 日期时间型<br /> .参数 增减值, 整数型<br /> .局部变量 增减标记, 整数型<br /> .局部变量 增减计次, 整数型<br /> .局部变量 临时日期, 日期时间型<br /> <br /> .判断开始 (增减值 ≥ 1)<br />     增减标记 ＝ 1<br /> .判断 (增减值 ≤ -1)<br />     增减标记 ＝ -1<br /> .默认<br />     返回 (原日期)<br /> .判断结束<br /> 临时日期 ＝ 原日期<br /> .判断循环首 (增减计次 ＜ 取绝对值 (增减值))<br />     临时日期 ＝ 增减时间 (临时日期, #日, 增减标记)<br />     .如果真 (是否为工作日 (临时日期) ＝ 真 且 是否为节假日 (临时日期) ＝ 假)<br />         增减计次 ＝ 增减计次 ＋ 1<br />     .如果真结束<br /> <br /> .判断循环尾 ()<br /> 返回 (临时日期)<br /> <br /> .子程序 是否为工作日, 逻辑型<br /> .参数 日期, 日期时间型<br /> <br /> .如果真 (取星期几 (日期) ≠ 7 且 取星期几 (日期) ≠ 1)<br />     返回 (真)<br /> .如果真结束<br /> 返回 (假)<br /> <br /> .子程序 是否为节假日, 逻辑型<br /> .参数 日期, 日期时间型<br /> .局部变量 文本日期, 文本型<br /> <br /> 文本日期 ＝ 取简洁年月日A (日期)<br /> .判断开始 (文本日期 ＝ “20200101”)  ' 元旦<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20200124”)  ' 春节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20200125”)  ' 春节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20200126”)  ' 春节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20200127”)  ' 春节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20200128”)  ' 春节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20200129”)  ' 春节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20200130”)  ' 春节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20200404”)  ' 清明节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20200405”)  ' 清明节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20200406”)  ' 清明节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20200501”)  ' 劳动节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20200502”)  ' 劳动节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20200503”)  ' 劳动节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20200504”)  ' 劳动节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20200505”)  ' 劳动节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20200625”)  ' 端午节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20200626”)  ' 端午节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20200627”)  ' 端午节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20201001”)  ' 国庆节、中秋节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20201002”)  ' 国庆节、中秋节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20201003”)  ' 国庆节、中秋节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20201004”)  ' 国庆节、中秋节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20201005”)  ' 国庆节、中秋节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20201006”)  ' 国庆节、中秋节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20201007”)  ' 国庆节、中秋节<br />     返回 (真)<br /> .判断 (文本日期 ＝ “20201008”)  ' 国庆节、中秋节<br />     返回 (真)<br /> .默认<br /> <br /> .判断结束<br /> 返回 (假)

---

作者: 菜就多多练    时间: 2020-10-8 11:23
面对现实吧 2020的假期已经过完了

---

作者: 李泽勇2    时间: 2020-10-8 11:42
你应该这样写会好些。

  

子程序名	返回值类型	公开	备 注
时间_取公历节日_修改	文本型		只适合本系统，只保留 元旦节，劳动节，国庆节
参数名	类 型	参考	可空	数组	备 注
公历年	整数型
公历月	整数型
公历日	整数型
国庆节天数	整数型				留空默认3天

变量名	类 型	静态	数组	备 注
节日文本	文本型
星期几	整数型

星期几 ＝ 取星期几 (到时间 (到文本 (公历年) ＋ “年” ＋ 到文本 (公历月) ＋ “月” ＋ 到文本 (公历日) ＋ “日”))
节日文本 ＝ “”
如果真 (公历月 ＝ 1 且 公历日 ＝ 1)
节日文本 ＝ “元旦节”
如果真 (公历月 ＝ 5 且 公历日 ＝ 1)
节日文本 ＝ “劳动节”

如果真 (是否为空 (国庆节天数))
国庆节天数 ＝ 3

如果真 (公历月 ＝ 10 且 公历日 ≥ 1 且 公历日 ≤ 国庆节天数)
节日文本 ＝ “国庆节”
返回 (节日文本)

.版本 2<br /> <br /> .子程序 时间_取公历节日_修改, 文本型, 公开, 只适合本系统，只保留 元旦节，劳动节，国庆节<br /> .参数 公历年, 整数型, 可空<br /> .参数 公历月, 整数型, 可空<br /> .参数 公历日, 整数型, 可空<br /> .参数 国庆节天数, 整数型, 可空, 留空默认3天<br /> .局部变量 节日文本, 文本型<br /> .局部变量 星期几, 整数型<br /> <br /> 星期几 ＝ 取星期几 (到时间 (到文本 (公历年) ＋ “年” ＋ 到文本 (公历月) ＋ “月” ＋ 到文本 (公历日) ＋ “日”))<br /> 节日文本 ＝ “”<br /> .如果真 (公历月 ＝ 1 且 公历日 ＝ 1)<br />     节日文本 ＝ “元旦节”<br /> .如果真结束<br /> .如果真 (公历月 ＝ 5 且 公历日 ＝ 1)<br />     节日文本 ＝ “劳动节”<br /> .如果真结束<br /> <br /> .如果真 (是否为空 (国庆节天数))<br />     国庆节天数 ＝ 3<br /> .如果真结束<br /> <br /> .如果真 (公历月 ＝ 10 且 公历日 ≥ 1 且 公历日 ≤ 国庆节天数)<br />     节日文本 ＝ “国庆节”<br /> .如果真结束<br /> 返回 (节日文本)

  

子程序名	返回值类型	公开	备 注
国庆中秋是否重复	逻辑型
参数名	类 型	参考	可空	数组	备 注
工时表_日期	文本型

变量名	类 型	静态	数组	备 注
公历节日	文本型
农历节日	文本型
年	整数型
月	整数型
日	整数型
闰月	逻辑型
分割后年	文本型
分割后月	文本型
分割后日	文本型
日期分割	文本型		0

日期分割 ＝ 分割文本 (工时表_日期, “-”, )
分割后年 ＝ 日期分割 [1]
分割后月 ＝ 日期分割 [2]
分割后日 ＝ 日期分割 [3]
公历节日 ＝ 时间_取公历节日_修改 (到整数 (分割后年), 到整数 (分割后月), 到整数 (分割后日), )
公历转农历 (到时间 (工时表_日期), 年, 月, 日, 闰月)
农历节日 ＝ 取农历节日_定制 (月, 日)
返回 (公历节日 ＝ 农历节日)

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

.版本 2<br /> .支持库 CnCalendar<br /> <br /> .子程序 国庆中秋是否重复, 逻辑型<br /> .参数 工时表_日期, 文本型<br /> .局部变量 公历节日, 文本型<br /> .局部变量 农历节日, 文本型<br /> .局部变量 年, 整数型<br /> .局部变量 月, 整数型<br /> .局部变量 日, 整数型<br /> .局部变量 闰月, 逻辑型<br /> .局部变量 分割后年, 文本型<br /> .局部变量 分割后月, 文本型<br /> .局部变量 分割后日, 文本型<br /> .局部变量 日期分割, 文本型, , "0"<br /> <br /> 日期分割 ＝ 分割文本 (工时表_日期, “-”, )<br /> 分割后年 ＝ 日期分割 [1]<br /> 分割后月 ＝ 日期分割 [2]<br /> 分割后日 ＝ 日期分割 [3]<br /> 公历节日 ＝ 时间_取公历节日_修改 (到整数 (分割后年), 到整数 (分割后月), 到整数 (分割后日), )<br /> 公历转农历 (到时间 (工时表_日期), 年, 月, 日, 闰月)<br /> 农历节日 ＝ 取农历节日_定制 (月, 日)<br /> 返回 (公历节日 ＝ 农历节日)

  

子程序名	返回值类型	公开	备 注
取清明节_定制	文本型		清明节用公历日期
参数名	类 型	参考	可空	数组	备 注
公历月份	整数型
公历天数	整数型

变量名	类 型	静态	数组	备 注
节日文本	文本型

判断 (时间_取月总天数 (取年份 (取现行时间 ()), 2) ＝ 29)
如果真 (公历月份 ＝ 4 且 公历天数 ＝ 4)
节日文本 ＝ “清明节”

如果真 (公历月份 ＝ 4 且 公历天数 ＝ 5)
节日文本 ＝ “清明节”

返回 (节日文本)

.版本 2<br /> <br /> .子程序 取清明节_定制, 文本型, 公开, 清明节用公历日期<br /> .参数 公历月份, 整数型<br /> .参数 公历天数, 整数型<br /> .局部变量 节日文本, 文本型<br /> <br /> .判断开始 (时间_取月总天数 (取年份 (取现行时间 ()), 2) ＝ 29)<br />     .如果真 (公历月份 ＝ 4 且 公历天数 ＝ 4)<br />         节日文本 ＝ “清明节”<br />     .如果真结束<br /> <br /> .默认<br />     .如果真 (公历月份 ＝ 4 且 公历天数 ＝ 5)<br />         节日文本 ＝ “清明节”<br />     .如果真结束<br /> <br /> .判断结束<br /> 返回 (节日文本)

  

子程序名	返回值类型	公开	备 注
取农历节日_定制	文本型		取农历所对应该的节日，需要事先知道农历日期的月份，与日子，
参数名	类 型	参考	可空	数组	备 注
农历月份	整数型
农历天数	整数型

变量名	类 型	静态	数组	备 注
节日文本	文本型
农历年	整数型
农历月	整数型
农历日	整数型
闰月	逻辑型

节日文本 ＝ “”
如果真 (农历月份 ＝ 1 且 农历天数 ≥ 1 且 农历天数 ≤ 到整数 (集_春节))
节日文本 ＝ “春节”
如果真 (农历月份 ＝ 1 且 农历天数 ＝ 15)
节日文本 ＝ “元宵节”
如果真 (农历月份 ＝ 2 且 农历天数 ＝ 2)
节日文本 ＝ “中和节”
如果真 (农历月份 ＝ 5 且 农历天数 ＝ 5)
节日文本 ＝ “端午节”
如果真 (农历月份 ＝ 7 且 农历天数 ＝ 7)
节日文本 ＝ “七巧节”
如果真 (农历月份 ＝ 8 且 农历天数 ＝ 15)
节日文本 ＝ “中秋节”
如果真 (农历月份 ＝ 9 且 农历天数 ＝ 9)
节日文本 ＝ “重阳节”
如果真 (农历月份 ＝ 12 且 农历天数 ＝ 8)
节日文本 ＝ “腊八节”
如果真 (农历月份 ＝ 12 且 农历天数 ＝ 24)
节日文本 ＝ “小年”
公历转农历 (取现行时间 (), 农历年, 农历月, 农历日, 闰月)
如果真 (农历月份 ＝ 12 且 农历天数 ＝ 取农历月总天数 (农历年, 农历月, 闰月))
节日文本 ＝ “除夕”
返回 (节日文本)

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

.版本 2<br /> .支持库 CnCalendar<br /> <br /> .子程序 取农历节日_定制, 文本型, 公开, 取农历所对应该的节日，需要事先知道农历日期的月份，与日子，<br /> .参数 农历月份, 整数型<br /> .参数 农历天数, 整数型<br /> .局部变量 节日文本, 文本型<br /> .局部变量 农历年, 整数型<br /> .局部变量 农历月, 整数型<br /> .局部变量 农历日, 整数型<br /> .局部变量 闰月, 逻辑型<br /> <br /> 节日文本 ＝ “”<br /> .如果真 (农历月份 ＝ 1 且 农历天数 ≥ 1 且 农历天数 ≤ 到整数 (集_春节))<br />     节日文本 ＝ “春节”<br /> <br /> .如果真结束<br /> .如果真 (农历月份 ＝ 1 且 农历天数 ＝ 15)<br />     节日文本 ＝ “元宵节”<br /> <br /> .如果真结束<br /> .如果真 (农历月份 ＝ 2 且 农历天数 ＝ 2)<br />     节日文本 ＝ “中和节”<br /> <br /> .如果真结束<br /> .如果真 (农历月份 ＝ 5 且 农历天数 ＝ 5)<br />     节日文本 ＝ “端午节”<br /> <br /> .如果真结束<br /> .如果真 (农历月份 ＝ 7 且 农历天数 ＝ 7)<br />     节日文本 ＝ “七巧节”<br /> <br /> .如果真结束<br /> .如果真 (农历月份 ＝ 8 且 农历天数 ＝ 15)<br />     节日文本 ＝ “中秋节”<br /> <br /> .如果真结束<br /> .如果真 (农历月份 ＝ 9 且 农历天数 ＝ 9)<br />     节日文本 ＝ “重阳节”<br /> <br /> .如果真结束<br /> .如果真 (农历月份 ＝ 12 且 农历天数 ＝ 8)<br />     节日文本 ＝ “腊八节”<br /> <br /> .如果真结束<br /> .如果真 (农历月份 ＝ 12 且 农历天数 ＝ 24)<br />     节日文本 ＝ “小年”<br /> <br /> .如果真结束<br /> 公历转农历 (取现行时间 (), 农历年, 农历月, 农历日, 闰月)<br /> .如果真 (农历月份 ＝ 12 且 农历天数 ＝ 取农历月总天数 (农历年, 农历月, 闰月))<br />     节日文本 ＝ “除夕”<br /> .如果真结束<br /> 返回 (节日文本)

---

作者: panda92    时间: 2020-10-9 09:03
这个写法学习下，谢谢两位

---

作者: lgj5000    时间: 2020-10-10 21:55
学习一下     

---

作者: 深圳梦    时间: 2020-10-11 16:18
感谢分享，很给力！~

---

作者: 懒人定制软件    时间: 2020-10-13 01:04
感谢分享，很给力！~

---

作者: lm88818    时间: 2020-10-19 15:08
感谢分享，很给力

---

作者: whoareyou    时间: 2020-10-23 20:40

感谢分享，很给力！~

---

作者: 凉城o    时间: 2021-1-29 07:34
谢谢大佬分享 支持支持

---

作者: lm88818    时间: 2021-4-23 13:57
谢谢大佬分享

---

作者: 独倚斜阳    时间: 2021-6-11 00:05
这……

我选择只判断1-5  碰到假期手动干预

---

作者: wh1234567    时间: 2022-2-5 12:34
老师写个用易语言股票下单交易接口的例子吧？

---

作者: sgsg    时间: 2022-5-6 21:56
66666666666666666666666666666666666666666666666666666666666666

---

作者: Gosling    时间: 2022-5-29 06:39
这个是好东西，感谢分享

---

作者: ghost12    时间: 2022-6-2 03:00
精彩文章希望继续努力

---

作者: 欸嘿    时间: 2022-6-8 20:43
这个是好东西，感谢分享

---

作者: chouchong06    时间: 2022-11-20 20:36
这个是好东西，感谢分享

---

作者: 一米阳光2    时间: 2023-6-21 16:51
请问作者这是干什么用的

---

作者: ssjc6688    时间: 2023-7-15 09:57
这个是好东西，感谢分享

---

作者: 前行易语言    时间: 2024-6-14 16:37
谢谢楼主的分享..

---

作者: shaojiecn    时间: 2024-7-2 23:51
非常感谢楼主分享

---

作者: 张升    时间: 2024-12-7 15:18
33333333333333

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4