实战图形:
赛为智能 理想化 价格周期 模型
汉王科技 智能自控 东港股份 恒久科技 input:x(0.63,0.1,6);
完全周期:=sumbars(v,x*capital);
完全价:(SUM(AMOUNT,完全周期)-REF(AMOUNT,完全周期-1)*(SUM(V,完全周期)-x*CAPITAL)/REF(V,完全周期-1))/(x*capital)/100;
完全价 采用 63%换手 的 平均成本 均价,而非 几日 均价。
底部 成交量 低,计算周期 自动 伸长。淡定买入。顶部 成交量 大,计算周期 自动 缩短。即时卖出。
而且,进行了 修正。在完全周期内 总 的 换手 是 比 63% 大一点点的,需要 减去 首 周期 的 多出 的 交易额 与 成交量。首周期离得远,对现在的完全价影响小。完全价 得到了 修正,精准 可靠 顺滑。
5分钟 1分钟 数据下,完全价 会 更加 精确 顺滑。
总结:快准狠稳。
{显示所属板块}
//定义常量
所属板块字符串:=BLKNAME;
截取所属板块字符串:=‘ 所属板块: ‘+所属板块字符串;
单行最大显示长度:=222;//单位:字节 原260 1920*1080
截取所属板块字符串长度:=
STRL EN(截取所属板块字符串);
//定义并初始化变量
显示字符串:=‘‘;
逗号:=‘,‘;
末单字符截取位置:=单行最大显示长度+1;
单行末单个字符:=‘‘;
//判断截取长度
IF 截取所属板块字符串长度>单行最大显示长度 THEN
//截取长度超过单行最大显示长度时,开始以下运算.
BEGIN
//截取长度超过单行最大显示长度时,循环
WHILE 截取所属板块字符串长度>单行最大显示长度 DO
BEGIN
//循环计算单行最大长度前最后一个逗号的位置
WHILE
STRC MP(单行末单个字符,逗号)0 DO
BEGIN
单行末单个字符:=
STRM ID(截取所属板块字符串,末单字符截取位置,1);
末单字符截取位置:=末单字符截取位置-1;
END;
//截取截取所属板块字符串到最后逗号位置.
单行可显示字符串:=STRLEFT(截取所属板块字符串,末单字符截取位置+1)+‘\n‘;
//逗号位置所截取长度.
单行可显示字符串长度:=STRLEN(单行可显示字符串)-1;
//前段填充空格 对 所属板块字符串
截取所属板块字符串:=‘ ‘+STRMID(截取所属板块字符串,单行可显示字符串长度,0);
//填充后字符串长度.
截取所属板块字符串长度:=STRLEN(截取所属板块字符串);
//再次初始化变量.
末单字符截取位置:=单行最大显示长度+1;
单行末单个字符:=‘‘;
//对可显示字符串进行累加.
显示字符串:=显示字符串+单行可显示字符串;
END;
//累加后的可显示字符串累加最后一行截取字符串.
显示字符串:=显示字符串+截取所属板块字符串;
END;
ELSE//截取长度不超过单行最大显示长度时,进行以下运算.
显示字符串:=截取所属板块字符串;
//屏幕左上角显示输出可显示所属板块字符串.
DRAWTE
XTEX (1,0,0,72,显示字符串),color8B8B00;
{/显示所属板块}