แจกฟรี!!! โปรแกรม "สุริยยาตรวิถี"

แจกฟรี!!! โปรแกรม "สุริยยาตรวิถี"

สุริยยาตรวิถี เป็นโปรแกรมที่สร้างขึ้นเพื่อแสดงภาพปัจจัยโหราศาสตร์ในรูปแบบการวางเส้นองศาจริง ต้นแบบในการสร้างโปรแกรมที่แสดงผลแบบมีเส้นแบ่งองศา โดยแสดงสมผุสปัจจัย ๑ ๒ ๓ ๔ ๕ ๖ ๗ ๘ ๙ ๐ ลัคนา และรายละเอียดปัจจัย ราศี องศา ลิปดา ตรียางค์ นวางค์ นักษัตรฤกษ์ หมวดฤกษ์ ประเภทฤกษ์ วันที่และเวลายกย้ายราศี ทัศนสัมพันธ์ตามช่วงเวลา และทัศนสัมพันธ์รอบวัน

เหมาะสำหรับการพิจารณารูปปัจจัยในระดับสายตา ให้มีความชัดเจนขึ้นมากกว่าการมองระดับราศี(ดวงอีแปะ) การจับภาพเพื่อทำบทความ หรือโพสต์แสดงพื้นดวงตามประสงค์ กับคติเดิม "รกผลงาน ดีกว่ารกหญ้า"

ลิงค์ดาวโหลด : http://urll.us/IqWdRr

โค้ดฟังชั่นการหาเวลาพระอาทิตย์ขึ้น-ตกจริง (Visual Basic)

การเรียกใช้งานฟังก์ชั่น  SunTimes (ค.ศ., เดือน, วันที่, ลองจิจูด, ละติจูด, Time Zone, Daylight Savings)

ค่าคงที่และค่าอื่นๆที่เกี่ยวข้อง

Const pi = 3.1415926535897932384626433832795

RADEG=180/pi

DEGRAD=pi/180

Function SunTimes (strYear, strMonth, strDay, longitude, latitude, TZ, isdst)

Dim d, n, i, w, m, l, e, e1, a, xv, yv, v, xs, ys, xe, ecl, lonsun, ye, ze, ra, dec, h

Dim GMST0, UT_Sun_in_south, LHA, hour_rise, hour_set, min_rise, min_set

'calculate days since 2000 jan 1

  d = ( 367 * (strYear) - int((7 * ((strYear) + (((strMonth) + 9) / 12))) / 4) + int((275 * (strMonth)) / 9) + (strDay) - 730530)

' Orbital elements of the Sun:

  N = 0.0

  i = 0.0

  w = 282.9404 + 4.70935E-5 * d

  a = 1.000000

  e = 0.016709 - 1.151E-9 * d

  M = 356.0470 + 0.9856002585 * d

  M = rev(M)

  ecl = 23.4393 - 3.563E-7 * d

  L = w + M

  if (L < 0 OR L > 360) then

    L = rev(L)

  end if

' position of the Sun

  E1 = M + e*(180/pi) * sind(M) * ( 1.0 + e * cosd(M) )

  xv = cosd(E1) - e

  yv = sqrt(1.0 - e * e) * sind(E1)

  v = atan2d(yv, xv)

  r = sqrt(xv * xv + yv * yv)

  lonsun = v + w

  if (lonsun < 0 OR lonsun > 360) then

    lonsun = rev(lonsun)

  end if

  xs = r * cosd(lonsun)

  ys = r * sind(lonsun)

  xe = xs

  ye = ys * cosd(ecl)

  ze = ys * sind(ecl)

  RA = atan2d(ye, xe)

  Dec = atan2d(ze, (sqrt((xe * xe)+(ye * ye))))

  h=-0.833

  GMST0 = L + 180

  if (GMST0 < 0 OR GMST0 > 360) then

    GMST0 = rev(GMST0)

  end if

  UT_Sun_in_south = ( RA - GMST0 - longitude ) / 15.0

  if (UT_Sun_in_south < 0) then

    UT_Sun_in_south=UT_Sun_in_south + 24

  end if

  LHA= (sind(h) - (sind(latitude) * sind(Dec)))/(cosd(latitude) * cosd(Dec))

  if (LHA > -1 AND LHA < 1) then

    LHA=acosd(LHA)/15

  else

    SunTimes = "No sunrise,No sunset"

    exit function

  end if

  hour_rise=UT_Sun_in_south - LHA

  hour_set=UT_Sun_in_south + LHA

  min_rise=int((hour_rise-int(hour_rise)) * 60)

  min_set=int((hour_set-int(hour_set)) * 60)

  hour_rise=(int(hour_rise) + (TZ + isdst))

  hour_set=(int(hour_set) + (TZ + isdst))

  if (min_rise < 10) then

    min_rise = right("0000" & min_rise, 2)

  end if

  if (min_set < 10) then

    min_set = right("0000" & min_set, 2)

  end if

  SunTimes = hour_rise & ":" & min_rise & "," & hour_set & ":" & min_set

