aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorB. Watson <urchlay@slackware.uk>2022-11-08 01:39:41 -0500
committerB. Watson <urchlay@slackware.uk>2022-11-08 01:39:41 -0500
commitb694d22114fc57d5c8df67853ec1657d7916fbce (patch)
tree46b4fdfad37a33969a3101a998c64a7517a0cd85
parentaf122e258fe45d5081213dc1ac55f782c3dd8b9f (diff)
downloaddla-asm-b694d22114fc57d5c8df67853ec1657d7916fbce.tar.gz
Remove Start key peeking (no longer works).
-rw-r--r--dla.s28
1 files changed, 0 insertions, 28 deletions
diff --git a/dla.s b/dla.s
index 9ebf2c1..24121d3 100644
--- a/dla.s
+++ b/dla.s
@@ -82,12 +82,6 @@ init:
lda #>DEFAULTPART
sta maxparticles+1
- ; init our immediate vblank handler
- lda #6
- ldy #<consol_isr
- ldx #>consol_isr
- jsr SETVBV
-
; "New" option jumps here, restore GR.0 screen
getargs:
jsr restore_gr0
@@ -577,28 +571,6 @@ close1:
sta ICCOM,x
jmp CIOV
-;;; Interrupt handler: consol_isr
-;;; Called via immediate IRC. Enables/disables ANTIC DMA based
-;;; on the status of the Start key, but only while CRITIC is set.
-consol_isr:
- ;pha
- ;txa
- ;pha
- lda CRITIC
- beq ci_done
- ldx #0
- lda CONSOL
- cmp #6
- bne ci_nopress
- ldx #DMA_ON
-ci_nopress:
- stx DMACTL
-ci_done:
- ;pla
- ;tax
- ;pla
- jmp SYSVBV
-
;;;;; end of executable code, data tables from here on out.
; prompts.