改文化用謝謝謝謝
作者：文華財經(jīng) 來源：cxh99.com 發(fā)布時間：2020年06月08日
-
咨詢內(nèi)容：
?input:綠(0,0,1000),紅(0,0,1000);高點(diǎn)時區(qū):=PEAKBARS(4,30,1 );低點(diǎn)時區(qū):=TROUGHBARS(4,30,1 );?eee:=BACKSET(BARSTATUS=2 ,if(綠=0,高點(diǎn)時區(qū)+1,綠));ee:=FILTER(eee ,if(綠=0,高點(diǎn)時區(qū)*2,綠+2 ));?VERTLINE(ee,2 ),ALIGN2,COLORFFff00;?s2:=COUNT(eee ,綠 );bc:=s2;點(diǎn)石成金H:=IF(close>100,SUM(h*VOL,bc)/SUM(VOL,bc),sum(AMOUNT,bc)/sum(v,bc)/100*SUM(H,bc)/SUM(C,BC)){,colorred,LINETHICK2};點(diǎn)石成金L:=IF(close>100,SUM(l*VOL,bc)/SUM(VOL,bc),sum(AMOUNT,bc)/sum(v,bc)/100*SUM(L,bc)/SUM(C,BC)){,colorblue,LINETHICK2};點(diǎn)石成金:if(ref(h,bc)>ref(h,bc+1) and ref(h,bc)>ref(h,bc-1) ,點(diǎn)石成金h,點(diǎn)石成金l),color00ff00,LINETHICK1;?PARTLINE(點(diǎn)石成金,eee=1 ),color00ff00,LINETHICK2;?DRAWTEXT(BARSTATUS=2,點(diǎn)石成金*1.01,'#39+點(diǎn)石成金),COLOR00ff00,VALIGN2,ALIGN2;?DRAWTEXT(ee,點(diǎn)石成金*1.01,'#39+綠),COLOR00ff00,VALIGN2,ALIGN2;?DRAWTEXT(BARSTATUS=2,點(diǎn)石成金*1.01,'_______',COLOR00ff00,VALIGN2,ALIGN2;?eee1:=BACKSET(BARSTATUS=2 ,if(紅=0,低點(diǎn)時區(qū)+1,紅));ee1:=FILTER(eee1 ,if(紅=0,低點(diǎn)時區(qū)*2,紅+2 ));?VERTLINE(ee1,2 ),ALIGN2,COLORFFdd00;?s21:=COUNT(eee1 ,紅 );bc1:=s21;點(diǎn)石成金H1:=IF(close>100,SUM(h*VOL,bc1)/SUM(VOL,bc1),sum(AMOUNT,bc1)/sum(v,bc1)/100*SUM(H,bc1)/SUM(C,BC1));點(diǎn)石成金L1:=IF(close>100,SUM(l*VOL,bc1)/SUM(VOL,bc1),sum(AMOUNT,bc1)/sum(v,bc1)/100*SUM(L,bc1)/SUM(C,BC1));點(diǎn)石成金1:if(ref(h,bc1)>ref(h,bc1+1) and ref(h,bc1)>ref(h,bc1-1) ,點(diǎn)石成金h1,點(diǎn)石成金l1),colorred,LINETHICK1;?PARTLINE(點(diǎn)石成金1,eee1=1 ),colorred,LINETHICK2;?DRAWTEXT(BARSTATUS=2,點(diǎn)石成金1*0.98,'#39+點(diǎn)石成金1),COLORred,VALIGN0,ALIGN2;?DRAWTEXT(ee1,點(diǎn)石成金1*0.98,'#39+紅),COLORred,VALIGN0,ALIGN2;?DRAWTEXT(BARSTATUS=2,點(diǎn)石成金1*0.98,'_______',COLOR00ff00,VALIGN0,ALIGN2;
?
?來源:程序化99
-
文華技術(shù)人員：
不同軟件函數(shù)機(jī)制不同，改寫會有差異
無法修改部分已刪除，參考：
?下載信息??[文件大小：???下載次數(shù)：?]文件名：源碼.txt
打印本文
關(guān)閉窗口