-- 作者:jinzhe
-- 发布时间:2015/8/10 9:42:15
--
k:=10000000; t:=-1000000000; for i=2 to 30 do BEGIN if c<ma(c,i) and c-ma(c,i)>t then begin t:=c-ma(c,i); nn:=i; end if c>ma(c,i) and c-ma(c,i)<k then begin k:=c-ma(c,i); ss:=i; end end sss:ss; nnn:nn;
sss为ma在c之下的,nnn为ma在c之上的
|
-- 作者:Q_Q
-- 发布时间:2015/8/12 0:10:31
--
k:=10000000; t:=-1000000000;
for i=13 to 30 do BEGIN emac:=ema(c,i); if c<ema(c,i) and c-ema(c,i)>t then begin t:=c-emac; nn:=i; end if c>ema(c,i) and c-ema(c,i)<k then begin k:=c-emac; ss:=i; end end 下:ss,nodraw; 上:nn,nodraw;
drawnumber(ss,ema(c,ss),ss,0)colorred; drawnumber(nn,ema(c,nn),nn,0);
此主题相关图片如下:newscreen11761750.jpg
![dvubb 图片点击可在新窗口打开查看](UploadFile/2015-8/2015812011385368.jpg)
[此贴子已经被作者于2015/8/12 0:11:08编辑过]
|