End Function

' Support Functions

Function sind(qqq)

  sind = sin((qqq) * DEGRAD)

End Function

Function cosd(qqq)

 cosd = cos((qqq) * DEGRAD)

End Function

Function tand(qqq)

 tand = tan((qqq) * DEGRAD)

End Function

Function atand(qqq)

 atand = (RADEG * atan(qqq))

End Function

Function asind(qqq)

 asind = (RADEG * asin(qqq))

End Function

Function acosd(qqq)

 acosd = (RADEG * acos(qqq))

End Function

Function atan2d (qqq, qqq1)

 atan2d = (RADEG * atan2(qqq, qqq1))

End Function

Function rev(qqq)

Dim x

 x = (qqq - int(qqq/360.0) * 360.0)

 if (x <= 0) then

  x = x + 360

 end if

 rev = x

End Function

Function atan2(ys,xs)

' from the Draw Arrows tip

' @ http://www.devx.com/upload/free/features/VBPJ/techtips/techtips11.pdf

' by —Jim Deutch, Syracuse, New York

Dim theta

 If xs <> 0 Then

  theta = Atn(ys / xs)

  If xs < 0 Then

   theta = theta + pi

  End If

 Else

  If ys < 0 Then

   theta = 3 * pi / 2 '90

  Else

   theta = pi / 2 '270

  End If

 End If

 atan2 = theta

End Function

function acos(x)

 acos = Atn(-X / Sqrt(-X * X + 1)) + 2 * Atn(1)

end function

function sqrt(x)

 if x > 0 then

  sqrt = Sqr(x)

 else

  sqrt = 0

 end if

end function

โปรแกรม Star plot ทดลองวางรูปปัจจัยตามเส้นองศาจริง

ในการแสดงผลรูปปัจจัยทางโหราศาสตร์ ปกติที่เราพบเห็นนั้นจะเป็นการวางตำแหน่งปัจจัยระดับราศี เพื่อให้หมายรู้ว่าดาวนั้นอยู่ราศีใด(ดวงอีแปะ) หากต้องการรู้รายละเอียดว่าอยู่ในระยะใดของราศี เช่น ตรียางค์ นวางค์ องศา จำเป็นจะต้องดูข้อมูลเพิ่มเติมจากปฏิทินโหรหรือโปรแกรมที่เราใช้ในการวางรูปปัจจัยนั้น ว่ามีค่าสมผุสอยู่เท่าได จึงจะทราบรายละเอียดที่ต้องการมากกว่ารูปปัจจัยระดับราศีได้

ปัจจุบันมีโปรแกรมของไทยและเทศที่แสดงผลในลักษณะวางรูปปัจจัยตามองศาจริง ซึ่งทำให้เกิดความสะดวกในการอ่านผลปัจจัยในระดับสายตาได้ทันที ตรงนี้จึงเป็นจุดที่ตระหนักดีว่านักโหราศาสตร์ที่ใช้โปรแกรมของเราคงประสงค์เช่นนั้นบ้าง แต่ด้วยภาระต่างๆจึงยังไม่มีเวลาได้คิดวิธีที่จะทำในส่วนนี้ มาช่วงสองสามวันนี้ทำโปรแกรมต่อเนื่องมาเรื่อยๆ จนถึง "เปิดฟ้าบางกอก" จึงได้คิดต่อไปจนถึงเรื่องการลงพื้นที่จุดในโปรแกรมเพื่อวางรูปปัจจัยตามองศาจริงดังกล่าวนี้ เมื่อใช้เวลาสักพักในการทบทวนความรู้วิชาคณิตศาสตร์เก่าๆที่เคยเรียนมา ปรากฏว่าสามารถทำได้ดังใจประสงค์ จึงสร้างโปรแกรม "Star plot" ขึ้น เพื่อทดลองวางรูปปัจจัยตามองศาจริงของปัจจัยดาวแบบสุริยยาตร ให้ผลเป็นที่น่าพอใจ และถือว่าเป็นความก้าวหน้าสำคัญในการพัฒนาโปรแกรม ซึ่งหากประสงค์ในการสร้างโปรแกรมลักษณะนี้ สามารถที่จะทำได้เพื่อความสะดวกของผู้ใช้งานในลักษณะนี้ต่อไป

