Download Rata-rata Pergerakan harga For Amibroker (AFL)

The ultimate porfolio management solution.

Shares, Margin, CFD's, Futures and Forex

EOD and Realtime

Dividends and Trust Distributions

And Much More ....

For Portfolio Manager Click Here

#1 Selling Amibroker Plugin featuring:

Advanced Adaptive Indicators

Advanced Pattern Exploration

Neural Networks

And Much More ....

Find Out More Here

4 / 5 (Votes 3)

amibroker, pergerakan, harga, AFL

Formula Explorasi

Copy & Paste Friendly

Pergerakan harga

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

33

34

35

36

37

38

39

40

41

42

43

44

45

46

47

48

49

50

51

52

53

54

55

56

57

58

59

60

61

62

63

64

65

66

67

68

69

70

71

72

73

74

75

76

77

78

79

80

81

82

83

84

85

86

87

88

89

90

91

92

93

94

95

96

97

98

99

100

101

102

103

104

105

106

107

108

109

_SECTION_BEGIN("Rata-rata Pergerakan harga by i@m");
 
//52 Minggu Tinggi Rendah
High52 = HHV(High,250);
Low52 = LLV(Low,250);
i=0;
 
//Pergerakan Harga (Pendek, Sedang & Jangka Panjang)
MAPendek = C>MA(C,5);
IIf(MAPendek,i+1,i);
MASedang = C>MA(C,20);
IIf(MASedang,i+1,i);
MAPanjang = C>MA(C,60);
IIf(MAPanjang,i+1,i);
 
//Tali Kabel
TK1=C>BBandTop(C,20,2) AND Ref(C,-1)<Ref(BBandTop(C,20,2),-1);
TK2=C<BBandBot(C,20,2) AND Ref(C,-1)>Ref(BBandBot(C,20,2),-1);
TKStatus=WriteIf(TK1,"Puncak",WriteIf(TK2,"Bawah",WriteIf(IsNull(MA(C,20)),"N/A","Netral")));
TKColor=IIf(TK1,colorRed,IIf(TK2,colorGreen,colorLightOrange));
IIf(TK2,i+1,i);
 
//Untuk mengetahui kondisi harga sekarang
 
Pendek = WriteIf(MAPendek,"Banteng",WriteIf(IsNull(MA(C,5)) ,"N/A","Beruang"));
WarnaPendek = IIf(MAPendek,colorGreen,colorRed);
Sedang = WriteIf(MASedang,"Banteng",WriteIf(IsNull(MA(C,20))," N/A","Beruang"));
WarnaSedang = IIf(MASedang,colorGreen,colorRed);
Panjang = WriteIf(MAPanjang,"Banteng",WriteIf(IsNull(MA(C,60)) ,"N/A","Beruang"));
WarnaPanjang = IIf(MAPanjang,colorGreen,colorRed);
 
//MACD
MACDBull=MACD(12,26)>Signal(12,26,9);
IIf(MACDBull,i+1,i);
MACDStatus=WriteIf(MACDBull,"Banteng",WriteIf(IsNull(MACD(12,26)),"N/A","Beruang"));
MACDColor=IIf(MACDBull,colorGreen,colorRed);
 
//Aroon
Period=14;
LLVBarsSince=LLVBars(L,Period)+1;
HHVBarsSince=HHVBars(H,Period)+1;
AroonDown=100*(Period-LLVBarsSince)/(Period-1);
AroonUp=100*(Period-HHVBarsSince)/(Period-1);
AroonOsc=AroonUp-AroonDown;
Aroon=AroonOsc>0;
IIf(Aroon,i+1,i);
AroonStatus=WriteIf(Aroon,"Banteng",WriteIf(IsNull (RSI(14)),"N/A","Beruang"));
AroonColor=IIf(Aroon,colorGreen,IIf(IsNull(RSI(14) ),colorLightGrey,colorRed));
 
//Stochastic
StochKBull=StochK(14,3)>StochD(14,3,3);
IIf(StochKBull,i+1,i);
StochKStatus=WriteIf(StochKBull,"Banteng",WriteIf( IsNull(StochK(14,3)),"N/A","Beruang"));
StochKColor=IIf(StochKBull,colorGreen,colorRed);
 
