커뮤니티
문의합니다.
2012-11-12 14:07:50
383
글번호 56386
Var1=PROC(Close, 14, Diff)
Var2=Mov(Var1, 9, S)
Var3= PerB(Close, 12, 2,s)
Var4=Mov(Var3, 9, S)
Var5=CO(3, 10)
Var6=Mov(Var5, 9, S)
Var7= MFI(14)
Var8=Mov(Var7, 9, S)
Var9= RSQR(Close, 14)
Var10=Mov(Var9, 9, S)
Var11= ADXR(14, 1)
Var12= ADX(14, 1)
Var13= LRI(Close, 28)
Var14= PROC(Close, 14, Diff, 1)
Var15= DIPlus(14, 1)
Var16= DIMinus(14, 1)
Var17= SwingIndex(1)
Var18=WillPerR(14, 1)
Var19=MACD(Close, 12, 26, 1)
Var20=MACD(Close, 12, 26)
Var21= Mov(Var20, 9, S)
Var22=RSI(Close, 14)
Var23=ADXR(14)
Var24=DIPlus(14)
Var25= AD()
Var26=Mov(Var25, 9, S)
Var27= ADX(14)
Var28=OBV()
Var29=Mov(Var28, 9, S)
Var30= SwingIndex()
Var31= WillPerR(14)
Var32=DIMinus(14)
Var33=DIMinus(14, 1)
Var34= LRS(Close, 14, 1)
Var35=ATR(14)
Var36= TSF(Close, 14)
Var37=Mov(Var34, 9, S)
Var38= VHF(Close, 14)
Var39=Mov(Var38, 9, S)
Var40= LRI(Close, 14, 1)
Var41=Mov(Var40, 9, S)
Var42=Mov(Var22, 9, S)
Var43=Mov(Var35, 9, S)
Var44=TSI(Close, 12, 26, S)
Var45=Mov(Var44, 9, S)
Var46=Mov(Var36, 9, S)
Var47=Mov(close, Len1, s)
Var48=Mov(close, Len2, s)
Var49=Mov(close, Len3, s)
Var50=TSF(Close, 14)
Var51=Mov(Var50, 9, S)
Var52= MAO(Close, 10, 20, S, Per, 1)
Var53=Mov(Var52, 9, S)
Var54=MAO(Close, 10, 20, S, Per)
Var55=Mov(close, Len4, s)
Var56=Mov(close, Len5, s)
Var57=Mov(close, Len6, s)
Var58=Mov(close, Len7, s)
Var59= LRI(Close, 14)
Var60= Mov(Var59, 9, S)
Var61=DEMA(Close, 21)
Var62=TEMA(Close, 21)
Var63= WillPerR(14)
Var64= Mov(Var63, 9, S)
Var65=TRIX(Close, 14)
Var66= Mov(Var65, 9, S)
Var67= Sigma(Close, 20)
Var68= Mov(Var67, 9, S)
Var69= SONAR(Close, 20, 5, Per, 1)
Var70= Mov(Var69, 9, S)
Var71= DEMA(Close, 21, 1)
Var72=BBandMid(Close, 12, 2, S, 1)
Var74=PSAR(0.02, 0.2)
Var75=LRS(Close, 14)
If 0904=<ttime And ttime< 1452 And position(0) = 0 And crossup(Var24, Var27)_
And Var4(0)-var4(2)>0 And Var8(0)-var8(1)>0 And Var68(0)-var68(1)>0 And Var7(1)-var7(2)>0And Var5(0)-var5(1)>0 And Var9(0)-var9(1)>0And Var44(0)-var44(1)>0And Var53(0)-var53(1)>0 And Var62<var59 And Var6<var5 And Var2<var1 And Var27>20And Var23>20 And Var27(1)-var27(2)>0 And Var23(0)-var23(1)>0Then
Call buy("매수", Atstop, 1,close(1))
End If
If 0902=<ttime And ttime< 1452 And position(0) = 0 And crossup(Var50,Var51 )_
And Var8(0)-var8(1)>0 And Var6<var5 And Var39(0)-var39(1)>0And Var1(0)-var1(1)>0And Var64(0)-var64(1)>0And Var65>0And Var3(0)-var3(1)>0 And Var6>0 And Var2<var1 And Var32<var27 And Var60<var58 And Var5(0)-var5(1)>0 And Var38(0)-var38(1)>0 And Var43(0)-var43(1)>0 And Var43<var35 And Var27(0)-var27(1)>0 And Var23(0)-var23(1)>0Then
Call buy("매수", Atstop, 1,close(1))
End If
If 0902=<ttime And ttime< 1452 And position(0) = 0 And crossup(Var50,Var51 )_
And Var5(1)-var5(2)>0 And Var6<var5 And Var39(0)-var39(1)>0And Var1(0)-var1(1)>0And Var64(0)-var64(1)>0And Var65>0And Var3(0)-var3(1)>0 And Var6>0 And Var2<var1 And Var32<var27 And Var60<var58 And Var5(0)-var5(1)>0 And Var38(0)-var38(1)>0 And Var43(0)-var43(1)>0 And Var43<var35 And Var27(0)-var27(1)>0 And Var23(0)-var23(1)>0Then
Call buy("매수", Atstop, 1,close(1))
End If
If 0902=<ttime And ttime< 1502 And position(0) = 1 And crossdn(Var24, 20) _
And Var27<var32 And Var9(0)-var9(1)<0And Var38(0)-var38(1)<0 And Var2(0)-var2(1)<0 And Var9<var10 And Var7<var8 And Var3(0)-var3(1)<0And Var35(0)-var35(1)<0Then
Call exitlong("매수청산", Atmarket)
End If
If 0902=<ttime And ttime< 1502 and position(0) = 1 and crossdn(Var24, var32) _
And Var1<0And Var5(0)-var5(1)<0 And Var5<0 And Var10(0)-var10(1)<0 And Var38(0)-var38(1)<0And Var44(0)-var44(1)<0 Then
Call exitlong("매수청산", Atmarket)
End If
If 0902=<ttime And ttime< 1502 and position(0) = 1 and crossdn(Var24, var32) _
And Var7(0)-var7(1)<0 and var24<var27 and var10(0)-var10(1)<0 and var44<var45 and var24<var23 and var24<20 and var34(0)-var34(1)<0 then
Call exitlong("매수청산", Atmarket)
End If
If 0902=<ttime And ttime< 1452 And position(0) = 0 And crossdn(Var44, Var45) _
And Var10(0)-var10(1)<0 And Var59<var62 And Var1(0)-var1(1)<0And Var5(0)-var5(1)<0And Var52<var53 And Var5<var6 And Var48(0)-var48(1)<0 And Var50<var51 And Var23(1)-var23(2)>0And Var20<var21 And Var24<var23 And Var4(0)-var4(1)<0 And Var7(0)-var7(1)<0And Var30(0)-var30(1)<0And Var27(0)-var27(1)>0 And Var23(0)-var23(1)>0Then
Call sell("매도", Atstop, 1, close(1))
End If
If 0904=<ttime And ttime< 1452 And position(0) = 0 And crossdn(Var50, Var51) _
And Var20<0 And Var32(0)-var32(1)>0And Var1(0)-var1(1)<0And Var54(0)-var54(1)<0And Var48(0)-var48(1)<0And Var23(0)-var23(1)>0And Var44(0)-var44(1)<0And Var30<0 And Var44<var45 And Var7<var8 And Var4(0)-var4(1)<0 And Var23<var27 And Var27(0)-var27(1)>0Then
Call sell("매도", Atstop, 1, close(1))
End If
If 0904=<ttime And ttime< 1452 And position(0) = 0 And crossdn(Var50, Var51) _
And Var23(0)-var23(1)>0 And Var7<var8 And Var39(0)-var39(1)<0And Var32(0)-var32(1)>0And Var52(0)-var52(1)<0And Var27<var32 And Var48(0)-var48(1)<0And Var7(0)-var7(1)<0 And Var25(0)-var25(1)<0 And Var4(0)-var4(1)<0 And Var44(0)-var44(1)<0 And Var30<0 And Var23>20And Var27(0)-var27(1)>0Then
Call sell("매도", Atstop, 1, close(1))
End If
If 0902=<ttime And ttime< 1502 And position(0) = -1And crossup(Var37, 0) _
And Var5(0)-var5(1)>0And Var45<var44 And Var32<var27 And Var20(0)-var20(1)>0And Var39(0)-var39(1)>0Then
Call exitshort("매도청산", Atmarket)
End If
If 0902=<ttime And ttime< 1502 And position(0) = -1And crossup(Var2, 0) _
And Var27<var24 And Var6(0)-var6(1)>0And Var39<var38 And Var1(0)-var1(1)>0 And Var39(0)-var39(1)>0Then
Call exitshort("매도청산", Atmarket)
End If
If 0902=<ttime And ttime< 1502 and position(0) = -1And crossup(Var44, var45) _
And Var30(0)-var30(1)>0And Var6(0)-var6(1)>0And Var43<var35 And Var39(0)-var39(1)>0And Var4<var3 And Var35(1)-var35(2)>0Then
Call exitshort("매도청산", Atmarket)
End If
If ttime = 1504 Then
Call exitlong("종가청산", Atmarket)
Call exitshort("종가청산", Atmarket)
End If
전에 대신증권에서 영어 용어도 잘 모르고 예를든걸 짜주어서 했던 것입니다.
이것은 분봉 하나로 설정할 수 있고 2분이면 2분, 5분이면 5분 하나만 할 수 밖에 없습니다.
제가 원하는건 주 메뉴는 3분이고 10분이나 60분을 같이 적용하여 10분이나 60분이
하락추세일때는 3분에서 매수가 안 나오는것을 원합니다.
예시를 짜주시기 바랍니다.
9시 2분 시작해서 오후 3시 4분에 정리했으면 합니다.
예시를 주면 복사해서 편집 적용할 수 있게 해 주셧으면 합니다.(선물챠트원합니다.)
답변 1
예스스탁 예스스탁 답변
2012-11-12 11:07:42
안녕하세요
예스스탁입니다.
input : Len1(5),Len2(10),Len3(20),Len4(30),Len5(40),Len6(50),Len7(60);
var: y(0),x(0),n(0);
Var: K(0), R(0), AbsHighClose(0), AbsLowClose(0), AbsCloseOpen(0), HighV(0), LowV(0), DailyLmt(0),SwingIndex(0);
HighV = DayClose(1)*1.1;
LowV = DayClose(1)*0.9;
DailyLmt = HighV-LowV;
If DailyLmt <> 0 Then {
AbsHighClose = AbsValue(High - Close[1]);
AbsLowClose = AbsValue(Low - Close[1]);
AbsCloseOpen = AbsValue(Close[1] - Open[1]);
If AbsHighClose >= AbsLowClose Then {
K = AbsHighClose;
If AbsHighClose >= Range Then
R = AbsHighClose - 0.5 * AbsLowClose + 0.25 * AbsCloseOpen;
Else
R = Range + 0.25 * AbsCloseOpen;
}
Else {
K = AbsLowClose;
If AbsLowClose >= Range Then
R = AbsLowClose - 0.5 * AbsHighClose + 0.25 * AbsCloseOpen;
Else
R = Range + 0.25 * AbsCloseOpen;
}
If R <> 0 Then
SwingIndex = 50 * (((Close[0] - Close[1]) + 0.50 * (Close - Open) + 0.25 * (Close[1] - Open[1])) / R ) * K / DailyLmt;
Else
SwingIndex = 0;
}
Else
SwingIndex = 0;
Var1=PROC(14);
Var2=Ma(Var1, 9);
value1 = BollBandDown(12,2);
value2 = BollBandUp(12,2);
var3 = ((C-value1)/(value2-value1))*100;
Var4=Ma(Var3, 9);
Var5=CO;
Var6=ma(Var5, 9);
Var7=MFI(14);
Var8=Ma(Var7, 9);
y = c;
x = index;
n = 14;
var9 = ((n*accumN(x*y,n) - (accumN(x,n)*accumN(y,n))) / sqrt((n*accumN(x^2,n)-(accumN(x,n)^2)) * (n*accumN(y^2,n) - (accumN(y,n)^2))))^2;
Var10= Ma(Var9, 9);
Var11= ma(ADX(14),14)[1];
Var12= ADX(14)[1];
Var13= LRL(Close, 28);
Var14= PROC(14)[1];
Var15= DIPlus(14)[1];
Var16= DIMinus(14)[1];
Var17= SwingIndex;
Var18= WILLR(14)[1];
Var19= MACD(12, 26)[1];
Var20= MACD(12, 26)[1];
Var21= ma(Var20, 9)[1];
Var22= RSI(14);
Var23= ma(ADX(14),14);
Var24= DIPlus(14);
Var25= AccDist;
Var26= ma(Var25, 9);
Var27= ADX(14);
Var28= OBV();
Var29= Ma(Var28, 9);
Var30= SwingIndex;
Var31= WillR(14);
Var32= DIMinus(14);
Var33= DIMinus(14)[1];
Var34= LRS(Close,14)[1];
Var35= ATR(14);
Var36= LRL(C,14)+LRS(C,14);
Var37= ma(Var34, 9);
Var38= VHF(14);
Var39= ma(Var38, 9);
Var40= LRL(Close, 14)[1];
Var41= ma(Var40, 9);
Var42= ma(Var22, 9);
Var43= ma(Var35, 9);
Var44= TSI(Close, 12, 26,9);
Var45= ma(Var44, 9);
Var46= ma(Var36, 9);
Var47= ma(close, Len1);
Var48= ma(close, Len2);
Var49= ma(close, Len3);
Var50= LRL(C,14)+LRS(C,14);
Var51= ma(Var50, 9);
Var52= (ma(C,10)[1]-ma(c,20)[1])/ma(C,20)[1]*100;
Var53= ma(Var52, 9);
Var54= (ma(C,10)-ma(c,20))/ma(C,20)*100;
Var55= ma(close, Len4);
Var56= ma(close, Len5);
Var57= ma(close, Len6);
Var58= ma(close, Len7);
Var59= LRL(Close, 14);
Var60= ma(Var59, 9);
var61 = EMA(C,21) * 2 - EMA(EMa(C,21),21);
Var62= (3 * Ema(c,21)) - (3 * Ema(Ema(c,21),21)) + (Ema(Ema(Ema(c,21),21),21));
Var63= WillR(14);
Var64= ma(Var63, 9);
Var65= TRIX(14);
Var66= ma(Var65, 9);
var67 = (C-ma(C,20))/STD(C,20);
Var68= ma(Var67, 9);
value99 = (ma(c,20) - ma(c,20)[5])/ma(c,20)[5]*100;
Var69= value99[1];
Var70= ma(Var69, 9);
Var71= var61[1];
Var72= ma(close,12)[1];
Var74= SAR(0.02, 0.2);
Var75= LRS(Close, 14);
If 090400 <= stime And stime < 145200 And MarketPosition(0) == 0 And crossup(Var24, Var27) And
Var4-var4[2]>0 And Var8-var8[1]>0 And Var68-var68[1]>0 And Var7[1]-var7[2]>0 And Var5-var5[1]>0 And
Var9-var9[1]>0 And Var44-var44[1] >0 And Var53-var53[1] > 0 And Var62<var59 And Var6<var5 And
Var2<var1 And Var27>20 And Var23>20 And Var27[1]-var27[2]>0 And Var23-var23[1]>0 Then
buy("매1", Atstop,close[1],1);
If 090200 <= stime And stime < 145200 And marketposition == 0 And crossup(Var50,Var51 ) And
Var8-var8[1]>0 And Var6<var5 And Var39-var39[1]>0 And Var1-var1[1]>0 And Var64-var64[1]>0 And
Var65>0 And Var3-var3[1]>0 And Var6>0 And Var2<var1 And Var32<var27 And Var60<var58 And Var5-var5[1]>0 And
Var38-var38[1]>0 And Var43-var43[1]>0 And Var43<var35 And Var27-var27[1]>0 And Var23-var23[1]>0 Then
buy("매수2", Atstop, close[1],1);
If 090200 <= stime And stime < 145200 And marketPosition == 0 And crossup(Var50,Var51 ) And
Var5[1]-var5[2]>0 And Var6<var5 And Var39-var39[1]>0 And Var1-var1[1]>0 And Var64-var64[1]>0 And
Var65>0 And Var3-var3[1]>0 And Var6>0 And Var2<var1 And Var32<var27 And Var60<var58 And Var5-var5[1]>0 And
Var38-var38[1]>0 And Var43-var43[1]>0 And Var43<var35 And Var27-var27[1]>0 And Var23-var23[1]>0 Then
buy("매수3", Atstop,close[1],1);
If 090200 <= stime And stime< 150200 And marketPosition == 1 And crossdown(Var24, 20) And
Var27<var32 And Var9-var9[1]<0And Var38-var38[1]<0 And Var2-var2[1]<0 And Var9<var10 And
Var7<var8 And Var3-var3[1]<0And Var35-var35[1]<0 Then
exitlong("매수청산1", Atmarket);
If 090200<=stime And stime< 150200 and marketPosition == 1 and crossdown(Var24, var32) And
Var1<0 And Var5-var5[1]<0 And Var5<0 And Var10-var10[1]<0 And Var38-var38[1]<0And Var44-var44[1]<0 Then
exitlong("매수청산2", Atmarket);
If 090200<=stime And stime< 150200 and marketPosition == 1 and crossdown(Var24, var32) And
Var7-var7[1]<0 and var24<var27 and var10-var10[1]<0 and var44<var45 and var24<var23 and
var24<20 and var34-var34[1]<0 then
exitlong("매수청산3", Atmarket);
If 090200<=stime And stime< 145200 And marketPosition == 0 And crossdown(Var44, Var45) And
Var10-var10[1]<0 And Var59<var62 And Var1-var1[1]<0 And Var5-var5[1]<0 And Var52<var53 And
Var5<var6 And Var48-var48[1]<0 And Var50<var51 And Var23[1]-var23[2]>0 And Var20<var21 And
Var24<var23 And Var4-var4[1]<0 And Var7-var7[1]<0 And Var30-var30[1]<0 And Var27-var27[1]>0 And Var23-var23[1]>0 Then
sell("매도1", Atstop, close[1],1);
If 090400<=stime And stime< 145200 And marketPosition == 0 And crossdown(Var50, Var51) And
Var20<0 And Var32-var32[1]>0 And Var1-var1[1]<0 And Var54-var54[1]<0 And Var48-var48[1]<0 And
Var23-var23[1]>0 And Var44-var44[1]<0 And Var30<0 And Var44<var45 And Var7<var8 And
Var4-var4[1]<0 And Var23<var27 And Var27-var27[1]>0 Then
sell("매도2", Atstop, close[1],1);
If 090400<=stime And stime< 145200 And marketPosition == 0 And crossdown(Var50, Var51) And
Var23-var23[1]>0 And Var7<var8 And Var39-var39[1]<0 And Var32-var32[1]>0 And Var52-var52[1]<0 And
Var27<var32 And Var48-var48[1]<0 And Var7-var7[1]<0 And Var25-var25[1]<0 And Var4-var4[1]<0 And
Var44-var44[1]<0 And Var30<0 And Var23>20 And Var27-var27[1]>0 Then
sell("매도3", Atstop, close[1],1);
If 090200<=stime And stime< 150200 And marketPosition == -1 And crossup(Var37, 0) And Var5-var5[1]>0 And
Var45<var44 And Var32<var27 And Var20-var20[1]>0 And Var39-var39[1]>0 Then
exitshort("매도청산1", Atmarket);
If 090200<=stime And stime< 150200 And marketPosition == -1 And crossup(Var2, 0) And
Var27<var24 And Var6-var6[1]>0 And Var39<var38 And Var1-var1[1]>0 And Var39-var39[1]>0 Then
exitshort("매도청산2", Atmarket);
If 090200<=stime And stime< 150200 and marketPosition == -1 And crossup(Var44, var45) And Var30-var30[1]>0 And
Var6-var6[1]>0 And Var43<var35 And Var39-var39[1]>0 And Var4<var3 And Var35[1]-var35[2]>0 Then
exitshort("매도청산3", Atmarket);
SetStopEndofday(150400);
즐거운 하루되세요
> 민정 님이 쓴 글입니다.
> 제목 : 선물자동주문
> Var1=PROC(Close, 14, Diff)
Var2=Mov(Var1, 9, S)
Var3= PerB(Close, 12, 2,s)
Var4=Mov(Var3, 9, S)
Var5=CO(3, 10)
Var6=Mov(Var5, 9, S)
Var7= MFI(14)
Var8=Mov(Var7, 9, S)
Var9= RSQR(Close, 14)
Var10=Mov(Var9, 9, S)
Var11= ADXR(14, 1)
Var12= ADX(14, 1)
Var13= LRI(Close, 28)
Var14= PROC(Close, 14, Diff, 1)
Var15= DIPlus(14, 1)
Var16= DIMinus(14, 1)
Var17= SwingIndex(1)
Var18=WillPerR(14, 1)
Var19=MACD(Close, 12, 26, 1)
Var20=MACD(Close, 12, 26)
Var21= Mov(Var20, 9, S)
Var22=RSI(Close, 14)
Var23=ADXR(14)
Var24=DIPlus(14)
Var25= AD()
Var26=Mov(Var25, 9, S)
Var27= ADX(14)
Var28=OBV()
Var29=Mov(Var28, 9, S)
Var30= SwingIndex()
Var31= WillPerR(14)
Var32=DIMinus(14)
Var33=DIMinus(14, 1)
Var34= LRS(Close, 14, 1)
Var35=ATR(14)
Var36= TSF(Close, 14)
Var37=Mov(Var34, 9, S)
Var38= VHF(Close, 14)
Var39=Mov(Var38, 9, S)
Var40= LRI(Close, 14, 1)
Var41=Mov(Var40, 9, S)
Var42=Mov(Var22, 9, S)
Var43=Mov(Var35, 9, S)
Var44=TSI(Close, 12, 26, S)
Var45=Mov(Var44, 9, S)
Var46=Mov(Var36, 9, S)
Var47=Mov(close, Len1, s)
Var48=Mov(close, Len2, s)
Var49=Mov(close, Len3, s)
Var50=TSF(Close, 14)
Var51=Mov(Var50, 9, S)
Var52= MAO(Close, 10, 20, S, Per, 1)
Var53=Mov(Var52, 9, S)
Var54=MAO(Close, 10, 20, S, Per)
Var55=Mov(close, Len4, s)
Var56=Mov(close, Len5, s)
Var57=Mov(close, Len6, s)
Var58=Mov(close, Len7, s)
Var59= LRI(Close, 14)
Var60= Mov(Var59, 9, S)
Var61=DEMA(Close, 21)
Var62=TEMA(Close, 21)
Var63= WillPerR(14)
Var64= Mov(Var63, 9, S)
Var65=TRIX(Close, 14)
Var66= Mov(Var65, 9, S)
Var67= Sigma(Close, 20)
Var68= Mov(Var67, 9, S)
Var69= SONAR(Close, 20, 5, Per, 1)
Var70= Mov(Var69, 9, S)
Var71= DEMA(Close, 21, 1)
Var72=BBandMid(Close, 12, 2, S, 1)
Var74=PSAR(0.02, 0.2)
Var75=LRS(Close, 14)
If 0904=<ttime And ttime< 1452 And position(0) = 0 And crossup(Var24, Var27)_
And Var4(0)-var4(2)>0 And Var8(0)-var8(1)>0 And Var68(0)-var68(1)>0 And Var7(1)-var7(2)>0And Var5(0)-var5(1)>0 And Var9(0)-var9(1)>0And Var44(0)-var44(1)>0And Var53(0)-var53(1)>0 And Var62<var59 And Var6<var5 And Var2<var1 And Var27>20And Var23>20 And Var27(1)-var27(2)>0 And Var23(0)-var23(1)>0Then
Call buy("매수", Atstop, 1,close(1))
End If
If 0902=<ttime And ttime< 1452 And position(0) = 0 And crossup(Var50,Var51 )_
And Var8(0)-var8(1)>0 And Var6<var5 And Var39(0)-var39(1)>0And Var1(0)-var1(1)>0And Var64(0)-var64(1)>0And Var65>0And Var3(0)-var3(1)>0 And Var6>0 And Var2<var1 And Var32<var27 And Var60<var58 And Var5(0)-var5(1)>0 And Var38(0)-var38(1)>0 And Var43(0)-var43(1)>0 And Var43<var35 And Var27(0)-var27(1)>0 And Var23(0)-var23(1)>0Then
Call buy("매수", Atstop, 1,close(1))
End If
If 0902=<ttime And ttime< 1452 And position(0) = 0 And crossup(Var50,Var51 )_
And Var5(1)-var5(2)>0 And Var6<var5 And Var39(0)-var39(1)>0And Var1(0)-var1(1)>0And Var64(0)-var64(1)>0And Var65>0And Var3(0)-var3(1)>0 And Var6>0 And Var2<var1 And Var32<var27 And Var60<var58 And Var5(0)-var5(1)>0 And Var38(0)-var38(1)>0 And Var43(0)-var43(1)>0 And Var43<var35 And Var27(0)-var27(1)>0 And Var23(0)-var23(1)>0Then
Call buy("매수", Atstop, 1,close(1))
End If
If 0902=<ttime And ttime< 1502 And position(0) = 1 And crossdn(Var24, 20) _
And Var27<var32 And Var9(0)-var9(1)<0And Var38(0)-var38(1)<0 And Var2(0)-var2(1)<0 And Var9<var10 And Var7<var8 And Var3(0)-var3(1)<0And Var35(0)-var35(1)<0Then
Call exitlong("매수청산", Atmarket)
End If
If 0902=<ttime And ttime< 1502 and position(0) = 1 and crossdn(Var24, var32) _
And Var1<0And Var5(0)-var5(1)<0 And Var5<0 And Var10(0)-var10(1)<0 And Var38(0)-var38(1)<0And Var44(0)-var44(1)<0 Then
Call exitlong("매수청산", Atmarket)
End If
If 0902=<ttime And ttime< 1502 and position(0) = 1 and crossdn(Var24, var32) _
And Var7(0)-var7(1)<0 and var24<var27 and var10(0)-var10(1)<0 and var44<var45 and var24<var23 and var24<20 and var34(0)-var34(1)<0 then
Call exitlong("매수청산", Atmarket)
End If
If 0902=<ttime And ttime< 1452 And position(0) = 0 And crossdn(Var44, Var45) _
And Var10(0)-var10(1)<0 And Var59<var62 And Var1(0)-var1(1)<0And Var5(0)-var5(1)<0And Var52<var53 And Var5<var6 And Var48(0)-var48(1)<0 And Var50<var51 And Var23(1)-var23(2)>0And Var20<var21 And Var24<var23 And Var4(0)-var4(1)<0 And Var7(0)-var7(1)<0And Var30(0)-var30(1)<0And Var27(0)-var27(1)>0 And Var23(0)-var23(1)>0Then
Call sell("매도", Atstop, 1, close(1))
End If
If 0904=<ttime And ttime< 1452 And position(0) = 0 And crossdn(Var50, Var51) _
And Var20<0 And Var32(0)-var32(1)>0And Var1(0)-var1(1)<0And Var54(0)-var54(1)<0And Var48(0)-var48(1)<0And Var23(0)-var23(1)>0And Var44(0)-var44(1)<0And Var30<0 And Var44<var45 And Var7<var8 And Var4(0)-var4(1)<0 And Var23<var27 And Var27(0)-var27(1)>0Then
Call sell("매도", Atstop, 1, close(1))
End If
If 0904=<ttime And ttime< 1452 And position(0) = 0 And crossdn(Var50, Var51) _
And Var23(0)-var23(1)>0 And Var7<var8 And Var39(0)-var39(1)<0And Var32(0)-var32(1)>0And Var52(0)-var52(1)<0And Var27<var32 And Var48(0)-var48(1)<0And Var7(0)-var7(1)<0 And Var25(0)-var25(1)<0 And Var4(0)-var4(1)<0 And Var44(0)-var44(1)<0 And Var30<0 And Var23>20And Var27(0)-var27(1)>0Then
Call sell("매도", Atstop, 1, close(1))
End If
If 0902=<ttime And ttime< 1502 And position(0) = -1And crossup(Var37, 0) _
And Var5(0)-var5(1)>0And Var45<var44 And Var32<var27 And Var20(0)-var20(1)>0And Var39(0)-var39(1)>0Then
Call exitshort("매도청산", Atmarket)
End If
If 0902=<ttime And ttime< 1502 And position(0) = -1And crossup(Var2, 0) _
And Var27<var24 And Var6(0)-var6(1)>0And Var39<var38 And Var1(0)-var1(1)>0 And Var39(0)-var39(1)>0Then
Call exitshort("매도청산", Atmarket)
End If
If 0902=<ttime And ttime< 1502 and position(0) = -1And crossup(Var44, var45) _
And Var30(0)-var30(1)>0And Var6(0)-var6(1)>0And Var43<var35 And Var39(0)-var39(1)>0And Var4<var3 And Var35(1)-var35(2)>0Then
Call exitshort("매도청산", Atmarket)
End If
If ttime = 1504 Then
Call exitlong("종가청산", Atmarket)
Call exitshort("종가청산", Atmarket)
End If
전에 대신증권에서 영어 용어도 잘 모르고 예를든걸 짜주어서 했던 것입니다.
이것은 분봉 하나로 설정할 수 있고 2분이면 2분, 5분이면 5분 하나만 할 수 밖에 없습니다.
제가 원하는건 주 메뉴는 3분이고 10분이나 60분을 같이 적용하여 10분이나 60분이
하락추세일때는 3분에서 매수가 안 나오는것을 원합니다.
예시를 짜주시기 바랍니다.
9시 2분 시작해서 오후 3시 4분에 정리했으면 합니다.
예시를 주면 복사해서 편집 적용할 수 있게 해 주셧으면 합니다.(선물챠트원합니다.)
다음글
이전글