این برنامه منه برای ارسال sms ولی درست ارسال نمیکنه
کد:
$regfile = "m16def.dat"
$crystal = 8000000
$baud = 9600
config lcd = 16 * 2
config lcdpin = pin , db4 = portc.5 , db5 = portc.4 , db6 = portc.3 , db7 = portc.2 , e = portc.6 , rs = portc.7
cursor off
dim b as byte , s as string * 20
config pina.5 = input , pina.4 = input
set porta.5
set porta.4
config portc.0 = output
portc.0 = 0
cls
home l
lcd "sim900a"
s = ""
do
if pina.4 = 0 then
portc.0 = 1
print "at"
waitms 500
print "at+cmgf=1"
waitms 500
print "at+cmgs=" ; chr(34) ; "091xxxxxxx" ; chr(34)
waitms 100
portc.0 = 0
print "salam" ; chr(26)
waitms 550
end if
loop
end
وقتی هم ارسال میکنه توی گوشی به صورت زیر sms میاد
at
at+cmgf=1
at+cmgs=091xxxxxxx
salam
یعنی این همه رو ارسال میکنه
مشکل از کجا میتونه باشه ؟