
#include <p16F887.inc>
	__CONFIG    _CONFIG1, _LVP_OFF & _FCMEN_OFF & _IESO_OFF & _BOR_OFF & _CPD_OFF & _CP_OFF & _MCLRE_OFF & _PWRTE_ON & _WDT_OFF & _INTRC_OSC_NOCLKOUT
	__CONFIG    _CONFIG2, _WRT_OFF & _BOR21V


     cblock 0x20
menthet
MAX_NAGYOBB
	
        endc

          
     org 0
Start:
     bsf       STATUS,RP0     ; select Register Bank 1
     movlw     0xFF
     movwf     TRISA          ; Make PortA all input
     movlw     b'10000000'     ; Jobbra Left Justified, Vdd-Vss referenced
     movwf     ADCON1
     bsf       STATUS,RP1     ; select Register Bank 3
     movlw     b'00000001'    ; Port A0 analog input, A1-7 digital input
     movwf     ANSEL
     bcf       STATUS,RP0     ; back to Register Bank 0
     bcf       STATUS,RP1
	clrf		ADRESL
	clrf		ADRESH

    	bsf       STATUS,RP0
		movlw     b'11000000'
		movwf	  TRISB			
        clrf      TRISD          ; PortD all output
    	clrf   	  TRISC 		 ; PortC all output
		clrf	  TRISE			 ; PortE all output	
        bcf       STATUS,RP0     ; back to Register Bank 0
        bcf       STATUS,RP1
		clrf	  PORTC			; PortC nullázása
		clrf	  PORTD			; PortD nullázása
		clrf	  PORTE		    ; PortE nullázása
		clrf	  menthet       ; menthet nullázása
		bsf		  menthet,0		; mentés induló értéke legyen 1 menthet
		     
     movlw     0x41
     movwf     ADCON0         ; configure A2D for Fosc/8, Channel 0 (RA0), and turn on the A2D module
MainLoop:
     nop                      ; wait 5uS for A2D amp to settle and capacitor to charge.
     nop                      ; wait 1uS
     nop                      ; wait 1uS
     nop                      ; wait 1uS 
     nop                      ; wait 1uS
     bsf       ADCON0,GO_DONE ; start conversion
     btfsc     ADCON0,GO_DONE ; this bit will change to zero when the conversion is complete
     goto      $-1
	





	   btfsc        STATUS,Z            ;a Z zérusjelző-bit vizsgálata 
  	   goto         egyenlo              ;ugrik, ha Z=1, vagyis, ha ADAT1=ADAT2                  EZT JELZI!!!!!
           btfsc        STATUS,C            ;a C túlcsordulás jelzőbit vizsgálata 
           goto         KISEBB              ;ugrik, ha C=1, vagyis ha ADAT1>ADAT2                    MEG EZT JELZI!!!   
;nagyobb                                    ;itt folytatódik, ha C=0, vagyis ha ADAT1<ADAT2 
           bsf     	MAX_NAGYOBB,0        ;a fólia a maximális értéknél nagyobb
	   btfsc  	PORTA,1        		 ; kapcsoló felkapcsolva?
	   bsf          PORTB,0
           goto         MainLoop 
			end
;_ellenorzes
			bcf	    	STATUS,0
			bcf			STATUS,1
			bcf  		STATUS,2
		   	bcf			PORTB,0	
			bcf			PORTB,1
			bcf			PORTB,2
   			BANKSEL 	MAX_KISEBB
			clrf 		MAX_KISEBB
			clrf		MAX_EGYENLO
			clrf		MAX_NAGYOBB



egyenlo 		  
		   bsf      	MAX_EGYENLO,0       
		   bsf			PORTB,1		
    	         ; goto         also_ertek
		   goto        MainLoop
		
KISEBB
	    	bsf		   MAX_KISEBB,0         
	    	bsf			PORTB,2			
	;	goto		also_ertek 
		goto        MainLoop

		end


Clean: Deleting intermediary and output files.Clean: Done.Executing: "C:\Program Files\Microchip\MPASM Suite\MPASMWIN.exe" /q /p16F887 "7es_ujm.asm" /l"7es_ujm.lst" /e"7es_ujm.err"Message[302] C:\SENDULA\7-ES úJ\7ES_UJM.ASM 18 : Register in operand not in bank 0.  Ensure that bank bits are correct.Message[302] C:\SENDULA\7-ES úJ\7ES_UJM.ASM 20 : Register in operand not in bank 0.  Ensure that bank bits are correct.Message[302] C:\SENDULA\7-ES úJ\7ES_UJM.ASM 23 : Register in operand not in bank 0.  Ensure that bank bits are correct.Message[302] C:\SENDULA\7-ES úJ\7ES_UJM.ASM 26 : Register in operand not in bank 0.  Ensure that bank bits are correct.Message[302] C:\SENDULA\7-ES úJ\7ES_UJM.ASM 31 : Register in operand not in bank 0.  Ensure that bank bits are correct.Message[302] C:\SENDULA\7-ES úJ\7ES_UJM.ASM 32 : Register in operand not in bank 0.  Ensure that bank bits are correct.Message[302] C:\SENDULA\7-ES úJ\7ES_UJM.ASM 33 : Register in operand not in bank 0.  Ensure that bank bits are correct.Message[302] C:\SENDULA\7-ES úJ\7ES_UJM.ASM 34 : Register in operand not in bank 0.  Ensure that bank bits are correct.Error[113]

   
C:\SENDULA\7-ES úJ\7ES_UJM.ASM 61 : Symbol not previously defined (egyenlo)Error[113] 
C:\SENDULA\7-ES úJ\7ES_UJM.ASM 63 : Symbol not previously defined (KISEBB)
Halting build on first failure as requested.BUILD FAILED: Sat Mar 22 13:15:20 2008