// Downloaded From https://www.WiseStockTrader.com
//Tertinggi dan terendah dengan jarak (0%-100%) dan explorasi.
blankRightBars = 7; 
barsInView = Status("lastvisiblebarindex") - Status("firstvisiblebarindex") - blankRightBars;
Offset = Param("Offset Bar", .2, 0, 1, .09);
textOffset = BarCount - (Offset * barsInView);


_SECTION_BEGIN("1 hari ");
H1 = HHV(H,1);                      
L1 = LLV(L,1);                     
P1DR = ( (Close - L1) / (H1 - L1) ) * 100;             
R1 = (2500 - ( (P1DR/100)*2500 ) );               
G1 = (P1DR/100)*2500;                   
Plot( 10, "", ColorRGB(R1,G1,0), styleArea|styleOwnScale|styleNoLabel, 0, 100);
Plot( 11,"",colorBlack,styleOwnScale|styleArea|styleNoLabel,0, 100 );

_SECTION_END();

_SECTION_BEGIN("5 hari ");
H5 = HHV(H,5);                      
L5 = LLV(L,5);                     
P5DR = ( (Close - L5) / (H5 - L5) ) * 100;             
R5 = (2500 - ( (P5DR/100)*2500 ) );                
G5 = (P5DR/100)*2500;                    
Plot( 20, "", ColorRGB(R5,G5,0), styleArea|styleOwnScale|styleNoLabel, 0, 100);
Plot( 21,"",colorBlack,styleOwnScale|styleArea|styleNoLabel,0, 100 );
_SECTION_END();

_SECTION_BEGIN("20 hari ");
H20 = HHV(H,20);                      
L20 = LLV(L,20);                     
P20DR = ( (Close - L20) / (H20 - L20) ) * 100;             
R20 = (2500 - ( (P20DR/100)*2500 ) );                
G20 = (P20DR/100)*2500;                    
Plot( 30, "", ColorRGB(R20,G20,0), styleArea|styleOwnScale|styleNoLabel, 0, 100);
Plot( 31,"",colorBlack,styleOwnScale|styleArea|styleNoLabel,0, 100 );
_SECTION_END();


_SECTION_BEGIN("60 hari");
H60 = HHV(H,60);                      
L60 = LLV(L,60);                     
P60DR = ( (Close - L60) / (H60 - L60) ) * 100;             
R60 = (2500 - ( (P60DR/100)*2500 ) );                
G60 = (P60DR/100)*2500;                    
Plot( 40, "", ColorRGB(R60,G60,0), styleArea|styleOwnScale|styleNoLabel, 0, 100);
Plot( 41,"",colorBlack,styleOwnScale|styleArea|styleNoLabel,0, 100 );
_SECTION_END();

_SECTION_BEGIN("120 hari");
H120 = HHV(H,120);                      
L120 = LLV(L,120);                     
P120DR = ( (Close - L120) / (H120 - L120) ) * 100;             
R120 = (2500 - ( (P120DR/100)*2500 ) );                
G120 = (P120DR/100)*2500;                    
Plot( 50, "", ColorRGB(R120,G120,0), styleArea|styleOwnScale|styleNoLabel, 0, 100);
Plot( 51,"",colorBlack,styleOwnScale|styleArea|styleNoLabel,0, 100 );
_SECTION_END();



_SECTION_BEGIN("240 hari");
H240 = HHV(H,240);                      
L240 = LLV(L,240);                     
P240DR = ( (Close - L240) / (H240 - L240) ) * 100;             
R240 = (2500 - ( (P240DR/100)*2500) );                
G240 = (P240DR/100)*2500;                    
Plot( 60, "", ColorRGB(R240,G240,0), styleArea|styleOwnScale|styleNoLabel, 0, 100);
Plot( 61,"",colorBlack,styleOwnScale|styleArea|styleNoLabel,0, 100 );

_SECTION_END();



