PM_USED			EQU	1

	INCLUDE	"16F628A.INC"


; Define statements.
#define		OSC		 4

RAM_START       		EQU	00020h
RAM_END         		EQU	0014Fh
RAM_BANKS       		EQU	00003h
BANK0_START     		EQU	00020h
BANK0_END       		EQU	0007Fh
BANK1_START     		EQU	000A0h
BANK1_END       		EQU	000EFh
BANK2_START     		EQU	00120h
BANK2_END       		EQU	0014Fh
EEPROM_START    		EQU	02100h
EEPROM_END      		EQU	0217Fh

R0              		EQU	RAM_START + 000h
R1              		EQU	RAM_START + 002h
R2              		EQU	RAM_START + 004h
R3              		EQU	RAM_START + 006h
R4              		EQU	RAM_START + 008h
R5              		EQU	RAM_START + 00Ah
R6              		EQU	RAM_START + 00Ch
R7              		EQU	RAM_START + 00Eh
R8              		EQU	RAM_START + 010h
T1              		EQU	RAM_START + 012h
FLAGS           		EQU	RAM_START + 014h
GOP             		EQU	RAM_START + 015h
RM1             		EQU	RAM_START + 016h
RM2             		EQU	RAM_START + 017h
RR1             		EQU	RAM_START + 018h
RR2             		EQU	RAM_START + 019h
_ENG             		EQU	RAM_START + 01Ah
_MEM1            		EQU	RAM_START + 01Ch
_PORTL           		EQU	 PORTB
_PORTH           		EQU	 PORTA
_TRISL           		EQU	 TRISB
_TRISH           		EQU	 TRISA
#define _PORTB_2         	 PORTB, 002h
#define _PORTB_0         	 PORTB, 000h
	INCLUDE	"TACH.MAC"
	INCLUDE	"PBPPIC14.LIB"


	ASM?
 DEVICE  INTRC_OSC_NOCLKOUT

	ENDASM?


	ASM?
 DEVICE  WDT_ON

	ENDASM?


	ASM?
 DEVICE  PWRT_ON

	ENDASM?


	ASM?
 DEVICE MCLR_OFF

	ENDASM?


	ASM?
 DEVICE BOD_ON

	ENDASM?


	ASM?
 DEVICE LVP_OFF

	ENDASM?


	ASM?
 DEVICE CPD_OFF

	ENDASM?


	ASM?
 DEVICE  PROTECT_OFF

	ENDASM?

	MOVE?CB	003h, TRISB
	MOVE?CB	007h, CMCON
	MOVE?CW	000h, _MEM1
	PAUSE?C	003E8h

	LABEL?L	_Splash	
	LCDOUT?C	0FEh
	LCDOUT?C	001h
	LCDOUT?C	0FEh
	LCDOUT?C	001h
	LCDOUT?C	0FEh
	LCDOUT?C	080h
	LCDOUT?C	020h
	LCDOUT?C	04Dh
	LCDOUT?C	069h
	LCDOUT?C	06Bh
	LCDOUT?C	065h
	LCDOUT?C	020h
	LCDOUT?C	046h
	LCDOUT?C	072h
	LCDOUT?C	065h
	LCDOUT?C	065h
	LCDOUT?C	06Dh
	LCDOUT?C	061h
	LCDOUT?C	06Eh
	LCDOUT?C	020h
	LCDOUT?C	020h
	LCDOUT?C	0FEh
	LCDOUT?C	0C0h
	LCDOUT?C	020h
	LCDOUT?C	020h
	LCDOUT?C	030h
	LCDOUT?C	038h
	LCDOUT?C	02Dh
	LCDOUT?C	030h
	LCDOUT?C	033h
	LCDOUT?C	02Dh
	LCDOUT?C	030h
	LCDOUT?C	037h
	LCDOUT?C	020h
	LCDOUT?C	020h
	LCDOUT?C	020h
	LCDOUT?C	020h
	PAUSE?C	003E8h
	LCDOUT?C	0FEh
	LCDOUT?C	001h
	PAUSE?C	064h

	LABEL?L	_Main	
	COUNT?TCW	_PORTB_2, 005DCh, _ENG
	MUL?WCW	_ENG, 014h, _ENG
	CMPNE?TCL	_PORTB_0, 001h, L00001
	MOVE?WW	_ENG, _MEM1
	LABEL?L	L00001	
	LCDOUT?C	0FEh
	LCDOUT?C	080h
	LCDOUT?C	052h
	LCDOUT?C	050h
	LCDOUT?C	04Dh
	LCDOUT?C	020h
	LCDOUT?C	03Dh
	LCDOUT?C	020h
	LCDOUTCOUNT?C	000h
	DIG?WCW	_ENG, 003h, T1
	LCDOUTNUM?W	T1
	LCDOUTDEC?	
	LCDOUTCOUNT?C	000h
	DIG?WCW	_ENG, 002h, T1
	LCDOUTNUM?W	T1
	LCDOUTDEC?	
	LCDOUTCOUNT?C	000h
	DIG?WCW	_ENG, 001h, T1
	LCDOUTNUM?W	T1
	LCDOUTDEC?	
	LCDOUTCOUNT?C	000h
	DIG?WCW	_ENG, 000h, T1
	LCDOUTNUM?W	T1
	LCDOUTDEC?	
	LCDOUT?C	0FEh
	LCDOUT?C	0C0h
	LCDOUT?C	04Dh
	LCDOUT?C	045h
	LCDOUT?C	04Dh
	LCDOUT?C	020h
	LCDOUT?C	03Dh
	LCDOUT?C	020h
	LCDOUTCOUNT?C	000h
	DIG?WCW	_MEM1, 003h, T1
	LCDOUTNUM?W	T1
	LCDOUTDEC?	
	LCDOUTCOUNT?C	000h
	DIG?WCW	_MEM1, 002h, T1
	LCDOUTNUM?W	T1
	LCDOUTDEC?	
	LCDOUTCOUNT?C	000h
	DIG?WCW	_MEM1, 001h, T1
	LCDOUTNUM?W	T1
	LCDOUTDEC?	
	LCDOUTCOUNT?C	000h
	DIG?WCW	_MEM1, 000h, T1
	LCDOUTNUM?W	T1
	LCDOUTDEC?	
	LCDOUT?C	0FEh
	LCDOUT?C	002h
	GOTO?L	_Main
	END?	

	END