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;