主题：请教图表转后台

if ss = 0 and KD and filter_2 then BEGIN
   signal := 1 ;
   myprice := ...;
end;
if ss = 0 and KK and filter_2 then BEGIN
   signal := -1 ;
   myprice := ...;

end;

if ss > 0 and PD then BEGIN
   signal := 0 ;
   myprice := ...;

end;
if ss < 0 and PK then BEGIN
   signal := 0 ;
   myprice := ...;
end;

//后台部分
if ss < 0 and signal >= 0 then begin
 tsellshort(workmode = 1, -ss * lots, MKT);
 sellshort(workmode = 0, -ss * lots, LIMITR, myprice);
 ss := 0;
end;
if ss > 0 and signal <= 0 then begin
 tsell(workmode = 1, ss * lots, MKT);
 sell(workmode = 0, ss * lots, LIMITR, myprice);
 ss := 0;
end;

tbuy(workmode = 1 and ss < signal, (signal - ss) * lots, MKT);
buy(workmode = 0 and ss < signal, (signal - ss) * lots, LIMITR, myprice);
tbuyshort(workmode = 1 and ss > signal, (ss - signal) * lots, MKT);
buyshort(workmode = 0 and ss > signal, (ss - signal) * lots, LIMITR, myprice);