list      p=16F690           ; list directive to define processor
	#include <p16F690.inc>        ; processor specific variable definitions

	errorlevel  -302              ; suppress message 302 from list file


	__CONFIG   _CP_OFF & _CPD_OFF & _BOR_OFF & _MCLRE_ON & _WDT_OFF & _PWRTE_ON & _INTRC_OSC_NOCLKOUT & _FCMEN_OFF & _IESO_OFF 


; '__CONFIG' directive is used to embed configuration word within .asm file.
; The lables following the directive are located in the respective .inc file.
; See data sheet for additional information on configuration word settings.


STATUS  	equ  03h      
TRISA   	equ  85h
TRISB   	equ  86h
TRISC   	equ  87h
PORTA   	equ  05h
PORTB   	equ  06h
PORTC   	equ  07h
TXREG   	equ  19h
ADRESH  	equ  1Eh
ADRESL  	equ  9Eh
RESULTLO   	equ  0xA1	
RESULTHI   	equ  21h
CR		equ  0Dh
LF		equ  0Ah


	ORG	0		
	goto    main              

main	goto	START		  

START	BSF	STATUS,5                 
	MOVLW   00h              	
	MOVWF   TRISA           	
	MOVLW   50h		   	
	MOVWF   TRISB	   	
	MOVLW   67h	  	   	
	MOVWF   TRISC           	
	BCF	STATUS,5		
	BSF	STATUS,5               
	MOVLW	0x19               							
	MOVWF	SPBRG
	MOVLW	b'00100100'     	
	MOVWF	TXSTA	     		
	BCF	STATUS,5	     		       	   
	MOVLW	b'10010000'     	    					
	MOVWF	RCSTA             
	CALL	ASend
 	END 

Asend	BCF	STATUS,5
	MOVLW	0x41		;„A” karakter küldése
	CALL	Send;			
	MOVLW 	0x54		;„T” karakter küldése
	CALL 	Send 
	MOVLW 	CR		;Ezzel jelezzük, hogy vége az AT parancsnak (CR_LF)
	CALL 	Send
        MOVLW	LF 		;Ezzel jelezzük, hogy vége az AT parancsnak (CR_LF)
     	CALL 	Send
	RETURN

Send	MOVWF	TXREG                					
	BSF	STATUS,5       
	BTFSS	TXSTA,1     
	GOTO	$-1	         
	BCF	STATUS,5	          
    	RETURN