scan		clrf	PORTB			;ez törli az összes port összes bitjét az anódot és a katódot is	
		movf	precount,w		;beállítja az ugrást az előosztó utolso 3 bitje alapján (max. 8 ugrás a csövekre)
		andlw	0x07
		addwf	PCL,f			;elugrik a pcl-t növelve
		goto	scan0
		goto	scan1
		...
	
scan0   	movf	dispSec,w		;beállítja a kírandó érték felső 4 bitjét (adat a katódra)	
		andlw	0xf0
		iorlw	0x01			;az alsó 4 bitre beállítja az anód vezérlését (4028 ichez)	
		movwf	PORTB			;egyszerre kiíratja az gészet 
		return			
scan1		swapf	dispSec,w		;a másik csö a következő rutinhívás után csinálja ugyanezt
		andlw	0xf0
		iorlw	0x02
		movwf	PORTB	
		return
		...