Añado algo que faltaba

This commit is contained in:
antoniovillena 2016-07-14 16:36:07 +02:00
parent 2472082928
commit 99a4d071ac
4 changed files with 4339 additions and 4216 deletions

File diff suppressed because it is too large Load Diff

View File

@ -143,7 +143,7 @@ bin2 jr nz, bin2
block $0100 - $
include scroll/define.asm
ld sp, 0
ld de, $5e7c+filesize-1
ld de, $5e82+filesize-1
ld hl, fin-1
; -----------------------------------------------------------------------------

View File

@ -1,5 +1,5 @@
output scroll.bin
org $5e7c
org $5e82
display $6d35+string-music
string include string.asm
music ld (vari+2), ix
@ -36,45 +36,45 @@ start0 ld a, b
out ($fe), a
inc a
ex af, af'
ld de, $401f
rever ld hl, $ffe1
add hl, de
ld c, (hl)
ld a, $80
revl1 rl c
rra
jr nc, revl1
ld (de), a
inc hl
dec de
ld c, (hl)
ld a, $80
revl2 rl c
rra
jr nc, revl2
ld (de), a
inc hl
dec de
ld c, (hl)
ld a, $80
revl3 rl c
rra
jr nc, revl3
ld (de), a
inc hl
dec de
ld c, (hl)
ld a, $80
revl4 rl c
rra
jr nc, revl4
ld (de), a
ld hl, $23
add hl, de
ex de, hl
ld a, d
cp $58
jr nz, rever
; ld de, $401f
;rever ld hl, $ffe1
; add hl, de
; ld c, (hl)
; ld a, $80
;revl1 rl c
; rra
; jr nc, revl1
; ld (de), a
; inc hl
; dec de
; ld c, (hl)
; ld a, $80
;revl2 rl c
; rra
; jr nc, revl2
; ld (de), a
; inc hl
; dec de
; ld c, (hl)
; ld a, $80
;revl3 rl c
; rra
; jr nc, revl3
; ld (de), a
; inc hl
; dec de
; ld c, (hl)
; ld a, $80
;revl4 rl c
; rra
; jr nc, revl4
; ld (de), a
; ld hl, $23
; add hl, de
; ex de, hl
; ld a, d
; cp $58
; jr nz, rever
ld hl, $c000
ld de, $c400

View File

@ -1,7 +1,7 @@
include define.asm
output scrolldesc.bin
org $5ccb
ld de, $5e7c+filesize-1
ld de, $5e82+filesize-1
di
defb $de, $c0, $37, $0e, $8f, $39, $96
jr aqui