揭露“老******【一招制胜】主图副图指标,模板,选股公式欺骗真相原文地址:http://www.88gs.com/soft/sort013/sort03/down-51813.html 不晓得要得罪多少人,但是我看完公式源码忍无可忍,里面只是挑选了指定日期的股票(而且是走出图形后)做出选股,欺骗理想,后来自己删除,但是燕过留痕,严重鄙视,其中源码如下: SVAR0:=DATE > 1120831 ; SVAR1:=DATE < 1120831 ; SVAR2:=HHVALL(HIGH) ; SVAR3:=LLVALL(LOW) ; 高1:SVAR2,PRECIS2,COLORFFFFFF ; 低1:SVAR3,PRECIS2,COLORFFFFFF ; ①:高1 - (高1 - 低1) * 0.191,PRECIS2,COLORF00FF0 ; ②:高1 - (高1 - 低1) * 0.382,DOTLINE,PRECIS2,COLOR00FF00 ; ③:高1 - (高1 - 低1) * 0.5,PRECIS2,COLOR00FFFF ; ④:高1 - (高1 - 低1) * 0.618,DOTLINE,PRECIS2,COLOR00FF00 ; ⑤:高1 - (高1 - 低1) * 0.809,PRECIS2,COLOR0000FF ; DRAWTEXTREL(0,0.809 * (900 + 109),'0.809% ' + NUMTOSTRN(⑤,2)),COLOR0000FF; DRAWTEXTREL(0,0.618 * (900 + 109),'0.618% ' + NUMTOSTRN(④,2)),COLOR00FF00; DRAWTEXTREL(0,0.5 * (900 + 109),'0.500% ' + NUMTOSTRN(③,2)),COLOR00FFFF; DRAWTEXTREL(0,0.382 * (900 + 109),'0.382% ' + NUMTOSTRN(②,2)),COLOR00FF00; DRAWTEXTREL(0,0.191 * (900 + 109),'0.191% ' + NUMTOSTRN(①,2)),COLORF00FF0; DRAWTEXTREL(0,1 * (900 + 66),'最低 ' + NUMTOSTRN(低1,2)),COLORFFFFFF; DRAWTEXTREL(0,0.001 * (900 + 109),'最高 ' + NUMTOSTRN(高1,2)),COLORFFFFFF; SVAR4:=EMA(VOL,3) ; SVAR5:=EMA(CLOSE,3) ; SVAR6:=ATAN((SVAR4 / REF(SVAR4,1) - 1) * 100) * 180 / 3.142 ; SVAR7:=ATAN((SVAR5 / REF(SVAR5,1) - 1) * 100) * 180 / 3.142 ; SVAR8:=EMA(VOL,5) ; SVAR9:=EMA(CLOSE,5) ; SVAR10:=ATAN((SVAR8 / REF(SVAR8,1) - 1) * 100) * 180 / 3.142 ; SVAR11:=ATAN((SVAR9 / REF(SVAR9,1) - 1) * 100) * 180 / 3.142 ; SVAR12:=EMA(VOL,10) ; SVAR13:=EMA(CLOSE,10) ; SVAR14:=ATAN((SVAR12 / REF(SVAR12,1) - 1) * 100) * 180 / 3.142 ; SVAR15:=ATAN((SVAR13 / REF(SVAR13,1) - 1) * 100) * 180 / 3.142 ; SVAR16:=(SVAR6 + SVAR7 + SVAR10 + SVAR11 + SVAR14 + SVAR15) / 6 ; SVAR17:=CROSS(SVAR16,50) AND COUNT(SVAR16 > 50,7) <= 3 ; SVAR18:=IF(SVAR17 AND (COUNT(SVAR17,4) = 1),50,0) ; SVAR19:=BIGORDER(1,2) * AMOUNT ; SVAR20:=BIGORDER(2,2) * AMOUNT ; SVAR21:=SVAR19 - SVAR20 ; SVAR22:=SUM(SVAR21,100) / SUM(AMOUNT,100) * 100 ; SVAR23:=SVAR21 / AMOUNT * 100 ; SVAR24:=SUM(SVAR21,3) / SUM(AMOUNT,3) * 100 ; SVAR25:=SUM(SVAR21,5) / SUM(AMOUNT,5) * 100 ; SVAR26:=SUM(SVAR21,10) / SUM(AMOUNT,10) * 100 ; SVAR27:=SUM(SVAR21,20) / SUM(AMOUNT,20) * 100 ; SVAR28:=SUM(SVAR21,60) / SUM(AMOUNT,60) * 100 ; SVAR29:=(CLOSE - LLV(LOW,80)) / (HHV(HIGH,80) - LLV(LOW,80)) * 200 ; SVAR30:=SMA(SVAR29,3,1) ; SVAR31:=SMA(SVAR30,3,1) ; SVAR32:=3 * SVAR30 - 2 * SVAR31 ; SVAR33:=LLV(LOW,5) ; SVAR34:=HHV(HIGH,5) ; SVAR35:=EMA((CLOSE - SVAR33) / (SVAR34 - SVAR33) * 100,4) * 2 ; SVAR36:=EMA(0.667 * REF(SVAR35,1) + 0.333 * SVAR35,2) ; SVAR37:=3 * SVAR35 - 2 * SVAR36 ; SVAR38:=POW(MA(CLOSE,5),2) + MA(CLOSE,5) ; SVAR39:=POW(MA(LOW,5),2) + MA(LOW,5) ; SVAR40:=POW(MA(HIGH,5),2) + MA(HIGH,5) ; SVAR41:=(SVAR38 - LLV(SVAR39,64)) / (HHV(SVAR40,64) - LLV(SVAR39,64)) * 150 + 65 - 10 ; SVAR42:=SMA(SVAR41,3,1) * 1.5 - 100 ; SVAR43:=SMA(SVAR42,3,1) ; SVAR44:=3 * SVAR42 - 2 * SVAR43 ; SVAR45:=(HIGH + LOW + CLOSE * 2) / 4 ; SVAR46:=EMA(SVAR45,13) ; SVAR47:=STD(SVAR45,13) ; SVAR48:=(SVAR45 - SVAR46) * 100 / SVAR47 ; SVAR49:=EMA(SVAR48,5) ; SVAR50:=EMA(SVAR49,13) + 200 - 100 ; SVAR51:=EMA(SVAR50,10) ; SVAR52:=3 * SVAR50 - 2 * SVAR51 ; SVAR53:=SVAR30 + SVAR35 + SVAR42 + SVAR50 ; SVAR54:=SVAR31 + SVAR36 + SVAR43 + SVAR51 ; SVAR55:=SVAR32 + SVAR37 + SVAR44 + SVAR52 ; SVAR56:=(HIGH + LOW + CLOSE) / 3 ; SVAR57:=(SVAR56 - MA(SVAR56,34)) / (0.015 * AVEDEV(SVAR56,34)) ; SVAR58:=(HIGH + LOW + CLOSE + SVAR56) / 4 ; SVAR59:=EMA(SVAR58,24) ; SVAR60:=STD(SVAR58,24) ; SVAR61:=(SVAR58 - SVAR59) / SVAR60 * 100 ; SVAR62:=(SVAR56 - MA(SVAR56,24)) / (0.015 * AVEDEV(SVAR56,24)) ; SVAR63:=EMA(SVAR61,5) ; SVAR64:=((SVAR63 + SVAR62 + SVAR57) / 3 + 165) / 4 ; SVAR65:=(SVAR53 + SVAR54 + SVAR55 * 30) / 32 / 5 - 15 ; SVAR66:=(SVAR64 + SVAR65) / 2 / 1.1 ; SVAR67:=EMA(SVAR66,3) ; SVAR68:=EMA(SVAR67,5) ; SVAR69:=SMA(SVAR67,2,1) ; SVAR70:=IF(SVAR67 > SVAR69 OR (SVAR67 = SVAR69),100,-99) ; SVAR71:=((DATE = 1120801) AND STRFIND(STKLABEL,'000976',1) > 0) OR ((DATE = 1120815) AND STRFIND(STKLABEL,'002273',1) > 0) OR ((DATE = 1120814) AND STRFIND(STKLABEL,'600165',1) > 0) OR ((DATE = 1120109) AND STRFIND(STKLABEL,'000002',1) > 0) OR ((DATE = 1120202) AND STRFIND(STKLABEL,'000006',1) > 0) OR ((DATE = 1120329) AND STRFIND(STKLABEL,'000024',1) > 0) OR ((DATE = 1120208) AND STRFIND(STKLABEL,'000031',1) > 0) OR ((DATE = 1120301) AND STRFIND(STKLABEL,'000043',1) > 0) OR ((DATE = 1120222) AND STRFIND(STKLABEL,'600260',1) > 0) OR ((DATE = 1120629) AND STRFIND(STKLABEL,'600260',1) > 0) OR ((DATE = 1120615) AND STRFIND(STKLABEL,'300287',1) > 0) OR ((DATE = 1120208) AND STRFIND(STKLABEL,'300017',1) > 0) OR ((DATE = 1120307) AND STRFIND(STKLABEL,'300039',1) > 0) OR ((DATE = 1120222) AND STRFIND(STKLABEL,'300259',1) > 0) OR ((DATE = 1120723) AND STRFIND(STKLABEL,'600694',1) > 0) OR ((DATE = 1120731) AND STRFIND(STKLABEL,'002424',1) > 0) OR ((DATE = 1120405) AND STRFIND(STKLABEL,'600262',1) > 0) OR ((DATE = 1120813) AND STRFIND(STKLABEL,'600262',1) > 0) OR ((DATE = 1120411) AND STRFIND(STKLABEL,'600082',1) > 0) OR ((DATE = 1120504) AND STRFIND(STKLABEL,'300202',1) > 0) OR ((DATE = 1120117) AND STRFIND(STKLABEL,'002116',1) > 0) OR ((DATE = 1120522) AND STRFIND(STKLABEL,'002390',1) > 0) OR ((DATE = 1120503) AND STRFIND(STKLABEL,'000522',1) > 0) OR ((DATE = 1120131) AND STRFIND(STKLABEL,'600637',1) > 0) OR ((DATE = 1120507) AND STRFIND(STKLABEL,'600332',1) > 0) OR ((DATE = 1120411) AND STRFIND(STKLABEL,'000661',1) > 0) OR ((DATE = 1120531) AND STRFIND(STKLABEL,'002038',1) > 0) OR ((DATE = 1120510) AND STRFIND(STKLABEL,'600713',1) > 0) OR ((DATE = 1120502) AND STRFIND(STKLABEL,'002635',1) > 0) OR ((DATE = 1120711) AND STRFIND(STKLABEL,'600080',1) > 0) OR ((DATE = 1120106) AND STRFIND(STKLABEL,'000697',1) > 0) OR ((DATE = 1120330) AND STRFIND(STKLABEL,'002051',1) > 0) OR ((DATE = 1120427) AND STRFIND(STKLABEL,'600315',1) > 0) OR ((DATE = 1120109) AND STRFIND(STKLABEL,'600381',1) > 0) OR ((DATE = 1120202) AND STRFIND(STKLABEL,'300188',1) > 0) OR ((DATE = 1120411) AND STRFIND(STKLABEL,'600533',1) > 0) OR ((DATE = 1120807) AND STRFIND(STKLABEL,'002098',1) > 0) OR ((DATE = 1120627) AND STRFIND(STKLABEL,'002317',1) > 0) OR ((DATE = 1120601) AND STRFIND(STKLABEL,'600557',1) > 0) OR ((DATE = 1120522) AND STRFIND(STKLABEL,'300016',1) > 0) OR ((DATE = 1120801) AND STRFIND(STKLABEL,'600209',1) > 0) OR ((DATE = 1120705) AND STRFIND(STKLABEL,'600389',1) > 0) OR ((DATE = 1120807) AND STRFIND(STKLABEL,'600193',1) > 0) OR ((DATE = 1120717) AND STRFIND(STKLABEL,'600272',1) > 0) OR ((DATE = 1120731) AND STRFIND(STKLABEL,'600363',1) > 0) OR ((DATE = 1120801) AND STRFIND(STKLABEL,'002070',1) > 0) OR ((DATE = 1120628) AND STRFIND(STKLABEL,'002568',1) > 0) OR ((DATE = 1120629) AND STRFIND(STKLABEL,'300026',1) > 0) OR ((DATE = 1120801) AND STRFIND(STKLABEL,'300026',1) > 0) OR ((DATE = 1120801) AND STRFIND(STKLABEL,'300020',1) > 0) OR ((DATE = 1120713) AND STRFIND(STKLABEL,'002596',1) > 0) OR ((DATE = 1120803) AND STRFIND(STKLABEL,'000883',1) > 0) OR ((DATE = 1120803) AND STRFIND(STKLABEL,'002511',1) > 0) OR ((DATE = 1120411) AND STRFIND(STKLABEL,'000511',1) > 0) OR ((DATE = 1120611) AND STRFIND(STKLABEL,'000736',1) > 0) OR ((DATE = 1120626) AND STRFIND(STKLABEL,'000803',1) > 0) ; DRAWICON(SVAR71,LOW,1),LINETHICK2,ALIGN1; DRAWGBKLAST(CLOSE > 0,STRIP( RGB(85,105,185),RGB(0,0,0),0)); STICKLINE(SVAR0,100000,-100000,19,0),COLOR0000FF; IF SVAR0 AND (DISPSTATUS = 2) AND CLOSE > 0 THEN BEGIN DRAWTEXTREL(10,300,'数据已更新,需升级后才能继续使用!'),LINETHICK6,COLOR00FFFF; END
上传全部代码,请大家评判,怪不得赶紧撤柜
 |