Re: MT4 Indicator requests and ideas
Posted: Sun Apr 14, 2019 12:42 am
You can convert this indicator to MT4
//PRC_swing teller live count2 | indicator
//version with rounded numbers and below/above each candle
//07.04.2017
//Nicolas @ www.prorealcode.com
//Sharing ProRealTime knowledge
//https://www.prorealcode.com/topic/rewri ... time-code/
// --- settings
//CountDistance=20
// --- end of settings
Lb=4
//continue swing Up
if UpCount>0 and Close>Close[Lb] then
DownCount=0
UpCount=UpCount+1
//draw count
if UpCount=2 then
drawtext("2",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
elsif UpCount=3 then
drawtext("3",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
elsif UpCount=4 then
drawtext("4",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
elsif UpCount=5 then
drawtext("5",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
elsif UpCount=6 then
drawtext("6",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
elsif UpCount=7 then
drawtext("7",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
elsif UpCount=8 then
drawtext("8",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
elsif UpCount=9 then
drawtext("9",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
last9bar=barindex
//reset count
UpCount=0
endif
//up swing fail
elsif UpCount>0 and Close<Close[Lb] then
//draw fail count
drawtext("F",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
//reset count
UpCount=0
endif
//continue swing Down
if DownCount>0 and Close<Close[Lb] then
UpCount=0
DownCount=DownCount+1
//draw count
if DownCount=2 then
drawtext("2",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
elsif DownCount=3 then
drawtext("3",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
elsif DownCount=4 then
drawtext("4",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
elsif DownCount=5 then
drawtext("5",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
elsif DownCount=6 then
drawtext("6",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
elsif DownCount=7 then
drawtext("7",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
elsif DownCount=8 then
drawtext("8",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
elsif DownCount=9 then
drawtext("9",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
last9bar=barindex
//reset count
DownCount=0
endif
//down swing fail
elsif DownCount>0 and Close>Close[Lb] then
//draw fail count
drawtext("F",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
//reset count
DownCount=0
endif
//begin swing Up
if UpCount=0 and barindex-last9bar>1 then
r = close[Lb]
if close>r then
UpCount=1
DownCount=0
//draw count
drawtext("1",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
endif
endif
//begin swing Down
if DownCount=0 and barindex-last9bar>1 then
r = close[Lb]
if close<r then
DownCount=1
UpCount=0
//draw count
drawtext("1",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
endif
endif
return
//PRC_swing teller live count2 | indicator
//version with rounded numbers and below/above each candle
//07.04.2017
//Nicolas @ www.prorealcode.com
//Sharing ProRealTime knowledge
//https://www.prorealcode.com/topic/rewri ... time-code/
// --- settings
//CountDistance=20
// --- end of settings
Lb=4
//continue swing Up
if UpCount>0 and Close>Close[Lb] then
DownCount=0
UpCount=UpCount+1
//draw count
if UpCount=2 then
drawtext("2",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
elsif UpCount=3 then
drawtext("3",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
elsif UpCount=4 then
drawtext("4",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
elsif UpCount=5 then
drawtext("5",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
elsif UpCount=6 then
drawtext("6",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
elsif UpCount=7 then
drawtext("7",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
elsif UpCount=8 then
drawtext("8",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
elsif UpCount=9 then
drawtext("9",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
last9bar=barindex
//reset count
UpCount=0
endif
//up swing fail
elsif UpCount>0 and Close<Close[Lb] then
//draw fail count
drawtext("F",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
//reset count
UpCount=0
endif
//continue swing Down
if DownCount>0 and Close<Close[Lb] then
UpCount=0
DownCount=DownCount+1
//draw count
if DownCount=2 then
drawtext("2",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
elsif DownCount=3 then
drawtext("3",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
elsif DownCount=4 then
drawtext("4",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
elsif DownCount=5 then
drawtext("5",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
elsif DownCount=6 then
drawtext("6",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
elsif DownCount=7 then
drawtext("7",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
elsif DownCount=8 then
drawtext("8",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
elsif DownCount=9 then
drawtext("9",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
last9bar=barindex
//reset count
DownCount=0
endif
//down swing fail
elsif DownCount>0 and Close>Close[Lb] then
//draw fail count
drawtext("F",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
//reset count
DownCount=0
endif
//begin swing Up
if UpCount=0 and barindex-last9bar>1 then
r = close[Lb]
if close>r then
UpCount=1
DownCount=0
//draw count
drawtext("1",barindex,low-CountDistance*pointsize,Dialog,Standard,12) coloured(0,200,0)
endif
endif
//begin swing Down
if DownCount=0 and barindex-last9bar>1 then
r = close[Lb]
if close<r then
DownCount=1
UpCount=0
//draw count
drawtext("1",barindex,high+CountDistance*pointsize,Dialog,Standard,12) coloured(200,0,0)
endif
endif
return