高手們請幫忙改一下選股公式(通達信)用的!
懸賞分:20 - 解決時間:2009-11-13 02:27
高手們請幫忙改一下選股公式(通達信)用的,要求:改成1、低進 選股;2、地量 選股;3、上攻量選股;4、強勢參與選股;碼源如下: 成交量:VOL,VOLSTICK; MA5:MA(VOL,5); MA10:MA(VOL,10); VAR2:=(HIGH - LOW); VAR3:=ABS((OPEN - CLOSE)); VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)); VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW); VAR6:=((VAR3 / VAR2) * VOL); VAR7:=((VAR4 / VAR2) * VOL); VAR8:=((VAR5 / VAR2) * VOL); VAR9:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100))))); VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100); VARB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60))); VARC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30))); 上攻量:STICKLINE((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)),0,VAR6,1.2,0),,COLORMAGENTA; 地量:DRAWTEXT(((VAR9 > 2) AND (VOL < (MA(VOL,5) / 2))),VOL,'地量'),,COLORWHITE; 放量:STICKLINE((VOL > (MA(VOL,5) * 2.5)),0,VOL,1.2,0),,COLORFFFFFF; 低進:DRAWTEXT(((((((VAR8 > VAR6) AND (VAR8 > VAR7)) AND (VARA < (0 - 2))) AND (CLOSE < MA(CLOSE,30))) AND (VAR8 < (MA(VOL,5) / 2))) AND (MA(VOL,5) < MA(VOL,10))),VOL,'低進'),,COLOR00FFFF; 強勢參與:DRAWTEXT((((((VAR6 > (MA(VOL,5) * 2)) AND (VAR6 >= VAR7)) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)) OR ((VOL > (MA(VOL,5) * 3)) AND VARB)),VOL,'參與'),,COLOR00FF00; 空頭釋放:DRAWTEXT(((((((VAR6 >= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE < OPEN)) AND ((VAR6 / VOL) > 0.7)) AND VARC) AND (VAR6 > MA(VOL,5))),(VAR6 * 2),'空頭釋放'),,COLOR00FF00; 1.低進 選股 MA5:=MA(VOL,5); MA10:=MA(VOL,10); VAR2:=(HIGH - LOW); VAR3:=ABS((OPEN - CLOSE)); VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)); VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW); VAR6:=((VAR3 / VAR2) * VOL); VAR7:=((VAR4 / VAR2) * VOL); VAR8:=((VAR5 / VAR2) * VOL); VAR9:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100))))); VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100); VARB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60))); VARC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30))); 低進:(VAR8 > VAR6) AND (VAR8 > VAR7) AND (VARA < (0 - 2)) AND (CLOSE < MA(CLOSE,30)) AND (VAR8 < (MA(VOL,5) / 2)) AND (MA(VOL,5) < MA(VOL,10)); 2.地量 選股 MA5:=MA(VOL,5); MA10:=MA(VOL,10); VAR2:=(HIGH - LOW); VAR3:=ABS((OPEN - CLOSE)); VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)); VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW); VAR6:=((VAR3 / VAR2) * VOL); VAR7:=((VAR4 / VAR2) * VOL); VAR8:=((VAR5 / VAR2) * VOL); VAR9:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100))))); VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100); VARB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60))); VARC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30))); 地量:(VAR9 > 2) AND (VOL < (MA(VOL,5) / 2)); 3.上攻量選股 MA5:=MA(VOL,5); MA10:=MA(VOL,10); VAR2:=(HIGH - LOW); VAR3:=ABS((OPEN - CLOSE)); VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)); VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW); VAR6:=((VAR3 / VAR2) * VOL); VAR7:=((VAR4 / VAR2) * VOL); VAR8:=((VAR5 / VAR2) * VOL); VAR9:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100))))); VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100); VARB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60))); VARC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30))); 上攻量:(VAR6 >= VAR7) AND (VAR6 >= VAR8) AND (CLOSE > OPEN); 4、強勢參與選股 MA5:=MA(VOL,5); MA10:=MA(VOL,10); VAR2:=(HIGH - LOW); VAR3:=ABS((OPEN - CLOSE)); VAR4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN)); VAR5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW); VAR6:=((VAR3 / VAR2) * VOL); VAR7:=((VAR4 / VAR2) * VOL); VAR8:=((VAR5 / VAR2) * VOL); VAR9:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100))))); VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100); VARB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60))); VARC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30))); 強勢參與:(((((VAR6 > (MA(VOL,5) * 2)) AND (VAR6 >= VAR7)) AND (VAR6 >= VAR8)) AND (CLOSE > OPEN)) OR ((VOL > (MA(VOL,5) * 3)) AND VARB)); 1
回答者: 哈爾濱轉(zhuǎn)戶A - 五級 2009-11-11 10:15 提問者對于答案的評價:
謝謝受益非淺!問一下大家現(xiàn)在接近09年底了開始布局什么股票更有潛力?現(xiàn)在做的話到2010年1月初能出的。
|
|