اطلاعیه

Collapse
No announcement yet.

مشکل با DS1307

Collapse
X
Collapse
 
  • صفحه of 2
  • فیلتر
  • زمان
  • Show
Clear All
new posts
قبلی 1 2 template بعدی
    #1

    مشکل با DS1307

    با سلام

    آقا نمیدونم چی شده !!! این روزها اصلا هیچ کاری رو نمیتونم درست انجام بدم :eek:

    خلاصه بگذریم

    آقا یه برنامه من داشتم که ساعت رو با آیسی مگاه 32 و DS1307 روی 8 تا دات ماتریس نشون میده
    من کلی تغییر رو برنامه ایجاد کردم و تاریخ رو هم الان نشون میده ، اما بدفعه دیدم یه چیز اساسی از یاد رفته و منم هر کاری کردم نتونستم درستش کنم

    سوال من این هست که حالا من باید 4 تا کلید برای :
    کلید 1 : افزایش مقدار دقیقه
    کلید 2 : افزایش مقدار ساعت
    کلید 3 : افزایش مقدار روز
    کلید 4 : افزایش مقدار ماه

    سال و ثانیه رو نمیخوام

    حالا آقا من با چه دستوری این کار رو بکنم !! :( دارم دیوونه میشم دیگه
    من سورس برنامه رو میذارم براتون ، توروخدا یکی کمک کنه !! فقط دستورش رو من میخوام :( بگید تو بسکام با چه دستوری این کار رو باید بکنم

    درضمن در این برنامه برای هریک از مقادیر ثانیه ، دقیقه ، ...... تابع جداگانه تعریف نکردم

    سورس برنامه رو میذارم ، جون من راهنمایی کنید و از کمک دریغ نکنید
    راستی فایل پرتیوس هم داره اگه لازم هست اونم میذارم

    با تشــــــــــــــــــــــــکر

    کد:
    $regfile = "M32def.dat"
$crystal = 12000000
Config Pina.4 = Input
Dim Iloop As Word
Dim Row As Word
Dim Index As Word
Dim A As Word
Dim N As Word
Dim K As Word

Dim Ar1(512) As Byte
Dim Strg1 As String * 2
Dim Strg2 As String * 2
Dim Strg3 As String * 2
Dim Strg As String * 12
Dim _strg1 As String * 2
Dim _strg2 As String * 2
Dim _strg3 As String * 2
Dim _strg As String * 12

Dim Digits(12) As Byte At Strg Overlay

Ddra = &B11110000
Ddrb = 255
Ddrc = 255
Ddrd = 255

Config Scl = Porta.0
Config Sda = Porta.1

Const Ds1307w = &HD0
Const Ds1307r = &HD1

Dim _sec As Byte , _min As Byte , _hour As Byte
Dim _day As Byte , _month As Byte , _year As Byte
Dim Weekday As Byte , _min1 As Byte , _hour1 As Byte
Dim _weekday As Byte , I As Byte , J As Byte , M As Byte

'------------------------------------------------------------------------------------------
I = 0
Do
 Gosub Getdatetime

 Gosub Getdatetime
 Strg1 = Bcd(_sec)
 Strg2 = Bcd(_min)
 Strg3 = Bcd(_hour)

_strg1 = Bcd(_day)
_strg2 = Bcd(_month)
_strg3 = Bcd(_year)

   Incr I
   J = I Mod 10
   If J <= 0 Then
   Strg = _strg3 + "/" + _strg2 + "/" + _strg1
   Else
         M = _sec Mod 2
         If M = 0 Then
         Strg = Strg3 + ":" + Strg2 + ":" + Strg1
         Else
         Strg = Strg3 + " " + Strg2 + " " + Strg1
         End If
   End If

 If I = 250 Then I = 0

 A = 1
 For Iloop = 1 To 8
  Gosub Filling
  For K = 1 To 8
   Read Ar1(a)
   Incr A
  Next
 Next

 For N = 1 To 100

   For Row = 0 To 7

     Portd = Ar1(1 + Row)
     Set Portc.0
     nop
     Reset Portc.0

     Portd = Ar1(9 + Row)
     Set Portc.1
     nop
     Reset Portc.1

     Portd = Ar1(17 + Row)
     Set Portc.2
     nop
     Reset Portc.2

     Portd = Ar1(25 + Row)
     Set Portc.3
     nop
     Reset Portc.3

     Portd = Ar1(33 + Row)
     Set Portc.4
     nop
     Reset Portc.4

     Portd = Ar1(41 + Row)
     Set Portc.5
     nop
     Reset Portc.5

     Portd = Ar1(49 + Row)
     Set Porta.5
     nop
     Reset Porta.5

     Portd = Ar1(57 + Row)
     Set Porta.6
     nop
     Reset Porta.6

    Reset Portb.row
    Waitms 1
    Set Portb.row

   Next

 Next

Loop

'------------------------------------------------------------------------------------------

 Filling:

  Select Case Digits(iloop)

  Case 32 : Gosub Space_char
  Case 46 : Gosub Dot_char
  Case 47 : Gosub Forward_char
  Case 48 : Gosub 0_char
  Case 49 : Gosub 1_char
  Case 50 : Gosub 2_char
  Case 51 : Gosub 3_char
  Case 52 : Gosub 4_char
  Case 53 : Gosub 5_char
  Case 54 : Gosub 6_char
  Case 55 : Gosub 7_char
  Case 56 : Gosub 8_char
  Case 57 : Gosub 9_char
  Case 58 : Gosub Colon_char
  Case 59 : Gosub Momayez_char

  Case Else : Gosub Space_char

  End Select

 Return

'------------------------------------------------------------------------------------------

Space_char:
 Restore Space_dta
 Return

Dot_char:
 Restore Point_dta
 Return

Forward_char:
 Restore Division_dta
 Return

0_char:
 Restore 0_dta
 Return

1_char:
 Restore 1_dta
 Return

2_char:
 Restore 2_dta
 Return

3_char:
 Restore 3_dta
 Return

4_char:
 Restore 4_dta
 Return

5_char:
 Restore 5_dta
 Return

6_char:
 Restore 6_dta
 Return

7_char:
 Restore 7_dta
 Return

8_char:
 Restore 8_dta
 Return

9_char:
 Restore 9_dta
 Return

Colon_char:
 Restore Colon_dta
 Return

Momayez_char:
 Restore Momayez
 Return


'-------------------------------------------------------------------------------

Getdatetime:
I2cstart
I2cwbyte Ds1307w
I2cwbyte 0

I2cstart
I2cwbyte Ds1307r
I2crbyte _sec , Ack
I2crbyte _min , Ack
I2crbyte _hour , Ack
I2crbyte Weekday , Ack
I2crbyte _day , Ack
I2crbyte _month , Ack
I2crbyte _year , Nack
I2cstop
_min1 = Makedec(_min)
_hour1 = Makedec(_hour)

Return



Setdate:
_day = Makebcd(_day)
_month = Makebcd(_month)
_year = Makebcd(_year)
I2cstart
I2cwbyte Ds1307w
I2cwbyte 3
I2cwbyte _weekday
I2cwbyte _day
I2cwbyte _month
I2cwbyte _year
I2cstop
Return

Settime:
_sec = Makebcd(_sec)
_min = Makebcd(_min)
_hour = Makebcd(_hour)
I2cstart
I2cwbyte Ds1307w
I2cwbyte 0
I2cwbyte _sec
I2cwbyte _min
I2cwbyte _hour
I2cstop
Return
'-----------------------------------------
End
'------------------------------------------------------------------------------------------
Space_dta:
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00

Point_dta:
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H18 , &H18 , &H00

Division_dta:
Data &H06 , &H0C , &H18 , &H30 , &H60 , &HC0 , &H80 , &H00

0_dta:
Data &H7C , &HCE , &HDE , &HF6 , &HE6 , &HC6 , &H7C , &H00

1_dta:
Data &H30 , &H70 , &H30 , &H30 , &H30 , &H30 , &HFC , &H00

2_dta:
Data &H78 , &HCC , &H0C , &H38 , &H60 , &HCC , &HFC , &H00

3_dta:
Data &H78 , &HCC , &H0C , &H38 , &H0C , &HCC , &H78 , &H00

4_dta:
Data &H1C , &H3C , &H6C , &HCC , &HFE , &H0C , &H1E , &H00

5_dta:
Data &HFC , &HC0 , &HF8 , &H0C , &H0C , &HCC , &H78 , &H00

6_dta:
Data &H38 , &H60 , &HC0 , &HF8 , &HCC , &HCC , &H78 , &H00

7_dta:
Data &HFC , &HCC , &H0C , &H18 , &H30 , &H30 , &H30 , &H00

8_dta:
Data &H78 , &HCC , &HCC , &H78 , &HCC , &HCC , &H78 , &H00

9_dta:
Data &H78 , &HCC , &HCC , &H7C , &H0C , &H18 , &H70 , &H00

Colon_dta:
Data &H00 , &H18 , &H18 , &H00 , &H00 , &H18 , &H18 , &H00

Momayez:
Data &H80 , &H40 , &H40 , &H20 , &H10 , &H10 , &H08 , &H08

Sina:                            '8*16
Data &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00 , &H00
Data &H00 , &H2F , &H29 , &H27 , &H21 , &HCF , &H00 , &H00
Data &H00 , &HE5 , &H15 , &H65 , &H85 , &H75 , &H00 , &H04[/code
    کد:
    ]
    برچسب ها: ds1307, با, مشکل
    #2
    پاسخ : مشکل با DS1307

    سلام

    توی این برنامه که گزاشتم شما میتونید با دستور های زیر زمان و تاریخ رو بخونید و یا تنظیم کنید

    کد:
    ' for read time & date

Dim S As String * 10
S = Time$
S = Date$


' for set time & data
Time$ = "23:58:59"
Date$ = "11/13/02"

    کد:
    $regfile = "m32def.dat"
$crystal = 8000000
$baud = 19200
$framesize = 16
$hwstack = 24
$swstack = 16


'configure the scl and sda pins
Config Sda = Portd.6
Config Scl = Portd.5

'address of ds1307
Const Ds1307w = &HD0                    ' Addresses of Ds1307 clock
Const Ds1307r = &HD1

Config Clock = User                     ' this will dim the bytes automatic
'dim other needed variables
Config Date = Ymd , Separator = /



Dim Weekday As Byte

Print "DS1307"
Waitms 100
' assigning the time will call the SetTime routine

Time$ = "23:58:59"                     ' to watch the day changing value
Date$ = "11/13/02"                     ' 13 november 2002

Do
 Print "Date Time : " ; Date$ ; " " ; Time$
 Waitms 500
Loop

End


'called from ds1307clock.lib
Getdatetime:
 I2cstart                         ' Generate start code
 I2cwbyte Ds1307w                     ' send address
 I2cwbyte 0                        ' start address in 1307

 I2cstart                         ' Generate start code
 I2cwbyte Ds1307r                     ' send address
 I2crbyte _sec , Ack
 I2crbyte _min , Ack                    ' MINUTES
 I2crbyte _hour , Ack                   ' Hours
 I2crbyte Weekday , Ack                  ' Day of Week
 I2crbyte _day , Ack                    ' Day of Month
 I2crbyte _month , Ack                   ' Month of Year
 I2crbyte _year , Nack                   ' Year
 I2cstop
 _sec = Makedec(_sec) : _min = Makedec(_min) : _hour = Makedec(_hour)
 _day = Makedec(_day) : _month = Makedec(_month) : _year = Makedec(_year)
Return

Setdate:
 _day = Makebcd(_day) : _month = Makebcd(_month) : _year = Makebcd(_year)
 I2cstart                         ' Generate start code
 I2cwbyte Ds1307w                     ' send address
 I2cwbyte 4                        ' starting address in 1307
 I2cwbyte _day                       ' Send Data to SECONDS
 I2cwbyte _month                      ' MINUTES
 I2cwbyte _year                      ' Hours
 I2cstop
Return

Settime:
 _sec = Makebcd(_sec) : _min = Makebcd(_min) : _hour = Makebcd(_hour)
 I2cstart                         ' Generate start code
 I2cwbyte Ds1307w                     ' send address
 I2cwbyte 0                        ' starting address in 1307
 I2cwbyte _sec                       ' Send Data to SECONDS
 I2cwbyte _min                       ' MINUTES
 I2cwbyte _hour                      ' Hours
 I2cstop
Return

    دیدگاه

      #3
      پاسخ : مشکل با DS1307

      سلام

      نه این اصلا اون چیزی نیست که من میخوام
      من که نمیخوام مقادیر تاریخ و زمان رو تو بسکام وارید کنم

      من میخوام با 4 تا کلید کنترل کنم !! که تو این برنامه همچین امکانی نیست :(

      این همه بچه ها با این آیسی ساعت درست میکنن اونوقت یکی نیست به سوال ما جواب بده ؟؟؟؟؟؟؟؟؟؟؟

      دیدگاه

        #4
        پاسخ : مشکل با DS1307

        سلام
        این قست رو اضافه کنید مشکلتون حل میشه

        متغییر هایی مثل sec_ ویا min_ ویا hour_ و... بعد از هر بار خوندن تاریخ یا ساعت به طور اتوماتیک پدیت میشن برای همین در ابتدا باید ساعت یا تاریخ رو بخونید

        $s = Time

        کد:
        Dim S As String * 10

Config Porta = Input
Porta = 255



Do


$ = Time$


If Pina.0 = 0 Then

 _min = _min + 1
 If _min > 59 Then _min = 0

  _min = Makebcd(_min)
 I2cstart
 I2cwbyte Ds1307w
 I2cwbyte 1
 I2cwbyte _min
 I2cstop

End If




If Pina.1 = 0 Then

 _hour = _hour + 1
 If _hour > 23 Then _hour = 0

  _hour = Makebcd(_hour)
 I2cstart
 I2cwbyte Ds1307w
 I2cwbyte 2
 I2cwbyte _hour
 I2cstop

End If





If Pina.2 = 0 Then

 _day = _day + 1
 If _day > 31 Then _day = 0

  _day = Makebcd(_day)
 I2cstart
 I2cwbyte Ds1307w
 I2cwbyte 4
 I2cwbyte _day
 I2cstop

End If



If Pina.3 = 0 Then

 _month = _month + 1
 If _month > 12 Then _month = 1

  _month = Makebcd(_month)
 I2cstart
 I2cwbyte Ds1307w
 I2cwbyte 5
 I2cwbyte _month
 I2cstop

End If




Loop

        دیدگاه

          #5
          پاسخ : مشکل با DS1307

          یعنی اینجوری میشه ؟

          رفتم تست کنم ....

          دیدگاه

            #6
            پاسخ : مشکل با DS1307

            سلام دوستان ، امکانش هس همین برنامه رو برای کدویژن هم بزارین یا شبیه اینو؟
            چطور میشه ساعت و تاریخو تنظیم کرد؟
            ممنون میشم

            دیدگاه

              #7
              پاسخ : مشکل با DS1307

              شما مشکلت ای سی 1307 هستش یا منوی تنظیم ساعت؟

              دیدگاه

                #8
                پاسخ : مشکل با DS1307

                سلام دویت عزبز :smile:
                کلا کارباهاشو بلد نیستم ... :sad: یک کتاب داشتم توضیح مختصری توش داشت ولی مثال نداشت ...
                کار باهاش دوحالت داره دگ :
                1-ست کردن ساعت و تاریخ
                2-نمایش ساعت و تاریخ
                میخواسم ببینم کسی پروژه ای داره توش از این ic استفاده کرده باشه من بتونم از کدش استفاده کنم .
                کلا با i2c کار نکردم ، تازه واردم ... :cry2:
                ممنون

                دیدگاه

                  #9
                  پاسخ : مشکل با DS1307

                  نوشته اصلی توسط par3eh
                  سلام دویت عزبز :smile:
                  کلا کارباهاشو بلد نیستم ... :sad: یک کتاب داشتم توضیح مختصری توش داشت ولی مثال نداشت ...
                  کار باهاش دوحالت داره دگ :
                  1-ست کردن ساعت و تاریخ
                  2-نمایش ساعت و تاریخ
                  میخواسم ببینم کسی پروژه ای داره توش از این ic استفاده کرده باشه من بتونم از کدش استفاده کنم .
                  کلا با i2c کار نکردم ، تازه واردم ... :cry2:
                  ممنون
                  پس مشکل ارتباط با IC رو دارید !

                  ببین برنامه آماده من ندارم ولی اگر برنامه نویسیت خوبه توضیح بدم شاید بتونی سرهمش کنی

                  دیدگاه

                    #10
                    پاسخ : مشکل با DS1307

                    آره عزیزم در جد خودم تو سطح خوبیم در اصل C#.net در حد آماتور کار میکنم از طرفی قدرتی هستم و الکترونیکو دوس دارم و با c هم کار میکنم...
                    شما توضیح بده چطور ارتباط ic2 برقرار کنم و چطور داده و بفرستم و تقاضای برگشت اطلاعاتو بدم.ممنون میشم.
                    اگه میشه یه جور بگو که تو ic های دیگه هم به کارم بیاد

                    دیدگاه

                      #11
                      پاسخ : مشکل با DS1307

                      نوشته اصلی توسط par3eh
                      آره عزیزم در جد خودم تو سطح خوبیم در اصل C#.net در حد آماتور کار میکنم از طرفی قدرتی هستم و الکترونیکو دوس دارم و با c هم کار میکنم...
                      شما توضیح بده چطور ارتباط ic2 برقرار کنم و چطور داده و بفرستم و تقاضای برگشت اطلاعاتو بدم.ممنون میشم.
                      اگه میشه یه جور بگو که تو ic های دیگه هم به کارم بیاد
                      خوبه
                      مطلب روی نت زیاده حتی کد هم زیاده ولی روش اینطوریه ( اینا اطلاعات منه ممکنه کم و کاست داشته باشه)

                      I2c برای همه ابزارها یکیه و فرکانس کاریشون روی 100 و 400 کیلوهرتزه البته 1 مگاهرتز هم دیدیم ولی باید توی کاتالوگ ای سی تو ببینی که حالا اینجا 1307 هستش که فکر کنم با 100Khz کار میکنه. پس برای تنظیم کلاک باید توی میکرو تنزیمات برای 100Khz انجام بشه و البته هر سری ای سی یه کد هم داره که مستر که میکرو کنترولر باشه با نوشتن اون روی خط دیتا ای سی رو صدا میزنه و دستورات بعدی که یا نوشتنه یا خوندن روی همون ای سی انجام میشه.

                      برای اینکه اطلاعات رو بخونی باید :
                      اول کلمه استارت رو روی خط بنویسی که کمپایلرت معمولا داره اینو
                      بعد کد مخصوص که برای صدا زدن ای سی که اینجا میشه D0H رو روی خط مینویسی
                      بعد آدرسی که میخای عملیات رو روش انجام بدی رو مینویسی
                      بعد باید دستور Repeat Start رو روی خط بفرستی ( این مال اینه که یعنی آماده در یافت هستی یا ارسال دیتا)
                      بعد کد D1H رو مینوسی این همون D0H هستش که بیت یکش اگر 0 باشه یعنی نوشت میکرو روی IC اگر 1 باشه یعنی میخای اطلاعات رو از روی خط بخونی یعنی از ای سی
                      بعد دستور خواندن رو انجام میدی و مقداری که دریاف میکنی رو میریزی توی یه متغییر
                      بعد هم دستور استوپ رو مینویسی روی خط این شد خواندن

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

                      دقت کن سخت افزار درست وصل باشه و مقاومت های پول پ هم بزاری حدود 10 تا 2 کیلو باید باشه





                      دیدگاه

                        #12
                        پاسخ : مشکل با DS1307

                        نوشته اصلی توسط mahdi421
                        سلام
                        این قست رو اضافه کنید مشکلتون حل میشه

                        متغییر هایی مثل sec_ ویا min_ ویا hour_ و... بعد از هر بار خوندن تاریخ یا ساعت به طور اتوماتیک پدیت میشن برای همین در ابتدا باید ساعت یا تاریخ رو بخونید

                        $s = Time

                        کد:
                        Dim S As String * 10

Config Porta = Input
Porta = 255



Do


$ = Time$


If Pina.0 = 0 Then

 _min = _min + 1
 If _min > 59 Then _min = 0

  _min = Makebcd(_min)
 I2cstart
 I2cwbyte Ds1307w
 I2cwbyte 1
 I2cwbyte _min
 I2cstop

End If




If Pina.1 = 0 Then

 _hour = _hour + 1
 If _hour > 23 Then _hour = 0

  _hour = Makebcd(_hour)
 I2cstart
 I2cwbyte Ds1307w
 I2cwbyte 2
 I2cwbyte _hour
 I2cstop

End If





If Pina.2 = 0 Then

 _day = _day + 1
 If _day > 31 Then _day = 0

  _day = Makebcd(_day)
 I2cstart
 I2cwbyte Ds1307w
 I2cwbyte 4
 I2cwbyte _day
 I2cstop

End If



If Pina.3 = 0 Then

 _month = _month + 1
 If _month > 12 Then _month = 1

  _month = Makebcd(_month)
 I2cstart
 I2cwbyte Ds1307w
 I2cwbyte 5
 I2cwbyte _month
 I2cstop

End If




Loop
                        سلام
                        آقا من این کارها رو انجام دادم و بخوبی کار کرد .ولی 2 تا سوال دارم :
                        این مقدار زمان رو وقتی من تغییر میدم آیا در آیسی هم مقادیر جدید ذخیره میشه ؟
                        یعنی مثلا من ساعت 10 بود 12 کردم .... وقتی برق رفت و دوباره اومد ساعت از 12 شروع میشه دیگه ؟ دیگه به 10 برنمیگرده ؟

                        سوال دوم هم ؟
                        این دستور time$ و تعریف متغیر S برای چیه ؟
                        من این 2 تا دستور رو برحسب تصادف از یادم رفت بنویسم ، ولی برنامه بخوبی بازم کار کرد ؟
                        حالا اینها رو اضافه کنم ؟ یا لازم نیست ؟

                        دیدگاه

                          #13
                          پاسخ : مشکل با DS1307

                          برای اینکه تنظیماتی که انجام دادین باقی بمونه باید باطری 3 ولت ds1307 رو هم وصل کنید.
                          دستور
                          Config Clock = User
                          باعث میشه متغییر های _sec min hour day month year بدونه دخالت برنامه نویس به برنامه اضافه بشن
                          حالا اینها چه جوری مقدار میگیرند؟
                          جواب: وقتی که شما با دستور $S=time ویا $S=date تاریخ یا ساعت رو میخونین متغییر های _sec min ....
                          پدیت میشن برای همین قبل از شروع تنظیمات بهتره که یه بار ساعت یا تاریخ رو بخونید تا این متغییرها مقدار تازه رو بگیرند و بعد شما به اون مقدار تازه یک واحد اضافه کنید

                          دیدگاه

                            #14
                            پاسخ : مشکل با DS1307

                            با سلام

                            ای بابا !! اون قدر هم بیسواد نیستم بابا ، باطری 2032 وصل کردم بهش

                            خوب شوخی بود ، خیلی ممنون از راهنمایی شما و مشکلم حل شد
                            فقط چون شما وارد هستید یک سوال هم میخوام بپرسم

                            من نمیدونم ، شاید هم سوالات من همیشه یکم سخت و کمیاب میشه و به همین دلیل چندین بار تو اینجور تاپیک ها به جوابم نرسیدم
                            قبلا هم من یک مشکل با 1307 هم داشتم (و دارم) اونم این هست که ساعت هی گیر میکنه !!!
                            یعنی وقتی مدار رو روشن میکنم ساعت و تاریخ شروع به کار میکنه و+ بعد از چند ساعت دیگه یدفعه گیر میکنه و دیگه ساعت به جلو نمیره
                            باید مدار رو خاموش روشن کنم تا درست بشه (که اونم بعد از چند ساعت بازم گیر میکنه)

                            خلاصه دوستان کلی دستور دادن و ما هم اضافی کردیم اما در نهایت مشکل حل نشد و تاپیک بدون نتیجه موند
                            میتونید در این مورد کمک کنید ؟
                            اگه خواستید تاپیکش رو هم براتون پیدا میکنم (که تمام کد ها توش هست)

                            دیدگاه

                              #15
                              پاسخ : مشکل با DS1307

                              سلام
                              شما هنوز این مشکلت پابرجاست oo:
                              قبلا گفتم بازم میگم.
                              تند تند از ds1307 نخون.
                              همین.
                              تولید کننده انواع تابلو فرمان آسانسور با تکنولوژی روز دنیا

                              دیدگاه

                              قبلی 1 2 template بعدی
                              لطفا صبر کنید...
                              X