اطلاعیه

Collapse
No announcement yet.

کمک در مورد برنامه ساعت گردون

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

    کمک در مورد برنامه ساعت گردون

    دوستان من شدیدا مشغول به درست کردن یه ساعت گردون هستم برای سخت افزارش یه نمونه ابتدایی با فیبر سوراخ دار درست کردم ولی چون بالانس مکانیکیش خوب نبود یه برد زدم والان از لحاظ سخت افزاری آماده هستش ولی یه برنامه خیلی ساده نوشتم که با اومدن یه اینتراپت یکسری کد رو بریزه روی خروجی هاش ولی حالا نمیدونم کجای برنامم ایراد داره که هر چی تو پروتئوس چک می کنم اون کار رو انجام نمیده :cry2:
    برنامم اینه :
    کد:
    '//////////////////////////////////////////////////////\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
'-----------------------------------------------------------------------------------------------------------------------
'       |-------------------------------------------------------------------------------|
'       |                                        |
'       |name           : Propller Clock.bas                 |
'       |                                        |
'       |program         : ENG.Amin Ghaffari                  |
'       |                                        |
'       |purpose         : shows how to write a program for a propeller clock |
'       |                                        |
'       |micro          : ATmega 8A                      |
'       |                                        |
'       |date           : 1392/8/23                      |
'       |                                        |
'       |university name     : AZAD ISLAMICH UNIVERSITY OF BOJNOURD        |
'       |                                        |
'       |-------------------------------------------------------------------------------|
'------------------------------------------------------------------------------------------------------------------------
'\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\//////////////////////////////////////////////////////////////////





'=========================== [DECLARE MICRO] =================================
$regfile = "m8def.dat"
$crystal = 8000000




'========================= [CONFIG INTERRUPTS] ===============================
Enable Interrupts                      'enable global interrupts

'------------------------- (external interrupt) ------------------------------
Enable Int0                         'enable int0 of external interrupts
Config Int0 = Rising                    'we configure the INT0 interrupt to trigger when a rising edge is detected
On Int0 Showe                        'if happen int0 then go showe sub




'======================= [CONFIG PORTS FOR OUTPUT] ===========================
Config Portc = Output                    'all portc for output
Ddrc = &HFF
'-----------------------
Config Portb.0 = Output                   'some pin of portb for output
Config Portb.1 = Output
Config Portb.2 = Output
Config Portb.3 = Output
Config Portb.4 = Output
Config Portb.5 = Output
Ddrb.0 = 1
Ddrb.1 = 1
Ddrb.2 = 1
Ddrb.3 = 1
Ddrb.4 = 1
Ddrb.5 = 1
'-----------------------

Config Portd.0 = Output                   'and some pin of portd for output
Config Portd.1 = Output
Config Portd.3 = Output
Config Portd.4 = Output
Ddrd.0 = 1
Ddrd.1 = 1
Ddrd.3 = 1
Ddrd.4 = 1

'======================= [DECLARES THE SUBROUTINES] ==========================
Declare Sub Trans

'======================== [DIMENSION THE VARIABLES] ==========================
Dim J1 As Word
Dim C As Byte

'-------------------------------------------------------------------------------
'IIIIIIIIIIIIIIIIIIIIIIIIIIIIII[MAIN PROGRAM]IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII
'-------------------------------------------------------------------------------



End                             'end program
'-------------------------------------------------------------------------------
'IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII
'-------------------------------------------------------------------------------

Showe:
  C = 0
  Do
   J1 = Lookup(c , Data1)
   Gosub Trans
   Incr C
   Waitms 100
  Loop Until C = 9
Return

'--------------------------
Sub Trans:
  Portc.0 = J1.0
  Portc.1 = J1.1
  Portc.2 = J1.2
  Portc.3 = J1.3
  Portc.4 = J1.4
  Portc.5 = J1.5
  '-------------
  Portb.0 = J1.6
  Portb.1 = J1.7
  Portb.2 = J1.8
  Portb.3 = J1.9
  Portb.4 = J1.10
  Portb.5 = J1.11
  '-------------
  Portd.0 = J1.12
  Portd.1 = J1.13
  Portd.3 = J1.14
  Portd.4 = J1.15
  Return
End Sub

