junglejourney

changeset 114:81dd2318a0a4

find changesets by author, revision, files, or words in the commit message
Removed an unused routine.
author David Boddie <david@boddie.org.uk>
date Mon Sep 05 00:04:11 2011 +0200
parents f4cdc821c831
children 2f8c43559970
files loader.oph mapcode.oph
diffstat 2 files changed, 2 insertions(+), 48 deletions(-) [+]
line diff
     1.1 --- a/loader.oph	Sun Sep 04 23:28:21 2011 +0200
     1.2 +++ b/loader.oph	Mon Sep 05 00:04:11 2011 +0200
     1.3 @@ -94,8 +94,8 @@
     1.4  code_block: .byte <code_file_name, >code_file_name
     1.5                 .byte $00, $1f, 0, 0
     1.6                 .byte $00, $1f, 0, 0
     1.7 -               .byte $fe, $1d, 0, 0
     1.8 -               .byte $fe, $3c, 0, 0
     1.9 +               .byte $bf, $1d, 0, 0
    1.10 +               .byte $bf, $3c, 0, 0
    1.11  
    1.12  init_load_window_vdu_bytes: .byte 28,0,29,19,24
    1.13  

     2.1 --- a/mapcode.oph	Sun Sep 04 23:28:21 2011 +0200
     2.2 +++ b/mapcode.oph	Mon Sep 05 00:04:11 2011 +0200
     2.3 @@ -1217,52 +1217,6 @@
     2.4      jsr $fff4
     2.5      rts
     2.6  
     2.7 -key_input:              ; returns A=0 (no key), 1 (left), 2 (right), 3 (up)
     2.8 -                        ;           4 (down), 5 (fire)
     2.9 -
    2.10 -    ldx #158            ; -98 (Z)
    2.11 -    jsr check_key
    2.12 -    cpy #255
    2.13 -    bne not_left_key
    2.14 -    lda #1
    2.15 -    rts
    2.16 -
    2.17 -not_left_key:
    2.18 -    ldx #189            ; -67 (X)
    2.19 -    jsr check_key
    2.20 -    cpy #255
    2.21 -    bne not_right_key
    2.22 -    lda #2
    2.23 -    rts
    2.24 -
    2.25 -not_right_key:
    2.26 -    ldx #183            ; -73 (:)
    2.27 -    jsr check_key
    2.28 -    cpy #255
    2.29 -    bne not_up_key
    2.30 -    lda #3
    2.31 -    rts
    2.32 -
    2.33 -not_up_key:
    2.34 -    ldx #151            ; -105 (/)
    2.35 -    jsr check_key
    2.36 -    cpy #255
    2.37 -    bne not_down_key
    2.38 -    lda #4
    2.39 -    rts
    2.40 -
    2.41 -not_down_key:
    2.42 -    ldx #182            ; -74 (Return)
    2.43 -    jsr check_key
    2.44 -    cpy #255
    2.45 -    bne not_fire_key
    2.46 -    lda #5
    2.47 -    rts
    2.48 -
    2.49 -not_fire_key:
    2.50 -    lda #0
    2.51 -    rts
    2.52 -
    2.53  player_direction_chars_low: .byte $00,$30,$60,$90,$c0,$f0,$20,$50, $80,$b0,$e0,$10
    2.54  player_direction_chars_high: .byte $3e,$3e,$3e,$3e,$3e,$3e,$3f,$3f, $3f,$3f,$3f,$40
    2.55