Thursday, June 13, 2013 14:30:34

F:\Compile\Moving Average.mq4	F:\Compile\Moving Average2.mq4

1	1
2	2	extern double Lots = 0.1;
3	3	extern double MaximumRisk = 0.02;
4	4	extern double DecreaseFactor = 3.0;
5	5	extern double MovingPeriod = 12.0;
6	6	extern double MovingShift = 6.0;
7	7

8

// 3B4FF059E3EA91105A3BBDBF7628BC6B

8

int f0_0(string as_unused_0) {

9

int f0_0(string Grps_unused_0) {

9	10	int count_8 = 0;
10	11	int count_12 = 0;
11	12	for (int pos_16 = 0; pos_16 < OrdersTotal(); pos_16++) {
12	13	if (OrderSelect(pos_16, SELECT_BY_POS, MODE_TRADES) == FALSE) break;
13	14	if (OrderSymbol() == Symbol() && OrderMagicNumber() == 20050610) {
14	15	if (OrderType() == OP_BUY) count_8++;
15	16	if (OrderType() == OP_SELL) count_12++;
16	17	}
17	18	}
18	19	if (count_8 > 0) return (count_8);
19	20	return (-count_12);
20	21	}
21	22

23

// EBFE91FAEB07FF5788FD1001AD46AE29

22	24	double f0_3() {
23	25	double lots_0 = Lots;
24	26	int hist_total_8 = OrdersHistoryTotal();
25	27	int count_12 = 0;
26	28	lots_0 = NormalizeDouble(AccountFreeMargin() * MaximumRisk / 1000.0, 1);
27	29	if (DecreaseFactor > 0.0) {
28	30	for (int pos_16 = hist_total_8 - 1; pos_16 >= 0; pos_16--) {
29	31	if (OrderSelect(pos_16, SELECT_BY_POS, MODE_HISTORY) == FALSE) {
30	32	Print("Error in history!");
31	33	break;
32	34	}
33	35	if (OrderSymbol() != Symbol() || OrderType() > OP_SELL) continue;
34	36	if (OrderProfit() > 0.0) break;
35	37	if (OrderProfit() < 0.0) count_12++;
36	38	}
37	39	if (count_12 > 1) lots_0 = NormalizeDouble(lots_0 - lots_0 * count_12 / DecreaseFactor, 1);
38	40	}
39	41	if (lots_0 < 0.1) lots_0 = 0.1;
40	42	return (lots_0);
41	43	}
42	44

45

// CB17DEBBAA4E3FCCC1627B748C11F14C

43	46	void f0_2() {
44	47	double ima_0;
45	48	int ticket_8;
46	49	if (Volume[0] <= 1.0) {
47	50	ima_0 = iMA(NULL, 0, MovingPeriod, MovingShift, MODE_SMA, PRICE_CLOSE, 0);
48	51	if (Open[1] > ima_0 && Close[1] < ima_0) ticket_8 = OrderSend(Symbol(), OP_SELL, f0_3(), Bid, 3, 0, 0, "", 20050610, 0, Red);
49	52	else
50	53	if (Open[1] < ima_0 && Close[1] > ima_0) ticket_8 = OrderSend(Symbol(), OP_BUY, f0_3(), Ask, 3, 0, 0, "", 20050610, 0, Blue);
51	54	}
52	55	}
53	56

57

// 792CA38593D2232BE04E6146E4A427A1

54	58	void f0_1() {
55	59	double ima_0;
56	60	if (Volume[0] <= 1.0) {
57	61	ima_0 = iMA(NULL, 0, MovingPeriod, MovingShift, MODE_SMA, PRICE_CLOSE, 0);
58	62	for (int pos_8 = 0; pos_8 < OrdersTotal(); pos_8++) {
59	63	if (OrderSelect(pos_8, SELECT_BY_POS, MODE_TRADES) == FALSE) break;
60	64	if (OrderMagicNumber() != 20050610 || OrderSymbol() != Symbol()) continue;
61	65	if (OrderType() == OP_BUY) {
62	66	if (!(Open[1] > ima_0 && Close[1] < ima_0)) break;
63	67	OrderClose(OrderTicket(), OrderLots(), Bid, 3, White);
64	68	return;
65	69	}
66	70	if (OrderType() == OP_SELL) {
67	71	if (!(Open[1] < ima_0 && Close[1] > ima_0)) break;
68	72	OrderClose(OrderTicket(), OrderLots(), Ask, 3, White);
69	73	return;
70	74	}
71	75	}
72	76	}
73	77	}
74	78

79

// EA2B2676C28C0DB26D39331A336C6B92

75	80	void start() {
76	81	if (Bars < 100 || IsTradeAllowed() == FALSE) return;
77	82	if (f0_0(Symbol()) == 0) {
78	83	f0_2();
79	84	return;
80	85	}
81	86	f0_1();
82	87	}
83	88