اطلاعیه

Collapse
No announcement yet.

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

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

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

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

    (لطفا انتهای تاپیک رو مطالعه بفرمائید)
    مردی که کوه را از میان برداشت کسی بود که شروع به برداشتن سنگ ریزه ها کرد
    برچسب ها: انجام, این, بیسیک, چه, در, دستور, رو, زبان, عملی, میده؟؟؟
    #2
    پاسخ : این دستور در زبان بیسیک چه عملی رو انجام میده؟؟؟

    سلام
    نمونه کد دارین که کجا استفاده شده؟
    ;()((void (*)(void))0x0000))

    دیدگاه

      #3
      پاسخ : این دستور در زبان بیسیک چه عملی رو انجام میده؟؟؟

      این دستور رو از کجا اوردی عزیز؟
      هميشه به ياد خدا باش !

      دیدگاه

        #4
        پاسخ : این دستور در زبان بیسیک چه عملی رو انجام میده؟؟؟

        این دستور نیست و متغیره
        نوشته Tempreshte -> Temp + Reshte
        یعنی این یه رشته بوده که temp (یا حالا فارسیش "دما&quot رو می خواسته توش ذخیره کنه
        دستور کجا بود .... :eek:
        دلا خو کن به تنهایی که از تنها بلا خیزد

        دیدگاه

          #5
          پاسخ : این دستور در زبان بیسیک چه عملی رو انجام میده؟؟؟

          با سلام وتشکر از پاسختون اشتباه از بنده بود اینTempreshteیک متغیر تعریف شده از جنس stringبود که من به اول برنامه توجه نکرده بودم(شرمنده )ولی یک سوال دیگه تو این برنامه چرا این متغییرNum رو با strجمع میکنه ؟؟؟ :redface:(خطی که با ستاره نشونش دادم)
          اینم برنامه
          کد:
          $regfile = "m16def.dat"
$crystal = 8000000

Config Lcdpin = Pin , Rs = Porta.0 , E = Porta.2 , Db4 = Porta.4 , Db5 = Porta.5 , Db6 = Porta.6 , Db7 = Porta.7
Config Lcd = 16 * 2
Cursor Off
Cls

Config Kbd = Portb , Debounce = 50 , Delay = 150

Enable Interrupts

Config Portc.4 = Output : Buzzer Alias Portc.4 : Reset Buzzer
Config Portd.7 = Output : Relay Alias Portd.7 : Reset Relay

Dim Keyread As Byte
Dim N As Byte
Dim Key As Byte
Dim Num As String * 16
Dim B As String * 1

Do
  Num = ""
  B = ""
  Key = 0
  N = 0

  Cls
  Cursor Off Noblink
  Lcd "Telephone"
  Waitms 500
  Cls

  Main:
  Cls
  Lcd "Insert Number:"
  Waitms 100
  Locate 2 , 1
  Sound Buzzer , 100 , 500
  Num:
  Do
   Keyread = Getkbd()
   If Keyread >= 16 Then Goto Num
   Sound Buzzer , 100 , 250
   Key = Lookup(keyread , Dta)
   If Key = 15 Then Exit Do
   Waitms 100
   Lcd Key
   **********Num = Num + Str(key
   Incr N
  Loop

  Cls
  Lcd "Dial ..."
  Locate 2 , 1
  Lcd Num
  Set Relay : Waitms 500
  Dtmfout Num , 50
  Wait 4

Loop
End

'**********************************************
Dta:
Data 7 , 4 , 1 , 15 , 8 , 5 , 2 , 0 , 9 , 6 , 3 , 14 , 10 , 11 , 12 , 13

          ویه سوال درمورد کیپد که چجوری کدها شو به میکرو میشناسونیم تو این برنامه توسط آخرین خطه ولی تو یه برنامه دیگه به یه صورت دیگه تبدیل کرده که سر در نمیارم که نمیدونم جای شماره های روی کی پد (موقع فشار دادن )همون شماره هست که رو کی پد زده میشه یا چیز دیگه ای مثلا من عدد1 رو میزنم آیاتو میکرو بصورت عدد3 شناسونده شده؟(ودر lcd چجور نمایش داده میشه 1 یا 3 ) اینم برنامه اش:
          کد:
          Gall:
Data 3
Data 6
Data 9
Data 11
Data 2
Data 5
Data 8
Data 0
Data 1
Data 4
Data 7
Data 10
Data 100
Data 100
Data 100
Data 100
Data 100
          شرمنده که سوال هام زیاد شد ممنون میشم اگه پاسخ بدید
          مردی که کوه را از میان برداشت کسی بود که شروع به برداشتن سنگ ریزه ها کرد

          دیدگاه

            #6
            پاسخ : این دستور در زبان بیسیک چه عملی رو انجام میده؟؟؟

            :angry: :angry:کسی جواب نمیده
            مردی که کوه را از میان برداشت کسی بود که شروع به برداشتن سنگ ریزه ها کرد

            دیدگاه

              #7
              پاسخ : این دستور در زبان بیسیک چه عملی رو انجام میده؟؟؟

              واقعآ کسی نمیخواد جواب بده :surprised: :surprised: :surprised:
              مردی که کوه را از میان برداشت کسی بود که شروع به برداشتن سنگ ریزه ها کرد

              دیدگاه

                #8
                پاسخ : این دستور در زبان بیسیک چه عملی رو انجام میده؟؟؟

                با تشکر از همه اساتید :cry2: :cry2:
                مردی که کوه را از میان برداشت کسی بود که شروع به برداشتن سنگ ریزه ها کرد

                دیدگاه

                  #9
                  پاسخ : این دستور در زبان بیسیک چه عملی رو انجام میده؟؟؟

                  در بعضی از کی پد ها اتصال سوییچ ها با هم فرق دارن
                  یعنی اگه توشو باز کنی و اتصالات مسی رو تعقیب کنی سطر و ستون همیشه
                  3 2 1
                  6 5 4
                  9 8 7
                  رو نشون نمیده
                  به خاطر همین وقتی برنامه ای رو با کیپد دیگه ای تست می کنی برعکس نشون میده
                  خب شما اگه 1 رو میزنید 3 نشون میده و 3 رو میزنید 1 نشون میده کافیه جای اینا رو توی برنامه عوض کنید

                  دیدگاه

                    #10
                    پاسخ : این دستور در زبان بیسیک چه عملی رو انجام میده؟؟؟

                    با سلام یه سوال در مورد تغییر برنامه داشتم درسته ربطی به موضوع تاپیک نداره ولی گفتم اینجا سوال کنم بگذریم
                    میخواستم بدونم میشه تو بیسیک از چندbitwait پشت سرهم یا از چند دستور ifپشت سرهم استفاده کرد مثلا تو این برنامه که نوشته شده برای یک سنسور میباشد میخوام دو تا سنسور دیگه هم بهش اضافه کنیم که همین کارارو انجام بده
                    کد:
                    Sensing:
Cls
Lcd "WAIT FOR SENS"
bitwait Sens , Set

Cls
Lcd "SYSTEM LUCKED"

Do

If Sens = 0 Then
   Cls
   Lcd "ALARM"
   Lowerline
   Lcd "CALLING"
   Tellr = 1
   Wait 1
   Dtmfout Phonenum , 100
   Wait 15
   Tellr = 0
   Goto Sensing
End If

I = Getkbd()
I = Lookup(i , Gall)

If I = 11 Then
   Cls
   Lcd "SYSTEM UNLUCKED"
   Wait 2
   Goto 2
End If

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

                    دیدگاه

                      #11
                      پاسخ : این دستور در زبان بیسیک چه عملی رو انجام میده؟؟؟

                      از مهندسان عزیز تقاضای کمک دارم :cry2: :cry2:
                      مردی که کوه را از میان برداشت کسی بود که شروع به برداشتن سنگ ریزه ها کرد

                      دیدگاه

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