FREENOTE
Sign up
Login
New paste
Home
Trending
Archive
English
English
Sign up
Login
New Paste
Browse
//+------------------------------------------------------------------+ //| baiso1.mq4 | //| Copyright 2016, MetaQuotes Software Corp. | //| https://www.mql5.com | //+------------------------------------------------------------------+ #property copyright "Copyright 2016, MetaQuotes Software Corp." #property link "https://www.mql5.com" #property version "1.00" #property strict //+------------------------------------------------------------------+ //| Expert initialization function | // NOI KHAI BAO BIEN double khoiLuong= 0.01;// 0 string Com ; color maucualenh = clrRed; int loaiLenh = OP_BUY; double giavaolenh=0; datetime thoigiangiaodich; bool chophepGD = true; int Magic =999; double lastLotsize ; int lasttype; double balance;// acc extern double risk = 5; extern double stoploss = 50; extern double takeprofit = 100; extern double Trailling_pip = 10; string sym; bool active = false; datetime ngayhethan = D'2020.08.01 00:00:00'; //+------------------------------------------------------------------+ int OnInit() { //--- //kiem tra ban quyen --> active --> true // if( TimeCurrent() < ngayhethan ){active = true;} //if( IsDemo() == true ){ active = true;} //if( IsDemo() == false && TimeCurrent() < ngayhethan ){active = true;}// gioi han thoi gian su dung tk real if( AccountNumber() == "22631568" ){active= true;} if(active == false ){ Alert("vui long lien he thinhle.free@gmail.com de lay duoc ban quyen day du"); } if( IsTradeAllowed() == false ){Alert("hay bam F7, chon tab Common/ allow live trading");} sym=Symbol(); //--- return(INIT_SUCCEEDED); } //+------------------------------------------------------------------+ //| Expert deinitialization function | //+------------------------------------------------------------------+ void OnDeinit(const int reason) { //--- } //+------------------------------------------------------------------+ //| Expert tick function | //+------------------------------------------------------------------+ void OnTick() { if(active ==false){return;} // cho chạy code ben dưới dòng này khi qua nến mới if(IsTesting() == false || IsOptimization() == false ) { if(thoigiangiaodich == iTime(Symbol(),PERIOD_M1,0) ){return;} thoigiangiaodich =iTime(Symbol(),PERIOD_M1,0) ; } if(IsTesting() == true|| IsOptimization() == false) { if(thoigiangiaodich == iTime(Symbol(),0,0) ){return;} thoigiangiaodich =iTime(Symbol(),0,0) ; } // if(chophepGD == false){return;} //if(OrdersTotal()>0){return;} // chi cho vao 1 lenh Trailling(Trailling_pip) ; if(demsolenh( sym ) >0 ){return;} //===================================================================== //=========tinh khoi luong =========== balance = AccountEquity(); double slPoint= stoploss*10* MarketInfo(sym,MODE_POINT); khoiLuong = get_lot_from_money_point(sym,balance,risk,slPoint); // dieu kien vao lenh-------------- loaiLenh = MathRand()%2;// loai lenh ngau nhien //iWPR //--------------------------------VAO LENH------------------ vaoLenh(sym,loaiLenh,khoiLuong,0,stoploss,takeprofit,Magic,Com); // SendNotification("co lenh moi ne "+ sym+ " "+ khoiLuong ); }// end ontick //===================================== double get_lot_from_money_point(string symm,double balancee,double risk,double slPoint) { double lotsize ; double sotien = MathAbs(risk/100*balancee); // 10000 * 5 /100 double tickval = MarketInfo(symm , MODE_TICKVALUE); double ticksize = MarketInfo(symm , MODE_TICKSIZE); //========cong thuc chinh if(slPoint!=0 && ticksize !=0 && tickval !=0 ) { lotsize = sotien /(slPoint*tickval/ticksize); } // =========== 0.2568746655 double lotstep = MarketInfo(symm,MODE_LOTSTEP);//Comment(lotstep); int step; if(lotstep==1){step = 0;} if(lotstep == 0.01){step =2;} if(lotstep == 0.001){step =3;} if(lotstep == 0.1 ){step =1;} lotsize = NormalizeDouble(lotsize,step); if (lotsize < MarketInfo(symm, MODE_MINLOT)) lotsize = MarketInfo(symm, MODE_MINLOT); if (lotsize > MarketInfo(symm, MODE_MAXLOT)) lotsize = MarketInfo(symm, MODE_MAXLOT); return(lotsize); } //+------------------------------------------------------------------+ double lenhcuoicung(string symm) { double lastprofit; datetime lasttime ; for(int i =0; i <= OrdersHistoryTotal()-1; i++) { if(OrderSelect(i, SELECT_BY_POS,MODE_HISTORY)==False) {continue;} if(OrderSymbol() != symm){continue;} if(OrderMagicNumber()!= Magic){continue;} if(OrderType()>1 ){continue;} if(OrderCloseTime()> lasttime ) { lasttime = OrderCloseTime(); // 6h lastprofit = OrderProfit(); lastLotsize = OrderLots(); lasttype = OrderType(); } } return(lastprofit); } //====================================================================== void vaoLenh(string symm, int typee, double lott, double pricee, double slpip,double tppip,int Magicc, string comm ) { if(lott ==0){return;} int normallotunit ; if(MarketInfo(symm, MODE_MINLOT)== 0.01){normallotunit = 2;} if(MarketInfo(symm, MODE_MINLOT)== 0.1){normallotunit = 1;} if(MarketInfo(symm, MODE_MINLOT)== 0.001){normallotunit = 3;} lott = NormalizeDouble(lott, normallotunit ); //--------------------------- double slprice, tpprice; color mau; if(typee== OP_BUY) { pricee = MarketInfo(symm,MODE_ASK); slprice = pricee - slpip*10*MarketInfo(symm ,MODE_POINT); tpprice = pricee + tppip*10*MarketInfo(symm ,MODE_POINT); mau = clrBlue; } if(typee== OP_SELL) { pricee = MarketInfo(symm,MODE_BID); slprice = pricee + slpip*10*MarketInfo(symm ,MODE_POINT); tpprice = pricee - tppip*10*MarketInfo(symm ,MODE_POINT); mau = clrRed; } pricee = NormalizeDouble(pricee,MarketInfo(symm , MODE_DIGITS)); slprice = NormalizeDouble(slprice,MarketInfo(symm , MODE_DIGITS)); tpprice = NormalizeDouble(tpprice,MarketInfo(symm , MODE_DIGITS)); //-----gui lenh double thanhcong = OrderSend(symm,typee,lott,pricee,20,0,0,comm,Magicc,0,mau); // ----- CHINH SL TP bool sucess =false; int dem; if(thanhcong >0 && slprice !=0 && tpprice!=0 ) { while ( sucess == false && dem<20) { sucess = OrderModify(thanhcong,pricee,slprice,tpprice,0,clrNONE); dem++; Sleep(50); } int error = GetLastError(); if(error !=0 && error !=1){ Print("bi loi: "+ error);} } } //==================================================================== /* void laygiatrinen() { // tim mo hinh enguffing for(int n =500 ; n >=0; n--) { double highttruoc, lowtruoc , hightsau, lowsau ; highttruoc = iHigh(Symbol(),0,n+1); lowtruoc = iLow(Symbol(),0,n+1); hightsau = iHigh(Symbol(),0,n); lowsau = iLow(Symbol(),0,n); if(highttruoc<hightsau && lowtruoc > lowsau) { Comment(n);// gan nhat cay nen so 0 //break; } } */ /*int caynencaonhat,caynenthapnhat; caynencaonhat= iHighest(Symbol(),0,MODE_HIGH,100,0);// tra ve cay nen cao nhat caynenthapnhat = iLowest(Symbol(),0,MODE_LOW,100,0);// tra ve cay nen thap nhat double giacaonhat = iHigh(Symbol(),0,caynencaonhat);// lay gias hight cua .... double giathapnhat = iLow(Symbol(),0,caynenthapnhat);// lay low .... // Comment(caynencaonhat +" / "+ caynenthapnhat); Comment(giacaonhat +" / "+ giathapnhat);*/ //+==================================================================+ int Order_Open(int ordType,string sym_,double lots,double price,double sl,double tp,int mag,string com,double bidask) {// int ticket; if(lots==0){return(0);} color col; double Stoploss,TakeProfit; double unit=1; if(bidask!=0){unit= bidask;} if(ordType==OP_BUY) {price=MarketInfo(sym_,MODE_ASK);Stoploss=price-sl*unit; TakeProfit=price+tp*unit; col=Blue;} if(ordType==OP_SELL) {price=MarketInfo(sym_,MODE_BID);Stoploss=price+sl*unit; TakeProfit=price-tp*unit; col=Red;} price=NormalizeDouble(price,MarketInfo(sym_,MODE_DIGITS)); int NormalizeLot; if(MarketInfo(sym_,MODE_MINLOT)==0.1) {NormalizeLot=1;} else {NormalizeLot=2;} lots=NormalizeDouble(lots,NormalizeLot); int sucess=-1; int ross=0;int demm; sucess=OrderSend(sym_,ordType,lots,price,3,0,0,com,mag,0,col);Sleep(100); if(sucess>0 && (sl!=0 || tp!=0)) { while(ross<=0 && demm<20){ ross=OrderModify(sucess,price,Stoploss,TakeProfit,0,clrNONE); demm++;Sleep(100); } } int loi = GetLastError(); if(loi!=0 && loi !=1 ){ Print("eror"+loi); Print(sym_+ "/price "+ price+ " /op "+ordType+"/lot "+lots); } return(sucess); } //+------------------------------------------ //====================================================== void checkLisicen() { /*datetime x = iTime(Symbol(),PERIOD_D1,0);// thoi gian dau ngay // x= TimeCurrent();// thoi gian hien tai //TimeHour(x); // TimeMinute() // dau ngay + 3 hour()? x= x +3*60*60; Comment(x); */ if( TimeYear( TimeCurrent())<=2020 && TimeMonth( TimeCurrent())<=4 ){active= true;} // --> file ex4 */ //ham chuyen doi /*datetime x = StrToTime(giobatdau); string a = "06"; string b = "30"; string c= a+ ":"+b; datetime d = StrToTime(c)+60; Comment(d); StrToInteger*/ /* string commentt = "| 5 (6)lenhdautien"; int vitri= StringFind(commentt,"(",0); string cat = StringSubstr(commentt,vitri+1,1); Comment(cat);*/ //Str } //========================================== int demsolenh(string captiencandem) { int dem; for(int i = OrdersTotal()-1 ; i>=0; i--) { if(OrderSelect(i, SELECT_BY_POS,MODE_TRADES)==False) {continue;} if(OrderSymbol() != captiencandem){continue;} if(OrderMagicNumber()!= Magic){continue;} dem ++;// dem dc 1 lenh } return(dem); } //==================================== //==================================== double dinhdangLot(double khoiLuong) { if(khoiLuong==0){ khoiLuong = MarketInfo(Symbol(),MODE_MINLOT) ; } if(khoiLuong> MarketInfo(Symbol(),MODE_MAXLOT)){ khoiLuong = MarketInfo(Symbol(),MODE_MAXLOT) ; } khoiLuong = NormalizeDouble(khoiLuong,2); return(khoiLuong);// tra ve khoi da duoc dinh dang } //+==================================================================+ void Trailling(double trail) { double NewSL; trail*= 10*Point; // trail = trail * 10*10*Point for(int i = OrdersTotal()-1; i >=0 ; i--) //OrdersHistoryTotal() { if(!OrderSelect(i,SELECT_BY_POS,MODE_TRADES)) {continue;} //Neu khong tim duoc lenh thi tiep tuc lap if (OrderSymbol() != Symbol()) {continue;} if (OrderMagicNumber() != Magic) {continue;} if (OrderType() == OP_BUY) {NewSL = Ask - trail;} else if (OrderType() == OP_SELL) {NewSL = Bid + trail;} if (OrderType() == OP_BUY && OrderStopLoss()>=NewSL ) {continue;} if (OrderType() == OP_SELL && OrderStopLoss()<=NewSL) {continue;} Comment(NewSL); OrderModify(OrderTicket(),OrderOpenPrice(),NewSL,OrderTakeProfit(),0,CLR_NONE); if(GetLastError()!=0 && GetLastError()!=1) {Print("Loi Trailling: " + GetLastError());} } }
Paste Settings
Paste Title :
[Optional]
Paste Folder :
[Optional]
Select
Syntax Highlighting :
[Optional]
Select
Markup
CSS
JavaScript
Bash
C
C#
C++
Java
JSON
Lua
Plaintext
C-like
ABAP
ActionScript
Ada
Apache Configuration
APL
AppleScript
Arduino
ARFF
AsciiDoc
6502 Assembly
ASP.NET (C#)
AutoHotKey
AutoIt
Basic
Batch
Bison
Brainfuck
Bro
CoffeeScript
Clojure
Crystal
Content-Security-Policy
CSS Extras
D
Dart
Diff
Django/Jinja2
Docker
Eiffel
Elixir
Elm
ERB
Erlang
F#
Flow
Fortran
GEDCOM
Gherkin
Git
GLSL
GameMaker Language
Go
GraphQL
Groovy
Haml
Handlebars
Haskell
Haxe
HTTP
HTTP Public-Key-Pins
HTTP Strict-Transport-Security
IchigoJam
Icon
Inform 7
INI
IO
J
Jolie
Julia
Keyman
Kotlin
LaTeX
Less
Liquid
Lisp
LiveScript
LOLCODE
Makefile
Markdown
Markup templating
MATLAB
MEL
Mizar
Monkey
N4JS
NASM
nginx
Nim
Nix
NSIS
Objective-C
OCaml
OpenCL
Oz
PARI/GP
Parser
Pascal
Perl
PHP
PHP Extras
PL/SQL
PowerShell
Processing
Prolog
.properties
Protocol Buffers
Pug
Puppet
Pure
Python
Q (kdb+ database)
Qore
R
React JSX
React TSX
Ren'py
Reason
reST (reStructuredText)
Rip
Roboconf
Ruby
Rust
SAS
Sass (Sass)
Sass (Scss)
Scala
Scheme
Smalltalk
Smarty
SQL
Soy (Closure Template)
Stylus
Swift
TAP
Tcl
Textile
Template Toolkit 2
Twig
TypeScript
VB.Net
Velocity
Verilog
VHDL
vim
Visual Basic
WebAssembly
Wiki markup
Xeora
Xojo (REALbasic)
XQuery
YAML
HTML
Paste Expiration :
[Optional]
Never
Self Destroy
10 Minutes
1 Hour
1 Day
1 Week
2 Weeks
1 Month
6 Months
1 Year
Paste Status :
[Optional]
Public
Unlisted
Private (members only)
Password :
[Optional]
Description:
[Optional]
Tags:
[Optional]
Encrypt Paste
(
?
)
Create New Paste
You are currently not logged in, this means you can not edit or delete anything you paste.
Sign Up
or
Login
Site Languages
×
English
Do you like cookies?
🍪 We use cookies to ensure you get the best experience on our website.
Learn more
I agree