數組 中的large small顯示不出來
作者：金字塔 來源：cxh99.com 發布時間：2015年12月05日
- 咨詢內容：
為了測試數組kpt:OPENMINUTES(time),LINETHICK0;VARIABLE:vh[270]=0;vh[kpt]:=vol;tee:LARGE(vh,200,1),LINETHICK0;teX:SMALL(vh,270,1),LINETHICK0; 最后最大tee 最小teX 顯示均不正確，怎么回事？
- 金字塔客服：
其實我是想求出60秒內最大現手，用數組的方式syms:=time0-timetot0(dynainfo(207)),LINETHICK0; //本分鐘內剩余秒數kms:60-syms,LINETHICK0; //本分鐘內已開盤的秒數...dss:=max(現手,qxs1); //一秒鐘內的現手取大值
VARIABLE:ds[60]=0; ds[kms]:=dss;zdss:large(ds,60,1),LINETHICK0;求不出60秒內的最大現手？
- 用戶回復：
已解決，用for 循環 不過要用到writeinifile 把一分鐘內的現手寫進去 再用for讀出來
- 網友回復：
你現在越來越厲害了
解決代碼貼一下哈
- 網友回復：
//60秒內的最大手數qms:=WRITEINIFILE('d:\qms.ini','qms','qms',GETINIFILE('d:\ms.ini','ms','ms'));ms:=WRITEINIFILE('d:\ms.ini','ms','ms',kms);dss:=max(現手,qxs1);if kms<>GETINIFILE('d:\qms.ini','qms','qms') then begin WRITEINIFILE('d:\ds.ini','ds','ds'&NUMTOSTR(kms+1,0),dss); endVARIABLE:ds[60]=0;for i=1 to 60 do begin ds[i]:=GETINIFILE('d:\ds.ini','ds','ds'&NUMTOSTR(i,0)); endzxss:small(ss,60,1),LINETHICK0;zdss:large(ds,60,1),LINETHICK0;
qzd:=WRITEINIFILE('d:\zdxs.ini','qzdx','qzdx',GETINIFILE('d:\zdxs.ini','zdxs','zdxs'));if 現手>0 then WRITEINIFILE('d:\zdxs.ini','zdxs','zdxs',zdss);qzdx:=getINIFILE('d:\zdxs.ini','qzdx','qzdx');if zdss<>qzdx then debugfile('d:\zdss.txt',NUMTOSTR(最新價,1)&' '&NUMTOSTR(zdss,0),0);//輸出60秒內最大現手
打印本文
關閉窗口