;Copyright (C) widzo 1997-2000
;All right reserved
;[e-mail]
;**************PROGRAMATOR PAMI�CI 28C64*********************
;********************ORYGINAL CODE***************************
;------------------90C000E0C0835383--------------------------
;------------------9FF0D083A3740212--------------------------
;------------------029575F00312025F--------------------------
;------------------74E0B583E6020000--------------------------
;JP-3 NALE�Y USTAWIŹ NA POZ. C000H
;PROGRAM KOPIUJE OBSZAR E000H-FFFFH D0 28C64 (od 0000H WEW.)
;28C64 UMIESZCZONY JEST OD ADRESU 8000H SYSTEMU
;END PRESS 'OK'

INCLUDE 'ADRESY.INC'


ORG 08C5H

MOV DPTR,#0E000H ;ADRES 1-EJ DANEJ
START:
MOVX A,@DPTR ;PRZELIJ DO ACC
PUSH DPH ;NA STOS
ANL DPH,#9FH ;WYMNą� LOGICZNIE Z 10011111B
MOVX @DPTR,A ;PRZELIJ ACC DO 8000H
POP DPH ;ZDEJMIJ ZE STOSU
INC DPTR ;I ZWI�KSZ O 1 DPTR
MOV A,#02H ;DO ACC DANń 02H DLA
LCALL DELAY ;MA�E OPąćNIńTKO "DELAY"
MOV B,#05H ;3-CIA POZ. WYW.
LCALL DPTR4HEX ;DPTR4HEX DPTR NA WYWIETALCZ
MOV A,#0H ;DO ACC DANA 0H
MOV R0,DPH ;
CJNE A,DPL,START ;JELI TO CA�E 8KB TO SKOCZ
CJNE R0,#0H,START
MOV 7DH,#00H ;DO POCZńTKU BIOSU, JELI NIE
MOV 7EH,#79H
MOV 7DH,#54H
MOV 7FH,#5EH
CZY_A:
LCALL CONIN
CJNE A,#0DH,CZY_A
LJMP 0000H ;TO SKOCZ DO START
END