Блог им. GrigoriyStar |Don't cry smart-lab.

Смотрю все так напряглись по поводу комиссии на срочной секции, и пропустили главное.
Для исполнения лимитных заявок комиссии не будет !!!
Расслабьтесь, выдохните и продолжайте торговать только лимитными заявками.
Вот вам функция перестановки для qpile в подарок.

'========= Перемещение заявки

FUNC MORDER(FTRID,FON,FONQ,FONP)
    NEW_GLOBAL("TRANS_PARAMS", "")
    NEW_GLOBAL("TRANS_RESULT", "")
    TRANS_PARAMS = ""
    TRANS_PARAMS = SET_VALUE (TRANS_PARAMS, "TRANS_ID",FTRID)
    TRANS_PARAMS = SET_VALUE (TRANS_PARAMS, "ACTION", "MOVE_ORDERS")
    TRANS_PARAMS = SET_VALUE (TRANS_PARAMS, "MODE",0)
    TRANS_PARAMS = SET_VALUE (TRANS_PARAMS, "CLASSCODE", "SPBFUT")
    TRANS_PARAMS = SET_VALUE (TRANS_PARAMS, "SECCODE", INSTRUMENT)
    TRANS_PARAMS = SET_VALUE (TRANS_PARAMS, "ACCOUNT", ACCOUNT)
    TRANS_PARAMS = SET_VALUE (TRANS_PARAMS, "FIRST_ORDER_NUMBER",FON)
    TRANS_PARAMS = SET_VALUE (TRANS_PARAMS, "FIRST_ORDER_NEW_QUANTITY",FONQ)
    TRANS_PARAMS = SET_VALUE (TRANS_PARAMS, "FIRST_ORDER_NEW_PRICE",FONP)
    TRANS_RESULT = SEND_TRANSACTION (300, TRANS_PARAMS)
    RESULT=GET_VALUE(TRANS_RESULT, "DESCRIPTION")
    MESSAGE (RESULT,1)
END FUNC

'========= Операция перестановки
IF MPRICE < LOW 
 MORDER(MTRANS_ID,MNUMBER,MBALANCE,LOW+STEP) 
END IF

'======================================
'MTRANS_ID - номер заявки на бирже
'MNUMBER   - номер заявки в таблицах
'MBALANCE  - объем
'LOW       - минимум свечи
'STEP      - отступ для лимитки
'MPRICE    - последняя цена

....все тэги
UPDONW
Новый дизайн