Subversion Repositories ngs

Rev

Blame | Last modification | View Log | Download | RSS feed | ?url?

  1.  
  2. ; LAST UPDATE: 13.01.2024 savelij
  3.        
  4.                 include macros.a80
  5.                 include ../vers.a80
  6.  
  7. ADRWORK         EQU ADR_START
  8. UNPACKER        EQU 0x5B00
  9.  
  10.                 ORG ADRWORK-0x11
  11.                 SUM_HOB "npl     C",ADRWORK,EBINFLASHER-BINFLASHER,SIZE_SECTORS
  12.  
  13.                 DI
  14.                 JR START0
  15.  
  16.                 DB "Neo Player Light ",VERS_PLAYER
  17.  
  18. START0          LD HL,ADRWORK
  19.                 PUSH HL
  20.                 LD HL,DEPACK
  21.                 LD DE,UNPACKER
  22.                 LD BC,BINFLASHER-DEPACK
  23.                 PUSH DE
  24.                 LDIR
  25.                 LD HL,EBINFLASHER-1
  26.                 LD DE,0xFFFF
  27.                 LD BC,EBINFLASHER-BINFLASHER
  28.                 LDDR
  29.                 LD HL,ADRWORK
  30.                 EX DE,HL
  31.                 INC HL
  32.                 RET
  33.  
  34. DEPACK          include dec40.a80
  35. BINFLASHER      binclude ../tmp/npl.pack
  36. EBINFLASHER
  37.  
  38.                 DUPL 0x100-LOW ($),0
  39.  
  40.                 IF (EBINFLASHER-BINFLASHER)&0xFF
  41. SIZE_SECTORS    EQU ((EBINFLASHER-BINFLASHER)>>8)+1
  42.                 ELSE
  43. SIZE_SECTORS    EQU ((EBINFLASHER-BINFLASHER)>>8)
  44.                 ENDIF
  45.