请老师帮我写个下单组件　[文华财经]

IF(ABS(Price(F_DealCode())-F_SigPrice())<=M&&T_IsNoOrder()==1)

{

      T_Deal(F_DealCode(),0,1,1,Offers(F_DealCode(),"ask1"));

}

ELSE IF(T_IsNoOrder()!=1&&ABS(Price(F_DealCode())-F_SigPrice())>M)

{

      MessageOut("价差过大");

      T_DeleteOrderAll();

}    

注：M为自定义滑点为1点（股指300元）

---------------------------------------------

//主要策略：开仓挂价发单，平仓对价发单，10秒没有成交启用超2个价位追价发单。

VAR KN;//定义开仓手数。

VAR LastWithDrawFinsh;

VAR A,M,N;

VAR BKID,SKID,BPID,SPID;

VAR Price,MinPrice;

VOID MAIN()//主函数。

{

      KN=1;//下单手数。

      N=2;//超价参数。