ธีรพร  เพชรกำแพง

7 กันยายน 2558

Link download : http://www.mediafire.com/download/mqpq778aa1adqqc/Star+plot.rar

สิทธิ์การใช้งานโมดูล Swiss Ephemeris ในการทำผลงานโหราศาสตร์

...จากกรณีที่ได้รับการทักท้วงว่าไม่สามารถใช้โมดูล Swiss Ephemeris ในการจัดทำปฏิทินโหราศาสตร์แบบรายวันแจกฟรีแก่ผู้สนใจศึกษาได้นั้น

...ทำให้รู้สึกเสียใจเป็นอย่างมาก ด้วยตั้งใจที่จะพัฒนาผลงานทางด้านโหราศาสตร์ให้แก่ผู้สนใจ ได้มีไว้ใช้ประกอบการศึกษาโหราศาสตร์ โดยไม่ต้องมีภาระเสียค่าใช้จ่ายในส่วนนี้ และตระหนักถึงประโยชน์อันจะพึงมีแก่วงการโหราศาสตร์ไทย เพราะมีสื่อการศึกษาที่ "เข้าถึง" อย่างสะดวก และสามารถพัฒนาองค์ความรู้ต่อยอดออกไปได้อีกมากด้วยความสามารถของคนไทย

...ในการนี้ผมจึงได้ติดต่อขอความอนุเคราะห์ไปยังเว็บ astro.com เพื่อให้สามารถใช้โมดูล Swiss Ephemeris ในแบบ free virsion เพื่อการจัดทำปฏิทินโหราศาสตร์ไทยแจกฟรีดังกล่าว โดยลำดับแรกได้ส่งข้อความไปทางอีเมล์ก่อน พร้อมด้วยไฟล์งานที่เกี่ยวข้องซึ่งผมจัดทำขึ้นมา จากนั้นจึงจะส่งเอกสารเป็นทางการทั้งภาคภาษาไทยและภาษาอังกฤษ ไปยังเว็บ astro.com อีกครั้ง

...ปรากฏว่าวันนี้ผมได้รับการตอบกลับจากคุณ Juri Viktor Stork ในเรื่องการใช้โมดูล Swiss Ephemeris จัดทำผลงานแจกฟรี (ตามที่แนบไฟล์งานของผมไปให้เขาพิจารณา) ไม่นึกว่าเขาจะตอบกลับมาเร็วมาก ดีใจมากที่สุด ที่จะได้ทำงาน "จิตอาสา" ทางโหราศาสตร์อย่างที่ใจประสงค์ได้อย่างถูกต้องตามสิทธิ์แห่งความบริสุทธิ์ใจและตั้งใจจริง

...ข้อความจากคุณ Juri Viktor Stork มีดังนี้

Dear sir

There is no problem to use the free version of Swiss Ephemeris for making Thai horoscope calendar.You don't need further permission from us. Just download the software and work with it. http://www.astro.com/swisseph/swephinfo_e.htm

If you once want to make business with your horoscope calendar, then you'll need a professional license.

We don't give any support for the free version. If you have questions about the programm, please contact members from the SwissEph Mailing List: http://www.astro.com/swisseph/swephmlist_e.htm

Kind regards

Juri Viktor Stork

Am 18.08.15 um 17:33 schrieb ธีรพร บุญวงษ์

...คุณ Juri Viktor Stork เป็นบุคลากรทางด้าน Web-Design, Marketing, Executive Director ของทางเว็บ astro.com ได้ให้ความกรุณาแก่ผมในครั้งนี้อย่างมาก โดยผมถือว่าเป็นการอนุญาตเปิดทางบรรทัดฐานสำหรับคนไทยที่จะใช้โมดูล Swiss Ephemeris (free version) ในการพัฒนาผลงานทางโหราศาสตร์ที่มิได้ทำเป็นการค้าแสวงหาผลกำไร มีสิทธิ์ในการที่จะเข้าถึงเพื่อการศึกษาและนำมาใช้ประโยชน์ตามข้อกำหนดดังกล่าวต่อไป