_SECTION_BEGIN("720 hari");
H720 = HHV(H,720);                      
L720 = LLV(L,720);                     
P720DR = ( (Close - L720) / (H720 - L720) ) * 100;             
R720 = (2500 - ( (P720DR/100)*2500 ) );                
G720 = (P720DR/100)*2500;                    
Plot( 70, "", ColorRGB(R720,G720,0), styleArea|styleOwnScale|styleNoLabel, 0, 100);
Plot(71,"",colorBlack,styleOwnScale|styleArea|styleNoLabel,0, 100 );

_SECTION_END();

_SECTION_BEGIN("1200 hari");
H1200 = HHV(H,1200);                      
L1200 = LLV(L,1200);                     
P1200DR = ( (Close - L1200) / (H1200 - L1200) ) * 100;             
R1200 = (2500 - ( (P1200DR/100)*2500) );                
G1200 = (P1200DR/100)*2500;                    
Plot( 80, "", ColorRGB(R1200,G1200,0), styleArea|styleOwnScale|styleNoLabel, 0, 100);
Plot(81,"",colorBlack,styleOwnScale|styleArea|styleNoLabel,0, 100 );

_SECTION_END();

_SECTION_BEGIN("2400 hari");
H2400= HHV(H,2400);                      
L2400 = LLV(L,2400);                     
P2400DR = ( (Close - L2400) / (H2400 - L2400) ) * 100;             
R2400 = (2500 - ( (P2400DR/100)*2500) );                
G2400 = (P2400DR/100)*2500;                    
Plot( 90, "", ColorRGB(R2400,G2400,0), styleArea|styleOwnScale|styleNoLabel, 0, 100);
Plot(91,"",colorBlack,styleOwnScale|styleArea|styleNoLabel,0, 100 );

_SECTION_END();


_SECTION_BEGIN("4800 hari");
H4800= HHV(H,4800);                      
L4800 = LLV(L,4800);                     
P4800DR = ( (Close - L4800) / (H4800 - L4800) ) * 100;            
R4800 = (2500 - ( (P4800DR/100)*2500) );                
G4800 = (P4800DR/100)*2500;                    
Plot( 100, "", ColorRGB(R4800,G4800,0), styleArea|styleOwnScale|styleNoLabel, 0, 100);
Plot(101,"",colorBlack,styleOwnScale|styleArea|styleNoLabel,0, 100 );

_SECTION_END();

 
Title = EncodeColor(colorBrightGreen)+"% 1hari =" + WriteVal(P1DR) + EncodeColor(colorRed)+" % 1 minggu ="+ WriteVal(P5DR)+EncodeColor(colorGold)+" % 1 bulan =" + WriteVal(P20DR)+ EncodeColor(colorAqua)+"% 3 bulan =" + WriteVal(P60DR) + EncodeColor(colorLightYellow)+"% 6 bulan=" + WriteVal(P120DR)+ EncodeColor(colorLightBlue)+"% 1 thn=" + WriteVal(P240DR)+ EncodeColor(colorLime)+"% 3 thn  =" + WriteVal(P720DR)+ EncodeColor(colorBrown)+"% 5thn  =" + WriteVal(P1200DR)+ EncodeColor(colorGrey50)+"% 10 thn =" + WriteVal(P2400DR )+ EncodeColor(colorTurquoise)+"% 20 thn =" + WriteVal(P4800DR );

//EXPLORATION
_SECTION_BEGIN("");

Filter = 1;

AddColumn(P1DR,"1 hari");
AddColumn(P5DR," 1 minggu");
AddColumn(P20DR,"1 bulan");
AddColumn(P60DR,"3 bulan");
AddColumn(P120DR,"6 bulan");
AddColumn(P240DR,"1 tahun");
AddColumn(P720DR,"3 tahun");
AddColumn(P1200DR,"5 tahun");
AddColumn(P2400DR,"10 tahun");
AddColumn(P4800DR,"20 tahun");

_SECTION_END();