す〜さん
vast-****@kcf*****
2007年 12月 10日 (月) 20:50:15 JST
Protra$B%P%0=$@5$46lO+$5$^$G$9!#(B
$B2<5-$N$h$&$K$9$k$H(B
$BGdGc%7%_%e%l!<%7%g%s$G$N%(%i!<BP:v$d(B
$B:8$$$C$Q$$$^$G%9%/%m!<%k$7$?:]$N(B
$BIA2h3+;OE@$,%<%m$+$i;O$^$kIT6q9g$rKI;_=PMh$^$9!#(B
#include <Color>
#include <TIlib>
$Names[0] = "High(20)"
$Colors[0] = $DeepPink
$Names[1] = "Low(20)"
$Colors[1] = $YellowGreen
$Names[2] = "Mid(20)"
$Colors[2] = $Pink
Candle_draw($DarkOrange, $SlateBlue)
if !$Init
// $VolSum$B$O!">e>l$7$F$+$iCM$,IU$+$J$$F|$N%9%-%C%W=hM}%U%i%0(B
$VolSum = 0
$offset = 0
$VolSum = $VolSum + Volume()
$Init = 1
else
if !$VolSum
$offset = $offset + 1
$VolSum = $VolSum + Volume()
else
if 20 + $offset <= Index()
if !$HLB
$HLB = HLBand_new(20)
else
HLBand_next($HLB)
HLBand_draw($HLB, $Colors[0], $Colors[1], $Colors[2])
end
end
end
end
----- Original Message -----
$BAw?.<T!'(Bpanacoran <panac****@yahoo*****>
$B08 ＠ h!'(Bprot****@lists*****
$B7oL>!'(B[Protra-users 45] Re: HL $B%P%s%I$K$D$$$F(B
$BAw?.F|;~!'(B2007$BG/(B12$B7n(B10$BF|(B 8:46:19
>$B$$$D$b$4;XE&$"$j$,$H$&$4$6$$$^$9!#(B
>
>--- $B$9!A$5$s(B <vast-****@kcf*****> wrote:
>
>> $B-!2<5-$N$h$&$K!"!w:nMQAG$O$$$i$J$$$N$G$7$g$&$+!)(B
>> $B!!A0F|$+$i?t$($F2a5n#nF|$+$J$H;W$o$l$^$9!#(B
>
>HLBand$B$,A0F|$+$i?t$($k$3$H$K5$IU$$$F$^$;$s$G$7$?!#0lL\6Q9UI=$G;H(B
>$B$C$F$$$k%/%i%9$rN.MQ$7$?$N$G!"EvF|$r4^$s$G$7$^$C$F$$$^$7$?!#@h$[(B
>$B$I(BHLBand$B$N<BAu$rD>$7$FA0F|$+$i$K$7$^$7$?$N$G!"(B@$B:nMQAG$O$J$/$F$bJ?(B
>$B5$$G$9!#(B
>
>> $B-"#4#0F|$NJ}$G%(%i!<$K$J$k$h$&$G$9!#(B
>> $B860x$OBh#40z?t(B
>> $Color[2]$B!!"M!!(B$Colors[2]
>> HLBand_draw($HLB, $Colors[0], $Colors[1], $Color[2])
>
>$B$O$$!"$4;XE&$NDL$j$G$9!#@h$[$ID>$7$^$7$?!#(B
>
>-- panacoran
>
>
>--------------------------------------
>New Design Yahoo! JAPAN 2008/01/01
>http://pr.mail.yahoo.co.jp/newdesign/
>
>