A
akhileshchidare
Guest
كنت قد كتبت مدونة الصبان للاتصال مع ADE7758.
أريد أن أعرف ما إذا أنا أنها تفعل الصحيح أم لا...
رمز يتم تجميع مع أي أخطاء...ولكن منطقيا فهل هذا صحيح؟وأنا من خلال الحصول على سجلات ادي الصبان من تحكم الموافقة المسبقة عن علم...
thanx
اخيليش
رمز :
# تشمل "p18f6490.h"# تعريف التكوين إلغاء حماية & & MCLRDIS بورين PWRTEN & & WDTDIS & INTCLK & IESODIS & FCMDIS/*************** AnalogDevices AD7758 *******************// * لقراءة سجلات واط ساعة * /تعريف # AWATTHR 0x01
تعريف # BWATTHR 0x02
تعريف # CWATTHR 0x03/ * لقراءة فار - الموارد البشرية * تسجيلات /تعريف # AVARHR 0x04
تعريف # BVARHR 0x05
تعريف # CVARHR 0x06/ * لقراءة زارة شؤون المحاربين القدامى للموارد البشرية سجلات * /تعريف # AVAHR 0x07
تعريف # BVAHR 0x08
تعريف # CVAHR 0x09/ * لقراءة من الأول إلى رمس سجلات * /
تعريف # AIRMS 0x0A
تعريف # IRMS 0x0B
تعريف # CIRMS 0x0C/ * لقراءة الخامس رمس سجلات * /
تعريف # AVRMS 0x0D
تعريف # BVRMS 0x0E
تعريف # CVRMS 0x0F
تعريف # س TRISFbits.TRISF7
تعريف # مركز / سيك / TRISCbits.TRISC3
تعريف # المكانية TRISCbits.TRISC4
تعريف # تشريع التمييز الجنسي TRISCbits.TRISC5غير الموقعة تشار writeSPI (غير الموقعة تشار data_out) ؛
غير الموقعة readSPI شار (الفراغ) ؛spi_init باطل () ؛
spi_init باطل ()
(
SSPSTATbits.CKE = 1 ؛ / * البيانات المنقولة على حافة fallling * /
SSPCON1bits.CKP = 1 ؛ / ساعة * حالة الخمول عالية * /
TRISFbits.TRISF7 = 1 ؛ / * تحديد اس اس دبوس كمدخل * /
TRISC & = 0xFD ؛ / * تحديد تشريع التمييز الجنسي والإخراج * /
TRISC | = 0x10 ؛ / * تحديد المكانية كمدخل * /
)باطلة الرئيسي ()
(
غير الموقعة data_out شار ؛ / * التصدي ليتم إرسالها إلى سجل communiccation * /
غير الموقعة read_data شار ؛ / * بيانات يمكن ان تقرأ على سجل كل منهما * /
بيانات غير موقعة كثافة العمليات ؛spi_init باطل () ؛ / الصبان التهيئة * * /writeSPI (data_out) ؛writeSPI (AWATTHR) ؛
بيانات = readSPI () ؛writeSPI (BWATTHR) ؛
بيانات = readSPI () ؛writeSPI (CWATTHR) ؛
بيانات = readSPI () ؛writeSPI (AVARHR) ؛
بيانات = readSPI () ؛writeSPI (BVARHR) ؛
بيانات = readSPI () ؛writeSPI (CVARHR) ؛
بيانات = readSPI () ؛في حين (1) ؛
)غير الموقعة تشار writeSPI (تشار data_out غير موقعة)
(
SSPBUF = data_out ؛
إذا كان (SSPCON1 & 0x80)
عودة (-1) ؛
أيضا
(
في حين (! SSPSTATbits.BF) ؛
)
عودة (0) ؛
)غير الموقعة readSPI شار (الفراغ)
(
SSPBUF = 0x00 ؛
في حين (! SSPSTATbits.BF) ؛
عودة (SSPBUF) ؛
)
أريد أن أعرف ما إذا أنا أنها تفعل الصحيح أم لا...
رمز يتم تجميع مع أي أخطاء...ولكن منطقيا فهل هذا صحيح؟وأنا من خلال الحصول على سجلات ادي الصبان من تحكم الموافقة المسبقة عن علم...
thanx
اخيليش
رمز :
# تشمل "p18f6490.h"# تعريف التكوين إلغاء حماية & & MCLRDIS بورين PWRTEN & & WDTDIS & INTCLK & IESODIS & FCMDIS/*************** AnalogDevices AD7758 *******************// * لقراءة سجلات واط ساعة * /تعريف # AWATTHR 0x01
تعريف # BWATTHR 0x02
تعريف # CWATTHR 0x03/ * لقراءة فار - الموارد البشرية * تسجيلات /تعريف # AVARHR 0x04
تعريف # BVARHR 0x05
تعريف # CVARHR 0x06/ * لقراءة زارة شؤون المحاربين القدامى للموارد البشرية سجلات * /تعريف # AVAHR 0x07
تعريف # BVAHR 0x08
تعريف # CVAHR 0x09/ * لقراءة من الأول إلى رمس سجلات * /
تعريف # AIRMS 0x0A
تعريف # IRMS 0x0B
تعريف # CIRMS 0x0C/ * لقراءة الخامس رمس سجلات * /
تعريف # AVRMS 0x0D
تعريف # BVRMS 0x0E
تعريف # CVRMS 0x0F
تعريف # س TRISFbits.TRISF7
تعريف # مركز / سيك / TRISCbits.TRISC3
تعريف # المكانية TRISCbits.TRISC4
تعريف # تشريع التمييز الجنسي TRISCbits.TRISC5غير الموقعة تشار writeSPI (غير الموقعة تشار data_out) ؛
غير الموقعة readSPI شار (الفراغ) ؛spi_init باطل () ؛
spi_init باطل ()
(
SSPSTATbits.CKE = 1 ؛ / * البيانات المنقولة على حافة fallling * /
SSPCON1bits.CKP = 1 ؛ / ساعة * حالة الخمول عالية * /
TRISFbits.TRISF7 = 1 ؛ / * تحديد اس اس دبوس كمدخل * /
TRISC & = 0xFD ؛ / * تحديد تشريع التمييز الجنسي والإخراج * /
TRISC | = 0x10 ؛ / * تحديد المكانية كمدخل * /
)باطلة الرئيسي ()
(
غير الموقعة data_out شار ؛ / * التصدي ليتم إرسالها إلى سجل communiccation * /
غير الموقعة read_data شار ؛ / * بيانات يمكن ان تقرأ على سجل كل منهما * /
بيانات غير موقعة كثافة العمليات ؛spi_init باطل () ؛ / الصبان التهيئة * * /writeSPI (data_out) ؛writeSPI (AWATTHR) ؛
بيانات = readSPI () ؛writeSPI (BWATTHR) ؛
بيانات = readSPI () ؛writeSPI (CWATTHR) ؛
بيانات = readSPI () ؛writeSPI (AVARHR) ؛
بيانات = readSPI () ؛writeSPI (BVARHR) ؛
بيانات = readSPI () ؛writeSPI (CVARHR) ؛
بيانات = readSPI () ؛في حين (1) ؛
)غير الموقعة تشار writeSPI (تشار data_out غير موقعة)
(
SSPBUF = data_out ؛
إذا كان (SSPCON1 & 0x80)
عودة (-1) ؛
أيضا
(
في حين (! SSPSTATbits.BF) ؛
)
عودة (0) ؛
)غير الموقعة readSPI شار (الفراغ)
(
SSPBUF = 0x00 ؛
في حين (! SSPSTATbits.BF) ؛
عودة (SSPBUF) ؛
)