Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-06-26 00:29:29 +00:00
Code Issues Projects Releases Wiki Activity

sa: ending: timed portals

Browse Source
This commit is contained in:
Vince Weaver 2018-06-05 00:40:01 -04:00
parent 4eed8a1ff2
commit 560a42543e
1 changed files with 49 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

50
still_alive/ending.s
View File

@ -24,6 +24,7 @@ SY EQU $14
UXL EQU $15
UXH EQU $16
UY EQU $17
TIME EQU $18
HGR_SHAPE EQU $1A
HGR_SHAPEH EQU $1B
@ -68,6 +69,7 @@ ending:
lda #0
sta JO ; jam out
sta KO ; core out
sta TIME
lda #1
sta PR ; portals horizontal
@ -161,13 +163,45 @@ ending:
game_loop:
lda KXL
lda KXL ; update core co-ords
sta UXL
lda KY
sta UY
lda KXH
sta UXH
lda TIME
beq no_time
inc TIME
cmp #30
bne time_60
time_30:
lda #1
sta SXH
lda #3
sta SXL
lda #50
sta SY
jsr draw_blue
jmp no_time
time_60:
cmp #60
bne no_time
lda #0
sta SXH
lda #149
sta SXL
lda #119
sta SY
jsr draw_orange
no_time:
;===================
; Physics Engine
;===================
@ -564,6 +598,11 @@ blue_portal_draw:
lda SY
sta BY
lda #<portal_horiz
sta HGR_SHAPE
lda #>portal_horiz
sta HGR_SHAPE+1
lda #1
sta BO
@ -647,6 +686,11 @@ orange_portal_draw:
lda SY
sta GY
lda #<portal_horiz
sta HGR_SHAPE
lda #>portal_horiz
sta HGR_SHAPE+1
lda #1
sta GO
@ -853,6 +897,10 @@ boom_loop:
lda #1
sta KO ; KO=1
; start time counting
lda #1
sta TIME
rts