diff --git a/src/zinfo/z1/z1.s b/src/zinfo/z1/z1.s index b4c5116..81d03f8 100644 --- a/src/zinfo/z1/z1.s +++ b/src/zinfo/z1/z1.s @@ -96,11 +96,11 @@ quit jsr $bf00 !byte $c5 !word c5_parms - ldx $201 - inx - txa + lda $201 and #$0f - sta $200 + tax + inx + stx $200 lda #$2f sta $201 jsr $bf00 @@ -238,6 +238,10 @@ dump_info sbc #moves_offset ldy #moves_offset sta (zpage_info),y + + ldy #date_offset + lda #0 + sta (zpage_info),y rts fetch_obj: diff --git a/src/zinfo/z2/z2.s b/src/zinfo/z2/z2.s index d534a0a..86089de 100644 --- a/src/zinfo/z2/z2.s +++ b/src/zinfo/z2/z2.s @@ -98,11 +98,11 @@ quit jsr $bf00 !byte $c5 !word c5_parms - ldx $201 - inx - txa + lda $201 and #$0f - sta $200 + tax + inx + stx $200 lda #$2f sta $201 jsr $bf00 @@ -244,6 +244,10 @@ dump_info sbc #moves_offset ldy #moves_offset sta (zpage_info),y + + ldy #date_offset + lda #0 + sta (zpage_info),y rts fetch_obj: diff --git a/src/zinfo/z3/z3.s b/src/zinfo/z3/z3.s index 8847fc1..a1faa5a 100644 --- a/src/zinfo/z3/z3.s +++ b/src/zinfo/z3/z3.s @@ -137,11 +137,11 @@ quit jsr $bf00 !byte $c5 !word c5_parms - ldx $201 - inx - txa + lda $201 and #$0f - sta $200 + tax + inx + stx $200 lda #$2f sta $201 jsr $bf00 @@ -248,8 +248,10 @@ dump_info sta max_chars LDA #$10 ; location JSR fetch_obj - LDA zp_8C - JSR decompress + lda zp_8C + bne + + rts ++ JSR decompress lda zpage_ptr ldy #name_offset @@ -260,6 +262,12 @@ dump_info lda #0 sta max_chars ;can't overflow anymore sta (zpage_info),y + ldy #score_offset + sta (zpage_info),y + ldy #moves_offset + sta (zpage_info),y + ldy #date_offset + sta (zpage_info),y LDA #$11 ; score JSR fetch_obj diff --git a/src/zinfo/z4/z4.s b/src/zinfo/z4/z4.s index 23e8751..1a3c5af 100644 --- a/src/zinfo/z4/z4.s +++ b/src/zinfo/z4/z4.s @@ -174,11 +174,11 @@ quit jsr $bf00 !byte $c5 !word c5_parms - ldx $201 - inx - txa + lda $201 and #$0f - sta $200 + tax + inx + stx $200 lda #$2f sta $201 jsr $bf00 diff --git a/src/zinfo/z5/z5.s b/src/zinfo/z5/z5.s index 46a39b5..1b6dc7a 100644 --- a/src/zinfo/z5/z5.s +++ b/src/zinfo/z5/z5.s @@ -176,11 +176,11 @@ quit jsr $bf00 !byte $c5 !word c5_parms - ldx $201 - inx - txa + lda $201 and #$0f - sta $200 + tax + inx + stx $200 lda #$2f sta $201 jsr $bf00 diff --git a/src/zinfo/z5u/z5u.s b/src/zinfo/z5u/z5u.s index d20340e..d9704b0 100644 --- a/src/zinfo/z5u/z5u.s +++ b/src/zinfo/z5u/z5u.s @@ -172,11 +172,11 @@ quit jsr $bf00 !byte $c5 !word c5_parms - ldx $201 - inx - txa + lda $201 and #$0f - sta $200 + tax + inx + stx $200 lda #$2f sta $201 jsr $bf00