1 مرفق
عندى مشكلة فى برمجة مؤشر على تريد ستيشن
السلام عليكم حضرات انا عندى مشكلة ف برمجة مؤشر كنت ابحث عنه كنت محتاجه جدا ولقيته ولكن لما وضعته ف الايزى لانجويج كوبى باست ظهرى اخطاء ومش عارف اشوفلها حل عشان افعل المؤشر وده الكود بتاعه زى منا واخده من الموقع
Indicator: VPCI
inputs:
Price( Close ),
Length1( 5 ),
Length2( 20 ),
VPCIAvgLen( 20 ) ;
variables:
VolValue( 0 ),
VolumeSum1( 0 ),
VolumeSum2( 0 ),
VWMA1( 0 ),
VWMA2( 0 ),
VP( 0 ),
VPR( 0 ),
VM( 0 ),
VPCI( 0 ),
AvgVPCI( 0 ) ;
if BarType >= 2 then { not tick/minute data }
VolValue = Volume
else
VolValue = Ticks ;
VolumeSum1 = Summation( VolValue, Length1 ) ;
if VolumeSum1 > 0 then
VWMA1 = Summation( Price * VolValue , Length1 ) / VolumeSum1 ;
VolumeSum2 = Summation( VolValue, Length2 ) ;
if VolumeSum2 > 0 then
VWMA2 = Summation( Price * VolValue , Length2 ) / VolumeSum2 ;
VP = VWMA2 - Average( Price, Length2 ) ;
VPR = VWMA1 / Average( Low, Length1 ) ;
VM = Average( VolValue, Length1 ) / Average( VolValue, Length2 ) ;
VPCI = VP * VPR * VM ;
AvgVPCI = Average( VPCI, VPCIAvgLen ) ;
Plot1( VPCI, "VPCI" ) ;
Plot2( AvgVPCI, "VPCISmooth" ) ;
Plot3( 0, "Zero" ) ;
Strategy: VPCI
inputs:
Price( Close ),
Length1( 5 ),
Length2( 20 ),
VPCIAvgLen( 20 ),
MACD_FastLength( 12 ),
MACD_SlowLength( 26 ),
MACDLength( 9 ),
OBVAvgLength( 20 ),
ADX_Len( 7 ),
ADX_Threshold( 20 ),
UseVPCI( 1 ), { 1 means "use for confirmation",
0 means "don't use" }
UseADX ( 0 ),
UseOBV ( 0 ) ;
variables:
MACDValue( 0 ),
AvgMACD( 0 ),
ADXValue( 0 ),
OBVValue( 0 ),
AvgOBV( 0 ),
VolValue( 0 ),
VolumeSum1( 0 ),
VolumeSum2( 0 ),
VWMA1( 0 ),
VWMA2( 0 ),
VP( 0 ),
VPR( 0 ),
VM( 0 ),
VPCI( 0 ),
AvgVPCI( 0 ) ;
MACDValue = MACD( Close, MACD_FastLength, MACD_SlowLength ) ;
AvgMACD = Average( MACDValue, MACDLength ) ;
ADXValue = ADX( ADX_Len ) ;
OBVValue = OBV ;
AvgOBV = Average( OBVValue, OBVAvgLength ) ;
if BarType >= 2 then { not tick/minute data }
VolValue = Volume
else
VolValue = Ticks ;
VolumeSum1 = Summation( VolValue, Length1 ) ;
if VolumeSum1 > 0 then
VWMA1 = Summation( Price * VolValue , Length1 ) / VolumeSum1 ;
VolumeSum2 = Summation( VolValue, Length2 ) ;
if VolumeSum2 > 0 then
VWMA2 = Summation( Price * VolValue , Length2 ) / VolumeSum2 ;
VP = VWMA2 - Average( Price, Length2 ) ;
VPR = VWMA1 / Average( Low, Length1 ) ;
VM = Average( VolValue, Length1 ) / Average( VolValue, Length2 ) ;
VPCI = VP * VPR * VM ;
AvgVPCI = Average( VPCI, VPCIAvgLen ) ;
if MACDValue crosses over AvgMACD
and ( ( VPCI > AvgVPCI and UseVPCI = 1 ) or UseVPCI <> 1 )
and ( ( ADXValue < ADX_Threshold and UseADX = 1 ) or
UseADX <> 1 )
and ( ( OBVValue > AvgOBV and UseOBV = 1 ) or UseOBV <> 1 )
then
Buy next bar at market
else if MACDValue crosses under AvgMACD
and ( ( VPCI < AvgVPCI and UseVPCI = 1 ) or
UseVPCI <> 1 )
and ( ( ADXValue < ADX_Threshold and UseADX = 1 ) or
UseADX <> 1 )
and ( ( OBVValue < AvgOBV and UseOBV = 1 ) or
UseOBV <> 1 )
then
SellShort next bar at market ;
طبعا لما وضعته ظهرلى اخطاء ومش عارف الاخطاء دى احلها ازاى الملف المرفق 468452
ممكن حد يساعدنى احلها ازاى بعد ازنكم ولو امكن حد يرفعلى المؤشر بحيت انى افتحه على طول بامتداد ايزى لانجويج ياريت من فضلكم ... والف شكر
