Thankyou for ur contributions, about the code, am totally new in Picbasic programming but i got some code from the forum and tried to make it suit my project, it returns sucess when its pic616f877 what changes and additions should i make for it to suit pic16f84
code:
DEFINE OSC 4
DEFINE HSER_TXSTA 20h
DEFINE HSER_RCSTA 90h
DEFINE HSER_BAUD 9600
DEFINE HSER_CLROERR 1

'Setup the names that will be used throughout the program
PushButton var PORTB.0 ' Setup the name PushButton to mean PortB input 0

Main:

IF PushButton = 0 THEN SMS 'If button is pressed then run the SMS routine below

goto main ' however if the button is not pushed then just go back to the Main
' routine to wait for the button to be pressed

SMS: ' this is the SMS commands routine in order to send an SMS

HSEROUT ["AT" ,13,10] ' send AT to modem followed by a CR and line feed

HSERIN 5000, SMS, [WAIT("OK")] ' now wait for 5secs until OK is received however
' if it is not then goto the SMS routine again

HSEROUT ["AT+CMGF=1" ,13,10]

HSERIN 5000, SMS, [WAIT("OK")]

HSEROUT ["AT+CMGS=+256782277658"]

HSEROUT [13,10]

HSERIN 5000, SMS, [WAIT(">")]

HSEROUT ["BUTTON HAS BEEN PRESSED!"]

HSEROUT [26] ' this is ASCII for Ctrl+Z of which completes SMS sending

HSERIN 15000, SMS, [WAIT("+CMG")] ' then PIC should receive +CMG from modem

HSEROUT [10] 'ascii code for a line feed

end

Pliz help me
regards
dumato