'============================== (WORD - A ) ====================================
Data1:
   Data 1022% , 1152% , 2176% , 4224% , 8320% , 4224% , 2176% , 1152% , 1022%
    فایل پروتئوس همراه با خود برنامه رو می زارم امیدوارم دوستان من رو کمک کنن
    http://up.persianscript.ir/uploads/daaf-test.rar
    خداوند بی نهایت است اما به قدر نیاز تو فرود می آید ، به قدر آرزوی تو گسترده می شود و به قدر ایمان تو کارگشاست.
    [hr]
    برچسب ها: برنامه, در, ساعت, کمک, گردون, مورد
    #2
    پاسخ : کمک در مورد برنامه ساعت گردون

    یعنی کسی نیست ؟ :eek:
    خداوند بی نهایت است اما به قدر نیاز تو فرود می آید ، به قدر آرزوی تو گسترده می شود و به قدر ایمان تو کارگشاست.
    [hr]

    دیدگاه

      #3
      پاسخ : کمک در مورد برنامه ساعت گردون

      oo:
      خداوند بی نهایت است اما به قدر نیاز تو فرود می آید ، به قدر آرزوی تو گسترده می شود و به قدر ایمان تو کارگشاست.
      [hr]

      دیدگاه

        #4
        پاسخ : کمک در مورد برنامه ساعت گردون

        امین جان ساده تر از اونیه که فک میکنی دقیقا مثه تابلوهای مسجد کار میکنه
        کجاش مشکل داری؟
        .The best question deserves a better answer
        =-=-=-=-=-=-=-=-=-==-=-=-=-=-=-=-=-=
        «پناه»می برم «به خدا»
        از عـیبی که ، «امروز» در خود می بینم، و «دیروز» «دیگران را» به خاطر، «هـمان عیـب» ملامت کرده ام.
        محتاط باشیم، در «سرزنش» و «قضاوت کردن دیگران». وقتی نه از «دیروز او» خبر داریم و نه از "فردای خودمان" .

        دیدگاه

          #5
          پاسخ : کمک در مورد برنامه ساعت گردون

          ممنون داشتم دیگه ناامید می شدم :mrgreen:
          تو این برنامه ای که نوشتم دو تا مشکل دارم یکی اینکه وقتی برنامه رو اجرا می کنم یه بار زیر برنامه وقفه اجرا میشه و دومی اینه که نمی دونم چرا وقتی حالت تحریک وقفه رو از RISING به LOW LEVEL تغییر میدم این مشکل برطرف میشه :eek:
          کلا هنگ کردم نمیدونم چی کار کنم
          راستی این با تابلو های مسجد فکر کنم فرق کنه این رو میدونی چه طوری هست دیگه نه :question:

          خداوند بی نهایت است اما به قدر نیاز تو فرود می آید ، به قدر آرزوی تو گسترده می شود و به قدر ایمان تو کارگشاست.
          [hr]

          دیدگاه

            #6
            پاسخ : کمک در مورد برنامه ساعت گردون

            چی شد هیچ نیست :angry:
            خداوند بی نهایت است اما به قدر نیاز تو فرود می آید ، به قدر آرزوی تو گسترده می شود و به قدر ایمان تو کارگشاست.
            [hr]

            دیدگاه

              #7
              پاسخ : کمک در مورد برنامه ساعت گردون

              نوشته اصلی توسط امین غفاری
              چی شد هیچ نیست :angry:
              من فک کنم یه ساعت گردون ا نت دانلود کردم ، یافتم برات اپلود میکنم
              برو شیر درنده باش ای دغل میانداز خود را چو روباه شل
              راهنمایی در مورد ساخت فلزی اب

              دیدگاه

                #8
                پاسخ : کمک در مورد برنامه ساعت گردون

                اووووپس چه عجب یکی پیدا شد
                نوشته اصلی توسط ehsanajal
                من فک کنم یه ساعت گردون ا نت دانلود کردم ، یافتم برات اپلود میکنم
                تشکر تشکر تشکر
                من یه نمونه برنامه دارم ولی اصلا خوب نیست خیلی قاطی پاتی نوشته و مشکوکم به اینکه درست باشه چون با سخت افزار من جور در نمی آد تستش نکردم :read:
                خداوند بی نهایت است اما به قدر نیاز تو فرود می آید ، به قدر آرزوی تو گسترده می شود و به قدر ایمان تو کارگشاست.
                [hr]

                دیدگاه

                  #9
                  پاسخ : کمک در مورد برنامه ساعت گردون

                  تابلو های مسجد ال ای ادی ماتریسی هستن که اولو اخرشون به هم وصل شده
                  و وقتی 1 خط عمودیو از اول به اخر میفرستی انگار دار میچرخه
                  امیدوارم منظورمو گرفته باشی
                  اینم تقریبا همون جوریه
                  من زیاد به بسکام اشنا نیستم


                  .The best question deserves a better answer
                  =-=-=-=-=-=-=-=-=-==-=-=-=-=-=-=-=-=
                  «پناه»می برم «به خدا»
                  از عـیبی که ، «امروز» در خود می بینم، و «دیروز» «دیگران را» به خاطر، «هـمان عیـب» ملامت کرده ام.
                  محتاط باشیم، در «سرزنش» و «قضاوت کردن دیگران». وقتی نه از «دیروز او» خبر داریم و نه از "فردای خودمان" .

                  دیدگاه

                    #10
                    پاسخ : کمک در مورد برنامه ساعت گردون

                    نوشته اصلی توسط امین غفاری

                    تو این برنامه ای که نوشتم دو تا مشکل دارم یکی اینکه وقتی برنامه رو اجرا می کنم یه بار زیر برنامه وقفه اجرا میشه و دومی اینه که نمی دونم چرا وقتی حالت تحریک وقفه رو از RISING به LOW LEVEL تغییر میدم این مشکل برطرف میشه نمیدونم چی کار کنم
                    یه مقاومت pull up بزار رو int0


                    اصلاح شده پروتوس و کد خودت
                    http://up.persianscript.ir/uploads/59d2-test.rar
                    .The best question deserves a better answer
                    =-=-=-=-=-=-=-=-=-==-=-=-=-=-=-=-=-=
                    «پناه»می برم «به خدا»
                    از عـیبی که ، «امروز» در خود می بینم، و «دیروز» «دیگران را» به خاطر، «هـمان عیـب» ملامت کرده ام.
                    محتاط باشیم، در «سرزنش» و «قضاوت کردن دیگران». وقتی نه از «دیروز او» خبر داریم و نه از "فردای خودمان" .

                    دیدگاه

                      #11
                      پاسخ : کمک در مورد برنامه ساعت گردون

                      تشکر
                      نوشته اصلی توسط •.´™ مَسِِــــح`.•
                      یه مقاومت pull up بزار رو int0


                      اصلاح شده پروتوس و کد خودت
                      http://up.persianscript.ir/uploads/59d2-test.rar
                      :eek: مگه
                      کد:
                      Config Int0 = Rising
                      مشخص نمی کنه که با داشتن لبه بالا رونده زیرروال اینتراپت اجرا بشه ولی اینجا چرا چپه عمل می کنه یعنی با اومدن لبه پایین رونده عمل می کنه :surprised:
                      جالبیش اینجا هست که وقتی مقاومت pull down می زارم همون مشکل هست ولی وقتی pull up باشه مشکل برطرف میشه آخه چرااااااااااااا؟ :angry:
                      خداوند بی نهایت است اما به قدر نیاز تو فرود می آید ، به قدر آرزوی تو گسترده می شود و به قدر ایمان تو کارگشاست.
                      [hr]

                      دیدگاه

                        #12
                        پاسخ : کمک در مورد برنامه ساعت گردون

                        برنامه رو ریختم روی میکرو تستش کردم کم و بیشتر ایراداتشم در آوردم ولی هنوز اون مشکل رو دارم اما با این حال جواب گرفتم و چند تا عکس هم ازش گرفتم :







                        ادامه مطلب رو همتو این تاپیک می زارم :
                        http://www.eca.ir/forum2/index.php?topic=85228.0
                        خداوند بی نهایت است اما به قدر نیاز تو فرود می آید ، به قدر آرزوی تو گسترده می شود و به قدر ایمان تو کارگشاست.
                        [hr]

                        دیدگاه

                          #13
                          پاسخ : کمک در مورد برنامه ساعت گردون

                          از کاربرای قدیمی این سایت کسی نمی دونه تا حالا کس این پروژه رو درست کرده یا نه هر چی گشتم تو سایت تنها کسی که با این اسم تاپیک زده بود خودم بودم :sad:
                          کسی الگوریتم برنامه این پروژه رو نداره :question:

                          خداوند بی نهایت است اما به قدر نیاز تو فرود می آید ، به قدر آرزوی تو گسترده می شود و به قدر ایمان تو کارگشاست.
                          [hr]

                          دیدگاه

                            #14
                            پاسخ : کمک در مورد برنامه ساعت گردون

                            سلام مهندس منم تازه شروع به کار کردم فقط مشکلم انتخاب موتور هستش موتور فن اونقد سرعت نداره و مدارم چشمک میزنه و از موتور ac هم که استفاده میکنم چون دور بالاست هیچی نشون نمیده :angry: :angry:

                            دیدگاه

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