; tohle bude uz opravdu neco delat
;
   
#include p16f1708.inc

#define bitik PORTA,1
    
 udata 30
 bunka res 1
    
 code 
 
  __CONFIG   _CONFIG1,  _FOSC_INTOSC & _WDTE_OFF & _PWRTE_ON  & _MCLRE_OFF & _CP_OFF & _BOREN_OFF  & _IESO_OFF &  _FCMEN_OFF & _CLKOUTEN_ON 

;   & _CLKOUTEN_OFF   timhle se da vypnout vnitrni oscilator na pinu RA4 - pin 3 
  
  
  __CONFIG   _CONFIG2,  _WRT_OFF & _LVP_OFF   & _PPS1WAY_ON & _ZCDDIS_ON & _PLLEN_OFF & _STVREN_ON &  _LPBOR_OFF & _BORV_HI & _LPBOR_OFF  

  
#define VYSILAMPISMENO FLAGPIS,0  

  
  org 0
 goto start


 org 4

 
 retfie   ; RETFIE vraci registry z shadow reg. 


start: 
 
    
  banksel ANSELA
  clrf ANSELA
  
  banksel TRISA
  movlw 0xff
  movwf TRISA
  
  banksel PORTA
    
  nop
  nop
  nop
  nop
  nop     ; do wiev - watch si dejte PCL , a divejte se, co dela  
          ; PCL je jenom dolnich 8 bitu PC registru 
  goto daleko   ;  absolutni nepodmineny skok
             
  
  
org 0x7fc
  
daleko:    
    nop
    bra aha   ; vidime, ze skok bra je schopen prekonat hranici 2kB v pameti 
              ; tedy mezi 0x7ff a 0x800
    nop
    nop
    
  
org 0x800  
  nop
  nop
  nop
  nop
  nop
aha:  
  nop
  nop
  nop
  goto aha     ; skok goto skace zase spatne, kvuli PCLATH 
  
  nop
  nop
  
  
 end