Write_To_Flash:
						clr EA
						clr EA
						; THIS CHUNK SHOULD ERASE A 512 BYTE PAGE
						//Set PSWE and PSEE bits in PSCTL register
						mov 08Fh, #2h
						//write flash lock keys
						mov FLKEY, #0A5h
						mov FLKEY, #0F1h

						//move data pointer and write to flash
						mov dptr, #CONST1
						mov A, #0AAh
						movx @dptr, A
						//Clear bits in PSCTL
						mov 08Fh, #0h

												
						//Uneeded delay
						call BIG_ASS_DELAY

						//Set PSWE bit in PSCTL
						mov 08Fh, #01h
						
						//move data pointer and write to a particular byte in flash
						mov dptr, #CONST1
						mov A, #012h
						movx @dptr, A

						//clear PSCTL register
						mov 08Fh, #0h

						setb EA
						setb EA

						ret

CSEG AT 2049

CONSTS_FOR_PROG:
Const1: ds 1
Const2: ds 2