VARIABLE:PRICESP:=0,PRICEBP:=0;
DIRECTION:=0;
LENGTH:=16;
OFFSET:=1;
TRAILSTARTPCT:=0.8;
PARAM:=1.05;
N:=1;
PCNT:=1;
DIRECTION:=0;
IF DATE<>REF(DATE,1) THEN //控制单日最大亏损次数为2次
COUNTT:=0;
ELSE
COUNTT:=REF(COUNTT,1);
MIDLINE:=MA(CLOSE,LENGTH);
BAND:=STD(CLOSE,LENGTH);
UPLINE:=MIDLINE+OFFSET*BAND;
DOWNLINE:=MIDLINE-OFFSET*BAND;
RRANGE:=2*OFFSET*BAND/MIDLINE;
AVGRANGE:=MA(RRANGE,LENGTH);
AVGVOL:=MA(V,LENGTH);
PP:=MIN((SKPRICE-SKLOW)/SKPRICE,0.1);
TT:=MIN((BKHIGH-BKPRICE)/BKPRICE,0.1);
PROFITPCNT1:=PP*10;
PROFITPCNT2:=TT*10;
//-----------------------------进仓--------------------------------------
BARPOS>LENGTH AND BKVOL=0 AND COUNTT<=N AND RRANGE>PARAM*AVGRANGE AND V>PARAM*AVGVOL AND H>UPLINE AND REF(H,1)>REF(UPLINE,1) AND H>=REF(H,1) AND DIRECTION>=0 ,BK;
BARPOS>LENGTH AND SKVOL=0 AND COUNTT<=N AND RRANGE>PARAM*AVGRANGE AND V>PARAM*AVGVOL AND L<DOWNLINE AND REF(L,1)<REF(DOWNLINE,1) AND L<=REF(L,1) AND DIRECTION<=0,SK;
//-------------------------------止损指令-----------------------------//
IF BKVOL>0 THEN BEGIN
PRICESP:=BKPRICE*(1-PCNT/100);
LOW<= PRICESP,SP;
COUNTT:=COUNTT+1;
END
IF SKVOL>0 THEN BEGIN
PRICEBP:=SKPRICE*(1+PCNT/100);
HIGH>=PRICEBP,BP;
COUNTT:=COUNTT+1;
END
//---------------------------止盈--------------------------------//
IF SKVOL>0 AND SKLOW<=SKPRICE*(1-TRAILSTARTPCT/100) THEN BEGIN
PRICEBP:=SKPRICE-(SKPRICE-SKLOW)*PROFITPCNT1;
HIGH>=PRICEBP,BP;
END
IF BKVOL>0 AND BKHIGH>=BKPRICE*(1+TRAILSTARTPCT/100) THEN BEGIN
PRICESP:=BKPRICE+(BKHIGH-BKPRICE)*PROFITPCNT2;
LOW<=PRICESP,SP;
END
AUTOFILTER;
SETSIGPRICETYPE(BP,PRICEBP);
SETSIGPRICETYPE(SP,PRICESP);
CHECKSIG_MIN(SP,'A',0,'C',0);//分钟级别数据SP信号出信号立即下单不复核
CHECKSIG_MIN(BP,'A',0,'C',0);//分钟级别数据BP信号出信号立即下单不复核
//TRADE_OTHER('AUTO');
源码没有问题的，不过wh6是专业的看盘软件
而1楼源码是专业的程序化模型，需要使用程序化软件wh8来运行的
如果您有需要可以下载模拟版体验
wh8官网 ： http://www.wenhua.com.cn/
