نحوه ذخیره کردن یک عدد8رقمی از کیپد 4*4درحافظه میکرو جهت ارسال به sim 900

[Namvar14]

پاسخ : نحوه ذخیره کردن یک عدد8رقمی از کیپد 4*4درحافظه میکرو جهت ارسال به sim 900

مشکلی که الان با این ماژول دارم اینه که بعضی اوقات تمام مشخصات اس ام اس ارسالی از ماژول شامل تاریخ ،ساعت و...درال سی دی نمایش داده می شه .انچه که مدنظر قرار می گیره متن اس ام اس هست .ولی تاریخ و ساعت و unreac sms از متن جدا نمی شوند.
دستورش هم از همون روش معروف ()b=inkeyهستش

dim sms as string*20
dim g as byte , b as byte
.
.
.
Print "AT+CMGR=1"
" "=sms
Do
( ) B = Inkey
Select Case B
Case 0:
Case 13:
If Sms <> " " Then Exit Do
Case 10:
If Sms <> "" Then Exit Do
Case Else
(Sms = Sms + Chr(b
End Select
Loop
lcd sms

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

خودم این مشکل و تقریبا حل کردم به این شکل عمل کردم.درپایان خواندن اس ام اس طول متغیرsms با دستورlenمحاسبه کردم و داخل متغیرi از نوع بایت ریختم.با یه دستور شرطی if ،اگرمقدارi از 30 بیشترشد عملیات خواندن رو دوباره انجام بده .با این کارعملیات خواندن انقدرتکرار میشه که تا متن اصلی استخراج بشه.مشکلی که در این روش اینه که اگه اس ام اس طولش بیشت از 30باشه تو حلقه گیر می کنه. برای حل این مشکل هم می تونید در حین تکرار خواندن حلقه یه متغیری بایتی رو بشمارید که اگر از 20 بیشتر شد خارج بشه.