精易论坛

标题: rsi算法分享看论坛缺少这类源码 [打印本页]

作者: cc4934 时间: 2022-1-5 22:49
标题: rsi算法分享看论坛缺少这类源码
抛砖引玉
.版本 2
.支持库 spec

.子程序 rsi, 双精度小数型
.参数 c, 双精度小数型, 数组
.参数 n, 整数型, 可空
.局部变量 ref, 双精度小数型
.局部变量 sum, 双精度小数型
.局部变量计次, 整数型
.局部变量 lc, 双精度小数型
.局部变量 close, 双精度小数型
.局部变量 sum1, 双精度小数型
.局部变量 r1, 双精度小数型, , "0"
.局部变量 r2, 双精度小数型, , "0"
.局部变量 rsi1, 双精度小数型

.计次循环首 (取数组成员数 (c), 计次)
.判断开始 (计次＞ 1)
      lc ＝ c [计次－ 1]
      close ＝ c [计次]
      sum ＝ max (close, lc)
      sum1 ＝取绝对值 (close － lc)
      加入成员 (r1, sum)
      加入成员 (r2, sum1)
      .判断开始 (取数组成员数 (r1) ＞ 13)
         rsi1 ＝求总数 (r1) ÷ 求总数 (r2) × 100
         删除成员 (r1, 1, )
         删除成员 (r2, 1, )
      .默认

      .判断结束

.默认

.判断结束

.计次循环尾 ()
调试输出 (rsi1)
返回 (rsi1)

.版本 2

.子程序 max, 双精度小数型
.参数 a, 双精度小数型
.参数 b, 双精度小数型
.局部变量 c, 双精度小数型

c ＝ a － b
.判断开始 (a ＞ b)
返回 (c)
.默认
返回 (0)

作者: 喵帕斯和艾希 时间: 2022-1-6 00:03
感谢楼主的分享，下载看看

作者: 醉卧美人膝 时间: 2022-1-6 00:13
谢谢分享来看看

作者: xjshuaishuai 时间: 2022-1-6 10:01
谢谢分享！

作者: 梦° 时间: 2022-1-6 12:53
谢谢分享！

作者: seven7c 时间: 2022-1-6 15:02
少了求总数这个子程序呢

作者: xtavoxing 时间: 2022-1-6 16:28
嗯......................

作者: cc4934 时间: 2022-1-6 21:47

seven7c 发表于 2022-1-6 15:02
少了求总数这个子程序呢

.版本 2

.子程序求总数, 双精度小数型
.参数 c, 双精度小数型, 数组
.局部变量计次, 整数型
.局部变量 c1, 双精度小数型

c1 ＝ 0
.计次循环首 (取数组成员数 (c), 计次)
c1 ＝ c1 ＋ c [计次]
.计次循环尾 ()
返回 (c1)

作者: 成神之日 时间: 2022-1-7 05:45

作者: qqmqqg 时间: 2022-2-15 00:08
66666666666666666

作者: 独倚斜阳 时间: 2022-3-13 00:34
拼凑数据后结果老是0奇怪了

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