آی پی امداد
abtahi

sim800 در بسکام

mapmap

کاربر
2009-10-27
289
185
کرمانشاه
ضمن سلام و تبریک سال نو
در مورد ایرادات ماژول Sim800 و دستورات اون در بسکام سوالاتی دارم

روش اصولی تغذیه ماژول و میکرو و رله های مربوطه چه روشی هست؟
چطور میتونم کل پیام دریافتی رو به شماره ای پیامک کنم؟
چطور میتونم کاراکترهای خاصی رو از پیام رسیده به ماژول تفکیک و تحلیل کنم؟
 

mohammadamin.javadi

کاربر vip
vip
کاربر
در زیر یک کد نمونه برای ارسال یک پیام دریافتی به یک شماره دیگر با استفاده از ماژول SIM800 در زبان برنامه‌نویسی Bascom آورده شده است. این کد فرض می‌کند که شما قبلاً پیام را دریافت کرده‌اید و حالا می‌خواهید آن را به شماره دیگری ارسال کنید.

```bascom
$regfile = "m8"
$crystal = 8000000
$baud = 9600

Dim message As String * 160 ' متغیر برای ذخیره پیام دریافتی
Dim phoneNumber As String * 15 ' شماره تلفن گیرنده

' شماره تلفن گیرنده را وارد کنید
phoneNumber = "+98912xxxxxxx" ' شماره گیرنده را به فرمت بین‌المللی وارد کنید

' تابع برای ارسال پیام
Sub SendSMS(message As String)
Print "Sending SMS..."
Print "AT+CMGS="; phoneNumber
Waitms 100
Print message
Waitms 100
Print Chr(26) ' ارسال CTRL+Z برای پایان پیام
Waitms 1000
End Sub

' تابع برای دریافت پیام
Sub ReceiveSMS()
Print "Waiting for SMS..."
Print "AT+CMGF=1" ' تنظیم حالت متن
Waitms 100
Print "AT+CNMI=1,2,0,0,0" ' تنظیم دریافت پیام
Waitms 100

' خواندن پیام
Print "AT+CMGR=1" ' شماره پیام را وارد کنید
Waitms 1000​

' فرض می‌کنیم که پیام دریافتی در متغیر message ذخیره شده است
' در اینجا باید کد برای خواندن پیام از ماژول اضافه شود
' به عنوان مثال، می‌توانید از یک حلقه برای خواندن داده‌ها استفاده کنید

' برای مثال، فرض می‌کنیم پیام دریافتی "Hello, this is a test message!" است
message = "Hello, this is a test message!" ' این خط را با کد خواندن پیام جایگزین کنید

' ارسال پیام دریافتی به شماره دیگر
SendSMS(message)
End Sub

' برنامه اصلی
Do
ReceiveSMS()
Waitms 5000 ' انتظار برای دریافت پیام بعدی
Loop
```

### توضیحات:
1. **تنظیمات اولیه**: در ابتدا، پیکربندی‌های لازم برای میکروکنترلر و ماژول SIM800 انجام می‌شود.
2. **تابع `SendSMS`**: این تابع برای ارسال پیام به شماره مشخص شده استفاده می‌شود.
3. **تابع `ReceiveSMS`**: این تابع برای دریافت پیام و سپس ارسال آن به شماره دیگر استفاده می‌شود. در اینجا فرض شده که پیام دریافتی در متغیر `message` ذخیره شده است.
4. **حلقه اصلی**: در این حلقه، تابع `ReceiveSMS` به طور مداوم فراخوانی می‌شود تا پیام‌های جدید را دریافت کند.
 

infoshinfo

مدیر تالار
پرسنل مدیریت
مدیر تالار
کاربر +vip پلاس
vip
2010-02-07
1,110
1,946
سلام
مثل دوستمون جناب @mohammadamin.javadi بخشی از پاسخ رو می‌تونید از هوش مصنوعی بگیرید؛ اما به چند نکته باید دقت بشه.
اول اینکه هوش مصنوعی خطا داره، و نمی‌تونید متکی به اون باشید.
دوم اینکه سوال‌تون رو دقیق و تفکیگ شده و بخش، بخش از هوش مصنوعی بپرسید و کلی سوال نکنید تا جواب کلی بگیرید.
سوم، هوش مصنوعی رو سوال پیچ کنید و اجازه بدید از طریق گوناگون یه مطلب رو توضیح بده.
چهارم، داده‌های هوش رو بگیرید و پس از تجزیه و تحلیل، اشتباهات اونو اول با خود هوش و دوم تو انجمن مطرح بفرمایید.
و پنجم اینکه حواستون باشه که در حال حاضر، هیچ چیز جای تجربه و علم همکاران رو نمیگیره.
 

AzarElectron

کاربر vip
کاربر
2023-01-08
97
67
55
ارومیه
سلام. با قرار دادن یک دیود در مسیر 5 ولت، ولتاژ 4.3 برای ماژول تهیه کنید.
حدالامکان تغذیه رله ها مجزا باشد.
هر اپراتوری در پیام دریافتی ، هدر خاص خودش رو داره که می تونید اول روی ال سی دی ببینید بعد تصمیم بگیرید
 

AzarElectron

کاربر vip
کاربر
2023-01-08
97
67
55
ارومیه
سلام
مثل دوستمون جناب @mohammadamin.javadi بخشی از پاسخ رو می‌تونید از هوش مصنوعی بگیرید؛ اما به چند نکته باید دقت بشه.
اول اینکه هوش مصنوعی خطا داره، و نمی‌تونید متکی به اون باشید.
دوم اینکه سوال‌تون رو دقیق و تفکیگ شده و بخش، بخش از هوش مصنوعی بپرسید و کلی سوال نکنید تا جواب کلی بگیرید.
سوم، هوش مصنوعی رو سوال پیچ کنید و اجازه بدید از طریق گوناگون یه مطلب رو توضیح بده.
چهارم، داده‌های هوش رو بگیرید و پس از تجزیه و تحلیل، اشتباهات اونو اول با خود هوش و دوم تو انجمن مطرح بفرمایید.
و پنجم اینکه حواستون باشه که در حال حاضر، هیچ چیز جای تجربه و علم همکاران رو نمیگیره.
دقیقا. من که چند بار برنامه خواستم برام بنویسه ، هیچ کدوم درست کار نکرده
 

infoshinfo

مدیر تالار
پرسنل مدیریت
مدیر تالار
کاربر +vip پلاس
vip
2010-02-07
1,110
1,946
دقیقا. من که چند بار برنامه خواستم برام بنویسه ، هیچ کدوم درست کار نکرده

سلام
اتفاقا یه مورد برام پیش اومد که از هوش مصنوعی برای یه کد کمک گرفتم. متاسفانه کدی که داد علاوه بر اشتباه نرم‌افزاری، راهنمایی سخت‌افزاریش هم اشتباه بود.
یه مورد هم کاربری تو انجمن، مطلبی از هوش مصنوعی فرستاده بود که اشتباه داشت؛ پس از تبادل نظر تصحیح کردند.
 
بالا