اطلاعیه

Collapse
No announcement yet.

راه اندازی LCD N96 (رنگی با وضوح 240*320)

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

    #46
    پاسخ : راه اندازی LCD N96 (رنگی با وضوح 244*320)

    سلام،

    لطفا اگه میشه در مورد این کدهای زیر که در فایل tftlcd_function.h نوشته شده یه کمی توضیح بدید. و اینکه بر چه اساسی مقداردهی شدند؟؟ من دیتا شیتو نگا کردم فکرکنم این کدها به رجیسترها مربوط میشن؟ درسته؟؟؟؟ یا حداقل چندتاشو توضیح بدید!!! ممنونم.

    #define TS_INS_START_OSC 0x00
    #define TS_INS_DRIV_OUT_CTRL 0x01
    #define TS_INS_DRIV_WAV_CTRL 0x02
    #define TS_INS_ENTRY_MOD 0x03
    #define TS_INS_RESIZE_CTRL 0x04
    #define TS_INS_DISP_CTRL1 0x07
    #define TS_INS_DISP_CTRL2 0x08
    #define TS_INS_DISP_CTRL3 0x09
    #define TS_INS_DISP_CTRL4 0x0A
    #define TS_INS_RGB_DISP_IF_CTRL1 0x0C
    #define TS_INS_FRM_MARKER_POS 0x0D
    #define TS_INS_RGB_DISP_IF_CTRL2 0x0F
    #define TS_INS_POW_CTRL1 0x10
    #define TS_INS_POW_CTRL2 0x11
    #define TS_INS_POW_CTRL3 0x12
    #define TS_INS_POW_CTRL4 0x13
    #define TS_INS_GRAM_HOR_AD 0x20
    #define TS_INS_GRAM_VER_AD 0x21
    #define TS_INS_RW_GRAM 0x22
    #define TS_INS_POW_CTRL7 0x29
    #define TS_INS_FRM_RATE_COL_CTRL 0x2B
    #define TS_INS_GAMMA_CTRL1 0x30
    #define TS_INS_GAMMA_CTRL2 0x31
    #define TS_INS_GAMMA_CTRL3 0x32
    #define TS_INS_GAMMA_CTRL4 0x35
    #define TS_INS_GAMMA_CTRL5 0x36
    #define TS_INS_GAMMA_CTRL6 0x37
    #define TS_INS_GAMMA_CTRL7 0x38
    #define TS_INS_GAMMA_CTRL8 0x39
    #define TS_INS_GAMMA_CTRL9 0x3C
    #define TS_INS_GAMMA_CTRL10 0x3D
    #define TS_INS_HOR_START_AD 0x50
    #define TS_INS_HOR_END_AD 0x51
    #define TS_INS_VER_START_AD 0x52
    #define TS_INS_VER_END_AD 0x53
    #define TS_INS_GATE_SCAN_CTRL1 0x60
    #define TS_INS_GATE_SCAN_CTRL2 0x61
    #define TS_INS_GATE_SCAN_CTRL3 0x6A
    #define TS_INS_PART_IMG1_DISP_POS 0x80
    #define TS_INS_PART_IMG1_START_AD 0x81
    #define TS_INS_PART_IMG1_END_AD 0x82
    #define TS_INS_PART_IMG2_DISP_POS 0x83
    #define TS_INS_PART_IMG2_START_AD 0x84
    #define TS_INS_PART_IMG2_END_AD 0x85
    #define TS_INS_PANEL_IF_CTRL1 0x90
    #define TS_INS_PANEL_IF_CTRL2 0x92
    #define TS_INS_PANEL_IF_CTRL3 0x93
    #define TS_INS_PANEL_IF_CTRL4 0x95
    #define TS_INS_PANEL_IF_CTRL5 0x97
    #define TS_INS_PANEL_IF_CTRL6 0x98
    [/left]

    دیدگاه


      #47
      پاسخ : راه اندازی LCD N96 (رنگی با وضوح 244*320)

      اینا دلیل خاصی برای مقدار دهی ندارند. تو دیتا شیت گفته این اعداد رو به عنوان دستور بفرستید تا یه کار مشخص انجام بشه.
      [img width=477 height=100]http://www.eca.ir/pic/upload/agazade.png[/img]

      دیدگاه


        #48
        پاسخ : راه اندازی LCD N96 (رنگی با وضوح 244*320)

        با سلام به همه اساتید گرامی
        ببخشید من با کدوم دستور می تونم یه عکس به اندازه دلخواه مثلا(56x64)و در مختصات دلخواه مثلا (35x20) نمایش بدم؟
        لطفا کمکم کنید ممنون میشم.

        دیدگاه


          #49
          مشکل با LCD N96

          سلام؛
          به دادم برسین این ال سی دی کلافم کرد ، من دقیقا همون برنامه ای را که توی مجله نویز نوشته بود را توی مگا 32 ریختم ، مدارش هم همون طوری که تو مجله بود درست کردم ولی فقط یه تصویر راه راه بهم نشون می ده.
          http://ups.night-skin.com/images/gdv...txj2am1uph.jpg

          دیدگاه


            #50
            پاسخ : مشکل با LCD N96

            یه چک کن ببین جای LSB و MSB رو بر عکس نزدی؟
            برنامه باید چی کار بکنه؟
            اگه فقط اینشیال میکنی و صفحه رو پاک نمیکنی همین تصویر درسته.
            الهم عجل لولیک الفرج

            فقط 313 نفر...

            دیدگاه


              #51
              پاسخ : مشکل با LCD N96

              نوشته اصلی توسط امیر حسام الفتی
              یه چک کن ببین جای LSB و MSB رو بر عکس نزدی؟
              برنامه باید چی کار بکنه؟
              اگه فقط اینشیال میکنی و صفحه رو پاک نمیکنی همین تصویر درسته.
              نه LSB و MSB درست سر جای خودش قرار داره .
              من دقیقا از برنامه ای که توی مجله نویز بود استفاده کردم و این برنامه ظاهرا باید یک تصویر از چند رنگ مختلف نشون بده.
              اینم برنامه ای که استفاده کردم:http://up.iranblog.com/images/ijqulvgnvm11i7osxeo.rar

              دیدگاه


                #52
                پاسخ : راه اندازی LCD N96 (رنگی با وضوح 244*320)

                با بسکام برای این lcd نمونه کد دارید ؟

                ممنون میشم راهنمایی کنید .
                مهم نيست كه چه انديشه اي در سر و چه ترسي در دل داريد؛ مهم آن است كه بيكار ننشينيد و دست به كاري بزنيد و وارد ميدان عمل بشويد.

                نمي توانيد به كودكي بياموزيد كه از خود مواظبت كند، مگر آنكه او را آزاد بگذاريد تا براي مواظبت از خود بكوشد؛ ممكن است اشتباه كند، ولي دانايي او از ميان همين اشتباهات سرچشمه مي گيرد.

                دیدگاه


                  #53
                  پاسخ : راه اندازی LCD N96 (رنگی با وضوح 244*320)

                  از این برنامه استفاده کن...

                  $regfile = "M32def.dat"
                  $crystal = 16000000

                  $hwstack = 32 ' default use 32 for the hardware stack

                  $swstack = 10 ' default use 10 for the SW stack

                  $framesize = 40


                  ''''''''&# 039;'''''''&#03 9;'''''''' ''''''''&# 039;'''''''&#03 9;'''''''' ''''''''&# 039;'''''''&#03 9;'''''''' '''''

                  Declare Sub Orb(ddr As Byte , Byval Bitnum As Byte) ' make output ddr.bitnum = output
                  Declare Sub Setb(port As Byte , Bitnum As Byte) ' make set port.bitnum = 1
                  Declare Sub Clrb(port As Byte , Bitnum As Byte) ' make reset port.bitnum = 0
                  Declare Function Rdb(pin As Byte , Bitnum As Byte)as Byte ' read pin of a port pin.bitnum

                  Declare Sub Tslcdoutins ' send a word instruction to lcd
                  Declare Sub Tslcdoutdata ' send a data instruction to lcd
                  'Declare Function Tslcdindata As Word ' read a word data from lcd

                  Declare Sub Tslcdinit ' initialization of lcd
                  Config Portd.1 = Output
                  Declare Sub Lcdfillcolor

                  ''''''''&# 039;'''''''&#03 9;'''''''' ''''''''&# 039;'''''''&#03 9;'''''''' ''''''''&# 039;'''''''&#03 9;'''''''' '''''

                  Dim Ins As Byte
                  Dim Dat As Word
                  Dim Var11 As Byte

                  ''''''''&# 039;'''''''&#03 9;'''''''' ''''''''&# 039;'''''''&#03 9;'''''''' ''''''''&# 039;'''''''&#03 9;'''''''' '''''

                  'd.0 reset
                  'd.1 backlight
                  'd.2 rs *
                  'd.3 cs *
                  'd.4 rd *
                  'd.5 wr *
                  'd.6
                  'd.7

                  'porta=data

                  'b.0 chip select *imo
                  Config Portb.1 = Output
                  Config Portb.2 = Output
                  Reset Portb.1
                  Set Portb.2
                  Wait 1
                  Reset Portb.2

                  ' reset pin declare
                  ' reset pin declare
                  Lcd_rst_port Alias Portd
                  Lcd_rst_ddr Alias Ddrd
                  Lcd_rst_pin Alias Pind
                  Lcd_rst_pin_num Alias 7

                  ' rs pin declare
                  Lcd_rs_port Alias Portd
                  Lcd_rs_ddr Alias Ddrd
                  Lcd_rs_pin Alias Pind
                  Lcd_rs_pin_num Alias 2

                  ' cs pin declare
                  Lcd_cs_port Alias Portd
                  Lcd_cs_ddr Alias Ddrd
                  Lcd_cs_pin Alias Pind
                  Lcd_cs_pin_num Alias 3

                  ' rd pin declare
                  Lcd_rd_port Alias Portd
                  Lcd_rd_ddr Alias Ddrd
                  Lcd_rd_pin Alias Pind
                  Lcd_rd_pin_num Alias 4

                  'wr pin declare
                  Lcd_wr_port Alias Portd
                  Lcd_wr_ddr Alias Ddrd
                  Lcd_wr_pin Alias Pind
                  Lcd_wr_pin_num Alias 5

                  ' lcd databus declare
                  Lcd_db_msb_port Alias Porta
                  Lcd_db_msb_ddr Alias Ddra
                  Lcd_db_msb_pin Alias Pina

                  Lcd_db_lsb_port Alias Portc
                  Lcd_db_lsb_ddr Alias Ddrc
                  Lcd_db_lsb_pin Alias Pinc

                  ' lcd global defines
                  '-------------------tucj screen
                  Ts_size_x Alias 240
                  Ts_size_y Alias 320
                  Ts_val_entry_mod Alias &H0030
                  'Ts_ins_gram_hor_ad Alias Ts_ins_gram_adx
                  'Ts_ins_gram_ver_ad Alias Ts_ins_gram_ady
                  'Ts_ins_hor_start_ad Alias Ts_ins_start_adx
                  'Ts_ins_hor_end_ad Alias Ts_ins_end_adx
                  'Ts_ins_ver_start_ad Alias Ts_ins_start_ady
                  'Ts_ins_ver_end_ad Alias Ts_ins_end_ady

                  '==============================regidter====== ===================================
                  Ts_ins_start_osc Alias &H0000
                  Ts_ins_driv_out_ctrl Alias &H0001
                  Ts_ins_driv_wav_ctrl Alias &H0002
                  Ts_ins_entry_mod Alias &H0003
                  Ts_ins_resize_ctrl Alias &H0004 'RESIZE CONTROL
                  Ts_ins_disp_ctrl1 Alias &H0007
                  Ts_ins_disp_ctrl2 Alias &H0008
                  Ts_ins_disp_ctrl3 Alias &H0009
                  Ts_ins_disp_ctrl4 Alias &H000A
                  Ts_ins_rgb_disp_if_ctrl1 Alias &H000C
                  Ts_ins_frm_marker_pos Alias &H000D
                  Ts_ins_rgb_disp_if_ctrl2 Alias &H000F
                  Ts_ins_pow_ctrl1 Alias &H0010
                  Ts_ins_pow_ctrl2 Alias &H0011
                  Ts_ins_pow_ctrl3 Alias &H0012
                  Ts_ins_pow_ctrl4 Alias &H0013
                  Ts_ins_gram_hor_ad Alias &H0020
                  Ts_ins_gram_ver_ad Alias &H0021
                  Ts_ins_rw_gram Alias &H0022
                  Ts_ins_pow_ctrl7 Alias &H0029
                  Ts_ins_frm_rate_col_ctrl Alias &H002B
                  Ts_ins_gamma_ctrl1 Alias &H0030
                  Ts_ins_gamma_ctrl2 Alias &H0031
                  Ts_ins_gamma_ctrl3 Alias &H0032
                  Ts_ins_gamma_ctrl4 Alias &H0035
                  Ts_ins_gamma_ctrl5 Alias &H0036
                  Ts_ins_gamma_ctrl6 Alias &H0037
                  Ts_ins_gamma_ctrl7 Alias &H0038
                  Ts_ins_gamma_ctrl8 Alias &H0039
                  Ts_ins_gamma_ctrl9 Alias &H003C
                  Ts_ins_gamma_ctrl10 Alias &H003D
                  Ts_ins_hor_start_ad Alias &H0050
                  Ts_ins_hor_end_ad Alias &H0051
                  Ts_ins_ver_start_ad Alias &H0052
                  Ts_ins_ver_end_ad Alias &H0053
                  Ts_ins_gate_scan_ctrl1 Alias &H0060
                  Ts_ins_gate_scan_ctrl2 Alias &H0061
                  Ts_ins_gate_scan_ctrl3 Alias &H006A
                  Ts_ins_part_img1_disp_pos Alias &H0080
                  Ts_ins_part_img1_start_ad Alias &H0081
                  Ts_ins_part_img1_end_ad Alias &H0082
                  Ts_ins_part_img2_disp_pos Alias &H0083
                  Ts_ins_part_img2_start_ad Alias &H0084
                  Ts_ins_part_img2_end_ad Alias &H0085
                  Ts_ins_panel_if_ctrl1 Alias &H0090
                  Ts_ins_panel_if_ctrl2 Alias &H0092
                  Ts_ins_panel_if_ctrl3 Alias &H0093
                  Ts_ins_panel_if_ctrl4 Alias &H0095
                  Ts_ins_panel_if_ctrl5 Alias &H0097
                  Ts_ins_panel_if_ctrl6 Alias &H0098

                  ' lcd color code defines
                  Ts_col_red Alias &H001F
                  Ts_col_green Alias &H07E0
                  Ts_col_blue Alias &HF800
                  Ts_col_yellow Alias &H07FF
                  Ts_col_purple Alias &HF81F
                  Ts_col_black Alias &H0000
                  Ts_col_white Alias &HFFFF

                  ''''''''&# 039;'''''''&#03 9;'''''''' ''''''''&# 039;'''''''&#03 9;'''''''' ''''''''&# 039;'''''''&#03 9;'''''''' '''''

                  ' start program

                  'config portb=output
                  'Config Porta = Output
                  '--------^ ^---------i think it's beter use of this line

                  Lcd_rst_port.lcd_rst_pin_num = 1
                  Lcd_rst_ddr.lcd_rst_pin_num = 1

                  Lcd_rs_port.lcd_rs_pin_num = 1
                  Lcd_rs_ddr.lcd_rs_pin_num = 1

                  Lcd_cs_port.lcd_cs_pin_num = 1
                  Lcd_cs_ddr.lcd_cs_pin_num = 1

                  Lcd_rd_port.lcd_rd_pin_num = 1
                  Lcd_rd_ddr.lcd_rd_pin_num = 1

                  Lcd_wr_port.lcd_wr_pin_num = 1
                  Lcd_wr_ddr.lcd_wr_pin_num = 1

                  Lcd_db_msb_ddr = 255
                  Lcd_db_lsb_ddr = 255
                  Call Tslcdinit
                  Call Lcdfillcolor
                  End


                  ''''''''&# 039;'''''''&#03 9;'''''''' ''''''''&# 039;'''''''&#03 9;'''''''' ''''''''&# 039;'''''''&#03 9;'''''''' '''''

                  Sub Tslcdoutdata 'write to internal gram

                  Local Var1 As Word

                  Reset Lcd_cs_port.lcd_cs_pin_num 'reset cs
                  Set Lcd_rs_port.lcd_rs_pin_num 'set rs
                  Var1 = Dat
                  Shift Var1 , Right , 8
                  Lcd_db_msb_port = Var1 'porta=var1
                  Lcd_db_lsb_port = Dat
                  Reset Lcd_wr_port.lcd_wr_pin_num 'reset wr
                  Set Lcd_wr_port.lcd_wr_pin_num 'set wr
                  Set Lcd_cs_port.lcd_cs_pin_num

                  End Sub

                  '***************************************** *

                  Sub Tslcdoutins 'write an index register

                  Local Var1 As Word

                  Reset Lcd_cs_port.lcd_cs_pin_num 'reset cs
                  Reset Lcd_rs_port.lcd_rs_pin_num 'reset rs
                  Set Lcd_rd_port.lcd_rd_pin_num 'set rd
                  Var1 = Ins
                  Shift Var1 , Right , 8
                  Lcd_db_msb_port = Var1
                  Lcd_db_lsb_port = Ins
                  Reset Lcd_wr_port.lcd_wr_pin_num 'reset wr
                  Set Lcd_wr_port.lcd_wr_pin_num 'set wr
                  Set Lcd_cs_port.lcd_cs_pin_num

                  End Sub

                  ''''''''&# 039;'''''''&#03 9;'''''''' ''''''''&# 039;'''''''&#03 9;'''''''' ''''''''&# 039;'''''''&#03 9;'''''''' '''''

                  Sub Tslcdinit

                  Local Var1 As Byte
                  Var1 = 1
                  Shift Var1 , Left , Lcd_rst_pin_num
                  Lcd_rst_ddr = Lcd_rst_ddr Or Var1
                  Reset Lcd_rst_port.lcd_rst_pin_num
                  'Waitms 50
                  Set Lcd_rst_port.lcd_rst_pin_num
                  'Waitms 50

                  Waitms 100
                  Ins = &H00E3 : Call Tslcdoutins 'INDEX REGISTER(IR)
                  Dat = &H3008 : Call Tslcdoutdata 'set the internal vcore voltage
                  Ins = &H00EF : Call Tslcdoutins
                  Dat = &H1231 : Call Tslcdoutdata

                  Ins = Ts_ins_start_osc : Call Tslcdoutins 'drive code read page51
                  Dat = &H0001 : Call Tslcdoutdata
                  Waitms 50

                  Ins = Ts_ins_driv_out_ctrl : Call Tslcdoutins
                  Dat = &H0100 : Call Tslcdoutdata 'set SS, SM
                  Ins = Ts_ins_driv_wav_ctrl : Call Tslcdoutins
                  Dat = &H0700 : Call Tslcdoutdata 'set 1 line inversion

                  Ins = Ts_ins_entry_mod : Call Tslcdoutins 'H03 CODE REGISRTE FOR 8 BIT MODE
                  Dat = Ts_val_entry_mod : Call Tslcdoutdata 'H30 SELECT 8BIT CODE

                  Ins = Ts_ins_resize_ctrl : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata 'FOR CHANGE SIZE

                  Ins = Ts_ins_disp_ctrl2 : Call Tslcdoutins
                  Dat = &H0202 : Call Tslcdoutdata 'SAP=1/BT1=1/APE=1/AP1=1/AP0=1 PAGE64
                  Ins = Ts_ins_disp_ctrl3 : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata
                  Ins = Ts_ins_disp_ctrl4 : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata
                  Ins = Ts_ins_rgb_disp_if_ctrl1 : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata
                  Ins = Ts_ins_frm_marker_pos : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata
                  Ins = Ts_ins_rgb_disp_if_ctrl2 : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata

                  Ins = Ts_ins_pow_ctrl1 : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata
                  Ins = Ts_ins_pow_ctrl2 : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata
                  Ins = Ts_ins_pow_ctrl3 : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata
                  Ins = Ts_ins_pow_ctrl4 : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata
                  Waitms 200

                  Ins = Ts_ins_pow_ctrl1 : Call Tslcdoutins
                  Dat = &H17B0 : Call Tslcdoutdata
                  Ins = Ts_ins_pow_ctrl2 : Call Tslcdoutins
                  Dat = &H0137 : Call Tslcdoutdata
                  Waitms 50

                  Ins = Ts_ins_pow_ctrl3 : Call Tslcdoutins
                  Dat = &H013C : Call Tslcdoutdata
                  Waitms 50

                  Ins = Ts_ins_pow_ctrl4 : Call Tslcdoutins
                  Dat = &H1400 : Call Tslcdoutdata
                  Ins = Ts_ins_pow_ctrl7 : Call Tslcdoutins
                  Dat = &H0007 : Call Tslcdoutdata
                  Waitms 50

                  Ins = Ts_ins_gram_hor_ad : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata
                  Ins = Ts_ins_gram_ver_ad : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata

                  Ins = Ts_ins_gamma_ctrl1 : Call Tslcdoutins
                  Dat = &H0007 : Call Tslcdoutdata
                  Ins = Ts_ins_gamma_ctrl2 : Call Tslcdoutins
                  Dat = &H0504 : Call Tslcdoutdata
                  Ins = Ts_ins_gamma_ctrl3 : Call Tslcdoutins
                  Dat = &H0703 : Call Tslcdoutdata
                  Ins = Ts_ins_gamma_ctrl4 : Call Tslcdoutins
                  Dat = &H0002 : Call Tslcdoutdata
                  Ins = Ts_ins_gamma_ctrl5 : Call Tslcdoutins
                  Dat = &H0707 : Call Tslcdoutdata
                  Ins = Ts_ins_gamma_ctrl6 : Call Tslcdoutins
                  Dat = &H0406 : Call Tslcdoutdata
                  Ins = Ts_ins_gamma_ctrl7 : Call Tslcdoutins
                  Dat = &H0006 : Call Tslcdoutdata
                  Ins = Ts_ins_gamma_ctrl8 : Call Tslcdoutins
                  Dat = &H0404 : Call Tslcdoutdata
                  Ins = Ts_ins_gamma_ctrl9 : Call Tslcdoutins
                  Dat = &H0700 : Call Tslcdoutdata
                  Ins = Ts_ins_gamma_ctrl10 : Call Tslcdoutins
                  Dat = &H0A08 : Call Tslcdoutdata

                  Ins = Ts_ins_hor_start_ad : Call Tslcdoutins 'RAM SITING FOR SLECT PIC POSITION
                  Dat = &H0000 : Call Tslcdoutdata
                  Ins = Ts_ins_hor_end_ad : Call Tslcdoutins
                  Dat = &H00EF : Call Tslcdoutdata 'END OF HOR ADRES=239
                  Ins = Ts_ins_ver_start_ad : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata
                  Ins = Ts_ins_ver_end_ad : Call Tslcdoutins 'GRAM LINE2 SELECT(WE HAVE 320 LINE)
                  Dat = &H013F : Call Tslcdoutdata '319 END OF VER
                  Ins = Ts_ins_gate_scan_ctrl1 : Call Tslcdoutins
                  Dat = &H2700 : Call Tslcdoutdata
                  Ins = Ts_ins_gate_scan_ctrl2 : Call Tslcdoutins
                  Dat = &H0001 : Call Tslcdoutdata
                  Ins = Ts_ins_gate_scan_ctrl3 : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata

                  Ins = Ts_ins_panel_if_ctrl1 : Call Tslcdoutins
                  Dat = &H0010 : Call Tslcdoutdata
                  Ins = Ts_ins_panel_if_ctrl2 : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata
                  Ins = Ts_ins_panel_if_ctrl3 : Call Tslcdoutins
                  Dat = &H0003 : Call Tslcdoutdata
                  Ins = Ts_ins_panel_if_ctrl4 : Call Tslcdoutins
                  Dat = &H0110 : Call Tslcdoutdata
                  Ins = Ts_ins_panel_if_ctrl5 : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata
                  Ins = Ts_ins_panel_if_ctrl6 : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata

                  Ins = Ts_ins_disp_ctrl1 : Call Tslcdoutins
                  Dat = &H0133 : Call Tslcdoutdata


                  End Sub

                  ''''''''&# 039;'''''''&#03 9;'''''''' ''''''''&# 039;'''''''&#03 9;'''''''' ''''''''&# 039;'''''''&#03 9;'''''''' '''''

                  Sub Lcdfillcolor '**page 52


                  Local Counter11 As Long 'tabdeile counter1 be counter11
                  Ins = Ts_ins_hor_start_ad : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata 'start asres hor=0
                  Ins = Ts_ins_hor_end_ad : Call Tslcdoutins
                  Dat = &H00F0 : Call Tslcdoutdata 'end adres hor=240
                  Ins = Ts_ins_gram_hor_ad : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata

                  Ins = Ts_ins_ver_start_ad : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata 'start adrese vertical=0
                  Ins = Ts_ins_ver_end_ad : Call Tslcdoutins
                  Dat = &H0140 : Call Tslcdoutdata 'end adrese vertical=540(140hex)
                  Ins = Ts_ins_gram_ver_ad : Call Tslcdoutins
                  Dat = &H0000 : Call Tslcdoutdata

                  Ins = Ts_ins_rw_gram : Call Tslcdoutins '*READ data FROM gram

                  For Counter11 = 0 To 76800 '70800/240=295
                  Dat = Ts_col_red : Call Tslcdoutdata
                  Next

                  Wait 1

                  For Counter11 = 0 To 76800 '70800/240=295
                  Dat = Ts_col_blue : Call Tslcdoutdata
                  Next

                  Wait 1

                  For Counter11 = 0 To 76800 '70800/240=295
                  Dat = Ts_col_green : Call Tslcdoutdata
                  Next

                  Wait 1

                  For Counter11 = 0 To 76800 '70800/240=295
                  Dat = Ts_col_yellow : Call Tslcdoutdata
                  Next

                  Wait 1

                  For Counter11 = 0 To 76800 '70800/240=295
                  Dat = Ts_col_purple : Call Tslcdoutdata
                  Next

                  Wait 1

                  For Counter11 = 0 To 76800 '70800/240=295
                  Dat = Ts_col_black : Call Tslcdoutdata
                  Next


                  End Sub
                  الهم عجل لولیک الفرج

                  فقط 313 نفر...

                  دیدگاه


                    #54
                    پاسخ : راه اندازی LCD N96 (رنگی با وضوح 244*320)

                    من هر کاری می کنم نمی شه که نمی شه ؛ آقای حسام الفتی از برنامه ای که شما قرار داده بودید هم استفاده کردم ولی حتی اون خط های را که برنامه ی نویز بهم نشون می داد را هم نشون نداد صفحه سفید سفیده .

                    دیدگاه


                      #55
                      پاسخ : راه اندازی LCD N96 (رنگی با وضوح 244*320)

                      راستی یه نکته
                      فیوز بیت Jtag رو Disable کردی؟
                      اگه اینجوریه مشکل از سخت افزارته شایدم ال سی دیت خرابه...
                      چون من از برنامه مطمئن هستم.
                      الهم عجل لولیک الفرج

                      فقط 313 نفر...

                      دیدگاه


                        #56
                        پاسخ : راه اندازی LCD N96 (رنگی با وضوح 244*320)

                        آقای حسام الفتی من از روی برنامه مدارشو درست کردم شاید مدار را درست نبستم چون من زیاد برنامه نویسی بلد نیستم ؛ ممنون می شه اگه برام نقشه ی مدارشم قرار بدین .
                        راستی فیوز بیت Jtag را هم Disable کرده بودم .

                        دیدگاه


                          #57
                          پاسخ : راه اندازی LCD N96 (رنگی با وضوح 244*320)


                          d.2 rs *
                          d.3 cs *
                          d.4 rd *
                          d.5 wr *
                          d.7 reset
                          msb=portA
                          lsb = portB
                          الهم عجل لولیک الفرج

                          فقط 313 نفر...

                          دیدگاه


                            #58
                            پاسخ : راه اندازی LCD N96 (رنگی با وضوح 244*320)

                            آقای حسام الفتی دست شما درد نکه راه افتاد فقط باید:
                            Lcd_db_lsb_port Alias Portc
                            Lcd_db_lsb_ddr Alias Ddrc
                            Lcd_db_lsb_pin Alias Pinc
                            تبدیل می شد به:
                            Lcd_db_lsb_port Alias Portb
                            Lcd_db_lsb_ddr Alias Ddrb
                            Lcd_db_lsb_pin Alias Pinb
                            آقای حسام الفتی اگه امکانش هست خط به خط برنامه را برام توضیح بدین چون من زیاد برنامه نویسی بلد نیستم.

                            دیدگاه


                              #59
                              پاسخ : راه اندازی LCD N96 (رنگی با وضوح 244*320)

                              برنامه دارای 2 تابع اصلیه یکی به LCD دستور میفرسته
                              Declare Sub Tslcdoutins
                              یکی دیتا
                              Declare Sub Tslcdoutdata
                              کافیه دیتا شیت رو یه بار بخونی و بفهمی کجای برنامه چی کار میکنه توی تاپیک بالای انجمن AVR کامل توضیح داده شده.
                              الهم عجل لولیک الفرج

                              فقط 313 نفر...

                              دیدگاه


                                #60
                                پاسخ : راه اندازی LCD N96 (رنگی با وضوح 244*320)

                                با سلام خدمت تمامی دوستان
                                کسی هست از هدر جناب آقای ایمانی فر جواب گرفته باشه ؟ (البته در راه اندازی تمامی المان های هدر)
                                اگر کسی جواب گرفته است خواهشن نمونه پروژه راه اندازیشو قرار بده.

                                من در نمایش عکس و پیکسل رسم اشکال مشکل خاصی ندارم ولی در قسمت نمایش کارکترها با خطاهای زیادی موجه هستم

                                (در ضمن از ورژن های 1.58 و2.04 و2.05 کدویژن برای کامپایل نمودن استفاده نموده ام ولی در همشون خطاهای زیادی میگیرد.)
                                :read: :read: :read:

                                دیدگاه

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