start [База знаний]

Вы посетили: • start [/start] Показать исходный текст История страницы Недавние изменения Все страницы Войти Action Script 3 MQL4 Этот сайт сделан в первую очередь для студентов кафедры автоматизации и компьютерно-интегрированных технологий Восточноукраинского национального университета, но будет полезен и многим другим. Здесь представлены примеры кода на различных языках программирования. Установить ордер — root 2011/05/09 15:22 //+----------------------------------------------------------------------------+ //| Автор : Ким Игорь В. aka KimIV, http://www.kimiv.ru | //+----------------------------------------------------------------------------+ //| Версия : 21.03.2008 | //| Описание : Открывает позицию и возвращает её тикет. | //+----------------------------------------------------------------------------+ //| Параметры: | //| sy - наименование инструмента (NULL или "" - текущий символ) | //| op - операция | //| ll - лот | //| sl - уровень стоп | //| tp - уровень тейк | //| mn - MagicNumber | //+----------------------------------------------------------------------------+ int OpenPosition ( string sy, int op, double ll, double sl = 0 , double tp = 0 , int mn = 0 ) { color clOpen ; datetime ot ; double pp, pa, pb ; int dg, err, it, ticket = 0 ; string lsComm = WindowExpertName ( ) + " " + GetNameTF ( Period ( ) ) ; if ( sy == "" || sy == "0" ) sy = Symbol ( ) ; if ( op == OP_BUY ) clOpen = clOpenBuy ; else clOpen = clOpenSell ; for ( it = 1 ; it <= NumberOfTry ; it ++ ) { if ( ! IsTesting ( ) && ( ! IsExpertEnabled ( ) || IsStopped ( ) ) ) { Print ( "OpenPosition(): Остановка работы функции" ) ; break ; } while ( ! IsTradeAllowed ( ) ) Sleep ( 5000 ) ; RefreshRates ( ) ; dg = MarketInfo ( sy, MODE_DIGITS ) ; pa = MarketInfo ( sy, MODE_ASK ) ; pb = MarketInfo ( sy, MODE_BID ) ; if ( op == OP_BUY ) pp = pa ; else pp = pb ; pp = NormalizeDouble ( pp, dg ) ; ot = TimeCurrent ( ) ; ticket = OrderSend ( sy, op, ll, pp, Slippage, sl, tp, lsComm, mn, 0 , clOpen ) ; if ( ticket > 0 ) { if ( UseSound ) PlaySound ( NameFileSound ) ; break ; } else { err = GetLastError ( ) ; if ( pa == 0 && pb == 0 ) Message ( "Проверьте в Обзоре рынка наличие символа " + sy ) ; // Вывод сообщения об ошибке Print ( "Error(" ,err, ") opening position: " ,ErrorDescription ( err ) , ", try " ,it ) ; Print ( "Ask=" ,pa, " Bid=" ,pb, " sy=" ,sy, " ll=" ,ll, " op=" ,GetNameOP ( op ) , " pp=" ,pp, " sl=" ,sl, " tp=" ,tp, " mn=" ,mn ) ; // Блокировка работы советника if ( err == 2 || err == 64 || err == 65 || err == 133 ) { gbDisabled = True ; break ; } // Длительная пауза if ( err == 4 || err == 131 || err == 132 ) { Sleep ( 1000 * 300 ) ; break ; } if ( err == 128 || err == 142 || err == 143 ) { Sleep ( 1000 * 66.666 ) ; if ( ExistPositions ( sy, op, mn, ot ) ) { if ( UseSound ) PlaySound ( NameFileSound ) ; break ; } } if ( err == 140 || err == 148 || err == 4110 || err == 4111 ) break ; if ( err == 141 ) Sleep ( 1000 * 100 ) ; if ( err == 145 ) Sleep ( 1000 * 17 ) ; if ( err == 146 ) while ( IsTradeContextBusy ( ) ) Sleep ( 1000 * 11 ) ; if ( err ! = 135 ) Sleep ( 1000 * 7.7 ) ; } } return ( ticket ) ; } 2011/05/09 15:23 · root · 0 Комментариев Анонимные функции в addEventListener — root 2011/05/02 22:37 События во флеш обычно добавляются следующим образом: button. addEventListener ( MouseEvent. CLICK , onButtonClick ) ; ... function onButtonClick ( e : Event ) : void { trace ( 'Button click!' ) ; } Но если таких событий много можно воспользоваться анонимной функцией, вот так: button. addEventListener ( MouseEvent. CLICK , function ( ) { trace ( 'Button click!' ) ; } ) ; 2011/05/02 22:41 · root · 0 Комментариев as3 , actionscript3 , action script 3 , события Удаление всех детей у контейнера — root 2011/04/29 09:28 while ( cont. numChildren ) cont. removeChildAt ( 0 ) ; 2011/04/29 09:28 · root · 0 Комментариев as3 , actionscript3 , action script 3 Нахождение максимального и минимального элемента в массиве — root 2011/04/29 09:20 var myArray : Array = [ 4 , 56 , 7 , 4 , 3 , 2 , 5 , 7 , 8 , 4 , 5 , 6 ] ; var maxValue : Number = Math. max . apply ( null, myArray ) ; var minValue : Number = Math. min . apply ( null, myArray ) ; 2011/04/29 09:27 · root · 0 Комментариев as3 , actionscript3 , action script 3 , массивы Нахождение максимального и минимального элемента в массиве — root 2011/04/29 09:20 var myArray : Array = [ 4 , 56 , 7 , 4 , 3 , 2 , 5 , 7 , 8 , 4 , 5 , 6 ] ; var maxValue : Number = Math. max . apply ( null, myArray ) ; var minValue : Number = Math. min . apply ( null, myArray ) ; 2011/04/29 09:21 · root · 0 Комментариев Предыдущие записи >> Только авторизованные участники могут оставлять комментарии. start.txt · Последние изменения: 2011/05/07 13:05 — admin Показать исходный текст История страницы Ссылки сюда Наверх