fabrisio
Üye
- Katılım
- 31 Eki 2007
- Mesajlar
- 457
- Puanları
- 1
Sırayla gidelim bakalım.
BASLA:
SerIn PORTA.0,0,500,SAY,["+CMT"],RX4
PAUSE 1000
LCDOUT $FE,1,#SAYAC
LCDOUT $FE,$C0,"SORGULAMA"
IF RX4="I" THEN
SEROUT PORTA.1,0,["AT",13]
pause 1000
SEROUT PORTA.1,0,["AT",13]
pause 1000
SEROUT PORTA.1,0,["AT",13]
pause 1000
SEROUT PORTA.1,0,["AT",13]
pause 1000
SEROUT PORTA.1,0,["AT+CMGR=1",13]
SerIn PORTA.0,0,1000,SAY,["+08"],RX5,RX6,RX7,RX8
PAUSE 1000
Buraya neden endif koymadın? Döngü açık kalmış
BASLA:
SerIn PORTA.0,0,500,SAY,["+CMT"],RX4
PAUSE 1000
LCDOUT $FE,1,#SAYAC
LCDOUT $FE,$C0,"SORGULAMA"
IF RX4="I" THEN
SEROUT PORTA.1,0,["AT",13]
pause 1000
SEROUT PORTA.1,0,["AT",13]
pause 1000
SEROUT PORTA.1,0,["AT",13]
pause 1000
SEROUT PORTA.1,0,["AT",13]
pause 1000
SEROUT PORTA.1,0,["AT+CMGR=1",13]
SerIn PORTA.0,0,1000,SAY,["+08"],RX5,RX6,RX7,RX8
PAUSE 1000
Buraya neden endif koymadın? Döngü açık kalmış