اطلاعیه

Collapse
No announcement yet.

پرسش و پاسخ در خصوص نرم افزار بسکام

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

    پرسش و پاسخ در خصوص نرم افزار بسکام

    سلام
    با اجازه مدیران محترم سایت این تاپیک رو با عنوان (پرسش و پاسخ در خصوص نرم افزار بسکام) ایجاد کردم .
    باشد که دوستان اینجا سوالات خودشون رو بپرسن و از ایجاد تاپیکهای جدید خودداری کنن!!
    با تشکر
    تخیل مهمتر از دانش است
    علم محدود است اما تخیل دنیا را دربر میآ‌گیرد
    آلبرت انیشتین

    #2
    پاسخ : پرسش و پاسخ در خصوص نرم افزار بسکام

    اولین سوال رو خودم داشتم :
    چطور میتونم توی بسکام یه bitwait یا if چند شرطی داشته باشم!!
    مثلا" چطور میتونم تو بسکام بگم : تا زمانی که یکی از بیتهای b.1 , b.2 , c.4 ست نشده توی همین خط بمون!
    یا اگر یکی از بیتهای b.1 , b.2 , c.4 ست شد goto .....
    با تشکر
    تخیل مهمتر از دانش است
    علم محدود است اما تخیل دنیا را دربر میآ‌گیرد
    آلبرت انیشتین

    دیدگاه


      #3
      پاسخ : پرسش و پاسخ در خصوص نرم افزار بسکام

      if pinb=0=1 or pinb.1=1 or pinb.2=1 then
      cls : lcd "avr" : wait 2
      else
      cls : lcd "no input" : wait 2
      end if
      وقتي گريبان عدم با دست خلقت مي دريد/وقتي ابد چشم تو را پيش از ازل مي آفريد/وقتي زمين ناز تو را در آسمانها مي کشيد/وقتي عطش طعم تو را با اشکهايم مي چشيد/من عاشق چشمت شدم ، نه عقل بود و نه دلي/چيزي نمي دانم از اين ديوانگي و عاقلي/يک آن شد اين عاشق شدن ، دنيا همان يک لحظه بود/آن دم که چشمانت مرا از عمق چشمانت ربود/وقتي که من عاشق شدم شيطان به نامم سجده کرد/آدم زميني تر شد و عالم به آدم سجده کرد /بودم و چشمان تو ، نه آتشي و نه گلي/چيزي نمي دانم از اين ديوانگي و عاقلي/.

      دیدگاه


        #4
        پاسخ : پرسش و پاسخ در خصوص نرم افزار بسکام

        سلام بر دوستان گرامی
        من برای پروژه م مدار تشخیص رنگ رو برداشتم و حالا برنامه مدار برای محاسبه فرکانس خروجی سنسور TCS230 به این شکله

        $regfile = "m32def.dat"
        $crystal = 8000000
        Config Lcdpin = Pin , Db4 = Portc.2 , Db5 = Portc.3 , Db6 = Portc.4 , Db7 = Portc.5 , E = Portc.1 , Rs = Portc.0
        Config Lcd = 16 * 2
        Config Timer1 = Counter , Edge = Rising
        Config Portb.0 = Input
        Config Timer0 = Timer , Prescale = 256
        Enable Interrupts
        Enable Timer1
        Enable Timer0
        Cursor Off

        On Ovf1 Pulsecount
        M:
        On Ovf0 Ovf0occures
        Dim A As Long , I As Long , B As Byte
        B = 0
        Cls
        Lcd "Majid"
        Wait 2

        Start Timer0
        Do


        Loop
        End

        Ovf0occures:
        Incr I
        If I > 30 Then
        Stop Timer0
        Home
        A = B * 65536
        A = A + Counter1
        A = A * 4

        Lcd " " ; A ; " hz" ; " "
        B = 0
        I = 0 : Counter1 = 0
        Start Timer0
        End If
        Return

        Pulsecount:
        Incr B
        Counter1 = 0
        Return

        حالا من با کالیبره کردن سنسور فرکانس رنگ ها رو بدست اوردم مثلا بنفش فرکانسش بین 2100 تا 2300 بوده قرمز 1700تا 1900 هرتز ، من چطور اینو در این برنامه بگنجونم ؟؟؟؟
        ممنون یشم اگه کمک کنید

        دیدگاه


          #5
          پاسخ : پرسش و پاسخ در خصوص نرم افزار بسکام

          نوشته اصلی توسط 2lool
          سلام بر دوستان گرامی
          من برای پروژه م مدار تشخیص رنگ رو برداشتم و حالا برنامه مدار برای محاسبه فرکانس خروجی سنسور TCS230 به این شکله

          $regfile = "m32def.dat"
          $crystal = 8000000
          Config Lcdpin = Pin , Db4 = Portc.2 , Db5 = Portc.3 , Db6 = Portc.4 , Db7 = Portc.5 , E = Portc.1 , Rs = Portc.0
          Config Lcd = 16 * 2
          Config Timer1 = Counter , Edge = Rising
          Config Portb.0 = Input
          Config Timer0 = Timer , Prescale = 256
          Enable Interrupts
          Enable Timer1
          Enable Timer0
          Cursor Off

          On Ovf1 Pulsecount
          M:
          On Ovf0 Ovf0occures
          Dim A As Long , I As Long , B As Byte
          B = 0
          Cls
          Lcd "Majid"
          Wait 2

          Start Timer0
          Do


          Loop
          End

          Ovf0occures:
          Incr I
          If I > 30 Then
          Stop Timer0
          Home
          A = B * 65536
          A = A + Counter1
          A = A * 4

          Lcd " " ; A ; " hz" ; " "
          B = 0
          I = 0 : Counter1 = 0
          Start Timer0
          End If
          Return

          Pulsecount:
          Incr B
          Counter1 = 0
          Return

          حالا من با کالیبره کردن سنسور فرکانس رنگ ها رو بدست اوردم مثلا بنفش فرکانسش بین 2100 تا 2300 بوده قرمز 1700تا 1900 هرتز ، من چطور اینو در این برنامه بگنجونم ؟؟؟؟
          ممنون یشم اگه کمک کنید
          سلام خوب شما وقتی فرکانس رو بدست آوردید ، عددی مشخصه ؛ در واقع یک تابع برای برنامه می نویسید و وقتی که این اعداد رو بدست آورد میره به تابع و عدد بدست آمده رو با اونها مطابق میده و اگر با هر کدوم برابر بود ؛ مثلا روی LCD نام رنگ بدست آمده رو بنویسه .
          به همین راحتی
          وقتي گريبان عدم با دست خلقت مي دريد/وقتي ابد چشم تو را پيش از ازل مي آفريد/وقتي زمين ناز تو را در آسمانها مي کشيد/وقتي عطش طعم تو را با اشکهايم مي چشيد/من عاشق چشمت شدم ، نه عقل بود و نه دلي/چيزي نمي دانم از اين ديوانگي و عاقلي/يک آن شد اين عاشق شدن ، دنيا همان يک لحظه بود/آن دم که چشمانت مرا از عمق چشمانت ربود/وقتي که من عاشق شدم شيطان به نامم سجده کرد/آدم زميني تر شد و عالم به آدم سجده کرد /بودم و چشمان تو ، نه آتشي و نه گلي/چيزي نمي دانم از اين ديوانگي و عاقلي/.

          دیدگاه


            #6
            پاسخ : پرسش و پاسخ در خصوص نرم افزار بسکام

            من نمیدونم که باید از چه دستوری استفاده کنم زیاد بیسیک کار نکردم
            اگه یکی کمک کنه و بگه چه دستوری و به چه شکل ممنون میشم
            چطور تابعی تعریف کنم

            دیدگاه


              #7
              پاسخ : پرسش و پاسخ در خصوص نرم افزار بسکام

              با سلام

              دوستان پیشنهاد میدم قبل از ارسال پست و پرسیدن سوال یه سرچی بفرمایید.
              شاید لینک زیر به دردتون بخوره :
              http://www.eca.ir/forum2/index.php?topic=64441.0

              موفق باشید
              چرا ناراحتی پاتریک!
              + امروز ی بچه دیدم سرچهارراه گل میفروخت
              - از دیدنش ناراحت شدی؟
              + نه
              پس چی ناراحتت کرده
              + اینکه دیدن اینجور بچه ها انقدر واسم عادی شده که دیگه ناراحتم نمیکنه
              ------------------------------------------------------------------------------------------------------
              تاحالا فکر کردی بیسواد کیه؟- بی سواد یعنی کسی که نمیتونه ذهنیاتش رو عملی کنه!
              ------------------------------------------------------------------------------------------------------
              محصولات

              دیدگاه


                #8
                پاسخ : پرسش و پاسخ در خصوص نرم افزار بسکام

                اگه متن ها و سوالات منو خونده باشید و کامل نبودو منظورمو نرسوندم اینو بخونید منتظر جوابم ممنون
                من میگم که از این دستور نمیشه استفاده کرد فرکانس من برای رنگ قرمز مثلا 2100 تا 2300 هست
                If A = 2100 Then
                Locate 2 , 1
                Lcd "COLOR IS : RED"
                End If
                چون رنج فرکانس هر رنگ برای سنسور من بین 200 تا 300 هرتز اختلافه من باید دویست خط اضافه کنم که باری هر فرکانس باید یه شرط بزارم که خیلی کار مزخرفی میشه
                من میخوام یه دستوری یا تابعی باشه که بتونم یه رنج از فرکانس و مساوی یک رنگ بدونه مثلا این باشه که
                if 2100> a >2300 then
                lcd " color is : red :
                end if
                که کامپایلر بخاطر اشتباه من ارور میده
                ممنون از کمکتون

                دیدگاه


                  #9
                  پاسخ : پرسش و پاسخ در خصوص نرم افزار بسکام

                  نوشته اصلی توسط 2lool
                  اگه متن ها و سوالات منو خونده باشید و کامل نبودو منظورمو نرسوندم اینو بخونید منتظر جوابم ممنون
                  من میگم که از این دستور نمیشه استفاده کرد فرکانس من برای رنگ قرمز مثلا 2100 تا 2300 هست
                  If A = 2100 Then
                  Locate 2 , 1
                  Lcd "COLOR IS : RED"
                  End If
                  چون رنج فرکانس هر رنگ برای سنسور من بین 200 تا 300 هرتز اختلافه من باید دویست خط اضافه کنم که باری هر فرکانس باید یه شرط بزارم که خیلی کار مزخرفی میشه
                  من میخوام یه دستوری یا تابعی باشه که بتونم یه رنج از فرکانس و مساوی یک رنگ بدونه مثلا این باشه که
                  if 2100> a >2300 then
                  lcd " color is : red :
                  end if
                  که کامپایلر بخاطر اشتباه من ارور میده
                  ممنون از کمکتون
                  دوست عزیز با اجازه سوالتو اصلاح میکنم شاید به این نحو ، دوستان منظورت بهتر درک کنن !!

                  متن ها و سوالات من کامل نبود و منظورمو نرسوندم اینو بخونید منتظر جوابم ممنون
                  میگم به نظر شما از این دستور میشه استفاده کرد ؟؟
                  مثلا" فکانس رنگ قرمز 2100 تا 2300 هست !

                  If A = 2100 Then
                  Locate 2 , 1
                  Lcd "COLOR IS : RED"
                  End If
                  رنج فرکانس هر رنگ برای سنسور من بین 200 تا 300 هرتز اختلاف داره من باید تو برنامه دویست خط اضافه کنم که برای هر فرکانس باید یه شرط بزارم که خیلی کار مزخرفی میشه !!
                  من میخوام یه دستوری یا تابعی باشه که بتونم یه رنج فرکانس و فرکانس مساوی یک رنگ رو بدونه !!
                  مثلا :
                  if 2100> a >2300 then
                  lcd " color is : red :
                  end if

                  کامپایلر بخاطر اشتباه من ارور میده
                  ممنون از کمکتون


                  در ضمن فک کنم همین مثال آخرتون جواب سوالتونه!
                  موفق باشی
                  تخیل مهمتر از دانش است
                  علم محدود است اما تخیل دنیا را دربر میآ‌گیرد
                  آلبرت انیشتین

                  دیدگاه


                    #10
                    پاسخ : پرسش و پاسخ در خصوص نرم افزار بسکام

                    کد:
                    Select Case I
                    
                     Case 1 : Print "1"
                    
                     Case 2 : Print "2"
                    
                     Case 3 To 5 : Print "3-5"
                    
                     Case Is >= 10 : Print ">= 10"
                    
                     Case Else : Print "Not in Case statement"
                    
                    End Select

                    دیدگاه


                      #11
                      پاسخ : پرسش و پاسخ در خصوص نرم افزار بسکام

                      سلام
                      اگه بخوام با یه بار Set شدن یه PIN یه کار و با دوبار Set شدنش یه کار دیگه ای انجام بدم باید چیکار کنم ؟؟
                      میخوام میکرو چک کردن ورودیا رو هم انجام بده ؟؟
                      مرسی
                      تخیل مهمتر از دانش است
                      علم محدود است اما تخیل دنیا را دربر میآ‌گیرد
                      آلبرت انیشتین

                      دیدگاه


                        #12
                        پاسخ : پرسش و پاسخ در خصوص نرم افزار بسکام



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

                        چرا ناراحتی پاتریک!
                        + امروز ی بچه دیدم سرچهارراه گل میفروخت
                        - از دیدنش ناراحت شدی؟
                        + نه
                        پس چی ناراحتت کرده
                        + اینکه دیدن اینجور بچه ها انقدر واسم عادی شده که دیگه ناراحتم نمیکنه
                        ------------------------------------------------------------------------------------------------------
                        تاحالا فکر کردی بیسواد کیه؟- بی سواد یعنی کسی که نمیتونه ذهنیاتش رو عملی کنه!
                        ------------------------------------------------------------------------------------------------------
                        محصولات

                        دیدگاه


                          #13
                          پاسخ : پرسش و پاسخ در خصوص نرم افزار بسکام

                          نوشته اصلی توسط سوران آراسته

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

                          میشه بفرمایید چطوری؟؟؟؟؟ :angry: :angry:
                          من هر چی فکر میکنم نمیشه اینطوری که فرمودید

                          اما اینجا باید طی یک پروسه ی زمانی مشخصی تشخیص بده که کلید چند مرتبه فشرده شده و بعد بره به ادامه ی کارایی که بایستی انجام بده :nice:
                          وقتي گريبان عدم با دست خلقت مي دريد/وقتي ابد چشم تو را پيش از ازل مي آفريد/وقتي زمين ناز تو را در آسمانها مي کشيد/وقتي عطش طعم تو را با اشکهايم مي چشيد/من عاشق چشمت شدم ، نه عقل بود و نه دلي/چيزي نمي دانم از اين ديوانگي و عاقلي/يک آن شد اين عاشق شدن ، دنيا همان يک لحظه بود/آن دم که چشمانت مرا از عمق چشمانت ربود/وقتي که من عاشق شدم شيطان به نامم سجده کرد/آدم زميني تر شد و عالم به آدم سجده کرد /بودم و چشمان تو ، نه آتشي و نه گلي/چيزي نمي دانم از اين ديوانگي و عاقلي/.

                          دیدگاه


                            #14
                            پاسخ : پرسش و پاسخ در خصوص نرم افزار بسکام

                            سلام دوستان.
                            من میخوام یک برنامه واسه لباسشویی بنویسم.
                            وقتی روشن شد مثلا تو مرحله اول ازم تایم بخواد مثلا 15=30=45=60=90
                            تو مرحله دوم دما بخواد مثلا 0=30=60
                            تو مرحله سوم خشک کن رو بتونم کنترل کنم که خاموش باشه یا روشن(واسه لباس مشکی)
                            یک مقدارشو خودم نوشتم ببینید درسته.

                            $regfile = "m8def.dat"
                            $crystal = 1000000

                            Config Lcdpin = Pin , Db4 = Portc.3 , Db5 = Portc.2 , Db6 = Portc.1 , _
                            Db7 = Portc.0 , E = Portc.4 , Rs = Portc.5
                            Config Lcd = 16 * 2
                            Cursor Off

                            Config Portb = Input
                            Config Portd = Output

                            Dim A As Byte

                            """"A=15,30,45,60,90"&quo t;""
                            Cls
                            Home
                            Lcd "Select Wash Time"
                            Locate 2 , 1
                            Lcd "Time=";A;"min"
                            Waitms 500
                            دوستان لطفا نخندید.
                            ابتدا و شروع هرکاری سخت ترین مرحله آن کار است. برای مثال به عقابها نگاه کن ، حتی اونها هم در ابتدای پرواز ، زیاد بال و پر می زنند، اما هنگامی که اوج می گیرند ، دیگر حتی نیازی به پر زدن هم ندارند ...

                            کافیست اولین قدمها را بدون ترس و با پشتکارِ بالا برداری مطمئن باش بزودی به اوج خواهی رسید و روزهای سخت همیشه نخواهند ماند ...

                            دیدگاه


                              #15
                              پاسخ : پرسش و پاسخ در خصوص نرم افزار بسکام

                              سلام و با تشکر از استاد سوران آراسته

                              نوشته اصلی توسط سوران آراسته
                              دوستان پیشنهاد میدم قبل از ارسال پست و پرسیدن سوال یه سرچی بفرمایید.
                              متاسفانه بعضی از آموزشها توی سایت نیست و اجبارا" و با اجازه اینجا مطرح خواهیم کرد !

                              مثلا" :
                              برنامه ای که بتونه کدهای ارسالی ریموتهای کد فیکس و ... رو دیکد کنه رو هر جا گشتم پیدا نکردم ؛ لطفا" راهنمایی بفرمائید.
                              با تشکر
                              تخیل مهمتر از دانش است
                              علم محدود است اما تخیل دنیا را دربر میآ‌گیرد
                              آلبرت انیشتین

                              دیدگاه

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