- This topic has 23 ข้อความตอบกลับ, 9 เสียง, and was last updated 5 years, 11 months มาแล้ว by
.
-
กระทู้
-
Chart SiamQuant V.2 ไว้ใช้กับ Data SQ เวอร์ชั่นใหม่ โดยเฉพาะ ได้ปรับให้ดูง่ายสบายตาขึ้นเเล้วเพิ่มลูกเล่นนิดหน่อยคับ เเละทำให้ Code สั้นลงโดยไปอ้างอิงกับ #include_once “C:\SiamQuant เพื่อเวลาที่ทีมงาน SQ ได้มีการปรับหรืออัพ Code ใหม่ ก็จะได้ใช้งานได้เหมือนเดิมคับ เพื่อใครที่ชอบดูข้อมูลเป็นตัวเลขมากกว่าดูเป็นเส้น Line แบบนี้จะดูง่ายกว่า เเล้ว Data ทั้ง 5-SQ จะเเสดงผลอยู่ในหน้าจอเดียวกันคับ (ตามตัวอย่างภาพด้านล่าง)
มาดูสิ่งที่เพิ่มขึ้นมาใหม่ในเวอร์ชั่นนี้กัน
1.เพิ่มสีของ Bar Candle ให้ดูง่ายชันเจนว่าวันนี้ราคาปิดอยู้สูงกว่าหรือต่ำกว่า ถ้าปิดต่ำกว่าราคาเปิดจะเป็นสีเเดง ถ้าปิดสูงกว่าราคาเปิดจะเป็นสีเขียว เเเล้วได้เพิ่ม Vol สีเข้าไปความหมายของสีเหมือนกับ เเท่ง Candle
2. เพิ่มสัญญาลักษณ์บอกวันที่เกิดเหตุการณ์ Status เเละ Benefit
เหตุการณ์ Status จะเป็นสามเหลี่ยมคว่ำสีส้ม Status ก็ประกอบไปด้วย NP , NR , SP , ST , CM , NC
เหตุการณ์ Benefit จะเป็นสามเหลี่ยมคว่ำสีฟ้า Benefit ก็ประกอบไปด้วย XD , XI , XN , XR , XT , XA , XB , XW , XS
3 Grid บอกช่วงเวลาของ Quarter ( SQQE ใน MICA ) ผมทำเป็นเส้นปะเเนวตั้งสีน้ำเงิน ถ้าเห็นเเต่ล่ะช่วงเวลาไม่เท่ากันไม่ต้องแปลกใจคับ เพราะการประกาศงบเเต่ล่ะช่วงเเละวันที่ไม่เเน่นอนของเเต่ล่ะบริษัท
4. สุดท้ายคลิกขวาที่หน้า Chart หน้าจอ Parameters สามารถที่จะปรับต่างๆได้ PriceType ปรับดูราคาแบบ Adjusted เเละ UnAdjusted หรือเทียบราคาทั้งสองอันได้ ปรับสีของ Bar ราคาเเละ Vol ได้ เเละถ้าไม่ต้องการให้เเสดงผลอันไหนก็เปิดปิดได้ เช่น Vol ,Grid Quarter , Tooltip ,Status AND Benefit
Code ชุดนี้ผมสงวนสิทธิ์ กรณีที่ไม่ใช่ทีมงาน SiamQuant ห้ามเอาไปดัดแปลงเพื่อผลประโยชน์ทางธุรกิจ เเต่ถ้าเอาไปดัดแปลงหรือพัฒนาให้ดีขึ้นเเล้วเเจกหรือเเชร์ให้ใช้ฟรี ทำได้ตามสะดวกเลยคับขอให้สนุกกับ Code ชุดใหม่คับ/////////////////////////////////////////////////////////////////////////////////////SiamQuant Stock Price and Indicator for Use with SiamQuantMetastockDatabase//Tooltip By Amibroker Platform V.2#include_once “C:\SiamQuant\SQ Library\SQ AFL V.1.0.2.0\SQ Include\SQ – Include Data Declaration.afl”////////////////////////////////////////////////////////////////////////////////////////////////////////////////_SECTION_BEGIN( “Price” );SetChartOptions( 0, chartShowArrows | chartShowDates );_N( Title = StrFormat( “{{NAME}} – {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) Vol ” + NumToStr( V, 1.0 ) +” {{VALUES}}”, O, H, L, C, SelectedValue( ROC( C, 1 ) ) ) );GraphXSpace = 10;PriceType = ParamList( “PriceType”, “Adjusted Price|Unadjusted Close|Price Comparison”, 0 );switch ( PriceType ){case “Adjusted Price” :SetBarFillColor( IIf( C > O, ParamColor(“UpBar”, colorLime ), ParamColor(“Down Bar”, colorRed ) ) );Plot( C, “Close”, colorDefault , styleNoTitle | ParamStyle( “Style” ) | GetPriceStyle() );break;case “Unadjusted Close” :Plot( OI, “Unadjusted Close”, ParamColor(“Color”, colorDefault ), styleLine );break;case “Price Comparison” :Plot( C, “Adjusted Close”, ParamColor(“Color”, colorDefault ), styleLine );Plot( OI, “Unadjusted Close”, ParamColor(“Color”, colorDefault ), styleDashed );break;}_SECTION_END();_SECTION_BEGIN( “Volume” );if (ParamToggle(“Volume”,”Off|On”,1)){SetBar = IIf( C > O, ParamColor(” Vol UpBar”, colorLime ), ParamColor(“Vol Down Bar”, colorRed ) ) ;Plot( V, _DEFAULT_NAME(), SetBar, styleNoTitle | ParamStyle( “Style”, styleHistogram | styleOwnScale | styleThick | styleNoLabel, maskHistogram ), 4 );_SECTION_END();}_SECTION_BEGIN( “QuarterChage ” );if (ParamToggle(“QuarterChage”,”Off|On”,1)){Style_Grid = ParamStyle(“Style_Grid “,styleHistogram|styleDashed|styleNoLabel|styleNoRescale|styleOwnScale,maskAll);Plot(SQQE != Ref(SQQE,-1) ,””,ParamColor(“Color_Grid”,colorBlue),Style_Grid);}_SECTION_END();////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////_SECTION_BEGIN(“Tooltip”);//SiamQuant Stock Price and Indicator for Use with SiamQuantMetastockDatabase//Tooltip By Amibroker Platform V.2OHLCV = ParamColor(“Color OHLC”,colorDarkGrey);OHLC =ParamColor(“Color Price”,colorDarkGrey);if (ParamToggle(“Show Price & %”,”Off|On”,1)){RequestTimedRefresh( 0.1 );DX= GetCursorXPosition();DT= DateTimeToStr(DX) ;strWeekday = StrMid(“—SUNDAY—MONDAY–TUESDAYWEDNESDAY-THURSDAY–FRIDAY–SATURDAY”,SelectedValue(DayOfWeek())*9,9);Pchg = C – Ref(C,-1);Chg=Ref(C,-1);if (_DT(DT)>0){Title = EncodeColor(OHLCV )+ ” Stock ” +Title =Name() + ” “+EncodeColor(OHLCV ) + “Date :: “+ EncodeColor(OHLC) + Date() +EncodeColor(11) + EncodeColor(colorWhite)+EncodeColor(OHLCV )+ ” “+ EncodeColor(colorBlack)+ strWeekday + “”+EncodeColor(OHLCV )+ ” Open: “+ EncodeColor(OHLC)+ WriteVal(O,format=1.2) + “”+EncodeColor(OHLCV )+ ” High: “+ EncodeColor(OHLC) + WriteVal(H,format=1.2) + “”+EncodeColor(OHLCV )+ ” Low: “+ EncodeColor(OHLC)+ WriteVal(L,format=1.2) + “”+EncodeColor(OHLCV )+ ” Close: “+ WriteIf(C> Chg,EncodeColor(colorGreen),EncodeColor(colorRed))+ WriteVal(C,format=1.2) + “”+EncodeColor(OHLCV )+ ” Change: “+ WriteIf(C> Chg,EncodeColor(colorGreen),EncodeColor(colorRed))+ WriteVal(C – Ref(C,-1),format=1.2)+ ” / “+ WriteIf(C> Chg,EncodeColor(colorGreen),EncodeColor(colorRed))+ WriteVal(ROC(C,1),format=1.2)+ “% ” +””+EncodeColor(OHLCV )+ ” Volume: “+ EncodeColor(OHLC)+ WriteVal(V,format=1.0)+”\n”+EncodeColor(colorDarkGrey)+ ” “+ EncodeColor(OHLC)+ SQMKTShow+EncodeColor(colorBlue )+ ” “+ EncodeColor(OHLC)+ SQIndusShow+EncodeColor(colorOrange )+ ” “+ EncodeColor(OHLC)+ SQSectorShow+EncodeColor(colorDarkYellow )+ ” “+ EncodeColor(OHLC)+ SQStatusShow+EncodeColor(colorGreen )+ ” “+ EncodeColor(OHLC)+ SQBenefitShow+EncodeColor(colorViolet)+ ” “+ EncodeColor(OHLC)+ SQQEShow+”\n”+EncodeColor(colorOrange )+ ” Tooltip By Amibroker Platform V.2″+”\n”+EncodeColor(colorBlue )+ ” //—– Stock Fundamental Ratios ——————// “+”\n”+EncodeColor(OHLCV )+ ” P/E:: “+ EncodeColor(OHLC)+ WriteVal(SQPE,format=1.2) + “\n”+EncodeColor(OHLCV )+ ” P/BV :: “+ EncodeColor(OHLC)+ WriteVal(SQPBV,format=1.2) + “\n”+EncodeColor(OHLCV )+ ” Dividend :: “+ EncodeColor(OHLC)+ WriteVal(SQDY,format=1.2) + ” (%)”+ “\n”+EncodeColor(OHLCV )+ ” ROA :: “+ EncodeColor(OHLC)+ WriteIf(SQROA>=0,EncodeColor(colorGreen),EncodeColor(colorRed))+WriteVal(SQROA,format=1.2) + ” (%)”+”\n”+EncodeColor(OHLCV )+ ” ROE :: “+ EncodeColor(OHLC)+ WriteIf(SQROE>=0,EncodeColor(colorGreen),EncodeColor(colorRed))+WriteVal(SQROE,format=1.2) + ” (%)”+”\n”+EncodeColor(OHLCV )+ ” Net Profit Margin :: “+ EncodeColor(OHLC)+ WriteIf(SQNPM>=0,EncodeColor(colorGreen),EncodeColor(colorRed))+WriteVal(SQNPM,format=1.2) + ” (%)”+”\n”+EncodeColor(colorBlue )+ ” //—— Fundamental Per Share Values———–// “+”\n”+EncodeColor(OHLCV )+ ” EPS :: “+ EncodeColor(OHLC)+ WriteVal(SQEPS,format=1.2) +” (Baht)”+ “\n”+EncodeColor(OHLCV )+ ” Book Value per Share ::”+ EncodeColor(OHLC)+ WriteVal(SQBPS,format=1.2) +” (Baht)”+ “\n”+EncodeColor(OHLCV )+ ” Dividend per Share :: “+ EncodeColor(OHLC)+ WriteVal(SQDPS,format=1.2) + ” (Baht)”+ “\n”+EncodeColor(OHLCV )+ ” Accumulate DPS :: “+ EncodeColor(OHLC)+ WriteVal(SQDPS_ACC,format=1.2) + ” (Baht)”+”\n”+EncodeColor(OHLCV )+ ” Par Value :: “+ EncodeColor(OHLC)+ WriteVal(SQPAR,format=1.2) + ” (Baht)”+”\n”+EncodeColor(OHLCV )+ ” Listed Share :: “+ EncodeColor(OHLC)+ WriteVal(SQLS,format=1.0) + ” (Shares)”+”\n”+EncodeColor(colorBlue )+ ” //—– Stock Balancesheet ————————–// “+”\n”+EncodeColor(OHLCV )+ ” Total Assets :: “+ EncodeColor(OHLC)+ WriteIf(SQTA>=0,EncodeColor(colorGreen),EncodeColor(colorRed))+WriteVal(SQTA,format=1.0) + ” ( Baht)”+ “\n”+EncodeColor(OHLCV )+ ” Total Liabilities :: “+ EncodeColor(OHLC)+WriteIf(SQTL>=0,EncodeColor(colorGreen),EncodeColor(colorRed))+WriteVal(SQTL,format=1.0) + ” ( Baht)”+ “\n”+EncodeColor(OHLCV )+ ” Total Equity :: “+ EncodeColor(OHLC)+WriteIf(SQTE>=0,EncodeColor(colorGreen),EncodeColor(colorRed))+WriteVal(SQTE,format=1.0) + ” ( Baht)”+ “\n”+EncodeColor(OHLCV )+ ” Total Cash :: “+ EncodeColor(OHLC)+WriteIf(SQTC>=0,EncodeColor(colorGreen),EncodeColor(colorRed))+WriteVal(SQTC,format=1.0) + ” ( Baht)”+”\n”+EncodeColor(OHLCV )+ ” Total Current Assets :: “+ EncodeColor(OHLC)+WriteIf(SQTCA>=0,EncodeColor(colorGreen),EncodeColor(colorRed))+WriteVal(SQTCA,format=1.0) + ” ( Baht)”+”\n”+EncodeColor(OHLCV )+ ” Total Current Liabilities :: “+ EncodeColor(OHLC)+WriteIf(SQTCL>=0,EncodeColor(colorGreen),EncodeColor(colorRed))+WriteVal(SQTCL,format=1.0) + ” ( Baht)”+”\n”+EncodeColor(OHLCV )+ ” Retained Earnings :: “+ EncodeColor(OHLC)+ WriteIf(SQRE>=0,EncodeColor(colorGreen),EncodeColor(colorRed))+WriteVal(SQRE,format=1.0) + ” ( Baht)”+”\n”+EncodeColor(colorBlue )+ ” //—- Stock Profit-Cash Statement —————–// “+”\n”+EncodeColor(OHLCV )+ ” Total Revenue :: “+ EncodeColor(OHLC)+ WriteIf(SQTR>=0,EncodeColor(colorGreen),EncodeColor(colorRed))+WriteVal(SQTR,format=1.0) + ” ( Baht)”+ “\n”+EncodeColor(OHLCV )+ ” Earnings Before Interest & Tax ::”+ EncodeColor(OHLC)+ WriteIf(SQEBIT>=0,EncodeColor(colorGreen),EncodeColor(colorRed))+WriteVal(SQEBIT,format=1.0) + ” ( Baht)”+ “\n”+EncodeColor(OHLCV )+ ” Net Profit :: “+ EncodeColor(OHLC)+WriteIf(SQNP>=0,EncodeColor(colorGreen),EncodeColor(colorRed))+ WriteVal(SQNP,format=1.0) + ” ( Baht)”+ “\n”+EncodeColor(OHLCV )+ ” Cash Flow from Operating:: “+ EncodeColor(OHLC)+ WriteIf(SQOCF>=0,EncodeColor(colorGreen),EncodeColor(colorRed))+WriteVal(SQOCF,format=1.0) + ” ( Baht)”+”\n”+EncodeColor(OHLCV )+ ” Cash Flow from Investing :: “+ EncodeColor(OHLC)+ WriteIf(SQICF>=0,EncodeColor(colorGreen),EncodeColor(colorRed))+WriteVal(SQICF,format=1.0) + ” ( Baht)”+”\n”+EncodeColor(OHLCV )+ ” Cash Flow from Financing:: “+ EncodeColor(OHLC)+ WriteIf(SQFCF>=0,EncodeColor(colorGreen),EncodeColor(colorRed))+WriteVal(SQFCF,format=1.0) + ” ( Baht)”+”\n”+EncodeColor(colorBlue )+ ” //—- Properties Stats ———————————// “+”\n”+EncodeColor(OHLCV )+ ” Transaction :: “+ EncodeColor(OHLC)+ WriteVal(SQTRANS,format=1.2) + ” (#)”+ “\n”+EncodeColor(OHLCV )+ ” Trade Value :: “+ EncodeColor(OHLC)+ WriteVal(SQVALUE,format=1.0) + ” (Baht)”+ “\n”+EncodeColor(OHLCV )+ ” Turnover Ratio By Vol :: “+ EncodeColor(OHLC)+ WriteVal(SQTRVP,format=1.2) + ” (%)”+ “\n”+EncodeColor(OHLCV )+ ” Average Price:: “+ EncodeColor(OHLC)+ WriteVal(SQAVGPRICE,format=1.2) + ” (Baht)”+”\n”+EncodeColor(OHLCV )+ ” Market Capitalization :: “+ EncodeColor(OHLC)+ WriteVal(SQMKC,format=1.0) + “\n”;}}_SECTION_END();_SECTION_BEGIN(“Status AND Benefit”);if (ParamToggle(“Status AND Benefit”,”Off|On”,1)){PlotShapes(shapeSmallUpTriangle*(SQBenefit >= 1),colorTurquoise, 0, L, -35);PlotShapes(shapeSmallDownTriangle*( SQstatus >= 1), colorOrange , 0, H, -40);}//SiamQuant Stock Price and Indicator for Use with SiamQuantMetastockDatabase//Tooltip By Amibroker Platform_SECTION_END();//////////////////////////////////////////////////////////////////////////////////
-
ข้อความตอบกลับ
-
มีใครใช้เเล้วเส้น grid บอกช่วงเปลี่ยนไตรมาสเเสดงวันล่าสุดตลอดมั้ยคับ ถ้ามีเอาภาพให้ดูหน่อยคับ พอดีของผมไม่เป็น
เเต่มีคนเเจ้งมาว่าเป็นคับ จะได้แก้ไขได้คับ
เสริมนะครับ คุณไฮ้ ของผมเป็นเฉพาะตอนที่ยังไม่ได้โหลด ข้อมูลงบการเงิน คือรอบก่อนเที่ยงคืนครับ พอข้อมูลงบการเงิน+ MICA ออก แล้วโหลดมา เส้นก็หายไปครับ
ส่วนคุณ Suttirithi ลอง copy จากเวป Amibroker platform แทนครับ Copy จากที่นี่ผมก็เป้นแบบนั้น
ทำแล้วพอเปิด chart ตรง tooltip จะเห็นข้อมูลแค่ ratio กับ per share ส่วนที่เหลือมันเลยหน้าจอไป (แบบตัวหนังสือมันใหญ่ หน้าจอไม่พอแสดง) เลื่อนลงไปดูก็ไม่ได้
ไม่ทราบต้องปรับอย่างไรจึงจะเห็นข้อมูลของ tooltip ทั้งหมด
รบกวนด้วยครับ
ใครที่อยากนำสูตรของคุณ Amibroker Platform ไปใช้สำหรับข้อมูล SiamQuant V.2.0 ถ้าไม่ Include Data Declaration File ตัวเดิมจาก V.1 ต้องเพิ่ม () หลังตัวแปรข้อมูลที่ใช้ในสูตรทุกตัว เนื่องจากเราได้ทำการแปลงการเรียกใช้ฐานข้อมูลให้อยู่ในรูปแบบ Function แล้วนะครับ (การทำให้เป็น Function จะทำให้โปรแกรม Amibroker คำนวณผลต่างๆได้เร็วขึ้น เพราะไม่ต้องอ่านตัวแปรทุกตัวในไฟล์ Data Declaration ก่อน ซึ่งจะเห็นผลความแตกต่าง ซึ่งเร็วกว่ามากๆโดยเฉพาะในการ Backtest ครับผม)
- คุณต้องเข้าสู่ระบบเพื่อตอบกลับกระทู้นี้