老師能否幫我把這個(gè)代碼轉(zhuǎn)化成文華能用的代碼~

作者：文華財(cái)經(jīng) 來源：cxh99.com 發(fā)布時(shí)間：2014年04月11日

咨詢內(nèi)容： 老師能否幫我把這個(gè)代碼轉(zhuǎn)化成文華能用的代碼~ O(∩_∩)O謝謝
V2:=C-MA(C,7);EE:=CLOSE;Y:=0;J:=0;S:=0;SHOWTIME:=288;IF DATACOUNT>=(N+7) THEN BEGIN IF DATACOUNT>=(SHOWTIME+N+7) THEN SHOWTIME:=288 ELSE SHOWTIME:=DATACOUNT-N-7; FOR Y=DATACOUNT-SHOWTIME TO DATACOUNT DO BEGIN FOR J=1 TO N DO TEMP[J]:= V2[Y-J+1]; TEMPSORT:=SORT(TEMP,0,1,N); SX:=0; SC:=0; FOR S=0 TO M-1 DO BEGIN SX:=SX+TEMP[N-S]; SC:=SC+TEMP[1+S]; END; SX:=SX/M; SC:=SC/M; EEMA:=( EE[Y]+EE[Y-1]+EE[Y-2]+EE[Y-3]+EE[Y-4]+EE[Y-5])/6; SU[Y]:=SX*7/6*平均超買超賣值/100+EEMA; SD[Y]:=SC*7/6*平均超買超賣值/100+EEMA; END; 超買基準(zhǔn)價(jià):SU,SHIFT1,COLORRED,LINETHICK1;超賣基準(zhǔn)價(jià):SD,SHIFT1,COLORBLUE,LINETHICK1;
//超買預(yù)測價(jià)格: REF(超買基準(zhǔn)價(jià),0),COLORRED,LINETHICK0;//超賣預(yù)測價(jià)格: REF(超賣基準(zhǔn)價(jià),0),COLORGREEN,LINETHICK0;PARTLINE(0<REF(超買基準(zhǔn)價(jià),1),REF(超買基準(zhǔn)價(jià),1)),COLORRED,LINETHICK2;PARTLINE(0<REF(超賣基準(zhǔn)價(jià),1),REF(超賣基準(zhǔn)價(jià),1)),COLORBLUE,LINETHICK2;PARTLINE(H>REF(超買基準(zhǔn)價(jià),1),REF(超買基準(zhǔn)價(jià),1)),COLORBLACK,LINETHICK1;PARTLINE(L<REF(超賣基準(zhǔn)價(jià),1),REF(超賣基準(zhǔn)價(jià),1)),COLORBLACK,LINETHICK2;//超買預(yù)測價(jià)格A:REF(超買基準(zhǔn)價(jià),1),COLORMAGENTA,LINETHICK0;//超賣預(yù)測價(jià)格A:REF(超賣基準(zhǔn)價(jià),1),COLORMAGENTA,LINETHICK0;DRAWTEXT((SYSPARAM(3) = BARSCOUNT(CLOSE)),SU,( NUMTOSTR(SU,2))),SHIFT2,COLORRED;DRAWTEXT((SYSPARAM(3) = BARSCOUNT(CLOSE)),SD,( NUMTOSTR(SD,2))),SHIFT2,COLORRED;DRAWICON((SYSPARAM(3) = BARSCOUNT(CLOSE)),SU,12),SHIFT1;DRAWICON((SYSPARAM(3) = BARSCOUNT(CLOSE)),SD,12),SHIFT1;
DRAWICON(CROSS(CLOSE,REF(超買基準(zhǔn)價(jià),1)),HIGH*1.02,5);DRAWICON(CROSS(REF(超賣基準(zhǔn)價(jià),1),CLOSE),LOW*0.98,4);
END;
文華技術(shù)人員： 明天工作時(shí)間與相關(guān)同事核實(shí)后給您回復(fù)
文華客服： 回復(fù)1樓，核實(shí)了一下你的源碼，你源碼中含有暫不支持的排序函數(shù)sort。因此無法進(jìn)行改寫，相關(guān)功能我們會(huì)考慮在以后版本通過增加函數(shù)的方式實(shí)現(xiàn)。