-- Capital Synergy Solanum Trading System V1.1 -- MACD Calculation; MACD := EMA(C,12) - EMA(C,26); Signal := EMA(MACD,9); -- Stochastic D Calculation; A := (C-LLV(L,14))/(HHV(H,14)-LLV(L,14))*100; StoK := MA(A,3); StoD := MA(StoK,3); -- Trade Criteria; BuyRaw := CROSS(MACD,Signal) & StoD < 80; ShortRaw := CROSS(Signal,MACD) & StoD > 40; BarsSinceLastBuy := REF(HHVBARS(BuyRaw,100000),1); BarsSinceLastShort := REF(HHVBARS(ShortRaw,100000),1); CanShort := IF(BarsSinceLastBuy>BarsSinceLastShort,0,1); CanBuy := IF(BarsSinceLastShort>BarsSinceLastBuy,0,1); Buy := BuyRaw & CanBuy; Short := ShortRaw & CanShort; -- Draw Signals on Chart; DRAWTEXT(Buy, L-50, '*'),Label4,VCenter,ColorGreen; DRAWTEXT(Short, H+50, '*'),Label4,VCenter,ColorRed; DRAWNUMBER(REF(Buy,1),O-200, O,'f0'),Label2,VCenter,Bottom; DRAWNUMBER(REF(Short,1),C+200, O,'f0'),Label1,VCenter,Top; -- Draw Profit on Chart; BuyPrice := ValueWhen(Buy,REF(O,-1),1); DrawNumber(IsLastBar&CanShort,Max(O,C)+300,C-BuyPrice,'f0'),Label4,ColorBlack; ShortPrice := ValueWhen(Short,REF(O,-1),1); DrawNumber(IsLastBar&CanBuy,Max(O,C)+300,ShortPrice-C,'f0'),Label4,ColorBlack;