mirror of https://github.com/zxdos/zxuno.git
Cambio salto a $8000
This commit is contained in:
parent
2e01285a79
commit
3f148e2ef5
Binary file not shown.
|
|
@ -44,36 +44,39 @@ crctlo ld b, $bc ; inicializo registros CRCT
|
|||
|
||||
ld bc, $3ffc
|
||||
ld l, h ; HL= 0
|
||||
ld de, $4000
|
||||
ld de, $8000
|
||||
ldir
|
||||
|
||||
ld a, $42 ; poner borde cyan
|
||||
call border+$4000
|
||||
ld a, $42 ; poner borde verde
|
||||
call border+$8000
|
||||
|
||||
jp toram+$4000
|
||||
jp toram+$8000
|
||||
|
||||
toram xor a
|
||||
toram
|
||||
halt
|
||||
|
||||
xor a
|
||||
inc a
|
||||
call chslot+$4000 ; cargo ROM del 464 en 0000
|
||||
call chslot+$8000 ; cargo ROM del 464 en 0000
|
||||
|
||||
ld a, $43 ; poner borde amarillo
|
||||
call border+$4000
|
||||
call border+$8000
|
||||
|
||||
call $0044 ; initialise LOW KERNEL and HIGH KERNEL jumpblocks
|
||||
call $0888 ; JUMP RESTORE
|
||||
|
||||
ld a, $44 ; poner borde azul
|
||||
call border+$4000
|
||||
call border+$8000
|
||||
|
||||
xor a
|
||||
call chslot+$4000 ; cargo ROM del juego en 0000
|
||||
call chslot+$8000 ; cargo ROM del juego en 0000
|
||||
ld hl, data
|
||||
ld de, $51f0
|
||||
call sauk ; descomprimo
|
||||
|
||||
ld a, 1
|
||||
scf ; bloqueo después
|
||||
call chslot+$4000 ; cargo ROM del 464
|
||||
call chslot+$8000 ; cargo ROM del 464
|
||||
|
||||
|
||||
jp $6e3f ; salto a juego
|
||||
|
|
|
|||
Loading…
Reference in New Issue