等级: 超级版主
- 注册:
- 2021-5-24
- 曾用名:
|
kd:=
pd:=
HC:THOLDCOUNT('');
xj:TACCOUNT( 3);
xj19:TACCOUNT(19);
a:=xj19/(16-HC);
gushu:100*INTPART(4500/(close*100));
GLOBALVARIABLE:flag=0;
if kd and tbuyholding(1)<gushu and EXTGBDATA('num')+HC<=16 then
begin
EXTGBDATASET( 'num',EXTGBDATA('num')+1);
tbuy(1,gushu-tbuyholding(1),lmt,DYNAINFO(28)+0.03);
END
if pd and tbuyholding(1)>0 then
begin
tsell(1,tbuyholding(1),lmt,DYNAINFO(34));
EXTGBDATASET( 'num',EXTGBDATA('num')-1);
END
if flag=0 and 100*TOPENPROFIT/(close*tbuyholding(1)*MULTIPLIER)>=4 and tbuyholding(1)>0 then
begin
tsell(1,50%,lmt,DYNAINFO(34)),PERTRADER;
flag:=1;
END
if currenttime>093000 and currenttime<093100 then
BEGIN
EXTGBDATASET( 'num',0);
END |
|