اطلاعیه

Collapse
No announcement yet.

اتصال ATxmega32a4u-au به السیدی نوکیا 5110

Collapse
X
 
  • فیلتر
  • زمان
  • Show
Clear All
new posts

    اتصال ATxmega32a4u-au به السیدی نوکیا 5110

    سلام به همگی

    من میخوام میکرو ATXmega32a4u-au وصل کنم به السیدی 5110 نوکیا ولی به مشکل برخوردم
    دوتا کتابخانه از السیدی دارم
    برنامه رو روی ATmega32 تست کردم جواب داد مشکلی نداره
    ولی روی Xmega32a4u-au امتحان کردم جواب نداد ..
    این کتابخانه رو glcd-nokia3310.lib استفاده میکنم تصویر سیاه بعد از چند ثانیه نوشته ها قاطی میشن و از دوباره سیاه میشه
    این یکی کتابخانه glcd-nokia5110.lib اینو استفاده میکنم نوشته ها میاد ولی مثلا تو برنامه

    lcdat 1,1,"0"

    مینویسم ...ولی 0 رو روی السیدی ";:0123456789 اینجوری نمایش میده
    عکسم که میزارم قاطی نشون میده
    دقیق نمیدونم مشکل از کجاست خودم حدس میزنم فیوز بیتا باشه ...ولی از فیوز بیتای ایکسمگا چیزی
    نمیدونم ...
    پروگرامرمم هاتله
    ممنون میشم دوستان کمکم کنن



    کد:
    $regfile = "xm32a4udef.dat"
    $crystal = 32000000
    $hwstack = 40
    $swstack = 16
    $framesize = 32
    $lib "xmega.lib"
    Config Osc = Enabled , 32mhzosc = Enabled
    Config Sysclock = 32mhz , Prescalea = 1 , Prescalebc = 1_1
    
    $lib "glcd-nokia3310.lib"
    Config Graphlcd = 128x64sed , Rst = Portc.3 , Cs1 = Portc.4 , A0 = Portc.5 , Si = Portc.6 , Sclk = Portc.7
    
    Dim I As Byte , N As Word , M As Byte
    Dim Text As String * 8
    
    '***************************** Program *****************************************
    Initlcd
    Cls
    Setfont Font6x8
    Lcdat 2 , 16 , "NOKIA-3310"
    Lcdat 4 , 30 , "84x48"
    Wait 2
    Cls
    Showpic 0 , 0 , Walker
    Wait 2
    Cls
    Setfont Font6x8
    Lcdat 3 , 1 , "--------------"
    Lcdat 4 , 22 , "1 March"
    Lcdat 5 , 1 , "   Saturday   " , 1
    Lcdat 6 , 31 , "2014"
    Setfont Font12x16dig
    I = 20
    
    Do
    Incr I
    If I > 59 Then I = 20
    Text = Str(i)
    Lcdat 1 , 1 , "23:" ; Text
    Waitms 500
    Lcdat 1 , 1 , "23 " ; Text
    If I.0 = 1 Then Showpic 66 , 1 , Ring Else Lcdat 1 , 66 , "  "
    Waitms 500
    '----------------------------------------------- Contrast regulation
    'For m = 175 To 210
    '   Glcdcmd 33 : Glcdcmd m
    '   Waitms 100
    'Next
    'Glcdcmd 33 : Glcdcmd 200                                    'Normal Contrast
    Loop
    End
    '===============================================================================
    Ring:
    $bgf "Ring.bgf"
    Walker:
    $bgf "Walker.bgf"
    $include "font6x8.font"
    $include "font12x16dig.font"
    جدیدترین ویرایش توسط MN-123; ۲۰:۱۳ ۱۳۹۵/۰۵/۰۹.

    #2
    پاسخ : اتصال ATxmega32a4u-au به السیدی نوکیا 5110

    دروود ممنون از همگی

    من یه چند هفته ای درگیر همینم خلاصه

    مشکل حل شد

    فقط خواهشا کسی اطلاعاتی چیزی داره بذاره ...بد نیست

    شاید یه کمکی کنه ... به کسی که اصلا با اینجور ال سی دی ها کار نکرده و اطلاعاتی نداره ...

    Config Vport0 = C

    $lib "glcd-Nokia3310.lib"

    Config Graphlcd = 128x64sed , Rst = Portc.4 , Cs1 = Portc.3 , A0 = Port0.2 , Si = Port0.1 , Sclk = Port0.0

    Initlcd

    Config Portc.0 = Output
    Config Portc.1 = Output
    Config Portc.2 = Output

    دیدگاه

    لطفا صبر کنید...
    X