//LastManStandingIndicator | indicator

//translated from MQL4 code
 
// --- settings
//PeriodsInMajorSwing=13
//PeriodsInMinorSwing=5
//MovingAverageMethod=1
//MovingAveragePeriods= 55
// --- end of settings
 
EMA = average[MovingAveragePeriods,MovingAverageMethod](close)
 
hhminorprice=0
llminorprice=close*1000
for i = 1 to PeriodsInMinorSwing*2 do
 if high[i]>hhminorprice then
  hhminorbar = barindex[i]
  hhminorprice = high[i]
 endif
 if low[i]<llminorprice then
  llminorbar=barindex[i]
  llminorprice=low[i]
 endif
next
 
hhmajorprice=0
llmajorprice=close*1000
for i = 1 to PeriodsInMajorSwing*2 do
 if high[i]>hhmajorprice then
  hhmajorbar = barindex[i]
  hhmajorprice = high[i]
 endif
 if low[i]<llmajorprice then
  llmajorbar=barindex[i]
  llmajorprice=low[i]
 endif
next
 
atr=averagetruerange[14]
if barindex-hhminorbar=PeriodsInMinorSwing  then
 drawtext("●",hhminorbar,hhminorprice,Dialog,Bold,10) coloured(100,149,237)
endif
if barindex-llminorbar=PeriodsInMinorSwing then
 drawtext("●",llminorbar,llminorprice,Dialog,Bold,10) coloured(100,149,237)
endif
if barindex-hhmajorbar=PeriodsInMajorSwing then
 drawtext("●",hhmajorbar,hhmajorprice+atr/2,Dialog,Bold,20) coloured(128,0,128)
endif
if barindex-llmajorbar=PeriodsInMajorSwing then
 drawtext("●",llmajorbar,llmajorprice-atr/2,Dialog,Bold,20) coloured(128,0,128)
endif
 
return EMA coloured(184,134,11) as "EMA"