...อนึ่ง ประเดี๋ยวผมจะได้จัดทำบทความเรื่องจริง "ปฐมเหตุ" สำคัญในครั้งนี้ว่ามีที่มาที่ไปอย่างไรไว้ด้วย จะได้เป็นกรณีศึกษาสำหรับวงการโหราศาสตร์ไทย เพราะมีคนไทยหลายคนที่ใช้ แต่มีคนไทยคนใดที่ "กล้า" ขอความกระจ่างอันเป็นทางแห่งความชัดเจนที่จะพัฒนางานเพื่อประโยชน์ส่วนรวม ในครั้งนี้ผมได้ทำแล้ว จึงต้องทำเป็นเอกสารไว้ใช้อ้างอิงต่อไป

...ขอขอบพระคุณสหโหรามิก เพื่อนพ้องนักโหราศาสตร์ทุกท่านที่ให้ความ "ตื่นตัว" สนใจในการช่วยค้นคว้าหาข้อมูลต่างๆ พร้อมกำลังใจอันมากล้น คงออกนามในที่นี้ไม่หมด รวมไปถึงมิตรนักโหราศาสตร์ต่างชาติที่ให้คำแนะนำในด้านการทำโปรแกรมและเรื่องสิทธิ์การใช้งาน

...สรุปว่าผลงานที่ผมพัฒนาโดยใช้โมดูล Swiss ร่วมด้วยนั้น สามารถเผยแพร่ได้ ในลักษณะของการทำเพื่อสาธารณะประโยชน์ทางด้านโหราศาสตร์ไทย มิใช่เป็นการค้าหรือการแสวงหาผลกำไร และหากวันใดต้องทำเช่นนั้น ผมก็ยินดีที่จะปฏิบัติตามเงื่อนไขที่เขาเสนอมาทุกประการ

...ธีรพร  บุญวงษ์(เพชรกำแพง) 20 สิงหาคม 2558

สมุนไพรไทยห่วงใยสุขภาพ

กระวาน

กฤษณา

กานพลู

กำลังเสือโคร่ง

กำแพงเจ็ดชั้น

ขี้เหล็ก

ข่อย

คำฝอย

คูน

ชะเอมเทศ

ทองพันชั่ง

ผักโขม

มะคำไก่

สมอไทย

อัญชัน

เจตมูลเพลิงขาว

เตย

เถาเอ็นอ่อน

เพกา

เพชรสังฆาต

เหงือกปลาหมอ

ทัศนสัมพันธ์และการยกย้ายปัจจัยโหราศาสตร์ไทยสุริยยาตรวิธี เดือน กันยายน 2558

ทัศนสัมพันธ์และการยกย้ายปัจจัยโหราศาสตร์ไทยสุริยยาตรวิธี เดือน กันยายน 2558

ทัศนสัมพันธ์วันที่ 1 กันยายน 2558

       จันทร์ สถิตราศี = มีน

           เวลา 18.41 น.   จันทร์ ตรีโกณ อังคาร

ทัศนสัมพันธ์วันที่ 2 กันยายน 2558

       จันทร์ ย้ายราศี => เมษ เวลา 09.44 น.

           เวลา 09.48 น.   จันทร์ กุม มฤตยู

           เวลา 10.46 น.   จันทร์ ตรีโกณ ศุกร์

ทัศนสัมพันธ์วันที่ 3 กันยายน 2558

       ศุกร์ ย้ายราศี => กรกฎ เวลา 23.45 น.

           เวลา 05.45 น.   จันทร์ ตรีโกณ พฤหัส

           เวลา 12.20 น.   อาทิตย์ ตรีโกณ จันทร์

           เวลา 15.05 น.   อังคาร จตุโกณ เกตุ

           เวลา 22.53 น.   จันทร์ เล็ง เกตุ

           เวลา 22.56 น.   ศุกร์ ตรีโกณ มฤตยู

           เวลา 23.30 น.   จันทร์ จตุโกณ อังคาร

ทัศนสัมพันธ์วันที่ 4 กันยายน 2558

       จันทร์ ย้ายราศี => พฤษภ เวลา 12.30 น.

           เวลา 02.17 น.   ศุกร์ ตรีโกณ มฤตยู

           เวลา 15.24 น.   จันทร์ เล็ง เสาร์

ทัศนสัมพันธ์วันที่ 5 กันยายน 2558

           เวลา 00.31 น.   จันทร์ ตรีโกณ ราหู

           เวลา 05.24 น.   จันทร์ ตรีโกณ พุธ

           เวลา 09.44 น.   จันทร์ จตุโกณ พฤหัส

           เวลา 19.28 น.   อาทิตย์ จตุโกณ จันทร์

