主题：[原创]品种信息

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;