- #property indicator_chart_window
- extern int GMTshift=7;
- int init()
- {
- return(0);
- }
-
- int deinit()
- {
-
- return(0);
- }
-
- int start()
- {
- int counted_bars=IndicatorCounted();
- double day_high=0;
- double day_low=0;
- double yesterday_high=0;
- double yesterday_open=0;
- double yesterday_low=0;
- double yesterday_close=0;
- double today_open=0;
- double P=0,S=0,R=0,S1=0,H4=0,S2=0,R2=0,S3=0,L4=0,nQ=0,nD=0,D=0;
- double H3,H2,H1,L1,L2,L3;
- int cnt=720;
- double cur_day=0;
- double prev_day=0;
- double rates_d1[2][6];
-
- if(Period() > 1440)
- {
- Print("Error - Chart period is greater than 1 day.");
- return(-1);
- }
- while(cnt!= 0)
- {
- cur_day=TimeDay(Time[cnt]- (GMTshift*3600));
- if (prev_day!=cur_day)
- {
- yesterday_close=Close[cnt+1];
- today_open=Open[cnt];
- yesterday_high=day_high;
- yesterday_low=day_low;
- //----
- day_high=High[cnt];
- day_low =Low[cnt];
- //----
- prev_day=cur_day;
- }
- if (High[cnt]>day_high)
- {
- day_high=High[cnt];
- }
- if (Low[cnt]<day_low)
- {
- day_low=Low[cnt];
- }
- // SetIndexValue(cnt, 0);
- cnt--;
- }
-
- P=(yesterday_high + yesterday_low + yesterday_close)/3;
- H4=(yesterday_high - yesterday_low)*0.55+yesterday_close;
- H3=(yesterday_high - yesterday_low)*0.275+yesterday_close;
- L3=yesterday_close-(yesterday_high - yesterday_low)*0.275;
- L4=yesterday_close-(yesterday_high - yesterday_low)*0.55;
-
- Comment("Camarilla Levels by <a target="_blank">www.ForexMasterMaker.com</a>");
- ObjectDelete("L4_Line");
- ObjectDelete("L3_Line");
- ObjectDelete("H3_Line");
- ObjectDelete("H4_Line");
- ObjectCreate("L4_Line", OBJ_HLINE,0, CurTime(),L4);
- ObjectSet("L4_Line",OBJPROP_COLOR,Red);
- ObjectSet("L4_Line",OBJPROP_STYLE,STYLE_SOLID);
- ObjectCreate("L3_Line", OBJ_HLINE,0, CurTime(),L3);
- ObjectSet("L3_Line",OBJPROP_COLOR,Red);
- ObjectSet("L3_Line",OBJPROP_STYLE,STYLE_SOLID);
- ObjectCreate("H3_Line", OBJ_HLINE,0, CurTime(),H3);
- ObjectSet("H3_Line",OBJPROP_COLOR,Red);
- ObjectSet("H3_Line",OBJPROP_STYLE,STYLE_SOLID);
- ObjectCreate("H4_Line", OBJ_HLINE,0, CurTime(),H4);
- ObjectSet("H4_Line",OBJPROP_COLOR,Red);
- ObjectSet("H4_Line",OBJPROP_STYLE,STYLE_SOLID);
- ObjectsRedraw();
-
- if(ObjectFind("L3 label")!=0)
- {
- ObjectCreate("L3 label", OBJ_TEXT, 0, Time[0], L3);
- ObjectSetText("L3 label", " L3 ", 8, "Arial", Red);
- }
- else
- {
- ObjectMove("L3 label", 0, Time[0], L3);
- }
- if(ObjectFind("L4 label")!=0)
- {
- ObjectCreate("L4 label", OBJ_TEXT, 0, Time[0], L4);
- ObjectSetText("L4 label", " L4 ", 8, "Arial", Red);
- }
- else
- {
- ObjectMove("L4 label", 0, Time[0], L4);
- }
- if(ObjectFind("H4 label")!=0)
- {
- ObjectCreate("H4 label", OBJ_TEXT, 0, Time[0], H4);
- ObjectSetText("H4 label", " H4 ", 8, "Arial", Red);
- }
- else
- {
- ObjectMove("H4 label", 0, Time[0], H4);
- }
- if(ObjectFind("H3 label")!=0)
- {
- ObjectCreate("H3 label", OBJ_TEXT, 0, Time[0], H3);
- ObjectSetText("H3 label", " H3 ", 8, "Arial", Red);
- }
- else
- {
- ObjectMove("H3 label", 0, Time[0], H3);
- }
- if(ObjectFind("P label")!=0)
- {
- ObjectCreate(" label", OBJ_TEXT, 0, Time[0], H3);
- ObjectSetText(" label", " ", 8, "Arial", DeepPink);
- }
- else
- {
- ObjectMove("P label", 0, Time[0], P);
- }
- return(0);
- }
复制代码
|