ทัศนสัมพันธ์วันที่ 6 กันยายน 2558

       จันทร์ ย้ายราศี => มิถุน เวลา 16.26 น.

           เวลา 05.34 น.   จันทร์ โยค อังคาร

           เวลา 15.20 น.   จันทร์ โยค ศุกร์

           เวลา 16.26 น.   จันทร์ โยค มฤตยู

ทัศนสัมพันธ์วันที่ 7 กันยายน 2558

       มฤตยู ย้ายราศี => มีน เวลา 22.33 น.

           เวลา 04.41 น.   จันทร์ จตุโกณ ราหู

           เวลา 08.20 น.   จันทร์ จตุโกณ พุธ

           เวลา 15.00 น.   จันทร์ โยค พฤหัส

           เวลา 19.38 น.   อาทิตย์ โยค เกตุ

ทัศนสัมพันธ์วันที่ 8 กันยายน 2558

       จันทร์ ย้ายราศี => กรกฎ เวลา 21.57 น.

           เวลา 03.25 น.   จันทร์ ตรีโกณ เกตุ

           เวลา 04.21 น.   อาทิตย์ โยค จันทร์

           เวลา 21.56 น.   จันทร์ จตุโกณ มฤตยู

ทัศนสัมพันธ์วันที่ 9 กันยายน 2558

           เวลา 01.37 น.   จันทร์ ตรีโกณ เสาร์

           เวลา 10.38 น.   จันทร์ โยค ราหู

ทัศนสัมพันธ์วันที่ 10 กันยายน 2558

           เวลา 08.59 น.   จันทร์ จตุโกณ เกตุ

           เวลา 21.53 น.   พุธ กุม ราหู

ทัศนสัมพันธ์วันที่ 11 กันยายน 2558

       จันทร์ ย้ายราศี => สิงห์ เวลา 06.36 น.

           เวลา 00.37 น.   จันทร์ กุม อังคาร

           เวลา 04.31 น.   จันทร์ กุม ศุกร์

           เวลา 10.46 น.   จันทร์ จตุโกณ เสาร์

ทัศนสัมพันธ์วันที่ 12 กันยายน 2558

           เวลา 09.36 น.   จันทร์ กุม พฤหัส

           เวลา 16.20 น.   จันทร์ โยค เกตุ

ทัศนสัมพันธ์วันที่ 13 กันยายน 2558

       จันทร์ ย้ายราศี => กันย์ เวลา 17.05 น.

           เวลา 07.48 น.   อาทิตย์ กุม จันทร์

ทัศนสัมพันธ์วันที่ 14 กันยายน 2558

           เวลา 01.14 น.   จันทร์ กุม พุธ

           เวลา 01.23 น.   อังคาร กุม ศุกร์

           เวลา 06.05 น.   จันทร์ กุม ราหู

ทัศนสัมพันธ์วันที่ 15 กันยายน 2558

       อังคาร ย้ายราศี => สิงห์ เวลา 22.15 น.

           เวลา 19.21 น.   อังคาร ตรีโกณ มฤตยู

ทัศนสัมพันธ์วันที่ 16 กันยายน 2558

       จันทร์ ย้ายราศี => ตุล เวลา 04.41 น.

           เวลา 02.32 น.   จันทร์ โยค ศุกร์

           เวลา 04.33 น.   จันทร์ เล็ง มฤตยู

           เวลา 05.00 น.   จันทร์ โยค อังคาร

           เวลา 09.15 น.   จันทร์ ตรีโกณ อังคาร

ทัศนสัมพันธ์วันที่ 17 กันยายน 2558

           เวลา 01.59 น.   พฤหัส โยค เกตุ

           เวลา 10.13 น.   จันทร์ กุม เกตุ

           เวลา 10.44 น.   จันทร์ โยค พฤหัส

ทัศนสัมพันธ์วันที่ 18 กันยายน 2558

       จันทร์ ย้ายราศี => พิจิก เวลา 15.46 น.

       อาทิตย์ ย้ายราศี => กันย์ เวลา 03.45 น.

       พุธ ย้ายราศี => สิงห์ เวลา 17.10 น.

           เวลา 09.36 น.   อาทิตย์ กุม พุธ

           เวลา 14.19 น.   จันทร์ จตุโกณ ศุกร์

           เวลา 15.49 น.   จันทร์ โยค พุธ

           เวลา 16.48 น.   อาทิตย์ โยค จันทร์

           เวลา 19.16 น.   จันทร์ จตุโกณ อังคาร

           เวลา 20.50 น.   จันทร์ กุม เสาร์

