IF MARKETLABEL<>'SH' THEN BEGIN
DRAWTEXTEX(1,0,200,100,'只能运行在上证A股 ！\n \n请切换到上证个股！！');
EXIT;
END;
S1:=SELFDATA('买1席');
S2:=SELFDATA('卖1额');
SJ:=BARSLAST(ABS(S1-REF(S1,1))>0.1 OR ABS(S2-REF(S2,1))>0.1);
ZQ:=IF(SJ>0,SJ,0);
数据日期:REF(DATE,ZQ)-1000000,LINETHICK0,colorFF;
P:=SYSPARAM(1);
VARIABLE:买账[10]='',卖帐[10]='',买名[10]='',卖名[10]='',其他账[7]='',其他名[7]='';
FOR I=1 TO 10 DO BEGIN
买N额:=SELFDATA('买'+NUMTOSTR(I,0)+'额');
买额[I]:=买N额[P];
买卖N额:=SELFDATA('买'+NUMTOSTR(I,0)+'卖额');
买卖额[I]:=买卖N额[P];
买净额[I]:=买N额[P]-买卖N额[P];
卖N额:=SELFDATA('卖'+NUMTOSTR(I,0)+'额');
卖额[I]:=卖N额[P];
卖买N额:=SELFDATA('卖'+NUMTOSTR(I,0)+'买额');
卖买额[I]:=卖买N额[P];
卖净额[I]:=卖买N额[P]-卖N额[P];
买N席:=INTPART(SELFDATA('买'+NUMTOSTR(I,0)+'席'));
卖N席:=INTPART(SELFDATA('卖'+NUMTOSTR(I,0)+'席'));
JT:=IF(INTPART(买N席[P]/100000)=7,'A',IF(INTPART(买N席[P]/100000)=2,'G',IF(INTPART(买N席[P]/100000)=3,'T',IF(INTPART(买N席[P]/100000)=8,'B','无'))))+STRMID(NUMTOSTR(买N席[P],0),2,5);
CT:=IF(INTPART(卖N席[P]/100000)=7,'A',IF(INTPART(卖N席[P]/100000)=2,'G',IF(INTPART(卖N席[P]/100000)=3,'T',IF(INTPART(卖N席[P]/100000)=8,'B','无'))))+STRMID(NUMTOSTR(卖N席[P],0),2,5);
买账[I]:=JT;
卖帐[I]:=CT;
买名[I]:=F10TEXT(F10FIND(NUMTOSTR(买N席[P],0),1)+6,0);
卖名[I]:=F10TEXT(F10FIND(NUMTOSTR(卖N席[P],0),1)+6,0);
END;
FOR K=1 TO 7 DO BEGIN
其他I额:=SELFDATA('其他'+NUMTOSTR(K,0)+'额');
其他额[K]:=其他I额[P];
其他I席:=INTPART(SELFDATA('其他'+NUMTOSTR(K,0)+'席'));
CR:=IF(INTPART(其他I席[P]/100000)=7,'A',IF(INTPART(其他I席[P]/100000)=2,'G',IF(INTPART(其他I席[P]/100000)=3,'T',IF(INTPART(其他I席[P]/100000)=8,'B','无'))))+STRMID(NUMTOSTR(其他I席[P],0),2,5);
其他账[K]:=CR;
其他名[K]:=F10TEXT(F10FIND(NUMTOSTR(其他I席[P],0),1)+6,0);
END;
KZ1:=其他额[1]>0;
KZ2:=其他额[2]>0;
KZ3:=其他额[3]>0;
KZ4:=其他额[4]>0;
KZ5:=其他额[5]>0;
KZ6:=其他额[6]>0;
KZ7:=其他额[7]>0;
ZZ1:=其他额[1]<0;
ZZ2:=其他额[2]<0;
ZZ3:=其他额[3]<0;
ZZ4:=其他额[4]<0;
ZZ5:=其他额[5]<0;
ZZ6:=其他额[6]<0;
ZZ7:=其他额[7]<0;
YC1:=KZ1+KZ2+KZ3+KZ4+KZ5+KZ6+KZ7;
YC2:=ZZ1+ZZ2+ZZ3+ZZ4+ZZ5+ZZ6+ZZ7;
YP:=MAX(YC1,YC2);
GS1:=IF(STRLEFT(买账[1],1)='G',买账[1]+' '+买名[1],' ');
GS2:=IF(STRLEFT(买账[2],1)='G',买账[2]+' '+买名[2],' ');
GS3:=IF(STRLEFT(买账[3],1)='G',买账[3]+' '+买名[3],' ');
GS4:=IF(STRLEFT(买账[4],1)='G',买账[4]+' '+买名[4],' ');
GS5:=IF(STRLEFT(买账[5],1)='G',买账[5]+' '+买名[5],' ');
GS6:=IF(STRLEFT(买账[6],1)='G',买账[6]+' '+买名[6],' ');
GS7:=IF(STRLEFT(买账[7],1)='G',买账[7]+' '+买名[7],' ');
GS8:=IF(STRLEFT(买账[8],1)='G',买账[8]+' '+买名[8],' ');
GS9:=IF(STRLEFT(买账[9],1)='G',买账[9]+' '+买名[9],' ');
GS10:=IF(STRLEFT(买账[10],1)='G',买账[10]+' '+买名[10],' ');
GT1:=IF(STRLEFT(其他账[1],1)='G',其他账[1]+' '+其他名[1],' ');
GT2:=IF(STRLEFT(其他账[2],1)='G',其他账[2]+' '+其他名[2],' ');
GT3:=IF(STRLEFT(其他账[3],1)='G',其他账[3]+' '+其他名[3],' ');
GT4:=IF(STRLEFT(其他账[4],1)='G',其他账[4]+' '+其他名[4],' ');
GT5:=IF(STRLEFT(其他账[5],1)='G',其他账[5]+' '+其他名[5],' ');
GT6:=IF(STRLEFT(其他账[6],1)='G',其他账[6]+' '+其他名[6],' ');
GT7:=IF(STRLEFT(其他账[7],1)='G',其他账[7]+' '+其他名[7],' ');
TS1:=IF(STRLEFT(买账[1],1)='T',买账[1]+' '+买名[1],' ');
TS2:=IF(STRLEFT(买账[2],1)='T',买账[2]+' '+买名[2],' ');
TS3:=IF(STRLEFT(买账[3],1)='T',买账[3]+' '+买名[3],' ');
TS4:=IF(STRLEFT(买账[4],1)='T',买账[4]+' '+买名[4],' ');
TS5:=IF(STRLEFT(买账[5],1)='T',买账[5]+' '+买名[5],' ');
TS6:=IF(STRLEFT(买账[6],1)='T',买账[6]+' '+买名[6],' ');
TS7:=IF(STRLEFT(买账[7],1)='T',买账[7]+' '+买名[7],' ');
TS8:=IF(STRLEFT(买账[8],1)='T',买账[8]+' '+买名[8],' ');
TS9:=IF(STRLEFT(买账[9],1)='T',买账[9]+' '+买名[9],' ');
TS10:=IF(STRLEFT(买账[10],1)='T',买账[10]+' '+买名[10],' ');
TT1:=IF(STRLEFT(其他账[1],1)='T',其他账[1]+' '+其他名[1],' ');
TT2:=IF(STRLEFT(其他账[2],1)='T',其他账[2]+' '+其他名[2],' ');
TT3:=IF(STRLEFT(其他账[3],1)='T',其他账[3]+' '+其他名[3],' ');
TT4:=IF(STRLEFT(其他账[4],1)='T',其他账[4]+' '+其他名[4],' ');
TT5:=IF(STRLEFT(其他账[5],1)='T',其他账[5]+' '+其他名[5],' ');
TT6:=IF(STRLEFT(其他账[6],1)='T',其他账[6]+' '+其他名[6],' ');
TT7:=IF(STRLEFT(其他账[7],1)='T',其他账[7]+' '+其他名[7],' ');
BS1:=IF(STRLEFT(买账[1],1)='B',买账[1]+' '+买名[1],' ');
BS2:=IF(STRLEFT(买账[2],1)='B',买账[2]+' '+买名[2],' ');
BS3:=IF(STRLEFT(买账[3],1)='B',买账[3]+' '+买名[3],' ');
BS4:=IF(STRLEFT(买账[4],1)='B',买账[4]+' '+买名[4],' ');
BS5:=IF(STRLEFT(买账[5],1)='B',买账[5]+' '+买名[5],' ');
BS6:=IF(STRLEFT(买账[6],1)='B',买账[6]+' '+买名[6],' ');
BS7:=IF(STRLEFT(买账[7],1)='B',买账[7]+' '+买名[7],' ');
BS8:=IF(STRLEFT(买账[8],1)='B',买账[8]+' '+买名[8],' ');
BS9:=IF(STRLEFT(买账[9],1)='B',买账[9]+' '+买名[9],' ');
BS10:=IF(STRLEFT(买账[10],1)='B',买账[10]+' '+买名[10],' ');
BT1:=IF(STRLEFT(其他账[1],1)='B',其他账[1]+' '+其他名[1],' ');
BT2:=IF(STRLEFT(其他账[2],1)='B',其他账[2]+' '+其他名[2],' ');
BT3:=IF(STRLEFT(其他账[3],1)='B',其他账[3]+' '+其他名[3],' ');
BT4:=IF(STRLEFT(其他账[4],1)='B',其他账[4]+' '+其他名[4],' ');
BT5:=IF(STRLEFT(其他账[5],1)='B',其他账[5]+' '+其他名[5],' ');
BT6:=IF(STRLEFT(其他账[6],1)='B',其他账[6]+' '+其他名[6],' ');
BT7:=IF(STRLEFT(其他账[7],1)='B',其他账[7]+' '+其他名[7],' ');
GC1:=IF(STRLEFT(卖帐[1],1)='G',卖帐[1]+' '+卖名[1],' ');
GC2:=IF(STRLEFT(卖帐[2],1)='G',卖帐[2]+' '+卖名[2],' ');
GC3:=IF(STRLEFT(卖帐[3],1)='G',卖帐[3]+' '+卖名[3],' ');
GC4:=IF(STRLEFT(卖帐[4],1)='G',卖帐[4]+' '+卖名[4],' ');
GC5:=IF(STRLEFT(卖帐[5],1)='G',卖帐[5]+' '+卖名[5],' ');
GC6:=IF(STRLEFT(卖帐[6],1)='G',卖帐[6]+' '+卖名[6],' ');
GC7:=IF(STRLEFT(卖帐[7],1)='G',卖帐[7]+' '+卖名[7],' ');
GC8:=IF(STRLEFT(卖帐[8],1)='G',卖帐[8]+' '+卖名[8],' ');
GC9:=IF(STRLEFT(卖帐[9],1)='G',卖帐[9]+' '+卖名[9],' ');
GC10:=IF(STRLEFT(卖帐[10],1)='G',卖帐[10]+' '+卖名[10],' ');
JT1:=IF(STRLEFT(其他账[1],1)='G',其他账[1]+' '+其他名[1],' ');
JT2:=IF(STRLEFT(其他账[2],1)='G',其他账[2]+' '+其他名[2],' ');
JT3:=IF(STRLEFT(其他账[3],1)='G',其他账[3]+' '+其他名[3],' ');
JT4:=IF(STRLEFT(其他账[4],1)='G',其他账[4]+' '+其他名[4],' ');
JT5:=IF(STRLEFT(其他账[5],1)='G',其他账[5]+' '+其他名[5],' ');
JT6:=IF(STRLEFT(其他账[6],1)='G',其他账[6]+' '+其他名[6],' ');
JT7:=IF(STRLEFT(其他账[7],1)='G',其他账[7]+' '+其他名[7],' ');
TB1:=IF(STRLEFT(卖帐[1],1)='T',卖帐[1]+' '+卖名[1],' ');
TB2:=IF(STRLEFT(卖帐[2],1)='T',卖帐[2]+' '+卖名[2],' ');
TB3:=IF(STRLEFT(卖帐[3],1)='T',卖帐[3]+' '+卖名[3],' ');
TB4:=IF(STRLEFT(卖帐[4],1)='T',卖帐[4]+' '+卖名[4],' ');
TB5:=IF(STRLEFT(卖帐[5],1)='T',卖帐[5]+' '+卖名[5],' ');
TB6:=IF(STRLEFT(卖帐[6],1)='T',卖帐[6]+' '+卖名[6],' ');
TB7:=IF(STRLEFT(卖帐[7],1)='T',卖帐[7]+' '+卖名[7],' ');
TB8:=IF(STRLEFT(卖帐[8],1)='T',卖帐[8]+' '+卖名[8],' ');
TB9:=IF(STRLEFT(卖帐[9],1)='T',卖帐[9]+' '+卖名[9],' ');
TB10:=IF(STRLEFT(卖帐[10],1)='T',卖帐[10]+' '+卖名[10],' ');
TC1:=IF(STRLEFT(其他账[1],1)='T',其他账[1]+' '+其他名[1],' ');
TC2:=IF(STRLEFT(其他账[2],1)='T',其他账[2]+' '+其他名[2],' ');
TC3:=IF(STRLEFT(其他账[3],1)='T',其他账[3]+' '+其他名[3],' ');
TC4:=IF(STRLEFT(其他账[4],1)='T',其他账[4]+' '+其他名[4],' ');
TC5:=IF(STRLEFT(其他账[5],1)='T',其他账[5]+' '+其他名[5],' ');
TC6:=IF(STRLEFT(其他账[6],1)='T',其他账[6]+' '+其他名[6],' ');
TC7:=IF(STRLEFT(其他账[7],1)='T',其他账[7]+' '+其他名[7],' ');
BC1:=IF(STRLEFT(卖帐[1],1)='B',卖帐[1]+' '+卖名[1],' ');
BC2:=IF(STRLEFT(卖帐[2],1)='B',卖帐[2]+' '+卖名[2],' ');
BC3:=IF(STRLEFT(卖帐[3],1)='B',卖帐[3]+' '+卖名[3],' ');
BC4:=IF(STRLEFT(卖帐[4],1)='B',卖帐[4]+' '+卖名[4],' ');
BC5:=IF(STRLEFT(卖帐[5],1)='B',卖帐[5]+' '+卖名[5],' ');
BC6:=IF(STRLEFT(卖帐[6],1)='B',卖帐[6]+' '+卖名[6],' ');
BC7:=IF(STRLEFT(卖帐[7],1)='B',卖帐[7]+' '+卖名[7],' ');
BC8:=IF(STRLEFT(卖帐[8],1)='B',卖帐[8]+' '+卖名[8],' ');
BC9:=IF(STRLEFT(卖帐[9],1)='B',卖帐[9]+' '+卖名[9],' ');
BC10:=IF(STRLEFT(卖帐[10],1)='B',卖帐[10]+' '+卖名[10],' ');
BD1:=IF(STRLEFT(其他账[1],1)='B',其他账[1]+' '+其他名[1],' ');
BD2:=IF(STRLEFT(其他账[2],1)='B',其他账[2]+' '+其他名[2],' ');
BD3:=IF(STRLEFT(其他账[3],1)='B',其他账[3]+' '+其他名[3],' ');
BD4:=IF(STRLEFT(其他账[4],1)='B',其他账[4]+' '+其他名[4],' ');
BD5:=IF(STRLEFT(其他账[5],1)='B',其他账[5]+' '+其他名[5],' ');
BD6:=IF(STRLEFT(其他账[6],1)='B',其他账[6]+' '+其他名[6],' ');
BD7:=IF(STRLEFT(其他账[7],1)='B',其他账[7]+' '+其他名[7],' ');
YC_V:=0;
FOR I=1 TO 10 DO BEGIN
IF ABS(卖额[I])>YC_V THEN
YC_V1:=ABS(卖额[I]);
IF 买额[I]>YC_V THEN
YC_V:=买额[I];
END;
FOR K=1 TO 7 DO BEGIN
IF ABS(其他额[K])>YC_V THEN
YC_V:=ABS(其他额[K]);
END;
FOR I=1 TO 17 DO BEGIN
MRJ[I]:=MAX(1,ABS(INTPART(12*买额[I]/YC_V)));
MRC[I]:=MAX(1,ABS(INTPART(12*买卖额[I]/YC_V)))*0.5;
MCC[I]:=MAX(1,ABS(INTPART(12*卖额[I]/YC_V1)));
MCJ[I]:=MAX(1,ABS(INTPART(12*卖买额[I]/YC_V)))*0.5;
QTE[I]:=MAX(1,ABS(INTPART(12*其他额[K]/YC_V)));
END;
ZWZ_H:='____________';
H_H:='┌ ┐';
G_1:='\n ';
G_2:='\n ';
MRKG:=' ';
MRKG1:=' ';
DRAWTEXTEX(1,0,20,27,MRKG+STRLEFT(ZWZ_H,MRJ[1])+G_1+STRLEFT(ZWZ_H,MRJ[2])+G_1+STRLEFT(ZWZ_H,MRJ[3])+G_1+STRLEFT(ZWZ_H,MRJ[4])+G_1+STRLEFT(ZWZ_H,MRJ[5])+G_1+STRLEFT(ZWZ_H,MRJ[6])+G_1+STRLEFT(ZWZ_H,MRJ[7])+G_1+STRLEFT(ZWZ_H,MRJ[8])+G_1+STRLEFT(ZWZ_H,MRJ[9])+G_1+STRLEFT(ZWZ_H,MRJ[10])+IF(其他额[1]>0,G_1+STRLEFT(ZWZ_H,QTE[1]),'')+IF(其他额[2]>0,G_1+STRLEFT(ZWZ_H,QTE[2]),'')+IF(其他额[3]>0,G_1+STRLEFT(ZWZ_H,QTE[3]),'')+IF(其他额[4]>0,G_1+STRLEFT(ZWZ_H,QTE[4]),'')+IF(其他额[5]>0,G_1+STRLEFT(ZWZ_H,QTE[5]),'')+IF(其他额[6]>0,G_1+STRLEFT(ZWZ_H,QTE[6]),'')+IF(其他额[7]>0,G_1+STRLEFT(ZWZ_H,QTE[7]),'')),colorFF;
DRAWTEXTEX(1,0,20,28,MRKG+STRLEFT(ZWZ_H,MRJ[1])+G_1+STRLEFT(ZWZ_H,MRJ[2])+G_1+STRLEFT(ZWZ_H,MRJ[3])+G_1+STRLEFT(ZWZ_H,MRJ[4])+G_1+STRLEFT(ZWZ_H,MRJ[5])+G_1+STRLEFT(ZWZ_H,MRJ[6])+G_1+STRLEFT(ZWZ_H,MRJ[7])+G_1+STRLEFT(ZWZ_H,MRJ[8])+G_1+STRLEFT(ZWZ_H,MRJ[9])+G_1+STRLEFT(ZWZ_H,MRJ[10])+IF(其他额[1]>0,G_1+STRLEFT(ZWZ_H,QTE[1]),'')+IF(其他额[2]>0,G_1+STRLEFT(ZWZ_H,QTE[2]),'')+IF(其他额[3]>0,G_1+STRLEFT(ZWZ_H,QTE[3]),'')+IF(其他额[4]>0,G_1+STRLEFT(ZWZ_H,QTE[4]),'')+IF(其他额[5]>0,G_1+STRLEFT(ZWZ_H,QTE[5]),'')+IF(其他额[6]>0,G_1+STRLEFT(ZWZ_H,QTE[6]),'')+IF(其他额[7]>0,G_1+STRLEFT(ZWZ_H,QTE[7]),'')),colorFF;
DRAWTEXTEX(1,0,20,29,MRKG+STRLEFT(ZWZ_H,MRJ[1])+G_1+STRLEFT(ZWZ_H,MRJ[2])+G_1+STRLEFT(ZWZ_H,MRJ[3])+G_1+STRLEFT(ZWZ_H,MRJ[4])+G_1+STRLEFT(ZWZ_H,MRJ[5])+G_1+STRLEFT(ZWZ_H,MRJ[6])+G_1+STRLEFT(ZWZ_H,MRJ[7])+G_1+STRLEFT(ZWZ_H,MRJ[8])+G_1+STRLEFT(ZWZ_H,MRJ[9])+G_1+STRLEFT(ZWZ_H,MRJ[10])+IF(其他额[1]>0,G_1+STRLEFT(ZWZ_H,QTE[1]),'')+IF(其他额[2]>0,G_1+STRLEFT(ZWZ_H,QTE[2]),'')+IF(其他额[3]>0,G_1+STRLEFT(ZWZ_H,QTE[3]),'')+IF(其他额[4]>0,G_1+STRLEFT(ZWZ_H,QTE[4]),'')+IF(其他额[5]>0,G_1+STRLEFT(ZWZ_H,QTE[5]),'')+IF(其他额[6]>0,G_1+STRLEFT(ZWZ_H,QTE[6]),'')+IF(其他额[7]>0,G_1+STRLEFT(ZWZ_H,QTE[7]),'')),colorFF;
DRAWTEXTEX(1,0,20,30,MRKG+STRLEFT(ZWZ_H,MRJ[1])+G_1+STRLEFT(ZWZ_H,MRJ[2])+G_1+STRLEFT(ZWZ_H,MRJ[3])+G_1+STRLEFT(ZWZ_H,MRJ[4])+G_1+STRLEFT(ZWZ_H,MRJ[5])+G_1+STRLEFT(ZWZ_H,MRJ[6])+G_1+STRLEFT(ZWZ_H,MRJ[7])+G_1+STRLEFT(ZWZ_H,MRJ[8])+G_1+STRLEFT(ZWZ_H,MRJ[9])+G_1+STRLEFT(ZWZ_H,MRJ[10])+IF(其他额[1]>0,G_1+STRLEFT(ZWZ_H,QTE[1]),'')+IF(其他额[2]>0,G_1+STRLEFT(ZWZ_H,QTE[2]),'')+IF(其他额[3]>0,G_1+STRLEFT(ZWZ_H,QTE[3]),'')+IF(其他额[4]>0,G_1+STRLEFT(ZWZ_H,QTE[4]),'')+IF(其他额[5]>0,G_1+STRLEFT(ZWZ_H,QTE[5]),'')+IF(其他额[6]>0,G_1+STRLEFT(ZWZ_H,QTE[6]),'')+IF(其他额[7]>0,G_1+STRLEFT(ZWZ_H,QTE[7]),'')),colorFF;
DRAWTEXTEX(1,0,20,31,MRKG+STRLEFT(ZWZ_H,MRJ[1])+G_1+STRLEFT(ZWZ_H,MRJ[2])+G_1+STRLEFT(ZWZ_H,MRJ[3])+G_1+STRLEFT(ZWZ_H,MRJ[4])+G_1+STRLEFT(ZWZ_H,MRJ[5])+G_1+STRLEFT(ZWZ_H,MRJ[6])+G_1+STRLEFT(ZWZ_H,MRJ[7])+G_1+STRLEFT(ZWZ_H,MRJ[8])+G_1+STRLEFT(ZWZ_H,MRJ[9])+G_1+STRLEFT(ZWZ_H,MRJ[10])+IF(其他额[1]>0,G_1+STRLEFT(ZWZ_H,QTE[1]),'')+IF(其他额[2]>0,G_1+STRLEFT(ZWZ_H,QTE[2]),'')+IF(其他额[3]>0,G_1+STRLEFT(ZWZ_H,QTE[3]),'')+IF(其他额[4]>0,G_1+STRLEFT(ZWZ_H,QTE[4]),'')+IF(其他额[5]>0,G_1+STRLEFT(ZWZ_H,QTE[5]),'')+IF(其他额[6]>0,G_1+STRLEFT(ZWZ_H,QTE[6]),'')+IF(其他额[7]>0,G_1+STRLEFT(ZWZ_H,QTE[7]),'')),colorFF;
DRAWTEXTEX(1,0,20,32,MRKG+STRLEFT(ZWZ_H,MRJ[1])+G_1+STRLEFT(ZWZ_H,MRJ[2])+G_1+STRLEFT(ZWZ_H,MRJ[3])+G_1+STRLEFT(ZWZ_H,MRJ[4])+G_1+STRLEFT(ZWZ_H,MRJ[5])+G_1+STRLEFT(ZWZ_H,MRJ[6])+G_1+STRLEFT(ZWZ_H,MRJ[7])+G_1+STRLEFT(ZWZ_H,MRJ[8])+G_1+STRLEFT(ZWZ_H,MRJ[9])+G_1+STRLEFT(ZWZ_H,MRJ[10])+IF(其他额[1]>0,G_1+STRLEFT(ZWZ_H,QTE[1]),'')+IF(其他额[2]>0,G_1+STRLEFT(ZWZ_H,QTE[2]),'')+IF(其他额[3]>0,G_1+STRLEFT(ZWZ_H,QTE[3]),'')+IF(其他额[4]>0,G_1+STRLEFT(ZWZ_H,QTE[4]),'')+IF(其他额[5]>0,G_1+STRLEFT(ZWZ_H,QTE[5]),'')+IF(其他额[6]>0,G_1+STRLEFT(ZWZ_H,QTE[6]),'')+IF(其他额[7]>0,G_1+STRLEFT(ZWZ_H,QTE[7]),'')),colorFF;
DRAWTEXTEX(1,0,20,26,MRKG+ZWZ_H+G_1+ZWZ_H+G_1+ZWZ_H+G_1+ZWZ_H+G_1+ZWZ_H+G_1+ZWZ_H+G_1+ZWZ_H+G_1+ZWZ_H+G_1+ZWZ_H+G_1+ZWZ_H+IF(其他额[1]>0,G_1+ZWZ_H,'')+IF(其他额[2]>0,G_1+ZWZ_H,'')+IF(其他额[3]>0,G_1+ZWZ_H,'')+IF(其他额[4]>0,G_1+ZWZ_H,'')+IF(其他额[5]>0,G_1+ZWZ_H,'')+IF(其他额[6]>0,G_1+ZWZ_H,'')+IF(其他额[7]>0,G_1+ZWZ_H,'')),colorFF8080;
DRAWTEXTEX(1,0,20,33,MRKG+ZWZ_H+G_1+ZWZ_H+G_1+ZWZ_H+G_1+ZWZ_H+G_1+ZWZ_H+G_1+ZWZ_H+G_1+ZWZ_H+G_1+ZWZ_H+G_1+ZWZ_H+G_1+ZWZ_H+IF(其他额[1]>0,G_1+ZWZ_H,'')+IF(其他额[2]>0,G_1+ZWZ_H,'')+IF(其他额[3]>0,G_1+ZWZ_H,'')+IF(其他额[4]>0,G_1+ZWZ_H,'')+IF(其他额[5]>0,G_1+ZWZ_H,'')+IF(其他额[6]>0,G_1+ZWZ_H,'')+IF(其他额[7]>0,G_1+ZWZ_H,'')),colorFF8080;
DRAWTEXTEX(1,0,20,32,MRKG1+H_H+G_2+H_H+G_2+H_H+G_2+H_H+G_2+H_H+G_2+H_H+G_2+H_H+G_2+H_H+G_2+H_H+G_2+H_H+IF(其他额[1]>0,G_2+H_H,'')+IF(其他额[2]>0,G_2+H_H,'')+IF(其他额[3]>0,G_2+H_H,'')+IF(其他额[4]>0,G_2+H_H,'')+IF(其他额[5]>0,G_2+H_H,'')+IF(其他额[6]>0,G_2+H_H,'')+IF(其他额[7]>0,G_2+H_H,'')),colorFF8080;
DRAWTEXTEX(1,0,20,28,MRKG+STRLEFT(ZWZ_H,MRC[1])+G_1+STRLEFT(ZWZ_H,MRC[2])+G_1+STRLEFT(ZWZ_H,MRC[3])+G_1+STRLEFT(ZWZ_H,MRC[4])+G_1+STRLEFT(ZWZ_H,MRC[5])+G_1+STRLEFT(ZWZ_H,MRC[6])+G_1+STRLEFT(ZWZ_H,MRC[7])+G_1+STRLEFT(ZWZ_H,MRC[8])+G_1+STRLEFT(ZWZ_H,MRC[9])+G_1+STRLEFT(ZWZ_H,MRC[10])),colorFFFF00;
DRAWTEXTEX(1,0,20,29,MRKG+STRLEFT(ZWZ_H,MRC[1])+G_1+STRLEFT(ZWZ_H,MRC[2])+G_1+STRLEFT(ZWZ_H,MRC[3])+G_1+STRLEFT(ZWZ_H,MRC[4])+G_1+STRLEFT(ZWZ_H,MRC[5])+G_1+STRLEFT(ZWZ_H,MRC[6])+G_1+STRLEFT(ZWZ_H,MRC[7])+G_1+STRLEFT(ZWZ_H,MRC[8])+G_1+STRLEFT(ZWZ_H,MRC[9])+G_1+STRLEFT(ZWZ_H,MRC[10])),colorFFFF00;
DRAWTEXTEX(1,0,20,30,MRKG+STRLEFT(ZWZ_H,MRC[1])+G_1+STRLEFT(ZWZ_H,MRC[2])+G_1+STRLEFT(ZWZ_H,MRC[3])+G_1+STRLEFT(ZWZ_H,MRC[4])+G_1+STRLEFT(ZWZ_H,MRC[5])+G_1+STRLEFT(ZWZ_H,MRC[6])+G_1+STRLEFT(ZWZ_H,MRC[7])+G_1+STRLEFT(ZWZ_H,MRC[8])+G_1+STRLEFT(ZWZ_H,MRC[9])+G_1+STRLEFT(ZWZ_H,MRC[10])),colorFFFF00;
DRAWTEXTEX(1,0,20,31,MRKG+STRLEFT(ZWZ_H,MRC[1])+G_1+STRLEFT(ZWZ_H,MRC[2])+G_1+STRLEFT(ZWZ_H,MRC[3])+G_1+STRLEFT(ZWZ_H,MRC[4])+G_1+STRLEFT(ZWZ_H,MRC[5])+G_1+STRLEFT(ZWZ_H,MRC[6])+G_1+STRLEFT(ZWZ_H,MRC[7])+G_1+STRLEFT(ZWZ_H,MRC[8])+G_1+STRLEFT(ZWZ_H,MRC[9])+G_1+STRLEFT(ZWZ_H,MRC[10])),colorFFFF00;
MCKG:=' ';
MCKG1:=' ';
G_3:='\n ';
G_4:='\n ';
DRAWTEXTEX(1,0,20,27,MCKG+STRLEFT(ZWZ_H,MCC[1])+G_3+STRLEFT(ZWZ_H,MCC[2])+G_3+STRLEFT(ZWZ_H,MCC[3])+G_3+STRLEFT(ZWZ_H,MCC[4])+G_3+STRLEFT(ZWZ_H,MCC[5])+G_3+STRLEFT(ZWZ_H,MCC[6])+G_3+STRLEFT(ZWZ_H,MCC[7])+G_3+STRLEFT(ZWZ_H,MCC[8])+G_3+STRLEFT(ZWZ_H,MCC[9])+G_3+STRLEFT(ZWZ_H,MCC[10])+IF(其他额[1]<0,G_3+STRLEFT(ZWZ_H,QTE[1]),'')+IF(其他额[2]<0,G_3+STRLEFT(ZWZ_H,QTE[2]),'')+IF(其他额[3]<0,G_3+STRLEFT(ZWZ_H,QTE[3]),'')+IF(其他额[4]<0,G_3+STRLEFT(ZWZ_H,QTE[4]),'')+IF(其他额[5]<0,G_3+STRLEFT(ZWZ_H,QTE[5]),'')+IF(其他额[6]<0,G_3+STRLEFT(ZWZ_H,QTE[6]),'')+IF(其他额[7]<0,G_3+STRLEFT(ZWZ_H,QTE[7]),'')),color94A967;
DRAWTEXTEX(1,0,20,28,MCKG+STRLEFT(ZWZ_H,MCC[1])+G_3+STRLEFT(ZWZ_H,MCC[2])+G_3+STRLEFT(ZWZ_H,MCC[3])+G_3+STRLEFT(ZWZ_H,MCC[4])+G_3+STRLEFT(ZWZ_H,MCC[5])+G_3+STRLEFT(ZWZ_H,MCC[6])+G_3+STRLEFT(ZWZ_H,MCC[7])+G_3+STRLEFT(ZWZ_H,MCC[8])+G_3+STRLEFT(ZWZ_H,MCC[9])+G_3+STRLEFT(ZWZ_H,MCC[10])+IF(其他额[1]<0,G_3+STRLEFT(ZWZ_H,QTE[1]),'')+IF(其他额[2]<0,G_3+STRLEFT(ZWZ_H,QTE[2]),'')+IF(其他额[3]<0,G_3+STRLEFT(ZWZ_H,QTE[3]),'')+IF(其他额[4]<0,G_3+STRLEFT(ZWZ_H,QTE[4]),'')+IF(其他额[5]<0,G_3+STRLEFT(ZWZ_H,QTE[5]),'')+IF(其他额[6]<0,G_3+STRLEFT(ZWZ_H,QTE[6]),'')+IF(其他额[7]<0,G_3+STRLEFT(ZWZ_H,QTE[7]),'')),color94A967;
DRAWTEXTEX(1,0,20,29,MCKG+STRLEFT(ZWZ_H,MCC[1])+G_3+STRLEFT(ZWZ_H,MCC[2])+G_3+STRLEFT(ZWZ_H,MCC[3])+G_3+STRLEFT(ZWZ_H,MCC[4])+G_3+STRLEFT(ZWZ_H,MCC[5])+G_3+STRLEFT(ZWZ_H,MCC[6])+G_3+STRLEFT(ZWZ_H,MCC[7])+G_3+STRLEFT(ZWZ_H,MCC[8])+G_3+STRLEFT(ZWZ_H,MCC[9])+G_3+STRLEFT(ZWZ_H,MCC[10])+IF(其他额[1]<0,G_3+STRLEFT(ZWZ_H,QTE[1]),'')+IF(其他额[2]<0,G_3+STRLEFT(ZWZ_H,QTE[2]),'')+IF(其他额[3]<0,G_3+STRLEFT(ZWZ_H,QTE[3]),'')+IF(其他额[4]<0,G_3+STRLEFT(ZWZ_H,QTE[4]),'')+IF(其他额[5]<0,G_3+STRLEFT(ZWZ_H,QTE[5]),'')+IF(其他额[6]<0,G_3+STRLEFT(ZWZ_H,QTE[6]),'')+IF(其他额[7]<0,G_3+STRLEFT(ZWZ_H,QTE[7]),'')),color94A967;
DRAWTEXTEX(1,0,20,30,MCKG+STRLEFT(ZWZ_H,MCC[1])+G_3+STRLEFT(ZWZ_H,MCC[2])+G_3+STRLEFT(ZWZ_H,MCC[3])+G_3+STRLEFT(ZWZ_H,MCC[4])+G_3+STRLEFT(ZWZ_H,MCC[5])+G_3+STRLEFT(ZWZ_H,MCC[6])+G_3+STRLEFT(ZWZ_H,MCC[7])+G_3+STRLEFT(ZWZ_H,MCC[8])+G_3+STRLEFT(ZWZ_H,MCC[9])+G_3+STRLEFT(ZWZ_H,MCC[10])+IF(其他额[1]<0,G_3+STRLEFT(ZWZ_H,QTE[1]),'')+IF(其他额[2]<0,G_3+STRLEFT(ZWZ_H,QTE[2]),'')+IF(其他额[3]<0,G_3+STRLEFT(ZWZ_H,QTE[3]),'')+IF(其他额[4]<0,G_3+STRLEFT(ZWZ_H,QTE[4]),'')+IF(其他额[5]<0,G_3+STRLEFT(ZWZ_H,QTE[5]),'')+IF(其他额[6]<0,G_3+STRLEFT(ZWZ_H,QTE[6]),'')+IF(其他额[7]<0,G_3+STRLEFT(ZWZ_H,QTE[7]),'')),color94A967;
DRAWTEXTEX(1,0,20,31,MCKG+STRLEFT(ZWZ_H,MCC[1])+G_3+STRLEFT(ZWZ_H,MCC[2])+G_3+STRLEFT(ZWZ_H,MCC[3])+G_3+STRLEFT(ZWZ_H,MCC[4])+G_3+STRLEFT(ZWZ_H,MCC[5])+G_3+STRLEFT(ZWZ_H,MCC[6])+G_3+STRLEFT(ZWZ_H,MCC[7])+G_3+STRLEFT(ZWZ_H,MCC[8])+G_3+STRLEFT(ZWZ_H,MCC[9])+G_3+STRLEFT(ZWZ_H,MCC[10])+IF(其他额[1]<0,G_3+STRLEFT(ZWZ_H,QTE[1]),'')+IF(其他额[2]<0,G_3+STRLEFT(ZWZ_H,QTE[2]),'')+IF(其他额[3]<0,G_3+STRLEFT(ZWZ_H,QTE[3]),'')+IF(其他额[4]<0,G_3+STRLEFT(ZWZ_H,QTE[4]),'')+IF(其他额[5]<0,G_3+STRLEFT(ZWZ_H,QTE[5]),'')+IF(其他额[6]<0,G_3+STRLEFT(ZWZ_H,QTE[6]),'')+IF(其他额[7]<0,G_3+STRLEFT(ZWZ_H,QTE[7]),'')),color94A967;
DRAWTEXTEX(1,0,20,32,MCKG+STRLEFT(ZWZ_H,MCC[1])+G_3+STRLEFT(ZWZ_H,MCC[2])+G_3+STRLEFT(ZWZ_H,MCC[3])+G_3+STRLEFT(ZWZ_H,MCC[4])+G_3+STRLEFT(ZWZ_H,MCC[5])+G_3+STRLEFT(ZWZ_H,MCC[6])+G_3+STRLEFT(ZWZ_H,MCC[7])+G_3+STRLEFT(ZWZ_H,MCC[8])+G_3+STRLEFT(ZWZ_H,MCC[9])+G_3+STRLEFT(ZWZ_H,MCC[10])+IF(其他额[1]<0,G_3+STRLEFT(ZWZ_H,QTE[1]),'')+IF(其他额[2]<0,G_3+STRLEFT(ZWZ_H,QTE[2]),'')+IF(其他额[3]<0,G_3+STRLEFT(ZWZ_H,QTE[3]),'')+IF(其他额[4]<0,G_3+STRLEFT(ZWZ_H,QTE[4]),'')+IF(其他额[5]<0,G_3+STRLEFT(ZWZ_H,QTE[5]),'')+IF(其他额[6]<0,G_3+STRLEFT(ZWZ_H,QTE[6]),'')+IF(其他额[7]<0,G_3+STRLEFT(ZWZ_H,QTE[7]),'')),color94A967;
DRAWTEXTEX(1,0,20,26,MCKG+ZWZ_H+G_3+ZWZ_H+G_3+ZWZ_H+G_3+ZWZ_H+G_3+ZWZ_H+G_3+ZWZ_H+G_3+ZWZ_H+G_3+ZWZ_H+G_3+ZWZ_H+G_3+ZWZ_H+IF(其他额[1]<0,G_3+ZWZ_H,'')+IF(其他额[2]<0,G_3+ZWZ_H,'')+IF(其他额[3]<0,G_3+ZWZ_H,'')+IF(其他额[4]<0,G_3+ZWZ_H,'')+IF(其他额[5]<0,G_3+ZWZ_H,'')+IF(其他额[6]<0,G_3+ZWZ_H,'')+IF(其他额[7]<0,G_3+ZWZ_H,'')),colorFFFFFF;
DRAWTEXTEX(1,0,20,33,MCKG+ZWZ_H+G_3+ZWZ_H+G_3+ZWZ_H+G_3+ZWZ_H+G_3+ZWZ_H+G_3+ZWZ_H+G_3+ZWZ_H+G_3+ZWZ_H+G_3+ZWZ_H+G_3+ZWZ_H+IF(其他额[1]<0,G_3+ZWZ_H,'')+IF(其他额[2]<0,G_3+ZWZ_H,'')+IF(其他额[3]<0,G_3+ZWZ_H,'')+IF(其他额[4]<0,G_3+ZWZ_H,'')+IF(其他额[5]<0,G_3+ZWZ_H,'')+IF(其他额[6]<0,G_3+ZWZ_H,'')+IF(其他额[7]<0,G_3+ZWZ_H,'')),colorFFFFFF;
DRAWTEXTEX(1,0,20,32,MCKG1+H_H+G_4+H_H+G_4+H_H+G_4+H_H+G_4+H_H+G_4+H_H+G_4+H_H+G_4+H_H+G_4+H_H+G_4+H_H+IF(其他额[1]<0,G_4+H_H,'')+IF(其他额[2]<0,G_4+H_H,'')+IF(其他额[3]<0,G_4+H_H,'')+IF(其他额[4]<0,G_4+H_H,'')+IF(其他额[5]<0,G_4+H_H,'')+IF(其他额[6]<0,G_4+H_H,'')+IF(其他额[7]<0,G_4+H_H,'')),colorFFFFFF;
DRAWTEXTEX(1,0,20,28,MCKG+STRLEFT(ZWZ_H,MCJ[1])+G_3+STRLEFT(ZWZ_H,MCJ[2])+G_3+STRLEFT(ZWZ_H,MCJ[3])+G_3+STRLEFT(ZWZ_H,MCJ[4])+G_3+STRLEFT(ZWZ_H,MCJ[5])+G_3+STRLEFT(ZWZ_H,MCJ[6])+G_3+STRLEFT(ZWZ_H,MCJ[7])+G_3+STRLEFT(ZWZ_H,MCJ[8])+G_3+STRLEFT(ZWZ_H,MCJ[9])+G_3+STRLEFT(ZWZ_H,MCJ[10])),colorFF0080;
DRAWTEXTEX(1,0,20,29,MCKG+STRLEFT(ZWZ_H,MCJ[1])+G_3+STRLEFT(ZWZ_H,MCJ[2])+G_3+STRLEFT(ZWZ_H,MCJ[3])+G_3+STRLEFT(ZWZ_H,MCJ[4])+G_3+STRLEFT(ZWZ_H,MCJ[5])+G_3+STRLEFT(ZWZ_H,MCJ[6])+G_3+STRLEFT(ZWZ_H,MCJ[7])+G_3+STRLEFT(ZWZ_H,MCJ[8])+G_3+STRLEFT(ZWZ_H,MCJ[9])+G_3+STRLEFT(ZWZ_H,MCJ[10])),colorFF0080;
DRAWTEXTEX(1,0,20,30,MCKG+STRLEFT(ZWZ_H,MCJ[1])+G_3+STRLEFT(ZWZ_H,MCJ[2])+G_3+STRLEFT(ZWZ_H,MCJ[3])+G_3+STRLEFT(ZWZ_H,MCJ[4])+G_3+STRLEFT(ZWZ_H,MCJ[5])+G_3+STRLEFT(ZWZ_H,MCJ[6])+G_3+STRLEFT(ZWZ_H,MCJ[7])+G_3+STRLEFT(ZWZ_H,MCJ[8])+G_3+STRLEFT(ZWZ_H,MCJ[9])+G_3+STRLEFT(ZWZ_H,MCJ[10])),colorFF0080;
DRAWTEXTEX(1,0,20,31,MCKG+STRLEFT(ZWZ_H,MCJ[1])+G_3+STRLEFT(ZWZ_H,MCJ[2])+G_3+STRLEFT(ZWZ_H,MCJ[3])+G_3+STRLEFT(ZWZ_H,MCJ[4])+G_3+STRLEFT(ZWZ_H,MCJ[5])+G_3+STRLEFT(ZWZ_H,MCJ[6])+G_3+STRLEFT(ZWZ_H,MCJ[7])+G_3+STRLEFT(ZWZ_H,MCJ[8])+G_3+STRLEFT(ZWZ_H,MCJ[9])+G_3+STRLEFT(ZWZ_H,MCJ[10])),colorFF0080;
买买合计:=买额[1]+买额[2]+买额[3]+买额[4]+买额[5]+买额[6]+买额[7]+买额[8]+买额[9]+买额[10]+IF(其他额[1]>0,其他额[1],0)+IF(其他额[2]>0,其他额[2],0)+IF(其他额[3]>0,其他额[3],0)+IF(其他额[4]>0,其他额[4],0)+IF(其他额[5]>0,其他额[5],0)+IF(其他额[6]>0,其他额[6],0)+IF(其他额[7]>0,其他额[7],0);
买卖合计:=买卖额[1]+买卖额[2]+买卖额[3]+买卖额[4]+买卖额[5]+买卖额[6]+买卖额[7]+买卖额[8]+买卖额[9]+买卖额[10];
买净合计:=买买合计-买卖合计;
卖卖合计:=卖额[1]+卖额[2]+卖额[3]+卖额[4]+卖额[5]+卖额[6]+卖额[7]+卖额[8]+卖额[9]+卖额[10]-(IF(其他额[1]<0,其他额[1],0))-(IF(其他额[2]<0,其他额[2],0))-(IF(其他额[3]<0,其他额[3],0))-(IF(其他额[4]<0,其他额[4],0))-(IF(其他额[5]<0,其他额[5],0))-(IF(其他额[6]<0,其他额[6],0))-(IF(其他额[7]<0,其他额[7],0));
卖买合计:=卖买额[1]+卖买额[2]+卖买额[3]+卖买额[4]+卖买额[5]+卖买额[6]+卖买额[7]+卖买额[8]+卖买额[9]+卖买额[10];
卖净合计:=卖买合计-卖卖合计;
席位每日总净额:买净合计+卖净合计,LINETHICK0,colorE0FF;
DRAWTEXTEX(1,0,5,150,'───────────────────────────────────────────────────────────────────────────'),color404080;
DRAWTEXTEX(1,0,11,20,'编 码 席 位 归 属 名 称'),color5F01FA;
DRAWTEXTEX(1,0,370,20,'卖额 编 码 席 位 归 属 名 称 卖 出 '),color94A967;
DRAWTEXTEX(1,0,240,20,' 买入 号 买额'),colorFF;
DRAWTEXTEX(1,0,411,20,'净额 净额'),colorFFFF;
DRAWTEXTEX(1,0,450,3,'序'),colorFF;
DRAWTEXTEX(1,0,7,3,' 买 入 席 位 合 计:'),colorE0FF;
DRAWTEXTEX(1,0,7,23,'\n \n'+买账[1]+' '+买名[1]+'\n'+买账[2]+' '+买名[2]+'\n'+买账[3]+' '+买名[3]+'\n'+买账[4]+' '+买名[4]+'\n'+买账[5]+' '+买名[5]+'\n'+买账[6]+' '+买名[6]+'\n'+买账[7]+' '+买名[7]+'\n'+买账[8]+' '+买名[8]+'\n'+买账[9]+'
'+买名[9]+'\n'+买账[10]+' '+买名[10]+'\n'+IF(其他额[1]>0,其他账[1]+' '+其他名[1]+'\n','')+IF(其他额[2]>0,其他账[2]+' '+其他名[2]+'\n','')+IF(其他额[3]>0,其他账[3]+' '+其他名[3]+'\n','')+IF(其他额[4]>0,其他账[4]+' '+其他名[4]+'\n','')+IF(其他额[5]>0,其他账[5]+' '+其他名[5]+'\n','')+IF(其他额[6]>0,其他账[6]+' '+其他名[6]+'\n','')+IF(其他额[7]>0,其他账[7]+' '+其他名[7],'')),colorD9;
DRAWTEXTEX(1,0,7,23,'\n \n'+GS1+'\n'+GS2+'\n'+GS3+'\n'+GS4+'\n'+GS5+'\n'+GS6+'\n'+GS7+'\n'+GS8+'\n'+GS9+'\n'+GS10+'\n'+IF(其他额[1]>0,GT1+'\n','')+IF(其他额[2]>0,GT2+'\n','')+IF(其他额[3]>0,GT3+'\n','')+IF(其他额[4]>0,GT4+'\n','')+IF(其他额[5]>0,GT5+'\n','')+IF(其他额[6]>0,GT6+'\n','')+IF(其他额[7]>0,GT7,'')),colorFFFF;
DRAWTEXTEX(1,0,7,23,'\n \n'+TS1+'\n'+TS2+'\n'+TS3+'\n'+TS4+'\n'+TS5+'\n'+TS6+'\n'+TS7+'\n'+TS8+'\n'+TS9+'\n'+TS10+'\n'+IF(其他额[1]>0,TT1+'\n','')+IF(其他额[2]>0,TT2+'\n','')+IF(其他额[3]>0,TT3+'\n','')+IF(其他额[4]>0,TT4+'\n','')+IF(其他额[5]>0,TT5+'\n','')+IF(其他额[6]>0,TT6+'\n','')+IF(其他额[7]>0,TT7,'')),colorFF00FF;
DRAWTEXTEX(1,0,7,23,'\n \n'+BS1+'\n'+BS2+'\n'+BS3+'\n'+BS4+'\n'+BS5+'\n'+BS6+'\n'+BS7+'\n'+BS8+'\n'+BS9+'\n'+BS10+'\n'+IF(其他额[1]>0,BT1+'\n','')+IF(其他额[2]>0,BT2+'\n','')+IF(其他额[3]>0,BT3+'\n','')+IF(其他额[4]>0,BT4+'\n','')+IF(其他额[5]>0,BT5+'\n','')+IF(其他额[6]>0,BT6+'\n','')+IF(其他额[7]>0,BT7,'')),color8080FF;
DRAWTEXTEX(1,0,250,3,NUMTOSTR(买买合计,0)),color1489F3;
DRAWTEXTEX(1,0,250,23,'\n \n'+NUMTOSTR(买额[1],0)+'\n'+NUMTOSTR(买额[2],0)+'\n'+NUMTOSTR(买额[3],0)+'\n'+NUMTOSTR(买额[4],0)+'\n'+NUMTOSTR(买额[5],0)+'\n'+NUMTOSTR(买额[6],0)+'\n'+NUMTOSTR(买额[7],0)+'\n'+NUMTOSTR(买额[8],0)+'\n'+NUMTOSTR(买额[9],0)+'\n'+NUMTOSTR(买额[10],0)+'\n'+IF(其他额[1]>0,NUMTOSTR(其他额[1],0)+'\n','')+IF(其他额[2]>0,NUMTOSTR(其他额[2],0)+'\n','')+IF(其他额[3]>0,NUMTOSTR(其他额[3],0)+'\n','')+IF(其他额[4]>0,NUMTOSTR(其他额[4],0)+'\n','')+IF(其他额[5]>0,NUMTOSTR(其他额[5],0)+'\n','')+IF(其他额[6]>0,NUMTOSTR(其他额[6],0)+'\n','')+IF(其他额[7]>0,NUMTOSTR(其他额[7],0),'')),color1489F3;
DRAWTEXTEX(1,0,367,3,NUMTOSTR(-买卖合计,0)),color94A967;
DRAWTEXTEX(1,0,367,23,'\n \n'+NUMTOSTR(-买卖额[1],0)+'\n'+NUMTOSTR(-买卖额[2],0)+'\n'+NUMTOSTR(-买卖额[3],0)+'\n'+NUMTOSTR(-买卖额[4],0)+'\n'+NUMTOSTR(-买卖额[5],0)+'\n'+NUMTOSTR(-买卖额[6],0)+'\n'+NUMTOSTR(-买卖额[7],0)+'\n'+NUMTOSTR(-买卖额[8],0)+'\n'+NUMTOSTR(-买卖额[9],0)+'\n'+NUMTOSTR(-买卖额[10],0)),color94A967;
DRAWTEXTEX(1,0,410,3,NUMTOSTR(买净合计,0)),colorE0FF;
DRAWTEXTEX(1,0,410,23,'\n \n'+NUMTOSTR(买净额[1],0)+'\n'+NUMTOSTR(买净额[2],0)+'\n'+NUMTOSTR(买净额[3],0)+'\n'+NUMTOSTR(买净额[4],0)+'\n'+NUMTOSTR(买净额[5],0)+'\n'+NUMTOSTR(买净额[6],0)+'\n'+NUMTOSTR(买净额[7],0)+'\n'+NUMTOSTR(买净额[8],0)+'\n'+NUMTOSTR(买净额[9],0)+'\n'+NUMTOSTR(买净额[10],0)+'\n'+IF(其他额[1]>0,NUMTOSTR(其他额[1],0)+'\n','')+IF(其他额[2]>0,NUMTOSTR(其他额[2],0)+'\n','')+IF(其他额[3]>0,NUMTOSTR(其他额[3],0)+'\n','')+IF(其他额[4]>0,NUMTOSTR(其他额[4],0)+'\n','')+IF(其他额[5]>0,NUMTOSTR(其他额[5],0)+'\n','')+IF(其他额[6]>0,NUMTOSTR(其他额[6],0)+'\n','')+IF(其他额[7]>0,NUMTOSTR(其他额[7],0),'')),colorE0FF;
DRAWTEXTEX(1,0,451,23,' \n 1\n 2\n 3\n 4\n 5\n 6\n 7\n 8\n 9\n 10\n '+IF(YP>=1,'11\n ','')+IF(YP>=2,'12\n ','')+IF(YP>=3,'13\n ','')+IF(YP>=4,'14\n ','')+IF(YP>=5,'15\n ','')+IF(YP>=6,'16\n ','')+IF(YP=7,'17','')),ALIGN0,color1489F3;
DRAWTEXTEX(1,0,470,3,' 卖 出 席 位 合 计:'),color94A967;
DRAWTEXTEX(1,0,470,23,'\n \n'+卖帐[1]+' '+卖名[1]+'\n'+卖帐[2]+' '+卖名[2]+'\n'+卖帐[3]+' '+卖名[3]+'\n'+卖帐[4]+' '+卖名[4]+'\n'+卖帐[5]+' '+卖名[5]+'\n'+卖帐[6]+' '+卖名[6]+'\n'+卖帐[7]+' '+卖名[7]+'\n'+卖帐[8]+' '+卖名[8]+'\n'+卖帐[9]+'
'+卖名[9]+'\n'+卖帐[10]+' '+卖名[10]+'\n'+IF(其他额[1]<0,其他账[1]+' '+其他名[1]+'\n','')+IF(其他额[2]<0,其他账[2]+' '+其他名[2]+'\n','')+IF(其他额[3]<0,其他账[3]+' '+其他名[3]+'\n','')+IF(其他额[4]<0,其他账[4]+' '+其他名[4]+'\n','')+IF(其他额[5]<0,其他账[5]+' '+其他名[5]+'\n','')+IF(其他额[6]<0,其他账[6]+' '+其他名[6]+'\n','')+IF(其他额[7]<0,其他账[7]+' '+其他名[7],'')),color94A967;
DRAWTEXTEX(1,0,470,23,'\n \n'+GC1+'\n'+GC2+'\n'+GC3+'\n'+GC4+'\n'+GC5+'\n'+GC6+'\n'+GC7+'\n'+GC8+'\n'+GC9+'\n'+GC10+'\n'+IF(其他额[1]<0,JT1+'\n','')+IF(其他额[2]<0,JT2+'\n','')+IF(其他额[3]<0,JT3+'\n','')+IF(其他额[4]<0,JT4+'\n','')+IF(其他额[5]<0,JT5+'\n','')+IF(其他额[6]<0,JT6+'\n','')+IF(其他额[7]<0,JT7,'')),colorEC00;
DRAWTEXTEX(1,0,470,23,'\n \n'+TB1+'\n'+TB2+'\n'+TB3+'\n'+TB4+'\n'+TB5+'\n'+TB6+'\n'+TB7+'\n'+TB8+'\n'+TB9+'\n'+TB10+'\n'+IF(其他额[1]<0,TC1+'\n','')+IF(其他额[2]<0,TC2+'\n','')+IF(其他额[3]<0,TC3+'\n','')+IF(其他额[4]<0,TC4+'\n','')+IF(其他额[5]<0,TC5+'\n','')+IF(其他额[6]<0,TC6+'\n','')+IF(其他额[7]<0,TC7,'')),colorFF0080;
DRAWTEXTEX(1,0,470,23,'\n \n'+BC1+'\n'+BC2+'\n'+BC3+'\n'+BC4+'\n'+BC5+'\n'+BC6+'\n'+BC7+'\n'+BC8+'\n'+BC9+'\n'+BC10+'\n'+IF(其他额[1]<0,BD1+'\n','')+IF(其他额[2]<0,BD2+'\n','')+IF(其他额[3]<0,BD3+'\n','')+IF(其他额[4]<0,BD4+'\n','')+IF(其他额[5]<0,BD5+'\n','')+IF(其他额[6]<0,BD6+'\n','')+IF(其他额[7]<0,BD7,'')),colorEAEA00;
DRAWTEXTEX(1,0,710,3,NUMTOSTR(-卖卖合计,0)),color94A967;
DRAWTEXTEX(1,0,710,23,'\n \n'+NUMTOSTR(-卖额[1],0)+'\n'+NUMTOSTR(-卖额[2],0)+'\n'+NUMTOSTR(-卖额[3],0)+'\n'+NUMTOSTR(-卖额[4],0)+'\n'+NUMTOSTR(-卖额[5],0)+'\n'+NUMTOSTR(-卖额[6],0)+'\n'+NUMTOSTR(-卖额[7],0)+'\n'+NUMTOSTR(-卖额[8],0)+'\n'+NUMTOSTR(-卖额[9],0)+'\n'+NUMTOSTR(-卖额[10],0)+'\n'+IF(其他额[1]<0,NUMTOSTR(其他额[1],0)+'\n','')+IF(其他额[2]<0,NUMTOSTR(其他额[2],0)+'\n','')+IF(其他额[3]<0,NUMTOSTR(其他额[3],0)+'\n','')+IF(其他额[4]<0,NUMTOSTR(其他额[4],0)+'\n','')+IF(其他额[5]<0,NUMTOSTR(其他额[5],0)+'\n','')+IF(其他额[6]<0,NUMTOSTR(其他额[6],0)+'\n','')+IF(其他额[7]<0,NUMTOSTR(其他额[7],0),'')),color94A967;
DRAWTEXTEX(1,0,835,3,NUMTOSTR(卖买合计,0)),color1489F3;
DRAWTEXTEX(1,0,835,23,'\n \n'+NUMTOSTR(卖买额[1],0)+'\n'+NUMTOSTR(卖买额[2],0)+'\n'+NUMTOSTR(卖买额[3],0)+'\n'+NUMTOSTR(卖买额[4],0)+'\n'+NUMTOSTR(卖买额[5],0)+'\n'+NUMTOSTR(卖买额[6],0)+'\n'+NUMTOSTR(卖买额[7],0)+'\n'+NUMTOSTR(卖买额[8],0)+'\n'+NUMTOSTR(卖买额[9],0)+'\n'+NUMTOSTR(卖买额[10],0)),color1489F3;
DRAWTEXTEX(1,0,865,3,NUMTOSTR(卖净合计,0)),colorE0FF;
DRAWTEXTEX(1,0,865,23,'\n \n'+NUMTOSTR(卖净额[1],0)+'\n'+NUMTOSTR(卖净额[2],0)+'\n'+NUMTOSTR(卖净额[3],0)+'\n'+NUMTOSTR(卖净额[4],0)+'\n'+NUMTOSTR(卖净额[5],0)+'\n'+NUMTOSTR(卖净额[6],0)+'\n'+NUMTOSTR(卖净额[7],0)+'\n'+NUMTOSTR(卖净额[8],0)+'\n'+NUMTOSTR(卖净额[9],0)+'\n'+NUMTOSTR(卖净额[10],0)+'\n'+IF(其他额[1]<0,NUMTOSTR(其他额[1],0)+'\n','')+IF(其他额[2]<0,NUMTOSTR(其他额[2],0)+'\n','')+IF(其他额[3]<0,NUMTOSTR(其他额[3],0)+'\n','')+IF(其他额[4]<0,NUMTOSTR(其他额[4],0)+'\n','')+IF(其他额[5]<0,NUMTOSTR(其他额[5],0)+'\n','')+IF(其他额[6]<0,NUMTOSTR(其他额[6],0)+'\n','')+IF(其他额[7]<0,NUMTOSTR(其他额[7],0),'')),colorE0FF;
DRAWTEXTEX(1,0,5,-5,'───────────────────────────────────────────────────────────────────────────'),colorC080FF;
DRAWTEXTEX(1,0,5,12,'────────────────────────────────────- ────────────────────────────────────-'),colorC080FF;
DRAWTEXTEX(1,0,5,28,'───────────────────────────────────────────────────────────────────────────'),colorC080FF;
ZWZ_1:=IF(YP=0 AND YP<1,150,IF(YP=1 AND YP<2,162,IF(YP=2 AND YP<3,174,IF(YP=3 AND YP<4,186,IF(YP=4 AND YP<5,198,IF(YP=5 AND YP<6,210,IF(YP=6 AND YP<7,222,234)))))));
DRAWTEXTEX(1,0,5,ZWZ_1,'───────────────────────────────────────────────────────────────────────────'),colorC080FF;
DRAWTEXTEX(1,0,0,0,'│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n'+IF(YP>=1,'│\n','')+IF(YP>=2,'│\n','')+IF(YP>=3,'│\n','')+IF(YP>=4,'│\n','')+IF(YP>=5,'│\n','')+IF(YP>=6,'│\n','')+IF(YP=7,'│','')),colorC080FF;
DRAWTEXTEX(1,0,240,0,'│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n'+IF(YP>=1,'│\n','')+IF(YP>=2,'│\n','')+IF(YP>=3,'│\n','')+IF(YP>=4,'│\n','')+IF(YP>=5,'│\n','')+IF(YP>=6,'│\n','')+IF(YP=7,'│','')),colorC080FF;
DRAWTEXTEX(1,0,395,0,'│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n'+IF(YP>=1,'│\n','')+IF(YP>=2,'│\n','')+IF(YP>=3,'│\n','')+IF(YP>=4,'│\n','')+IF(YP>=5,'│\n','')+IF(YP>=6,'│\n','')+IF(YP=7,'│','')),colorC080FF;
DRAWTEXTEX(1,0,438,0,'│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n'+IF(YP>=1,'│\n','')+IF(YP>=2,'│\n','')+IF(YP>=3,'│\n','')+IF(YP>=4,'│\n','')+IF(YP>=5,'│\n','')+IF(YP>=6,'│\n','')+IF(YP=7,'│','')),colorC080FF;
DRAWTEXTEX(1,0,460,0,'│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n'+IF(YP>=1,'│\n','')+IF(YP>=2,'│\n','')+IF(YP>=3,'│\n','')+IF(YP>=4,'│\n','')+IF(YP>=5,'│\n','')+IF(YP>=6,'│\n','')+IF(YP=7,'│','')),colorC080FF;
DRAWTEXTEX(1,0,700,0,'│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n'+IF(YP>=1,'│\n','')+IF(YP>=2,'│\n','')+IF(YP>=3,'│\n','')+IF(YP>=4,'│\n','')+IF(YP>=5,'│\n','')+IF(YP>=6,'│\n','')+IF(YP=7,'│','')),colorC080FF;
DRAWTEXTEX(1,0,856,0,'│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n'+IF(YP>=1,'│\n','')+IF(YP>=2,'│\n','')+IF(YP>=3,'│\n','')+IF(YP>=4,'│\n','')+IF(YP>=5,'│\n','')+IF(YP>=6,'│\n','')+IF(YP=7,'│','')),colorC080FF;
DRAWTEXTEX(1,0,899,0,'│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n│\n'+IF(YP>=1,'│\n','')+IF(YP>=2,'│\n','')+IF(YP>=3,'│\n','')+IF(YP>=4,'│\n','')+IF(YP>=5,'│\n','')+IF(YP>=6,'│\n','')+IF(YP=7,'│','')),colorC080FF;
DRAWTEXTEX(1,0,905,60,' 阳\n 春\n K\n 线\n \n 编\n 辑'),color5E5E2F;
{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
