Code:
        DEFINE LOADER_USED 1
        define OSC 20     ' Check the spelling of OSC, must be in capital letter
        
        Include "modedefs.bas" ' Include serial modes
        
        DEFINE HSER_RCSTA 90h ' Enable serial port & continuous receive
        DEFINE HSER_TXSTA 24h ' Enable transmit, BRGH = 1
        DEFINE HSER_SPBRG 129 ' 9600 Baud @ 20MHz, 0.16%
        DEFINE HSER_CLROERR 1 ' Clear overflow automatically
        
        TrisB.5=0
        TrisC.6=0
        TrisC.7=1
        B0 var byte
        
        High portb.5
        Pause 500
        Low portb.5
        Pause 500
        High portb.5
        Pause 500
        Low portb.5
        Pause 500
        
        HSEROUT ["AT", 13]
        HSEROUT ["AT+CMGF=1", 13]
        HSEROUT ["AT+CSCA=+351xxxxx000", 13]
        HSEROUT ["AT+CSCA=+3xxxxxxxxx0", 13]
        HSEROUT ["ola", 13]
        STOP
        end