sim900
سلام دوستان
من تونستم بت ماژول sim 900 ارتباط برقرار کنم اما مشکل اینجاست که زمانیکه اس ام اس میاد این متن رو رو ال سی دی نمایش میده
CMTI: "SM",1
اگه دوباره اس ام اس بدم اون عدد یک میشه 2 و به همینصورت. اما من میخوام متن اس ام اسمو نمایش بدم . دوستان اگه کمک کنن ممنون میشم
اینم برنامم
$regfile = "m64def.dat"
$crystal = 8000000
$baud = 9600
$lib "glcd.lib"
Config Graphlcd = 240 * 128 , Dataport = Portc , Controlport = Porta , Wr = 7 , Rd = 6 , Ce = 5 , Cd = 4 , Reset = 3 , Fs = 2 , Mode = 8
Dim R As Bit : R = 0
Dim X As Byte : X = 0
Dim B As Byte
Dim Shoro As Integer
Dim Payan As Integer
Dim Tool As Integer
Dim Tedad As Integer
Dim Sms As String * 250 : Sms = ""
Dim Tmp As String * 20
Dim A As Bit
Dim G As Byte
Config Pind.0 = Output
Cls
Wait 3
Set Portb.3
Wait 4
Reset Portb.3
Waitms 20
Locate 5 , 5
Lcd "GSM ON"
Wait 5
Print "AT+CMGD=0,4"
Waitms 500
Cls
Print "AT"
Print "AT"
Print "AT"
Do
' Print "AT"
' Print "AT"
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
' cls
Locate 1 , 1
' Cls
Lcd Sms
Loop
End
پاسخ با نقل قول