//RSI
R1=RSI(14)>30 AND Ref(RSI(14),-1)<30 AND Ref(RSI(14),-2)<30;
R2=RSI(14)<70 AND Ref(RSI(14),-1)>70 AND Ref(RSI(14),-2)>70;
IIf(R1,i+1,i);
RSIStatus=WriteIf(R1,"Meningkat",WriteIf(R2,"Menurun",WriteIf(IsNull(RSI(14)),"N/A","Neutral")));
RSIColor=IIf(R1,colorGreen,IIf(R2,colorRed,colorLightGrey));
 
//MFI
M1=MFI(14)>80;
M2=MFI(14)<20;
IIf(M2,i+1,i);
MFIStatus=WriteIf(M1,"Jenuh beli",WriteIf(M2,"Jenuh Jual",WriteIf(IsNull(MFI(14)),"N/A","Neutral")));
MFIColor=IIf(M1,colorRed,IIf(M2,colorGreen,colorLightGrey));
 
/* Likuid (hanya saham-saham likuid yang discreening)
*/
VMA60 = MA(V,20) ;
Likuid = VMA60 * MA(C,20) > 5000000000;
 
 TrendScore =
 
 IIf(TK2,1,0)+
 IIf(MAPendek,1,0)+
 IIf(MASedang,1,0) +
 IIf(MAPanjang,1,0)+
 IIf(MACDBull,1,0) +
 IIf(Aroon,1,0) +
 IIf(StochKBull,1,0)+
 IIf(R1,1,0) +
 IIf(M2,1,0) ;
 
 
Filter =  1 AND C>0 AND Likuid  ; 
  
AddColumn(High52,"52 Minggu Tinggi");
AddColumn(Low52,"52 Minggu Rendah");
AddColumn(O,"Open",1.0); 
AddColumn(H,"High",1.0); 
AddColumn(L,"Low",1.0); 
AddColumn(C,"Close",1.0); 
AddColumn(V,"Volume",1.0,1.0);
AddColumn(C,"Close",1,IIf(C>Ref(C,-1),colorGreen,colorRed));
AddColumn(V,"Volume",1,IIf(V>Ref(V,-1),colorGreen,colorRed));
AddTextColumn(TKStatus,"BBand",1,colorWhite,TKColor);
AddTextColumn(Pendek,"Pendek MA(5)",1,colorWhite,WarnaPendek);
AddTextColumn(Sedang,"Sedang MA(20)",1,colorWhite,WarnaSedang);
AddTextColumn(Panjang,"Panjang MA(60)",1,colorWhite,WarnaPanjang);
AddTextColumn(MACDStatus,"MACD",1,colorWhite,MACDColor);
AddTextColumn(AroonStatus,"Aroon",1,colorWhite,AroonColor);
AddTextColumn(StochKStatus,"Stochastic",1,colorWhite,StochKColor);
AddTextColumn(RSIStatus,"RSI(14)",1,colorWhite,RSIColor);
AddTextColumn(MFIStatus,"MFI(14)",1,colorWhite,MFIColor);
AddColumn(TrendScore,"Score");
_SECTION_END();

1. nifty46

about 5 years ago

NICE

Report as Spam

2. julisaprianto

about 5 years ago

Mantul

Report as Spam

3. ARIES77

almost 5 years ago

Terima kasih bro…sukses selalu untuk tradingnya

Report as Spam

4. iamilham88

over 4 years ago

OK, mampir di channel telegram @DaprosClubBasic ya

Report as Spam

5. ARIES77

over 4 years ago

ok bro

Report as Spam

6. ARIES77

over 4 years ago

sudah gabung bro

Report as Spam

7. hasan.pkb@gmail.com

over 3 years ago

Saya pengguna baru amibroker

apa ada yang punya stock list IDX dan watchlist IDX? bisa share? thank you

Report as Spam

8. Lutfi123

over 3 years ago

Ada wa ga bro mau chat personal

Report as Spam

Stock Portfolio Organizer

WiseTrader Toolbox

Rata-rata Pergerakan harga for Amibroker (AFL)
iamilham88
about 5 years ago
Amibroker (AFL)

Indicator / Formula

8 comments

Leave Comment

Stock Portfolio Organizer

WiseTrader Toolbox

Rata-rata Pergerakan harga for Amibroker (AFL) iamilham88 about 5 years ago Amibroker (AFL)

Indicator / Formula

8 comments

Leave Comment

Rata-rata Pergerakan harga for Amibroker (AFL)
iamilham88
about 5 years ago
Amibroker (AFL)