junglejourney

changeset 1:5e4bc7f3ef15

Reproduced the map generation algorithm used in the series map generator and tested it on the 0,0 initial values case.
author David Boddie <david@boddie.org.uk>
date Sat Jul 23 01:31:20 2011 +0200
parents 9b4b52cca2fe
children 2aae727821d7
files mapcode.oph
diffstat 1 files changed, 5 insertions(+), 8 deletions(-) [+]
line diff
     1.1 --- a/mapcode.oph	Fri Jul 22 02:00:13 2011 +0200
     1.2 +++ b/mapcode.oph	Sat Jul 23 01:31:20 2011 +0200
     1.3 @@ -12,11 +12,12 @@
     1.4      rts
     1.5  
     1.6  next_value:
     1.7 +    jsr unlimited_values
     1.8      lda $7d
     1.9  
    1.10  divide_loop:
    1.11      cmp #9
    1.12 -    bmi after_divide_loop
    1.13 +    bcc after_divide_loop   ; bmi should work here, I think, but it doesn't
    1.14      sec
    1.15      sbc #9
    1.16      jmp divide_loop
    1.17 @@ -40,10 +41,10 @@
    1.18      sta $7d
    1.19      clc
    1.20                      ; Discard the first ten values.
    1.21 -    ldx #10
    1.22 +    ldy #10
    1.23  make_room_loop0:
    1.24      jsr unlimited_values
    1.25 -    dex
    1.26 +    dey
    1.27      bne make_room_loop0
    1.28      rts
    1.29  
    1.30 @@ -135,10 +136,6 @@
    1.31      rts
    1.32  
    1.33  plot_room:          ; $78,$79 = i,j
    1.34 -    lda #0
    1.35 -    sta $7e
    1.36 -    sta $7f
    1.37 -    
    1.38      lda #$e0
    1.39      sta $72
    1.40      lda #$5b
    1.41 @@ -160,7 +157,7 @@
    1.42      lda #8
    1.43      sta $7a
    1.44  column_loop:
    1.45 -    jsr unlimited_values
    1.46 +    clc
    1.47      jsr next_value
    1.48      jsr plot_tile
    1.49