커뮤니티
시스템매매 서식 요건 추가
2016-06-20 11:02:27
191
글번호 99281
[진입조건]
1. 1번 시스템신호 기준으로 진입
[청산조건] => 기존 1번 청산조건에 추가 부문
1. 목표 틱이나 기준선(10, 90) 수익 돌파 시 자동 청산(기존 방식)
2. 1번 시스템신호 조건 진입 후 손실시 추세가 변할 경우 아래 내용 청산조건 추가
◆ 진입 후 1번 시스템 신호가 추세 변경 시 2번 지표 추세도 같은 추세신호 변경일 경우
바로 청산
◆ 진입 후 1번 시스템 신호가 추세 변경되었으나 2번 지표 추세가 반대 추세일 경우
2틱 수익에 자동 청산 주문
◆ 2틱 자동 청산 주문 후 2번 지표 추세도 1번 시스템 추세와 동일하게 추세 변경 시
2틱 자동 청산 주문도 바로 정정손절주문 청산
{1번 시스템 신호}
input:b_time1(000000),e_time1(240000),
stoK_p11(150),stoK_p12(50),stoK_p13(10),
ma_p11(10),ma_p12(5),ma_p13(10),ma_p14(100),
ma_p15(10),ma_p16(20),ma_p17(15),상단(90),하단(10),익절틱수(10);
Var:stoK(0),stoD(0),TRIXv(0),TRIXsig(0),T(0);
If b_time1 <= Time and Time <= e_time1 Then
{
stoK = StochasticsK(stoK_p11,stoK_p12);
stoD = StochasticsD(stoK_p11,stoK_p12,stoK_p13);
If countif(ma(C,ma_p11)[1] < ma(C,ma_p11),1) == 1
and (ma(C,ma_p12)[1] <= ma(C,ma_p13)[1] and ma(C,ma_p12) > ma(C,ma_p13))
and countif(ma(C,ma_p14)[1] < ma(C,ma_p14),1) == 1
and countif(ma(C,ma_p15)[1] < ma(C,ma_p15),1) == 1
and countif(ma(C,ma_p16)[1] < ma(C,ma_p16),1) == 1
and countif(ma(C,ma_p17)[1] < ma(C,ma_p17),1) == 1
Then
{
T = 1;
}
If countif(ma(C,ma_p11)[1] > ma(C,ma_p11),1) == 1
and (ma(C,ma_p12)[1] >= ma(C,ma_p13)[1] and ma(C,ma_p12) < ma(C,ma_p13))
and countif(ma(C,ma_p14)[1] > ma(C,ma_p14),1) == 1
and countif(ma(C,ma_p15)[1] > ma(C,ma_p15),1) == 1
and countif(ma(C,ma_p16)[1] > ma(C,ma_p16),1) == 1
and countif(ma(C,ma_p17)[1] > ma(C,ma_p17),1) == 1
Then
{
T = -1;
}
if T == 1 and CrossDown(stok,하단) Then
buy("매수",AtMarket);
if MarketPosition == 1 Then
{
if crossup(stok,상단) Then
exitlong("매수1",AtMarket);
if T == -1 Then
exitlong("추세전환(-)",AtMarket);
}
if T == -1 and Crossup(stok,상단) Then
sell("매도",AtMarket);
if MarketPosition == -1 Then
{
if Crossdown(stok,하단) Then
ExitShort("매도1",AtMarket);
if T == 1 Then
exitShort("추세전환(+)",AtMarket);
}
}
SetStopProfittarget(PriceScale*익절틱수,PointStop);
{2번 추세 지표}
input:b_time1(000000),e_time1(240000);
Var:ma_p11(10),ma_p12(10),ma_p13(10),ma_p14(100),
ma_p15(10),ma_p16(20),ma_p17(15);
var:ma11(0),ma12(0),ma13(0),ma15(0),ma16(0),ma17(0);
var:j(0),매수강도(0),매도강도(0);
var : ma_P14_1(0),ma_P14_2(0),ma_P14_3(0),ma_P14_4(0),ma_P14_5(0);
var : ma_P14_6(0),ma_P14_7(0),ma_P14_8(0),ma_P14_9(0),ma_P14_10(0);
var : ma_P14_11(0),ma_P14_12(0),ma_P14_13(0),ma_P14_14(0),ma_P14_15(0);
var : ma_P14_16(0),ma_P14_17(0),ma_P14_18(0),ma_P14_19(0),ma_P14_20(0);
var : ma_P14_21(0),ma_P14_22(0),ma_P14_23(0),ma_P14_24(0),ma_P14_25(0);
var : ma_P14_26(0),ma_P14_27(0),ma_P14_28(0),ma_P14_29(0),ma_P14_30(0);
var : ma_P14_31(0),ma_P14_32(0),ma_P14_33(0),ma_P14_34(0),ma_P14_35(0);
var : ma_P14_36(0),ma_P14_37(0),ma_P14_38(0),ma_P14_39(0),ma_P14_40(0);
var : ma_P14_41(0),ma_P14_42(0),ma_P14_43(0),ma_P14_44(0),ma_P14_45(0);
var : ma_P14_46(0),ma_P14_47(0),ma_P14_48(0),ma_P14_49(0),ma_P14_50(0);
var : ma_P14_51(0),ma_P14_52(0),ma_P14_53(0),ma_P14_54(0),ma_P14_55(0);
var : ma_P14_56(0),ma_P14_57(0),ma_P14_58(0),ma_P14_59(0),ma_P14_60(0);
var : ma_P14_61(0),ma_P14_62(0),ma_P14_63(0),ma_P14_64(0),ma_P14_65(0);
var : ma_P14_66(0),ma_P14_67(0),ma_P14_68(0),ma_P14_69(0),ma_P14_70(0);
var : ma_P14_71(0),ma_P14_72(0),ma_P14_73(0),ma_P14_74(0),ma_P14_75(0);
var : ma_P14_76(0),ma_P14_77(0),ma_P14_78(0),ma_P14_79(0),ma_P14_80(0);
var : ma_P14_81(0),ma_P14_82(0),ma_P14_83(0),ma_P14_84(0),ma_P14_85(0);
var : ma_P14_86(0),ma_P14_87(0),ma_P14_88(0),ma_P14_89(0),ma_P14_90(0);
var : ma_P14_91(0),ma_P14_92(0),ma_P14_93(0),ma_P14_94(0),ma_P14_95(0);
var : ma_P14_96(0),ma_P14_97(0),ma_P14_98(0),ma_P14_99(0),ma_P14_100(0);
Array:ma14[100](0),추세[100]("");
ma11=ma(C,ma_P11);
ma12=ma(C,ma_P12);
ma13=ma(C,ma_P13);
ma15=ma(C,ma_P15);
ma16=ma(C,ma_P16);
ma17=ma(C,ma_P17);
ma_P14_1=ma_P14+1;
ma_P14_2=ma_P14+2;
ma_P14_3=ma_P14+3;
ma_P14_4=ma_P14+4;
ma_P14_5=ma_P14+5;
ma_P14_6=ma_P14+6;
ma_P14_7=ma_P14+7;
ma_P14_8=ma_P14+8;
ma_P14_9=ma_P14+9;
ma_P14_10=ma_P14+10;
ma_P14_11=ma_P14+11;
ma_P14_12=ma_P14+12;
ma_P14_13=ma_P14+13;
ma_P14_14=ma_P14+14;
ma_P14_15=ma_P14+15;
ma_P14_16=ma_P14+16;
ma_P14_17=ma_P14+17;
ma_P14_18=ma_P14+18;
ma_P14_19=ma_P14+19;
ma_P14_20=ma_P14+20;
ma_P14_21=ma_P14+21;
ma_P14_22=ma_P14+22;
ma_P14_23=ma_P14+23;
ma_P14_24=ma_P14+24;
ma_P14_25=ma_P14+25;
ma_P14_26=ma_P14+26;
ma_P14_27=ma_P14+27;
ma_P14_28=ma_P14+28;
ma_P14_29=ma_P14+29;
ma_P14_30=ma_P14+30;
ma_P14_31=ma_P14+31;
ma_P14_32=ma_P14+32;
ma_P14_33=ma_P14+33;
ma_P14_34=ma_P14+34;
ma_P14_35=ma_P14+35;
ma_P14_36=ma_P14+36;
ma_P14_37=ma_P14+37;
ma_P14_38=ma_P14+38;
ma_P14_39=ma_P14+39;
ma_P14_40=ma_P14+40;
ma_P14_41=ma_P14+41;
ma_P14_42=ma_P14+42;
ma_P14_43=ma_P14+43;
ma_P14_44=ma_P14+44;
ma_P14_45=ma_P14+45;
ma_P14_46=ma_P14+46;
ma_P14_47=ma_P14+47;
ma_P14_48=ma_P14+48;
ma_P14_49=ma_P14+49;
ma_P14_50=ma_P14+50;
ma_P14_51=ma_P14+51;
ma_P14_52=ma_P14+52;
ma_P14_53=ma_P14+53;
ma_P14_54=ma_P14+54;
ma_P14_55=ma_P14+55;
ma_P14_56=ma_P14+56;
ma_P14_57=ma_P14+57;
ma_P14_58=ma_P14+58;
ma_P14_59=ma_P14+59;
ma_P14_60=ma_P14+60;
ma_P14_61=ma_P14+61;
ma_P14_62=ma_P14+62;
ma_P14_63=ma_P14+63;
ma_P14_64=ma_P14+64;
ma_P14_65=ma_P14+65;
ma_P14_66=ma_P14+66;
ma_P14_67=ma_P14+67;
ma_P14_68=ma_P14+68;
ma_P14_69=ma_P14+69;
ma_P14_70=ma_P14+70;
ma_P14_71=ma_P14+71;
ma_P14_72=ma_P14+72;
ma_P14_73=ma_P14+73;
ma_P14_74=ma_P14+74;
ma_P14_75=ma_P14+75;
ma_P14_76=ma_P14+76;
ma_P14_77=ma_P14+77;
ma_P14_78=ma_P14+78;
ma_P14_79=ma_P14+79;
ma_P14_80=ma_P14+80;
ma_P14_81=ma_P14+81;
ma_P14_82=ma_P14+82;
ma_P14_83=ma_P14+83;
ma_P14_84=ma_P14+84;
ma_P14_85=ma_P14+85;
ma_P14_86=ma_P14+86;
ma_P14_87=ma_P14+87;
ma_P14_88=ma_P14+88;
ma_P14_89=ma_P14+89;
ma_P14_90=ma_P14+90;
ma_P14_91=ma_P14+91;
ma_P14_92=ma_P14+92;
ma_P14_93=ma_P14+93;
ma_P14_94=ma_P14+94;
ma_P14_95=ma_P14+95;
ma_P14_96=ma_P14+96;
ma_P14_97=ma_P14+97;
ma_P14_98=ma_P14+98;
ma_P14_99=ma_P14+99;
ma_P14_100=ma_P14+100;
ma14[1] = ma(C,ma_p14_1);
ma14[2] = ma(C,ma_p14_2);
ma14[3] = ma(C,ma_p14_3);
ma14[4] = ma(C,ma_p14_4);
ma14[5] = ma(C,ma_p14_5);
ma14[6] = ma(C,ma_p14_6);
ma14[7] = ma(C,ma_p14_7);
ma14[8] = ma(C,ma_p14_8);
ma14[9] = ma(C,ma_p14_9);
ma14[10] = ma(C,ma_p14_10);
ma14[11] = ma(C,ma_p14_11);
ma14[12] = ma(C,ma_p14_12);
ma14[13] = ma(C,ma_p14_13);
ma14[14] = ma(C,ma_p14_14);
ma14[15] = ma(C,ma_p14_15);
ma14[16] = ma(C,ma_p14_16);
ma14[17] = ma(C,ma_p14_17);
ma14[18] = ma(C,ma_p14_18);
ma14[19] = ma(C,ma_p14_19);
ma14[20] = ma(C,ma_p14_20);
ma14[21] = ma(C,ma_p14_21);
ma14[22] = ma(C,ma_p14_22);
ma14[23] = ma(C,ma_p14_23);
ma14[24] = ma(C,ma_p14_24);
ma14[25] = ma(C,ma_p14_25);
ma14[26] = ma(C,ma_p14_26);
ma14[27] = ma(C,ma_p14_27);
ma14[28] = ma(C,ma_p14_28);
ma14[29] = ma(C,ma_p14_29);
ma14[30] = ma(C,ma_p14_30);
ma14[31] = ma(C,ma_p14_31);
ma14[32] = ma(C,ma_p14_32);
ma14[33] = ma(C,ma_p14_33);
ma14[34] = ma(C,ma_p14_34);
ma14[35] = ma(C,ma_p14_35);
ma14[36] = ma(C,ma_p14_36);
ma14[37] = ma(C,ma_p14_37);
ma14[38] = ma(C,ma_p14_38);
ma14[39] = ma(C,ma_p14_39);
ma14[40] = ma(C,ma_p14_40);
ma14[41] = ma(C,ma_p14_41);
ma14[42] = ma(C,ma_p14_42);
ma14[43] = ma(C,ma_p14_43);
ma14[44] = ma(C,ma_p14_44);
ma14[45] = ma(C,ma_p14_45);
ma14[46] = ma(C,ma_p14_46);
ma14[47] = ma(C,ma_p14_47);
ma14[48] = ma(C,ma_p14_48);
ma14[49] = ma(C,ma_p14_49);
ma14[50] = ma(C,ma_p14_50);
ma14[51] = ma(C,ma_p14_51);
ma14[52] = ma(C,ma_p14_52);
ma14[53] = ma(C,ma_p14_53);
ma14[54] = ma(C,ma_p14_54);
ma14[55] = ma(C,ma_p14_55);
ma14[56] = ma(C,ma_p14_56);
ma14[57] = ma(C,ma_p14_57);
ma14[58] = ma(C,ma_p14_58);
ma14[59] = ma(C,ma_p14_59);
ma14[60] = ma(C,ma_p14_60);
ma14[61] = ma(C,ma_p14_61);
ma14[62] = ma(C,ma_p14_62);
ma14[63] = ma(C,ma_p14_63);
ma14[64] = ma(C,ma_p14_64);
ma14[65] = ma(C,ma_p14_65);
ma14[66] = ma(C,ma_p14_66);
ma14[67] = ma(C,ma_p14_67);
ma14[68] = ma(C,ma_p14_68);
ma14[69] = ma(C,ma_p14_69);
ma14[70] = ma(C,ma_p14_70);
ma14[71] = ma(C,ma_p14_71);
ma14[72] = ma(C,ma_p14_72);
ma14[73] = ma(C,ma_p14_73);
ma14[74] = ma(C,ma_p14_74);
ma14[75] = ma(C,ma_p14_75);
ma14[76] = ma(C,ma_p14_76);
ma14[77] = ma(C,ma_p14_77);
ma14[78] = ma(C,ma_p14_78);
ma14[79] = ma(C,ma_p14_79);
ma14[80] = ma(C,ma_p14_80);
ma14[81] = ma(C,ma_p14_81);
ma14[82] = ma(C,ma_p14_82);
ma14[83] = ma(C,ma_p14_83);
ma14[84] = ma(C,ma_p14_84);
ma14[85] = ma(C,ma_p14_85);
ma14[86] = ma(C,ma_p14_86);
ma14[87] = ma(C,ma_p14_87);
ma14[88] = ma(C,ma_p14_88);
ma14[89] = ma(C,ma_p14_89);
ma14[90] = ma(C,ma_p14_90);
ma14[91] = ma(C,ma_p14_91);
ma14[92] = ma(C,ma_p14_92);
ma14[93] = ma(C,ma_p14_93);
ma14[94] = ma(C,ma_p14_94);
ma14[95] = ma(C,ma_p14_95);
ma14[96] = ma(C,ma_p14_96);
ma14[97] = ma(C,ma_p14_97);
ma14[98] = ma(C,ma_p14_98);
ma14[99] = ma(C,ma_p14_99);
ma14[100] = ma(C,ma_p14_100);
매수강도=0;
매도강도=0;
If b_time1<=Time and Time<= e_time1 Then
{
For j=1 TO 100
{
If countif(ma11[1]<ma11,1)==1
and (ma12[1]<=ma13[1] and ma12>ma13)
and countif(ma14[j][1]<ma14[j],1)==1
and countif(ma15[1]<ma15,1)==1
and countif(ma16[1]<ma16,1)==1
and countif(ma17[1]<ma17,1)==1
Then
{
추세[j]="매수추세";
}
If countif(ma11[1]>ma11,1)==1
and(ma12[1]>=ma13[1] and ma12<ma13)
and countif(ma14[j][1]>ma14[j],1)==1
and countif(ma15[1]>ma15,1)==1
and countif(ma16[1]>ma16,1)==1
and countif(ma17[1]>ma17,1)==1
Then
{
추세[j] = "매도추세";
}
If 추세[j] == "매수추세" Then 매수강도 = 매수강도 +1;
If 추세[j] == "매도추세" Then 매도강도 = 매도강도 +1;
}
If 매수강도 == 100 Then 추세[0] = "매수추세";
If 매도강도 == 100 Then 추세[0] = "매도추세";
Plot1(iff(추세[0]=="매수추세",100,iff(추세[0]=="매도추세",-100,0)));
PlotBaseLine1(0);
}
답변 2
예스스탁 예스스탁 답변
2016-06-21 10:07:46
안녕하세요
예스스탁입니다.
수식에서는 정정/취소주문은 가능하지 않습니다.
수식은 차트에 수신되는 데이터로 조건을 판단해
신호와 주문만을 발생할수 있습니다.
집행된 주문에 대해서는 정정/취소가 가능하지 않습니다.
또한 특정가격에 미리 주문을 내는 기능도 없습니다.
진입후 2개의 수식에서 모두 반대추세이면 청산,
1번은 반대추세인데 2번은 아직 변경되지 않았으면
매수는 진입가+2틱이하면 청산신호
매도는 진입가-2틱 이상이면 청산신호가 발생하게 수정해 드립니다.
input:b_time1(000000),e_time1(240000);
Var:ma_p11(10),ma_p12(10),ma_p13(10),ma_p14(100),
ma_p15(10),ma_p16(20),ma_p17(15);
var:ma11(0),ma12(0),ma13(0),ma15(0),ma16(0),ma17(0);
var:j(0),매수강도(0),매도강도(0);
var : ma_P14_1(0),ma_P14_2(0),ma_P14_3(0),ma_P14_4(0),ma_P14_5(0);
var : ma_P14_6(0),ma_P14_7(0),ma_P14_8(0),ma_P14_9(0),ma_P14_10(0);
var : ma_P14_11(0),ma_P14_12(0),ma_P14_13(0),ma_P14_14(0),ma_P14_15(0);
var : ma_P14_16(0),ma_P14_17(0),ma_P14_18(0),ma_P14_19(0),ma_P14_20(0);
var : ma_P14_21(0),ma_P14_22(0),ma_P14_23(0),ma_P14_24(0),ma_P14_25(0);
var : ma_P14_26(0),ma_P14_27(0),ma_P14_28(0),ma_P14_29(0),ma_P14_30(0);
var : ma_P14_31(0),ma_P14_32(0),ma_P14_33(0),ma_P14_34(0),ma_P14_35(0);
var : ma_P14_36(0),ma_P14_37(0),ma_P14_38(0),ma_P14_39(0),ma_P14_40(0);
var : ma_P14_41(0),ma_P14_42(0),ma_P14_43(0),ma_P14_44(0),ma_P14_45(0);
var : ma_P14_46(0),ma_P14_47(0),ma_P14_48(0),ma_P14_49(0),ma_P14_50(0);
var : ma_P14_51(0),ma_P14_52(0),ma_P14_53(0),ma_P14_54(0),ma_P14_55(0);
var : ma_P14_56(0),ma_P14_57(0),ma_P14_58(0),ma_P14_59(0),ma_P14_60(0);
var : ma_P14_61(0),ma_P14_62(0),ma_P14_63(0),ma_P14_64(0),ma_P14_65(0);
var : ma_P14_66(0),ma_P14_67(0),ma_P14_68(0),ma_P14_69(0),ma_P14_70(0);
var : ma_P14_71(0),ma_P14_72(0),ma_P14_73(0),ma_P14_74(0),ma_P14_75(0);
var : ma_P14_76(0),ma_P14_77(0),ma_P14_78(0),ma_P14_79(0),ma_P14_80(0);
var : ma_P14_81(0),ma_P14_82(0),ma_P14_83(0),ma_P14_84(0),ma_P14_85(0);
var : ma_P14_86(0),ma_P14_87(0),ma_P14_88(0),ma_P14_89(0),ma_P14_90(0);
var : ma_P14_91(0),ma_P14_92(0),ma_P14_93(0),ma_P14_94(0),ma_P14_95(0);
var : ma_P14_96(0),ma_P14_97(0),ma_P14_98(0),ma_P14_99(0),ma_P14_100(0);
Array:ma14[100](0),추세[100]("");
input: stoK_p11(150),stoK_p12(50),stoK_p13(10),
ma_period11(10),ma_period12(5),ma_period13(10),ma_period14(100),
ma_period15(10),ma_period16(20),ma_period17(15),상단(90),하단(10),익절틱수(10);
Var:stoK(0),stoD(0),TRIXv(0),TRIXsig(0),T(0);
ma11=ma(C,ma_P11);
ma12=ma(C,ma_P12);
ma13=ma(C,ma_P13);
ma15=ma(C,ma_P15);
ma16=ma(C,ma_P16);
ma17=ma(C,ma_P17);
ma_P14_1=ma_P14+1;
ma_P14_2=ma_P14+2;
ma_P14_3=ma_P14+3;
ma_P14_4=ma_P14+4;
ma_P14_5=ma_P14+5;
ma_P14_6=ma_P14+6;
ma_P14_7=ma_P14+7;
ma_P14_8=ma_P14+8;
ma_P14_9=ma_P14+9;
ma_P14_10=ma_P14+10;
ma_P14_11=ma_P14+11;
ma_P14_12=ma_P14+12;
ma_P14_13=ma_P14+13;
ma_P14_14=ma_P14+14;
ma_P14_15=ma_P14+15;
ma_P14_16=ma_P14+16;
ma_P14_17=ma_P14+17;
ma_P14_18=ma_P14+18;
ma_P14_19=ma_P14+19;
ma_P14_20=ma_P14+20;
ma_P14_21=ma_P14+21;
ma_P14_22=ma_P14+22;
ma_P14_23=ma_P14+23;
ma_P14_24=ma_P14+24;
ma_P14_25=ma_P14+25;
ma_P14_26=ma_P14+26;
ma_P14_27=ma_P14+27;
ma_P14_28=ma_P14+28;
ma_P14_29=ma_P14+29;
ma_P14_30=ma_P14+30;
ma_P14_31=ma_P14+31;
ma_P14_32=ma_P14+32;
ma_P14_33=ma_P14+33;
ma_P14_34=ma_P14+34;
ma_P14_35=ma_P14+35;
ma_P14_36=ma_P14+36;
ma_P14_37=ma_P14+37;
ma_P14_38=ma_P14+38;
ma_P14_39=ma_P14+39;
ma_P14_40=ma_P14+40;
ma_P14_41=ma_P14+41;
ma_P14_42=ma_P14+42;
ma_P14_43=ma_P14+43;
ma_P14_44=ma_P14+44;
ma_P14_45=ma_P14+45;
ma_P14_46=ma_P14+46;
ma_P14_47=ma_P14+47;
ma_P14_48=ma_P14+48;
ma_P14_49=ma_P14+49;
ma_P14_50=ma_P14+50;
ma_P14_51=ma_P14+51;
ma_P14_52=ma_P14+52;
ma_P14_53=ma_P14+53;
ma_P14_54=ma_P14+54;
ma_P14_55=ma_P14+55;
ma_P14_56=ma_P14+56;
ma_P14_57=ma_P14+57;
ma_P14_58=ma_P14+58;
ma_P14_59=ma_P14+59;
ma_P14_60=ma_P14+60;
ma_P14_61=ma_P14+61;
ma_P14_62=ma_P14+62;
ma_P14_63=ma_P14+63;
ma_P14_64=ma_P14+64;
ma_P14_65=ma_P14+65;
ma_P14_66=ma_P14+66;
ma_P14_67=ma_P14+67;
ma_P14_68=ma_P14+68;
ma_P14_69=ma_P14+69;
ma_P14_70=ma_P14+70;
ma_P14_71=ma_P14+71;
ma_P14_72=ma_P14+72;
ma_P14_73=ma_P14+73;
ma_P14_74=ma_P14+74;
ma_P14_75=ma_P14+75;
ma_P14_76=ma_P14+76;
ma_P14_77=ma_P14+77;
ma_P14_78=ma_P14+78;
ma_P14_79=ma_P14+79;
ma_P14_80=ma_P14+80;
ma_P14_81=ma_P14+81;
ma_P14_82=ma_P14+82;
ma_P14_83=ma_P14+83;
ma_P14_84=ma_P14+84;
ma_P14_85=ma_P14+85;
ma_P14_86=ma_P14+86;
ma_P14_87=ma_P14+87;
ma_P14_88=ma_P14+88;
ma_P14_89=ma_P14+89;
ma_P14_90=ma_P14+90;
ma_P14_91=ma_P14+91;
ma_P14_92=ma_P14+92;
ma_P14_93=ma_P14+93;
ma_P14_94=ma_P14+94;
ma_P14_95=ma_P14+95;
ma_P14_96=ma_P14+96;
ma_P14_97=ma_P14+97;
ma_P14_98=ma_P14+98;
ma_P14_99=ma_P14+99;
ma_P14_100=ma_P14+100;
ma14[1] = ma(C,ma_p14_1);
ma14[2] = ma(C,ma_p14_2);
ma14[3] = ma(C,ma_p14_3);
ma14[4] = ma(C,ma_p14_4);
ma14[5] = ma(C,ma_p14_5);
ma14[6] = ma(C,ma_p14_6);
ma14[7] = ma(C,ma_p14_7);
ma14[8] = ma(C,ma_p14_8);
ma14[9] = ma(C,ma_p14_9);
ma14[10] = ma(C,ma_p14_10);
ma14[11] = ma(C,ma_p14_11);
ma14[12] = ma(C,ma_p14_12);
ma14[13] = ma(C,ma_p14_13);
ma14[14] = ma(C,ma_p14_14);
ma14[15] = ma(C,ma_p14_15);
ma14[16] = ma(C,ma_p14_16);
ma14[17] = ma(C,ma_p14_17);
ma14[18] = ma(C,ma_p14_18);
ma14[19] = ma(C,ma_p14_19);
ma14[20] = ma(C,ma_p14_20);
ma14[21] = ma(C,ma_p14_21);
ma14[22] = ma(C,ma_p14_22);
ma14[23] = ma(C,ma_p14_23);
ma14[24] = ma(C,ma_p14_24);
ma14[25] = ma(C,ma_p14_25);
ma14[26] = ma(C,ma_p14_26);
ma14[27] = ma(C,ma_p14_27);
ma14[28] = ma(C,ma_p14_28);
ma14[29] = ma(C,ma_p14_29);
ma14[30] = ma(C,ma_p14_30);
ma14[31] = ma(C,ma_p14_31);
ma14[32] = ma(C,ma_p14_32);
ma14[33] = ma(C,ma_p14_33);
ma14[34] = ma(C,ma_p14_34);
ma14[35] = ma(C,ma_p14_35);
ma14[36] = ma(C,ma_p14_36);
ma14[37] = ma(C,ma_p14_37);
ma14[38] = ma(C,ma_p14_38);
ma14[39] = ma(C,ma_p14_39);
ma14[40] = ma(C,ma_p14_40);
ma14[41] = ma(C,ma_p14_41);
ma14[42] = ma(C,ma_p14_42);
ma14[43] = ma(C,ma_p14_43);
ma14[44] = ma(C,ma_p14_44);
ma14[45] = ma(C,ma_p14_45);
ma14[46] = ma(C,ma_p14_46);
ma14[47] = ma(C,ma_p14_47);
ma14[48] = ma(C,ma_p14_48);
ma14[49] = ma(C,ma_p14_49);
ma14[50] = ma(C,ma_p14_50);
ma14[51] = ma(C,ma_p14_51);
ma14[52] = ma(C,ma_p14_52);
ma14[53] = ma(C,ma_p14_53);
ma14[54] = ma(C,ma_p14_54);
ma14[55] = ma(C,ma_p14_55);
ma14[56] = ma(C,ma_p14_56);
ma14[57] = ma(C,ma_p14_57);
ma14[58] = ma(C,ma_p14_58);
ma14[59] = ma(C,ma_p14_59);
ma14[60] = ma(C,ma_p14_60);
ma14[61] = ma(C,ma_p14_61);
ma14[62] = ma(C,ma_p14_62);
ma14[63] = ma(C,ma_p14_63);
ma14[64] = ma(C,ma_p14_64);
ma14[65] = ma(C,ma_p14_65);
ma14[66] = ma(C,ma_p14_66);
ma14[67] = ma(C,ma_p14_67);
ma14[68] = ma(C,ma_p14_68);
ma14[69] = ma(C,ma_p14_69);
ma14[70] = ma(C,ma_p14_70);
ma14[71] = ma(C,ma_p14_71);
ma14[72] = ma(C,ma_p14_72);
ma14[73] = ma(C,ma_p14_73);
ma14[74] = ma(C,ma_p14_74);
ma14[75] = ma(C,ma_p14_75);
ma14[76] = ma(C,ma_p14_76);
ma14[77] = ma(C,ma_p14_77);
ma14[78] = ma(C,ma_p14_78);
ma14[79] = ma(C,ma_p14_79);
ma14[80] = ma(C,ma_p14_80);
ma14[81] = ma(C,ma_p14_81);
ma14[82] = ma(C,ma_p14_82);
ma14[83] = ma(C,ma_p14_83);
ma14[84] = ma(C,ma_p14_84);
ma14[85] = ma(C,ma_p14_85);
ma14[86] = ma(C,ma_p14_86);
ma14[87] = ma(C,ma_p14_87);
ma14[88] = ma(C,ma_p14_88);
ma14[89] = ma(C,ma_p14_89);
ma14[90] = ma(C,ma_p14_90);
ma14[91] = ma(C,ma_p14_91);
ma14[92] = ma(C,ma_p14_92);
ma14[93] = ma(C,ma_p14_93);
ma14[94] = ma(C,ma_p14_94);
ma14[95] = ma(C,ma_p14_95);
ma14[96] = ma(C,ma_p14_96);
ma14[97] = ma(C,ma_p14_97);
ma14[98] = ma(C,ma_p14_98);
ma14[99] = ma(C,ma_p14_99);
ma14[100] = ma(C,ma_p14_100);
매수강도=0;
매도강도=0;
If b_time1<=Time and Time<= e_time1 Then
{
For j=1 TO 100
{
If countif(ma11[1]<ma11,1)==1
and (ma12[1]<=ma13[1] and ma12>ma13)
and countif(ma14[j][1]<ma14[j],1)==1
and countif(ma15[1]<ma15,1)==1
and countif(ma16[1]<ma16,1)==1
and countif(ma17[1]<ma17,1)==1
Then
{
추세[j]="매수추세";
}
If countif(ma11[1]>ma11,1)==1
and(ma12[1]>=ma13[1] and ma12<ma13)
and countif(ma14[j][1]>ma14[j],1)==1
and countif(ma15[1]>ma15,1)==1
and countif(ma16[1]>ma16,1)==1
and countif(ma17[1]>ma17,1)==1
Then
{
추세[j] = "매도추세";
}
If 추세[j] == "매수추세" Then 매수강도 = 매수강도 +1;
If 추세[j] == "매도추세" Then 매도강도 = 매도강도 +1;
}
If 매수강도 == 100 Then 추세[0] = "매수추세";
If 매도강도 == 100 Then 추세[0] = "매도추세";
#Plot1(iff(추세[0]=="매수추세",100,iff(추세[0]=="매도추세",-100,0)));
#PlotBaseLine1(0);
}
If b_time1 <= Time and Time <= e_time1 Then
{
stoK = StochasticsK(stoK_p11,stoK_p12);
stoD = StochasticsD(stoK_p11,stoK_p12,stoK_p13);
If countif(ma(C,ma_Period11)[1] < ma(C,ma_Period11),1) == 1
and (ma(C,ma_Period12)[1] <= ma(C,ma_Period13)[1] and ma(C,ma_Period12) > ma(C,ma_Period13))
and countif(ma(C,ma_Period14)[1] < ma(C,ma_Period14),1) == 1
and countif(ma(C,ma_Period15)[1] < ma(C,ma_Period15),1) == 1
and countif(ma(C,ma_Period16)[1] < ma(C,ma_Period16),1) == 1
and countif(ma(C,ma_Period17)[1] < ma(C,ma_Period17),1) == 1
Then
{
T = 1;
}
If countif(ma(C,ma_Period11)[1] > ma(C,ma_Period11),1) == 1
and (ma(C,ma_Period12)[1] >= ma(C,ma_Period13)[1] and ma(C,ma_Period12) < ma(C,ma_Period13))
and countif(ma(C,ma_Period14)[1] > ma(C,ma_Period14),1) == 1
and countif(ma(C,ma_Period15)[1] > ma(C,ma_Period15),1) == 1
and countif(ma(C,ma_Period16)[1] > ma(C,ma_Period16),1) == 1
and countif(ma(C,ma_Period17)[1] > ma(C,ma_Period17),1) == 1
Then
{
T = -1;
}
if T == 1 and CrossDown(stok,하단) Then
buy("매수",AtMarket);
if MarketPosition == 1 Then
{
if crossup(stok,상단) Then
exitlong("매수1",AtMarket);
if T == -1 and 추세[0] == "매도추세" Then
exitlong("추세전환(-)",AtMarket);
if T == -1 and 추세[0] == "매수추세" Then
exitlong("bx",AtStop,EntryPrice+PriceScale*2);
}
if T == -1 and Crossup(stok,상단) Then
sell("매도",AtMarket);
if MarketPosition == -1 Then
{
if Crossdown(stok,하단) Then
ExitShort("매도1",AtMarket);
if T == 1 and 추세[0] == "매수추세" Then
exitShort("추세전환(+)",AtMarket);
if T == 1 and 추세[0] == "매도추세" Then
exitShort("sx",atstop,EntryPrice-PriceScale*2);
}
}
SetStopProfittarget(PriceScale*익절틱수,PointStop);
즐거운 하루되세요
> 미완 님이 쓴 글입니다.
> 제목 : 시스템매매 서식 요건 추가
> [진입조건]
1. 1번 시스템신호 기준으로 진입
[청산조건] => 기존 1번 청산조건에 추가 부문
1. 목표 틱이나 기준선(10, 90) 수익 돌파 시 자동 청산(기존 방식)
2. 1번 시스템신호 조건 진입 후 손실시 추세가 변할 경우 아래 내용 청산조건 추가
◆ 진입 후 1번 시스템 신호가 추세 변경 시 2번 지표 추세도 같은 추세신호 변경일 경우
바로 청산
◆ 진입 후 1번 시스템 신호가 추세 변경되었으나 2번 지표 추세가 반대 추세일 경우
2틱 수익에 자동 청산 주문
◆ 2틱 자동 청산 주문 후 2번 지표 추세도 1번 시스템 추세와 동일하게 추세 변경 시
2틱 자동 청산 주문도 바로 정정손절주문 청산
{1번 시스템 신호}
input:b_time1(000000),e_time1(240000),
stoK_p11(150),stoK_p12(50),stoK_p13(10),
ma_p11(10),ma_p12(5),ma_p13(10),ma_p14(100),
ma_p15(10),ma_p16(20),ma_p17(15),상단(90),하단(10),익절틱수(10);
Var:stoK(0),stoD(0),TRIXv(0),TRIXsig(0),T(0);
If b_time1 <= Time and Time <= e_time1 Then
{
stoK = StochasticsK(stoK_p11,stoK_p12);
stoD = StochasticsD(stoK_p11,stoK_p12,stoK_p13);
If countif(ma(C,ma_p11)[1] < ma(C,ma_p11),1) == 1
and (ma(C,ma_p12)[1] <= ma(C,ma_p13)[1] and ma(C,ma_p12) > ma(C,ma_p13))
and countif(ma(C,ma_p14)[1] < ma(C,ma_p14),1) == 1
and countif(ma(C,ma_p15)[1] < ma(C,ma_p15),1) == 1
and countif(ma(C,ma_p16)[1] < ma(C,ma_p16),1) == 1
and countif(ma(C,ma_p17)[1] < ma(C,ma_p17),1) == 1
Then
{
T = 1;
}
If countif(ma(C,ma_p11)[1] > ma(C,ma_p11),1) == 1
and (ma(C,ma_p12)[1] >= ma(C,ma_p13)[1] and ma(C,ma_p12) < ma(C,ma_p13))
and countif(ma(C,ma_p14)[1] > ma(C,ma_p14),1) == 1
and countif(ma(C,ma_p15)[1] > ma(C,ma_p15),1) == 1
and countif(ma(C,ma_p16)[1] > ma(C,ma_p16),1) == 1
and countif(ma(C,ma_p17)[1] > ma(C,ma_p17),1) == 1
Then
{
T = -1;
}
if T == 1 and CrossDown(stok,하단) Then
buy("매수",AtMarket);
if MarketPosition == 1 Then
{
if crossup(stok,상단) Then
exitlong("매수1",AtMarket);
if T == -1 Then
exitlong("추세전환(-)",AtMarket);
}
if T == -1 and Crossup(stok,상단) Then
sell("매도",AtMarket);
if MarketPosition == -1 Then
{
if Crossdown(stok,하단) Then
ExitShort("매도1",AtMarket);
if T == 1 Then
exitShort("추세전환(+)",AtMarket);
}
}
SetStopProfittarget(PriceScale*익절틱수,PointStop);
{2번 추세 지표}
input:b_time1(000000),e_time1(240000);
Var:ma_p11(10),ma_p12(10),ma_p13(10),ma_p14(100),
ma_p15(10),ma_p16(20),ma_p17(15);
var:ma11(0),ma12(0),ma13(0),ma15(0),ma16(0),ma17(0);
var:j(0),매수강도(0),매도강도(0);
var : ma_P14_1(0),ma_P14_2(0),ma_P14_3(0),ma_P14_4(0),ma_P14_5(0);
var : ma_P14_6(0),ma_P14_7(0),ma_P14_8(0),ma_P14_9(0),ma_P14_10(0);
var : ma_P14_11(0),ma_P14_12(0),ma_P14_13(0),ma_P14_14(0),ma_P14_15(0);
var : ma_P14_16(0),ma_P14_17(0),ma_P14_18(0),ma_P14_19(0),ma_P14_20(0);
var : ma_P14_21(0),ma_P14_22(0),ma_P14_23(0),ma_P14_24(0),ma_P14_25(0);
var : ma_P14_26(0),ma_P14_27(0),ma_P14_28(0),ma_P14_29(0),ma_P14_30(0);
var : ma_P14_31(0),ma_P14_32(0),ma_P14_33(0),ma_P14_34(0),ma_P14_35(0);
var : ma_P14_36(0),ma_P14_37(0),ma_P14_38(0),ma_P14_39(0),ma_P14_40(0);
var : ma_P14_41(0),ma_P14_42(0),ma_P14_43(0),ma_P14_44(0),ma_P14_45(0);
var : ma_P14_46(0),ma_P14_47(0),ma_P14_48(0),ma_P14_49(0),ma_P14_50(0);
var : ma_P14_51(0),ma_P14_52(0),ma_P14_53(0),ma_P14_54(0),ma_P14_55(0);
var : ma_P14_56(0),ma_P14_57(0),ma_P14_58(0),ma_P14_59(0),ma_P14_60(0);
var : ma_P14_61(0),ma_P14_62(0),ma_P14_63(0),ma_P14_64(0),ma_P14_65(0);
var : ma_P14_66(0),ma_P14_67(0),ma_P14_68(0),ma_P14_69(0),ma_P14_70(0);
var : ma_P14_71(0),ma_P14_72(0),ma_P14_73(0),ma_P14_74(0),ma_P14_75(0);
var : ma_P14_76(0),ma_P14_77(0),ma_P14_78(0),ma_P14_79(0),ma_P14_80(0);
var : ma_P14_81(0),ma_P14_82(0),ma_P14_83(0),ma_P14_84(0),ma_P14_85(0);
var : ma_P14_86(0),ma_P14_87(0),ma_P14_88(0),ma_P14_89(0),ma_P14_90(0);
var : ma_P14_91(0),ma_P14_92(0),ma_P14_93(0),ma_P14_94(0),ma_P14_95(0);
var : ma_P14_96(0),ma_P14_97(0),ma_P14_98(0),ma_P14_99(0),ma_P14_100(0);
Array:ma14[100](0),추세[100]("");
ma11=ma(C,ma_P11);
ma12=ma(C,ma_P12);
ma13=ma(C,ma_P13);
ma15=ma(C,ma_P15);
ma16=ma(C,ma_P16);
ma17=ma(C,ma_P17);
ma_P14_1=ma_P14+1;
ma_P14_2=ma_P14+2;
ma_P14_3=ma_P14+3;
ma_P14_4=ma_P14+4;
ma_P14_5=ma_P14+5;
ma_P14_6=ma_P14+6;
ma_P14_7=ma_P14+7;
ma_P14_8=ma_P14+8;
ma_P14_9=ma_P14+9;
ma_P14_10=ma_P14+10;
ma_P14_11=ma_P14+11;
ma_P14_12=ma_P14+12;
ma_P14_13=ma_P14+13;
ma_P14_14=ma_P14+14;
ma_P14_15=ma_P14+15;
ma_P14_16=ma_P14+16;
ma_P14_17=ma_P14+17;
ma_P14_18=ma_P14+18;
ma_P14_19=ma_P14+19;
ma_P14_20=ma_P14+20;
ma_P14_21=ma_P14+21;
ma_P14_22=ma_P14+22;
ma_P14_23=ma_P14+23;
ma_P14_24=ma_P14+24;
ma_P14_25=ma_P14+25;
ma_P14_26=ma_P14+26;
ma_P14_27=ma_P14+27;
ma_P14_28=ma_P14+28;
ma_P14_29=ma_P14+29;
ma_P14_30=ma_P14+30;
ma_P14_31=ma_P14+31;
ma_P14_32=ma_P14+32;
ma_P14_33=ma_P14+33;
ma_P14_34=ma_P14+34;
ma_P14_35=ma_P14+35;
ma_P14_36=ma_P14+36;
ma_P14_37=ma_P14+37;
ma_P14_38=ma_P14+38;
ma_P14_39=ma_P14+39;
ma_P14_40=ma_P14+40;
ma_P14_41=ma_P14+41;
ma_P14_42=ma_P14+42;
ma_P14_43=ma_P14+43;
ma_P14_44=ma_P14+44;
ma_P14_45=ma_P14+45;
ma_P14_46=ma_P14+46;
ma_P14_47=ma_P14+47;
ma_P14_48=ma_P14+48;
ma_P14_49=ma_P14+49;
ma_P14_50=ma_P14+50;
ma_P14_51=ma_P14+51;
ma_P14_52=ma_P14+52;
ma_P14_53=ma_P14+53;
ma_P14_54=ma_P14+54;
ma_P14_55=ma_P14+55;
ma_P14_56=ma_P14+56;
ma_P14_57=ma_P14+57;
ma_P14_58=ma_P14+58;
ma_P14_59=ma_P14+59;
ma_P14_60=ma_P14+60;
ma_P14_61=ma_P14+61;
ma_P14_62=ma_P14+62;
ma_P14_63=ma_P14+63;
ma_P14_64=ma_P14+64;
ma_P14_65=ma_P14+65;
ma_P14_66=ma_P14+66;
ma_P14_67=ma_P14+67;
ma_P14_68=ma_P14+68;
ma_P14_69=ma_P14+69;
ma_P14_70=ma_P14+70;
ma_P14_71=ma_P14+71;
ma_P14_72=ma_P14+72;
ma_P14_73=ma_P14+73;
ma_P14_74=ma_P14+74;
ma_P14_75=ma_P14+75;
ma_P14_76=ma_P14+76;
ma_P14_77=ma_P14+77;
ma_P14_78=ma_P14+78;
ma_P14_79=ma_P14+79;
ma_P14_80=ma_P14+80;
ma_P14_81=ma_P14+81;
ma_P14_82=ma_P14+82;
ma_P14_83=ma_P14+83;
ma_P14_84=ma_P14+84;
ma_P14_85=ma_P14+85;
ma_P14_86=ma_P14+86;
ma_P14_87=ma_P14+87;
ma_P14_88=ma_P14+88;
ma_P14_89=ma_P14+89;
ma_P14_90=ma_P14+90;
ma_P14_91=ma_P14+91;
ma_P14_92=ma_P14+92;
ma_P14_93=ma_P14+93;
ma_P14_94=ma_P14+94;
ma_P14_95=ma_P14+95;
ma_P14_96=ma_P14+96;
ma_P14_97=ma_P14+97;
ma_P14_98=ma_P14+98;
ma_P14_99=ma_P14+99;
ma_P14_100=ma_P14+100;
ma14[1] = ma(C,ma_p14_1);
ma14[2] = ma(C,ma_p14_2);
ma14[3] = ma(C,ma_p14_3);
ma14[4] = ma(C,ma_p14_4);
ma14[5] = ma(C,ma_p14_5);
ma14[6] = ma(C,ma_p14_6);
ma14[7] = ma(C,ma_p14_7);
ma14[8] = ma(C,ma_p14_8);
ma14[9] = ma(C,ma_p14_9);
ma14[10] = ma(C,ma_p14_10);
ma14[11] = ma(C,ma_p14_11);
ma14[12] = ma(C,ma_p14_12);
ma14[13] = ma(C,ma_p14_13);
ma14[14] = ma(C,ma_p14_14);
ma14[15] = ma(C,ma_p14_15);
ma14[16] = ma(C,ma_p14_16);
ma14[17] = ma(C,ma_p14_17);
ma14[18] = ma(C,ma_p14_18);
ma14[19] = ma(C,ma_p14_19);
ma14[20] = ma(C,ma_p14_20);
ma14[21] = ma(C,ma_p14_21);
ma14[22] = ma(C,ma_p14_22);
ma14[23] = ma(C,ma_p14_23);
ma14[24] = ma(C,ma_p14_24);
ma14[25] = ma(C,ma_p14_25);
ma14[26] = ma(C,ma_p14_26);
ma14[27] = ma(C,ma_p14_27);
ma14[28] = ma(C,ma_p14_28);
ma14[29] = ma(C,ma_p14_29);
ma14[30] = ma(C,ma_p14_30);
ma14[31] = ma(C,ma_p14_31);
ma14[32] = ma(C,ma_p14_32);
ma14[33] = ma(C,ma_p14_33);
ma14[34] = ma(C,ma_p14_34);
ma14[35] = ma(C,ma_p14_35);
ma14[36] = ma(C,ma_p14_36);
ma14[37] = ma(C,ma_p14_37);
ma14[38] = ma(C,ma_p14_38);
ma14[39] = ma(C,ma_p14_39);
ma14[40] = ma(C,ma_p14_40);
ma14[41] = ma(C,ma_p14_41);
ma14[42] = ma(C,ma_p14_42);
ma14[43] = ma(C,ma_p14_43);
ma14[44] = ma(C,ma_p14_44);
ma14[45] = ma(C,ma_p14_45);
ma14[46] = ma(C,ma_p14_46);
ma14[47] = ma(C,ma_p14_47);
ma14[48] = ma(C,ma_p14_48);
ma14[49] = ma(C,ma_p14_49);
ma14[50] = ma(C,ma_p14_50);
ma14[51] = ma(C,ma_p14_51);
ma14[52] = ma(C,ma_p14_52);
ma14[53] = ma(C,ma_p14_53);
ma14[54] = ma(C,ma_p14_54);
ma14[55] = ma(C,ma_p14_55);
ma14[56] = ma(C,ma_p14_56);
ma14[57] = ma(C,ma_p14_57);
ma14[58] = ma(C,ma_p14_58);
ma14[59] = ma(C,ma_p14_59);
ma14[60] = ma(C,ma_p14_60);
ma14[61] = ma(C,ma_p14_61);
ma14[62] = ma(C,ma_p14_62);
ma14[63] = ma(C,ma_p14_63);
ma14[64] = ma(C,ma_p14_64);
ma14[65] = ma(C,ma_p14_65);
ma14[66] = ma(C,ma_p14_66);
ma14[67] = ma(C,ma_p14_67);
ma14[68] = ma(C,ma_p14_68);
ma14[69] = ma(C,ma_p14_69);
ma14[70] = ma(C,ma_p14_70);
ma14[71] = ma(C,ma_p14_71);
ma14[72] = ma(C,ma_p14_72);
ma14[73] = ma(C,ma_p14_73);
ma14[74] = ma(C,ma_p14_74);
ma14[75] = ma(C,ma_p14_75);
ma14[76] = ma(C,ma_p14_76);
ma14[77] = ma(C,ma_p14_77);
ma14[78] = ma(C,ma_p14_78);
ma14[79] = ma(C,ma_p14_79);
ma14[80] = ma(C,ma_p14_80);
ma14[81] = ma(C,ma_p14_81);
ma14[82] = ma(C,ma_p14_82);
ma14[83] = ma(C,ma_p14_83);
ma14[84] = ma(C,ma_p14_84);
ma14[85] = ma(C,ma_p14_85);
ma14[86] = ma(C,ma_p14_86);
ma14[87] = ma(C,ma_p14_87);
ma14[88] = ma(C,ma_p14_88);
ma14[89] = ma(C,ma_p14_89);
ma14[90] = ma(C,ma_p14_90);
ma14[91] = ma(C,ma_p14_91);
ma14[92] = ma(C,ma_p14_92);
ma14[93] = ma(C,ma_p14_93);
ma14[94] = ma(C,ma_p14_94);
ma14[95] = ma(C,ma_p14_95);
ma14[96] = ma(C,ma_p14_96);
ma14[97] = ma(C,ma_p14_97);
ma14[98] = ma(C,ma_p14_98);
ma14[99] = ma(C,ma_p14_99);
ma14[100] = ma(C,ma_p14_100);
매수강도=0;
매도강도=0;
If b_time1<=Time and Time<= e_time1 Then
{
For j=1 TO 100
{
If countif(ma11[1]<ma11,1)==1
and (ma12[1]<=ma13[1] and ma12>ma13)
and countif(ma14[j][1]<ma14[j],1)==1
and countif(ma15[1]<ma15,1)==1
and countif(ma16[1]<ma16,1)==1
and countif(ma17[1]<ma17,1)==1
Then
{
추세[j]="매수추세";
}
If countif(ma11[1]>ma11,1)==1
and(ma12[1]>=ma13[1] and ma12<ma13)
and countif(ma14[j][1]>ma14[j],1)==1
and countif(ma15[1]>ma15,1)==1
and countif(ma16[1]>ma16,1)==1
and countif(ma17[1]>ma17,1)==1
Then
{
추세[j] = "매도추세";
}
If 추세[j] == "매수추세" Then 매수강도 = 매수강도 +1;
If 추세[j] == "매도추세" Then 매도강도 = 매도강도 +1;
}
If 매수강도 == 100 Then 추세[0] = "매수추세";
If 매도강도 == 100 Then 추세[0] = "매도추세";
Plot1(iff(추세[0]=="매수추세",100,iff(추세[0]=="매도추세",-100,0)));
PlotBaseLine1(0);
}
미완
2016-06-21 14:41:22
답변에 감사드립니다.
만들어 주신 서식으로 시스템 매매시
청산 2번요청 항목내용에서 1번시스템매매 신호로 진입하고나서
1번추세가 변하고 2번 지표가 반대추세로 그대로 일때
2틱 수익에 주문이 들어가야 하는데
매수.매도 전체가 -1틱에 손해로 주문이 들어가는데 수정 부탁드립니다.
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 시스템매매 서식 요건 추가
> 안녕하세요
예스스탁입니다.
수식에서는 정정/취소주문은 가능하지 않습니다.
수식은 차트에 수신되는 데이터로 조건을 판단해
신호와 주문만을 발생할수 있습니다.
집행된 주문에 대해서는 정정/취소가 가능하지 않습니다.
또한 특정가격에 미리 주문을 내는 기능도 없습니다.
진입후 2개의 수식에서 모두 반대추세이면 청산,
1번은 반대추세인데 2번은 아직 변경되지 않았으면
매수는 진입가+2틱이하면 청산신호
매도는 진입가-2틱 이상이면 청산신호가 발생하게 수정해 드립니다.
input:b_time1(000000),e_time1(240000);
Var:ma_p11(10),ma_p12(10),ma_p13(10),ma_p14(100),
ma_p15(10),ma_p16(20),ma_p17(15);
var:ma11(0),ma12(0),ma13(0),ma15(0),ma16(0),ma17(0);
var:j(0),매수강도(0),매도강도(0);
var : ma_P14_1(0),ma_P14_2(0),ma_P14_3(0),ma_P14_4(0),ma_P14_5(0);
var : ma_P14_6(0),ma_P14_7(0),ma_P14_8(0),ma_P14_9(0),ma_P14_10(0);
var : ma_P14_11(0),ma_P14_12(0),ma_P14_13(0),ma_P14_14(0),ma_P14_15(0);
var : ma_P14_16(0),ma_P14_17(0),ma_P14_18(0),ma_P14_19(0),ma_P14_20(0);
var : ma_P14_21(0),ma_P14_22(0),ma_P14_23(0),ma_P14_24(0),ma_P14_25(0);
var : ma_P14_26(0),ma_P14_27(0),ma_P14_28(0),ma_P14_29(0),ma_P14_30(0);
var : ma_P14_31(0),ma_P14_32(0),ma_P14_33(0),ma_P14_34(0),ma_P14_35(0);
var : ma_P14_36(0),ma_P14_37(0),ma_P14_38(0),ma_P14_39(0),ma_P14_40(0);
var : ma_P14_41(0),ma_P14_42(0),ma_P14_43(0),ma_P14_44(0),ma_P14_45(0);
var : ma_P14_46(0),ma_P14_47(0),ma_P14_48(0),ma_P14_49(0),ma_P14_50(0);
var : ma_P14_51(0),ma_P14_52(0),ma_P14_53(0),ma_P14_54(0),ma_P14_55(0);
var : ma_P14_56(0),ma_P14_57(0),ma_P14_58(0),ma_P14_59(0),ma_P14_60(0);
var : ma_P14_61(0),ma_P14_62(0),ma_P14_63(0),ma_P14_64(0),ma_P14_65(0);
var : ma_P14_66(0),ma_P14_67(0),ma_P14_68(0),ma_P14_69(0),ma_P14_70(0);
var : ma_P14_71(0),ma_P14_72(0),ma_P14_73(0),ma_P14_74(0),ma_P14_75(0);
var : ma_P14_76(0),ma_P14_77(0),ma_P14_78(0),ma_P14_79(0),ma_P14_80(0);
var : ma_P14_81(0),ma_P14_82(0),ma_P14_83(0),ma_P14_84(0),ma_P14_85(0);
var : ma_P14_86(0),ma_P14_87(0),ma_P14_88(0),ma_P14_89(0),ma_P14_90(0);
var : ma_P14_91(0),ma_P14_92(0),ma_P14_93(0),ma_P14_94(0),ma_P14_95(0);
var : ma_P14_96(0),ma_P14_97(0),ma_P14_98(0),ma_P14_99(0),ma_P14_100(0);
Array:ma14[100](0),추세[100]("");
input: stoK_p11(150),stoK_p12(50),stoK_p13(10),
ma_period11(10),ma_period12(5),ma_period13(10),ma_period14(100),
ma_period15(10),ma_period16(20),ma_period17(15),상단(90),하단(10),익절틱수(10);
Var:stoK(0),stoD(0),TRIXv(0),TRIXsig(0),T(0);
ma11=ma(C,ma_P11);
ma12=ma(C,ma_P12);
ma13=ma(C,ma_P13);
ma15=ma(C,ma_P15);
ma16=ma(C,ma_P16);
ma17=ma(C,ma_P17);
ma_P14_1=ma_P14+1;
ma_P14_2=ma_P14+2;
ma_P14_3=ma_P14+3;
ma_P14_4=ma_P14+4;
ma_P14_5=ma_P14+5;
ma_P14_6=ma_P14+6;
ma_P14_7=ma_P14+7;
ma_P14_8=ma_P14+8;
ma_P14_9=ma_P14+9;
ma_P14_10=ma_P14+10;
ma_P14_11=ma_P14+11;
ma_P14_12=ma_P14+12;
ma_P14_13=ma_P14+13;
ma_P14_14=ma_P14+14;
ma_P14_15=ma_P14+15;
ma_P14_16=ma_P14+16;
ma_P14_17=ma_P14+17;
ma_P14_18=ma_P14+18;
ma_P14_19=ma_P14+19;
ma_P14_20=ma_P14+20;
ma_P14_21=ma_P14+21;
ma_P14_22=ma_P14+22;
ma_P14_23=ma_P14+23;
ma_P14_24=ma_P14+24;
ma_P14_25=ma_P14+25;
ma_P14_26=ma_P14+26;
ma_P14_27=ma_P14+27;
ma_P14_28=ma_P14+28;
ma_P14_29=ma_P14+29;
ma_P14_30=ma_P14+30;
ma_P14_31=ma_P14+31;
ma_P14_32=ma_P14+32;
ma_P14_33=ma_P14+33;
ma_P14_34=ma_P14+34;
ma_P14_35=ma_P14+35;
ma_P14_36=ma_P14+36;
ma_P14_37=ma_P14+37;
ma_P14_38=ma_P14+38;
ma_P14_39=ma_P14+39;
ma_P14_40=ma_P14+40;
ma_P14_41=ma_P14+41;
ma_P14_42=ma_P14+42;
ma_P14_43=ma_P14+43;
ma_P14_44=ma_P14+44;
ma_P14_45=ma_P14+45;
ma_P14_46=ma_P14+46;
ma_P14_47=ma_P14+47;
ma_P14_48=ma_P14+48;
ma_P14_49=ma_P14+49;
ma_P14_50=ma_P14+50;
ma_P14_51=ma_P14+51;
ma_P14_52=ma_P14+52;
ma_P14_53=ma_P14+53;
ma_P14_54=ma_P14+54;
ma_P14_55=ma_P14+55;
ma_P14_56=ma_P14+56;
ma_P14_57=ma_P14+57;
ma_P14_58=ma_P14+58;
ma_P14_59=ma_P14+59;
ma_P14_60=ma_P14+60;
ma_P14_61=ma_P14+61;
ma_P14_62=ma_P14+62;
ma_P14_63=ma_P14+63;
ma_P14_64=ma_P14+64;
ma_P14_65=ma_P14+65;
ma_P14_66=ma_P14+66;
ma_P14_67=ma_P14+67;
ma_P14_68=ma_P14+68;
ma_P14_69=ma_P14+69;
ma_P14_70=ma_P14+70;
ma_P14_71=ma_P14+71;
ma_P14_72=ma_P14+72;
ma_P14_73=ma_P14+73;
ma_P14_74=ma_P14+74;
ma_P14_75=ma_P14+75;
ma_P14_76=ma_P14+76;
ma_P14_77=ma_P14+77;
ma_P14_78=ma_P14+78;
ma_P14_79=ma_P14+79;
ma_P14_80=ma_P14+80;
ma_P14_81=ma_P14+81;
ma_P14_82=ma_P14+82;
ma_P14_83=ma_P14+83;
ma_P14_84=ma_P14+84;
ma_P14_85=ma_P14+85;
ma_P14_86=ma_P14+86;
ma_P14_87=ma_P14+87;
ma_P14_88=ma_P14+88;
ma_P14_89=ma_P14+89;
ma_P14_90=ma_P14+90;
ma_P14_91=ma_P14+91;
ma_P14_92=ma_P14+92;
ma_P14_93=ma_P14+93;
ma_P14_94=ma_P14+94;
ma_P14_95=ma_P14+95;
ma_P14_96=ma_P14+96;
ma_P14_97=ma_P14+97;
ma_P14_98=ma_P14+98;
ma_P14_99=ma_P14+99;
ma_P14_100=ma_P14+100;
ma14[1] = ma(C,ma_p14_1);
ma14[2] = ma(C,ma_p14_2);
ma14[3] = ma(C,ma_p14_3);
ma14[4] = ma(C,ma_p14_4);
ma14[5] = ma(C,ma_p14_5);
ma14[6] = ma(C,ma_p14_6);
ma14[7] = ma(C,ma_p14_7);
ma14[8] = ma(C,ma_p14_8);
ma14[9] = ma(C,ma_p14_9);
ma14[10] = ma(C,ma_p14_10);
ma14[11] = ma(C,ma_p14_11);
ma14[12] = ma(C,ma_p14_12);
ma14[13] = ma(C,ma_p14_13);
ma14[14] = ma(C,ma_p14_14);
ma14[15] = ma(C,ma_p14_15);
ma14[16] = ma(C,ma_p14_16);
ma14[17] = ma(C,ma_p14_17);
ma14[18] = ma(C,ma_p14_18);
ma14[19] = ma(C,ma_p14_19);
ma14[20] = ma(C,ma_p14_20);
ma14[21] = ma(C,ma_p14_21);
ma14[22] = ma(C,ma_p14_22);
ma14[23] = ma(C,ma_p14_23);
ma14[24] = ma(C,ma_p14_24);
ma14[25] = ma(C,ma_p14_25);
ma14[26] = ma(C,ma_p14_26);
ma14[27] = ma(C,ma_p14_27);
ma14[28] = ma(C,ma_p14_28);
ma14[29] = ma(C,ma_p14_29);
ma14[30] = ma(C,ma_p14_30);
ma14[31] = ma(C,ma_p14_31);
ma14[32] = ma(C,ma_p14_32);
ma14[33] = ma(C,ma_p14_33);
ma14[34] = ma(C,ma_p14_34);
ma14[35] = ma(C,ma_p14_35);
ma14[36] = ma(C,ma_p14_36);
ma14[37] = ma(C,ma_p14_37);
ma14[38] = ma(C,ma_p14_38);
ma14[39] = ma(C,ma_p14_39);
ma14[40] = ma(C,ma_p14_40);
ma14[41] = ma(C,ma_p14_41);
ma14[42] = ma(C,ma_p14_42);
ma14[43] = ma(C,ma_p14_43);
ma14[44] = ma(C,ma_p14_44);
ma14[45] = ma(C,ma_p14_45);
ma14[46] = ma(C,ma_p14_46);
ma14[47] = ma(C,ma_p14_47);
ma14[48] = ma(C,ma_p14_48);
ma14[49] = ma(C,ma_p14_49);
ma14[50] = ma(C,ma_p14_50);
ma14[51] = ma(C,ma_p14_51);
ma14[52] = ma(C,ma_p14_52);
ma14[53] = ma(C,ma_p14_53);
ma14[54] = ma(C,ma_p14_54);
ma14[55] = ma(C,ma_p14_55);
ma14[56] = ma(C,ma_p14_56);
ma14[57] = ma(C,ma_p14_57);
ma14[58] = ma(C,ma_p14_58);
ma14[59] = ma(C,ma_p14_59);
ma14[60] = ma(C,ma_p14_60);
ma14[61] = ma(C,ma_p14_61);
ma14[62] = ma(C,ma_p14_62);
ma14[63] = ma(C,ma_p14_63);
ma14[64] = ma(C,ma_p14_64);
ma14[65] = ma(C,ma_p14_65);
ma14[66] = ma(C,ma_p14_66);
ma14[67] = ma(C,ma_p14_67);
ma14[68] = ma(C,ma_p14_68);
ma14[69] = ma(C,ma_p14_69);
ma14[70] = ma(C,ma_p14_70);
ma14[71] = ma(C,ma_p14_71);
ma14[72] = ma(C,ma_p14_72);
ma14[73] = ma(C,ma_p14_73);
ma14[74] = ma(C,ma_p14_74);
ma14[75] = ma(C,ma_p14_75);
ma14[76] = ma(C,ma_p14_76);
ma14[77] = ma(C,ma_p14_77);
ma14[78] = ma(C,ma_p14_78);
ma14[79] = ma(C,ma_p14_79);
ma14[80] = ma(C,ma_p14_80);
ma14[81] = ma(C,ma_p14_81);
ma14[82] = ma(C,ma_p14_82);
ma14[83] = ma(C,ma_p14_83);
ma14[84] = ma(C,ma_p14_84);
ma14[85] = ma(C,ma_p14_85);
ma14[86] = ma(C,ma_p14_86);
ma14[87] = ma(C,ma_p14_87);
ma14[88] = ma(C,ma_p14_88);
ma14[89] = ma(C,ma_p14_89);
ma14[90] = ma(C,ma_p14_90);
ma14[91] = ma(C,ma_p14_91);
ma14[92] = ma(C,ma_p14_92);
ma14[93] = ma(C,ma_p14_93);
ma14[94] = ma(C,ma_p14_94);
ma14[95] = ma(C,ma_p14_95);
ma14[96] = ma(C,ma_p14_96);
ma14[97] = ma(C,ma_p14_97);
ma14[98] = ma(C,ma_p14_98);
ma14[99] = ma(C,ma_p14_99);
ma14[100] = ma(C,ma_p14_100);
매수강도=0;
매도강도=0;
If b_time1<=Time and Time<= e_time1 Then
{
For j=1 TO 100
{
If countif(ma11[1]<ma11,1)==1
and (ma12[1]<=ma13[1] and ma12>ma13)
and countif(ma14[j][1]<ma14[j],1)==1
and countif(ma15[1]<ma15,1)==1
and countif(ma16[1]<ma16,1)==1
and countif(ma17[1]<ma17,1)==1
Then
{
추세[j]="매수추세";
}
If countif(ma11[1]>ma11,1)==1
and(ma12[1]>=ma13[1] and ma12<ma13)
and countif(ma14[j][1]>ma14[j],1)==1
and countif(ma15[1]>ma15,1)==1
and countif(ma16[1]>ma16,1)==1
and countif(ma17[1]>ma17,1)==1
Then
{
추세[j] = "매도추세";
}
If 추세[j] == "매수추세" Then 매수강도 = 매수강도 +1;
If 추세[j] == "매도추세" Then 매도강도 = 매도강도 +1;
}
If 매수강도 == 100 Then 추세[0] = "매수추세";
If 매도강도 == 100 Then 추세[0] = "매도추세";
#Plot1(iff(추세[0]=="매수추세",100,iff(추세[0]=="매도추세",-100,0)));
#PlotBaseLine1(0);
}
If b_time1 <= Time and Time <= e_time1 Then
{
stoK = StochasticsK(stoK_p11,stoK_p12);
stoD = StochasticsD(stoK_p11,stoK_p12,stoK_p13);
If countif(ma(C,ma_Period11)[1] < ma(C,ma_Period11),1) == 1
and (ma(C,ma_Period12)[1] <= ma(C,ma_Period13)[1] and ma(C,ma_Period12) > ma(C,ma_Period13))
and countif(ma(C,ma_Period14)[1] < ma(C,ma_Period14),1) == 1
and countif(ma(C,ma_Period15)[1] < ma(C,ma_Period15),1) == 1
and countif(ma(C,ma_Period16)[1] < ma(C,ma_Period16),1) == 1
and countif(ma(C,ma_Period17)[1] < ma(C,ma_Period17),1) == 1
Then
{
T = 1;
}
If countif(ma(C,ma_Period11)[1] > ma(C,ma_Period11),1) == 1
and (ma(C,ma_Period12)[1] >= ma(C,ma_Period13)[1] and ma(C,ma_Period12) < ma(C,ma_Period13))
and countif(ma(C,ma_Period14)[1] > ma(C,ma_Period14),1) == 1
and countif(ma(C,ma_Period15)[1] > ma(C,ma_Period15),1) == 1
and countif(ma(C,ma_Period16)[1] > ma(C,ma_Period16),1) == 1
and countif(ma(C,ma_Period17)[1] > ma(C,ma_Period17),1) == 1
Then
{
T = -1;
}
if T == 1 and CrossDown(stok,하단) Then
buy("매수",AtMarket);
if MarketPosition == 1 Then
{
if crossup(stok,상단) Then
exitlong("매수1",AtMarket);
if T == -1 and 추세[0] == "매도추세" Then
exitlong("추세전환(-)",AtMarket);
if T == -1 and 추세[0] == "매수추세" Then
exitlong("bx",AtStop,EntryPrice+PriceScale*2);
}
if T == -1 and Crossup(stok,상단) Then
sell("매도",AtMarket);
if MarketPosition == -1 Then
{
if Crossdown(stok,하단) Then
ExitShort("매도1",AtMarket);
if T == 1 and 추세[0] == "매수추세" Then
exitShort("추세전환(+)",AtMarket);
if T == 1 and 추세[0] == "매도추세" Then
exitShort("sx",atstop,EntryPrice-PriceScale*2);
}
}
SetStopProfittarget(PriceScale*익절틱수,PointStop);
즐거운 하루되세요
> 미완 님이 쓴 글입니다.
> 제목 : 시스템매매 서식 요건 추가
> [진입조건]
1. 1번 시스템신호 기준으로 진입
[청산조건] => 기존 1번 청산조건에 추가 부문
1. 목표 틱이나 기준선(10, 90) 수익 돌파 시 자동 청산(기존 방식)
2. 1번 시스템신호 조건 진입 후 손실시 추세가 변할 경우 아래 내용 청산조건 추가
◆ 진입 후 1번 시스템 신호가 추세 변경 시 2번 지표 추세도 같은 추세신호 변경일 경우
바로 청산
◆ 진입 후 1번 시스템 신호가 추세 변경되었으나 2번 지표 추세가 반대 추세일 경우
2틱 수익에 자동 청산 주문
◆ 2틱 자동 청산 주문 후 2번 지표 추세도 1번 시스템 추세와 동일하게 추세 변경 시
2틱 자동 청산 주문도 바로 정정손절주문 청산
{1번 시스템 신호}
input:b_time1(000000),e_time1(240000),
stoK_p11(150),stoK_p12(50),stoK_p13(10),
ma_p11(10),ma_p12(5),ma_p13(10),ma_p14(100),
ma_p15(10),ma_p16(20),ma_p17(15),상단(90),하단(10),익절틱수(10);
Var:stoK(0),stoD(0),TRIXv(0),TRIXsig(0),T(0);
If b_time1 <= Time and Time <= e_time1 Then
{
stoK = StochasticsK(stoK_p11,stoK_p12);
stoD = StochasticsD(stoK_p11,stoK_p12,stoK_p13);
If countif(ma(C,ma_p11)[1] < ma(C,ma_p11),1) == 1
and (ma(C,ma_p12)[1] <= ma(C,ma_p13)[1] and ma(C,ma_p12) > ma(C,ma_p13))
and countif(ma(C,ma_p14)[1] < ma(C,ma_p14),1) == 1
and countif(ma(C,ma_p15)[1] < ma(C,ma_p15),1) == 1
and countif(ma(C,ma_p16)[1] < ma(C,ma_p16),1) == 1
and countif(ma(C,ma_p17)[1] < ma(C,ma_p17),1) == 1
Then
{
T = 1;
}
If countif(ma(C,ma_p11)[1] > ma(C,ma_p11),1) == 1
and (ma(C,ma_p12)[1] >= ma(C,ma_p13)[1] and ma(C,ma_p12) < ma(C,ma_p13))
and countif(ma(C,ma_p14)[1] > ma(C,ma_p14),1) == 1
and countif(ma(C,ma_p15)[1] > ma(C,ma_p15),1) == 1
and countif(ma(C,ma_p16)[1] > ma(C,ma_p16),1) == 1
and countif(ma(C,ma_p17)[1] > ma(C,ma_p17),1) == 1
Then
{
T = -1;
}
if T == 1 and CrossDown(stok,하단) Then
buy("매수",AtMarket);
if MarketPosition == 1 Then
{
if crossup(stok,상단) Then
exitlong("매수1",AtMarket);
if T == -1 Then
exitlong("추세전환(-)",AtMarket);
}
if T == -1 and Crossup(stok,상단) Then
sell("매도",AtMarket);
if MarketPosition == -1 Then
{
if Crossdown(stok,하단) Then
ExitShort("매도1",AtMarket);
if T == 1 Then
exitShort("추세전환(+)",AtMarket);
}
}
SetStopProfittarget(PriceScale*익절틱수,PointStop);
{2번 추세 지표}
input:b_time1(000000),e_time1(240000);
Var:ma_p11(10),ma_p12(10),ma_p13(10),ma_p14(100),
ma_p15(10),ma_p16(20),ma_p17(15);
var:ma11(0),ma12(0),ma13(0),ma15(0),ma16(0),ma17(0);
var:j(0),매수강도(0),매도강도(0);
var : ma_P14_1(0),ma_P14_2(0),ma_P14_3(0),ma_P14_4(0),ma_P14_5(0);
var : ma_P14_6(0),ma_P14_7(0),ma_P14_8(0),ma_P14_9(0),ma_P14_10(0);
var : ma_P14_11(0),ma_P14_12(0),ma_P14_13(0),ma_P14_14(0),ma_P14_15(0);
var : ma_P14_16(0),ma_P14_17(0),ma_P14_18(0),ma_P14_19(0),ma_P14_20(0);
var : ma_P14_21(0),ma_P14_22(0),ma_P14_23(0),ma_P14_24(0),ma_P14_25(0);
var : ma_P14_26(0),ma_P14_27(0),ma_P14_28(0),ma_P14_29(0),ma_P14_30(0);
var : ma_P14_31(0),ma_P14_32(0),ma_P14_33(0),ma_P14_34(0),ma_P14_35(0);
var : ma_P14_36(0),ma_P14_37(0),ma_P14_38(0),ma_P14_39(0),ma_P14_40(0);
var : ma_P14_41(0),ma_P14_42(0),ma_P14_43(0),ma_P14_44(0),ma_P14_45(0);
var : ma_P14_46(0),ma_P14_47(0),ma_P14_48(0),ma_P14_49(0),ma_P14_50(0);
var : ma_P14_51(0),ma_P14_52(0),ma_P14_53(0),ma_P14_54(0),ma_P14_55(0);
var : ma_P14_56(0),ma_P14_57(0),ma_P14_58(0),ma_P14_59(0),ma_P14_60(0);
var : ma_P14_61(0),ma_P14_62(0),ma_P14_63(0),ma_P14_64(0),ma_P14_65(0);
var : ma_P14_66(0),ma_P14_67(0),ma_P14_68(0),ma_P14_69(0),ma_P14_70(0);
var : ma_P14_71(0),ma_P14_72(0),ma_P14_73(0),ma_P14_74(0),ma_P14_75(0);
var : ma_P14_76(0),ma_P14_77(0),ma_P14_78(0),ma_P14_79(0),ma_P14_80(0);
var : ma_P14_81(0),ma_P14_82(0),ma_P14_83(0),ma_P14_84(0),ma_P14_85(0);
var : ma_P14_86(0),ma_P14_87(0),ma_P14_88(0),ma_P14_89(0),ma_P14_90(0);
var : ma_P14_91(0),ma_P14_92(0),ma_P14_93(0),ma_P14_94(0),ma_P14_95(0);
var : ma_P14_96(0),ma_P14_97(0),ma_P14_98(0),ma_P14_99(0),ma_P14_100(0);
Array:ma14[100](0),추세[100]("");
ma11=ma(C,ma_P11);
ma12=ma(C,ma_P12);
ma13=ma(C,ma_P13);
ma15=ma(C,ma_P15);
ma16=ma(C,ma_P16);
ma17=ma(C,ma_P17);
ma_P14_1=ma_P14+1;
ma_P14_2=ma_P14+2;
ma_P14_3=ma_P14+3;
ma_P14_4=ma_P14+4;
ma_P14_5=ma_P14+5;
ma_P14_6=ma_P14+6;
ma_P14_7=ma_P14+7;
ma_P14_8=ma_P14+8;
ma_P14_9=ma_P14+9;
ma_P14_10=ma_P14+10;
ma_P14_11=ma_P14+11;
ma_P14_12=ma_P14+12;
ma_P14_13=ma_P14+13;
ma_P14_14=ma_P14+14;
ma_P14_15=ma_P14+15;
ma_P14_16=ma_P14+16;
ma_P14_17=ma_P14+17;
ma_P14_18=ma_P14+18;
ma_P14_19=ma_P14+19;
ma_P14_20=ma_P14+20;
ma_P14_21=ma_P14+21;
ma_P14_22=ma_P14+22;
ma_P14_23=ma_P14+23;
ma_P14_24=ma_P14+24;
ma_P14_25=ma_P14+25;
ma_P14_26=ma_P14+26;
ma_P14_27=ma_P14+27;
ma_P14_28=ma_P14+28;
ma_P14_29=ma_P14+29;
ma_P14_30=ma_P14+30;
ma_P14_31=ma_P14+31;
ma_P14_32=ma_P14+32;
ma_P14_33=ma_P14+33;
ma_P14_34=ma_P14+34;
ma_P14_35=ma_P14+35;
ma_P14_36=ma_P14+36;
ma_P14_37=ma_P14+37;
ma_P14_38=ma_P14+38;
ma_P14_39=ma_P14+39;
ma_P14_40=ma_P14+40;
ma_P14_41=ma_P14+41;
ma_P14_42=ma_P14+42;
ma_P14_43=ma_P14+43;
ma_P14_44=ma_P14+44;
ma_P14_45=ma_P14+45;
ma_P14_46=ma_P14+46;
ma_P14_47=ma_P14+47;
ma_P14_48=ma_P14+48;
ma_P14_49=ma_P14+49;
ma_P14_50=ma_P14+50;
ma_P14_51=ma_P14+51;
ma_P14_52=ma_P14+52;
ma_P14_53=ma_P14+53;
ma_P14_54=ma_P14+54;
ma_P14_55=ma_P14+55;
ma_P14_56=ma_P14+56;
ma_P14_57=ma_P14+57;
ma_P14_58=ma_P14+58;
ma_P14_59=ma_P14+59;
ma_P14_60=ma_P14+60;
ma_P14_61=ma_P14+61;
ma_P14_62=ma_P14+62;
ma_P14_63=ma_P14+63;
ma_P14_64=ma_P14+64;
ma_P14_65=ma_P14+65;
ma_P14_66=ma_P14+66;
ma_P14_67=ma_P14+67;
ma_P14_68=ma_P14+68;
ma_P14_69=ma_P14+69;
ma_P14_70=ma_P14+70;
ma_P14_71=ma_P14+71;
ma_P14_72=ma_P14+72;
ma_P14_73=ma_P14+73;
ma_P14_74=ma_P14+74;
ma_P14_75=ma_P14+75;
ma_P14_76=ma_P14+76;
ma_P14_77=ma_P14+77;
ma_P14_78=ma_P14+78;
ma_P14_79=ma_P14+79;
ma_P14_80=ma_P14+80;
ma_P14_81=ma_P14+81;
ma_P14_82=ma_P14+82;
ma_P14_83=ma_P14+83;
ma_P14_84=ma_P14+84;
ma_P14_85=ma_P14+85;
ma_P14_86=ma_P14+86;
ma_P14_87=ma_P14+87;
ma_P14_88=ma_P14+88;
ma_P14_89=ma_P14+89;
ma_P14_90=ma_P14+90;
ma_P14_91=ma_P14+91;
ma_P14_92=ma_P14+92;
ma_P14_93=ma_P14+93;
ma_P14_94=ma_P14+94;
ma_P14_95=ma_P14+95;
ma_P14_96=ma_P14+96;
ma_P14_97=ma_P14+97;
ma_P14_98=ma_P14+98;
ma_P14_99=ma_P14+99;
ma_P14_100=ma_P14+100;
ma14[1] = ma(C,ma_p14_1);
ma14[2] = ma(C,ma_p14_2);
ma14[3] = ma(C,ma_p14_3);
ma14[4] = ma(C,ma_p14_4);
ma14[5] = ma(C,ma_p14_5);
ma14[6] = ma(C,ma_p14_6);
ma14[7] = ma(C,ma_p14_7);
ma14[8] = ma(C,ma_p14_8);
ma14[9] = ma(C,ma_p14_9);
ma14[10] = ma(C,ma_p14_10);
ma14[11] = ma(C,ma_p14_11);
ma14[12] = ma(C,ma_p14_12);
ma14[13] = ma(C,ma_p14_13);
ma14[14] = ma(C,ma_p14_14);
ma14[15] = ma(C,ma_p14_15);
ma14[16] = ma(C,ma_p14_16);
ma14[17] = ma(C,ma_p14_17);
ma14[18] = ma(C,ma_p14_18);
ma14[19] = ma(C,ma_p14_19);
ma14[20] = ma(C,ma_p14_20);
ma14[21] = ma(C,ma_p14_21);
ma14[22] = ma(C,ma_p14_22);
ma14[23] = ma(C,ma_p14_23);
ma14[24] = ma(C,ma_p14_24);
ma14[25] = ma(C,ma_p14_25);
ma14[26] = ma(C,ma_p14_26);
ma14[27] = ma(C,ma_p14_27);
ma14[28] = ma(C,ma_p14_28);
ma14[29] = ma(C,ma_p14_29);
ma14[30] = ma(C,ma_p14_30);
ma14[31] = ma(C,ma_p14_31);
ma14[32] = ma(C,ma_p14_32);
ma14[33] = ma(C,ma_p14_33);
ma14[34] = ma(C,ma_p14_34);
ma14[35] = ma(C,ma_p14_35);
ma14[36] = ma(C,ma_p14_36);
ma14[37] = ma(C,ma_p14_37);
ma14[38] = ma(C,ma_p14_38);
ma14[39] = ma(C,ma_p14_39);
ma14[40] = ma(C,ma_p14_40);
ma14[41] = ma(C,ma_p14_41);
ma14[42] = ma(C,ma_p14_42);
ma14[43] = ma(C,ma_p14_43);
ma14[44] = ma(C,ma_p14_44);
ma14[45] = ma(C,ma_p14_45);
ma14[46] = ma(C,ma_p14_46);
ma14[47] = ma(C,ma_p14_47);
ma14[48] = ma(C,ma_p14_48);
ma14[49] = ma(C,ma_p14_49);
ma14[50] = ma(C,ma_p14_50);
ma14[51] = ma(C,ma_p14_51);
ma14[52] = ma(C,ma_p14_52);
ma14[53] = ma(C,ma_p14_53);
ma14[54] = ma(C,ma_p14_54);
ma14[55] = ma(C,ma_p14_55);
ma14[56] = ma(C,ma_p14_56);
ma14[57] = ma(C,ma_p14_57);
ma14[58] = ma(C,ma_p14_58);
ma14[59] = ma(C,ma_p14_59);
ma14[60] = ma(C,ma_p14_60);
ma14[61] = ma(C,ma_p14_61);
ma14[62] = ma(C,ma_p14_62);
ma14[63] = ma(C,ma_p14_63);
ma14[64] = ma(C,ma_p14_64);
ma14[65] = ma(C,ma_p14_65);
ma14[66] = ma(C,ma_p14_66);
ma14[67] = ma(C,ma_p14_67);
ma14[68] = ma(C,ma_p14_68);
ma14[69] = ma(C,ma_p14_69);
ma14[70] = ma(C,ma_p14_70);
ma14[71] = ma(C,ma_p14_71);
ma14[72] = ma(C,ma_p14_72);
ma14[73] = ma(C,ma_p14_73);
ma14[74] = ma(C,ma_p14_74);
ma14[75] = ma(C,ma_p14_75);
ma14[76] = ma(C,ma_p14_76);
ma14[77] = ma(C,ma_p14_77);
ma14[78] = ma(C,ma_p14_78);
ma14[79] = ma(C,ma_p14_79);
ma14[80] = ma(C,ma_p14_80);
ma14[81] = ma(C,ma_p14_81);
ma14[82] = ma(C,ma_p14_82);
ma14[83] = ma(C,ma_p14_83);
ma14[84] = ma(C,ma_p14_84);
ma14[85] = ma(C,ma_p14_85);
ma14[86] = ma(C,ma_p14_86);
ma14[87] = ma(C,ma_p14_87);
ma14[88] = ma(C,ma_p14_88);
ma14[89] = ma(C,ma_p14_89);
ma14[90] = ma(C,ma_p14_90);
ma14[91] = ma(C,ma_p14_91);
ma14[92] = ma(C,ma_p14_92);
ma14[93] = ma(C,ma_p14_93);
ma14[94] = ma(C,ma_p14_94);
ma14[95] = ma(C,ma_p14_95);
ma14[96] = ma(C,ma_p14_96);
ma14[97] = ma(C,ma_p14_97);
ma14[98] = ma(C,ma_p14_98);
ma14[99] = ma(C,ma_p14_99);
ma14[100] = ma(C,ma_p14_100);
매수강도=0;
매도강도=0;
If b_time1<=Time and Time<= e_time1 Then
{
For j=1 TO 100
{
If countif(ma11[1]<ma11,1)==1
and (ma12[1]<=ma13[1] and ma12>ma13)
and countif(ma14[j][1]<ma14[j],1)==1
and countif(ma15[1]<ma15,1)==1
and countif(ma16[1]<ma16,1)==1
and countif(ma17[1]<ma17,1)==1
Then
{
추세[j]="매수추세";
}
If countif(ma11[1]>ma11,1)==1
and(ma12[1]>=ma13[1] and ma12<ma13)
and countif(ma14[j][1]>ma14[j],1)==1
and countif(ma15[1]>ma15,1)==1
and countif(ma16[1]>ma16,1)==1
and countif(ma17[1]>ma17,1)==1
Then
{
추세[j] = "매도추세";
}
If 추세[j] == "매수추세" Then 매수강도 = 매수강도 +1;
If 추세[j] == "매도추세" Then 매도강도 = 매도강도 +1;
}
If 매수강도 == 100 Then 추세[0] = "매수추세";
If 매도강도 == 100 Then 추세[0] = "매도추세";
Plot1(iff(추세[0]=="매수추세",100,iff(추세[0]=="매도추세",-100,0)));
PlotBaseLine1(0);
}
다음글
이전글