커뮤니티

paintbar

프로필 이미지
하리마우
2012-09-27 11:59:26
258
글번호 55127
답변완료
상한가 친 봉에는 녹색을 하한가 친 봉에는 흑색을 입히는 수식 부탁드립니다. 그리고 전화나 메일 말고 직접 방문해서 수식 작성 문의에 대하여 상담을 해도 되는지요? 사용하고 있는 프로그램이 생각처럼 잘 되지를 않아서요.ㅠㅠ
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2012-09-27 17:48:54

안녕하세요 예스스탁입니다. var : 하한가(0), DnLimit(0); var : aa(0), bb(0), cc(0), dd(0), ee(0),ff(0); var : 상한가(0), UpLimit(0); var : aaa(0), bbb(0), ccc(0), ddd(0), eee(0),fff(0); if date >= 19981207 then { //거래소 98년 12월7일 가격제한폭 15%로 확대 변경됨 if date < 20050328 && CodeCategory() == 2 then //코스닥 2005년 3월28일 이전은 가격제한폭 12% DnLimit = (BP * 0.12); Else //코스닥 2005년 3월28일 이후 및 거래소98년12월 7일이후 15% DnLimit = (BP * 0.15); if CodeCategory() == 2 then { //코스닥 호가단위 ( 2003년 7월21일에 호가 단위 변경됨) if date >= 20030721 then { aa = int(DnLimit/100)*100; // 500,000원 이상의 하한가 호가 bb = int(DnLimit/100)*100; // 100,000원 이상 ~ 500,000원 미만의 하한가 호가 cc = int(DnLimit/100)*100; // 50,000원 이상 ~ 100,000원 미만의 하한가 호가 dd = int(DnLimit/50)*50; // 10,000원 이상 ~ 50,000원 미만의 하한가 호가 ee = int(DnLimit/10)*10; // 5,000원 이상 ~ 10,000원 미만의 하한가 호가 ff = int(DnLimit/5)*5; // 5,000원 미만의 하한가 호가 } else { // 코스닥 2003년7월21일 이전 aa = int(DnLimit/1000)*1000; bb = int(DnLimit/500)*500; cc = int(DnLimit/100)*100; dd = int(DnLimit/50)*50; ee = int(DnLimit/10)*10; ff = int(DnLimit/10)*10; } } Else { //거래소 호가단위 aa = int(DnLimit/1000)*1000; bb = int(DnLimit/500)*500; cc = int(DnLimit/100)*100; dd = int(DnLimit/50)*50; ee = int(DnLimit/10)*10; ff = int(DnLimit/5)*5; } if CodeCategory() == 1 or CodeCategory() == 2 then { //kospi, kosdaq If BP >= 500000 Then 하한가 = BP-aa; Else If BP >= 100000 Then 하한가 = BP-bb; Else If BP >= 50000 Then 하한가 = BP-cc; Else If BP >= 10000 Then 하한가 = BP-dd; Else If BP >= 5000 Then 하한가 = BP-ee; Else 하한가 = BP-ff; } else if CodeCategory() == 8 or CodeCategory() == 9 then { //ETF 하한가 = BP-ff; } } if date >= 19981207 then { if date < 20050328 && CodeCategory() == 2 then UpLimit = (BP[0] * 1.12); Else UpLimit = (BP[0] * 1.15); if CodeCategory() == 2 then { if date >= 20030721 then { aaa = int(UpLimit/100+0.00001)*100; bbb = int(UpLimit/100+0.00001)*100; ccc = int(UpLimit/100+0.00001)*100; ddd = int(UpLimit/50+0.00001)*50; eee = int(UpLimit/10+0.00001)*10; fff = int(UpLimit/5+0.00001)*5; } else { aaa = int(UpLimit/1000+0.00001)*1000; bbb = int(UpLimit/500+0.00001)*500; ccc = int(UpLimit/100+0.00001)*100; ddd = int(UpLimit/50+0.00001)*50; eee = int(UpLimit/10+0.00001)*10; fff = int(UpLimit/10+0.00001)*10; } } Else { aaa = int(UpLimit/1000+0.00001)*1000; bbb = int(UpLimit/500+0.00001)*500; ccc = int(UpLimit/100+0.00001)*100; ddd = int(UpLimit/50+0.00001)*50; eee = int(UpLimit/10+0.00001)*10; fff = int(UpLimit/5+0.00001)*5; } if CodeCategory() == 1 || CodeCategory() == 2 then { If BP >= 500000 Then 상한가 = aaa; Else If BP >= 100000 Then 상한가 = iff(bbb>=500000, aaa, bbb); Else If BP >= 50000 Then 상한가 = iff(ccc>=100000, bbb, ccc); Else If BP >= 10000 Then 상한가 = iff(ddd>=50000, ccc, ddd); Else If BP >= 5000 Then 상한가 = iff(eee>=10000, ddd, eee); Else 상한가 = iff(fff>=5000, eee, fff); } else if CodeCategory() == 8 || CodeCategory() == 9 then { // ETF 상한가 = fff; } } if H >= 상한가 Then PlotPaintBar(H,L,"1",GREEN); if L <= 하한가 Then PlotPaintBar(H,L,"1",BLACK); 죄송합니다. 수식과 관련된 문의는 게시판으로 통해서만 진행됩니다. 따로 방문은 받지 않습니다. 즐거운 하루되세요 > 하리마우 님이 쓴 글입니다. > 제목 : paintbar > 상한가 친 봉에는 녹색을 하한가 친 봉에는 흑색을 입히는 수식 부탁드립니다. 그리고 전화나 메일 말고 직접 방문해서 수식 작성 문의에 대하여 상담을 해도 되는지요? 사용하고 있는 프로그램이 생각처럼 잘 되지를 않아서요.ㅠㅠ