-- 作者:z7c9
-- 发布时间:2013/3/24 22:10:22
-- [原创]品种信息
runmode:1;
len:=strlen(stklabel); prefix:=strleft(stklabel,len-2);
if stricmp(prefix,\'if\')=0 then commission:=close*multiplier*0.35/10000*2; else if stricmp(prefix,\'ru\')=0 then commission:=close*multiplier*0.55/10000*2; else if stricmp(prefix,\'rb\')=0 then commission:=close*multiplier*0.55/10000*2; else if stricmp(prefix,\'m\')=0 then commission:=2.5*2; else if stricmp(prefix,\'srx\')=0 then commission:=3.5; if stricmp(prefix,\'cu\')=0 then commission:=close*multiplier*0.6/10000; if stricmp(prefix,\'y\')=0 then commission:=3*2; if stricmp(prefix,\'ta\')=0 then commission:=3.5*2; if stricmp(prefix,\'j\')=0 then commission:=close*multiplier*0.45/10000*2; if stricmp(prefix,\'l\')=0 then commission:=3*2; if stricmp(prefix,\'ag\')=0 then commission:=close*multiplier*0.6/10000; if stricmp(prefix,\'p\')=0 then commission:=3*2; if stricmp(prefix,\'au\')=0 then commission:=10.5; if stricmp(prefix,\'ax\')=0 then commission:=2.5*2; if stricmp(prefix,\'me\')=0 then commission:=7.5*2; if stricmp(prefix,\'cf\')=0 then commission:=4.8*2; if stricmp(prefix,\'c\')=0 then commission:=2*2; if stricmp(prefix,\'zn\')=0 then commission:=3.5*2; if stricmp(prefix,\'wsx\')=0 then commission:=1.5*2; if stricmp(prefix,\'ro\')=0 then commission:=1.5*2; if stricmp(prefix,\'er\')=0 then commission:=1.5*2; if stricmp(prefix,\'al\')=0 then commission:=3.5*2; if stricmp(prefix,\'v\')=0 then commission:=3*2; if stricmp(prefix,\'pb\')=0 then commission:=close*multiplier*0.5/10000*2; if stricmp(prefix,\'wt\')=0 then commission:=1.5*2; if stricmp(prefix,\'b\')=0 then commission:=2.5*2; if stricmp(prefix,\'fu\')=0 then commission:=close*multiplier*0.3/10000*2; if stricmp(prefix,\'wr\')=0 then commission:=close*multiplier*0.5/10000*2; if stricmp(prefix,\'ri\')=0 then commission:=3*2; if stricmp(prefix,\'wh\')=0 then commission:=3*2; if stricmp(prefix,\'oi\')=0 then commission:=3*2; if stricmp(prefix,\'fg\')=0 then commission:=3.5;
价值:mindiff*multiplier,linethick0; 佣金:commission,linethick0; 倍数:价值/佣金,linethick0; 保证金:close*multiplier*0.1,linethick0; 手数:intpart(500000/(close*multiplier*0.1)),linethick0; 手续费:vol*佣金/10000,linethick0; 总保证:保证金*vol,linethick0;
|