ทัศนสัมพันธ์วันที่ 19 กันยายน 2558

           เวลา 04.02 น.   จันทร์ โยค ราหู

           เวลา 22.04 น.   จันทร์ จตุโกณ พฤหัส

ทัศนสัมพันธ์วันที่ 20 กันยายน 2558

           เวลา 03.33 น.   อังคาร จตุโกณ เสาร์

           เวลา 22.04 น.   จันทร์ จตุโกณ พุธ

           เวลา 23.17 น.   อาทิตย์ โยค เสาร์

ทัศนสัมพันธ์วันที่ 21 กันยายน 2558

       จันทร์ ย้ายราศี => ธนู เวลา 00.58 น.

           เวลา 00.00 น.   อาทิตย์ โยค เสาร์

           เวลา 00.19 น.   จันทร์ ตรีโกณ ศุกร์

           เวลา 00.37 น.   จันทร์ ตรีโกณ มฤตยู

           เวลา 06.58 น.   อาทิตย์ จตุโกณ จันทร์

           เวลา 07.37 น.   จันทร์ ตรีโกณ อังคาร

           เวลา 12.49 น.   จันทร์ จตุโกณ ราหู

           เวลา 21.31 น.   ศุกร์ ตรีโกณ มฤตยู

ทัศนสัมพันธ์วันที่ 22 กันยายน 2558

           เวลา 00.02 น.   ศุกร์ ตรีโกณ มฤตยู

           เวลา 00.23 น.   จันทร์ โยค เกตุ  

           เวลา 07.17 น.   จันทร์ ตรีโกณ พฤหัส

ทัศนสัมพันธ์วันที่ 23 กันยายน 2558

       จันทร์ ย้ายราศี => มกร เวลา 08.03 น.

           เวลา 07.41 น.   จันทร์ จตุโกณ มฤตยู

           เวลา 12.53 น.   จันทร์ โยค เสาร์

           เวลา 17.25 น.   อาทิตย์ ตรีโกณ จันทร์

           เวลา 18.37 น.   จันทร์ ตรีโกณ ราหู

ทัศนสัมพันธ์วันที่ 24 กันยายน 2558

           เวลา 03.46 น.   จันทร์ จตุโกณ เกตุ

           เวลา 09.04 น.   อาทิตย์ กุม ราหู

ทัศนสัมพันธ์วันที่ 25 กันยายน 2558

       จันทร์ ย้ายราศี => กุมภ์ เวลา 12.19 น.

           เวลา 13.13 น.   จันทร์ เล็ง ศุกร์

           เวลา 17.40 น.   จันทร์ จตุโกณ เสาร์

           เวลา 23.15 น.   จันทร์ เล็ง อังคาร

ทัศนสัมพันธ์วันที่ 26 กันยายน 2558

           เวลา 17.52 น.   จันทร์ เล็ง พฤหัส

ทัศนสัมพันธ์วันที่ 27 กันยายน 2558

       จันทร์ ย้ายราศี => มีน เวลา 15.28 น.

           เวลา 10.11 น.   จันทร์ เล็ง พุธ

           เวลา 20.59 น.   จันทร์ ตรีโกณ เสาร์

ทัศนสัมพันธ์วันที่ 28 กันยายน 2558

           เวลา 01.22 น.   จันทร์ เล็ง ราหู

           เวลา 08.12 น.   อาทิตย์ เล็ง จันทร์

ทัศนสัมพันธ์วันที่ 29 กันยายน 2558

       จันทร์ ย้ายราศี => เมษ เวลา 17.52 น.

           เวลา 09.44 น.   อังคาร โยค เกตุ

           เวลา 20.52 น.   จันทร์ ตรีโกณ ศุกร์

ทัศนสัมพันธ์วันที่ 30 กันยายน 2558

           เวลา 07.23 น.   จันทร์ เล็ง เกตุ

           เวลา 09.14 น.   จันทร์ ตรีโกณ อังคาร

คำนวณทัศนสัมพันธ์และการยกย้ายปัจจัยโหราศาสตร์ ด้วยโปรแกรมโชติยรังสี พัฒนาโดย นายธีรพร  บุญวงษ์