; tohle je komentar. Co je za strednikem, to se nepreklada

  
 LIST   P=PIC16F1708      ;  typ procesoru, PRED include   
  
#include  p16F1708.inc   ;  nacucne uvedeny file
                         ; podivejte se, co je v nem
                         ; najdeme ho v C:\Program Files (x86)\Microchip\MPLABX\v3.15\mpasmx

bunka equ 31        ; skupina pismenek bunka 
                    ; ma hodnotu 31
                    ; kdykoli se v textu objevi 
                    ;   bunka
                    ;   nahradi se cislem 30
; ale to, co je definovano v EQU, NENI bohuzel videt ve View Watch 					

;   #define  pismenka  jinapismenka
;    define nahrazuje retezec pismenka  retzezcem  jinapismenka 

#define bitik STATUS,0      

#define prikaz movlw .9


nazev_sekce udata 20		    
blabla  res 1         ; blabla je bunka 20
haha  res 1           ; haha je bunka   21 
dada res 1            ; dada je bunka   22
                      ;  res 1  znamena  reservuj 1 byte mista  
 
jina_sekce udata 30 
neco res 1
pocitatko res 1		    
		    
 code          ; tady zacina kod programu 
 
 
 
 __CONFIG _CONFIG1,  _WDTE_OFF    ; vypiname WatchDog 
 
 org 0        ; org   nasledujici instrukce je na adrese .....
 goto start

 org 4
 retfie   ;  navrat z preruseni, zatim nic - naucime se pozdeji  



start:       ; navesti ma hodnotu adresy instrukce, u ktere stoji
             ; ??? jakou hodnotu ma skupina pismenek start ????

 
 movlw 41
 movlw 0x41
 movlw .65	; co se ulozi do W ? 
 movlw "A"

start2:         ; ??? jakou hodnotu ma skupina pismenek start2 ????
 
 
 movlw B'01000001'
 

 movlw start              ;  navesti je cislo, a proto se s nim da jako s cislem zachazet


 movlw 25
 movwf dada

 movlw 15
 movf dada, 0
 movf dada, W
 
 
 nop
 nop

 movlw dada  ; !!!!!! tohle je syntakticky spravne !!!!!!!!! 
 
 nop
 nop
 prikaz 

 nop
 nop

 movlw 25
 movwf pocitatko
 movlw neco
 
cyk:
  
 incf neco,1
 incf neco
 incf neco,F

 decfsz pocitatko
 goto cyk



 nop
 nop
 nop
 goto  start3
 

 




           ; dira - podivat do view - Program Memory
 org 50 
 
start3: 
 nop
 nop
 nop
 movlw $      ; $ znamena hodnotu PC registru pro jdouci instrukci
              ; a je to cislo, tak s tim jako s cislem zachazim
              ; ??? jaka hodnota se ulozi do w ???


 nop

 movlw $      ; $ znamena hodnotu PC registru pro jdouci instrukci
              ; a je to cislo, tak s tim jako s cislem zachazim


 ; goto $


 nop
 nop
 nop

 movlw 08
 movwf PCLATH

 goto daleko 
     ; podivat do Program Memory, jak se to prelozilo 


 org 0x0800
daleko:
 nop
 nop
 nop
 nop
 nop
 nop
 nop
 nop
 nop
 goto start ; haha !
            ; proc se to tady nevraci na start ?
            ; ale na adresu ... - doplnte si !
            ; k tomu si nastudujte kapitolu o PC, PCLATH, skocich atd. 
            ; v simulatoru si pak zmente PCLATH 


 

 end

  ;  end znamena   a tady prestan prekladat 
  ;  NENI !!!!  to konec programu pro PICa,
  ;     ve funkcnim PICovi ZADNY KONEC PROGRAMU neni, musi to stale neco delat


  ;   end  equ  code   define  org   navesti  jsou prikazz pro PREKLADAC, 
  ;   tedy pro program, ktery ze slov dela instrukce (cisla !!!! )
  ;   proto take po techto instrukcich nenajdete 
  ;   ve hex file  ani stopy