diff --git a/Atari/textproc.asm b/Atari/textproc.asm index 6b9d8cf..14f500c 100644 --- a/Atari/textproc.asm +++ b/Atari/textproc.asm @@ -140,8 +140,14 @@ OptionsNoTab .endp .proc SelectNextGradient - lda OptionsY ; if "Wind" option selected - cmp #$03 + lda OptionsY + bne NoTeamGame + lda TeamGame + eor #$34 ; 'T' character + sta TeamGame + rts +NoTeamGame + cmp #$03 ; if "Wind" option selected bne NotWind lda WindChangeInRound ; wind change after each turn (not round only) flag eor #$1f ; '?' character @@ -168,7 +174,7 @@ NoMountains eor #$5d ; cursor down character sta BlackHole rts -NoBlackHole +NoBlackHole ldy GradientNr iny cpy #$03 @@ -197,6 +203,8 @@ NoGradientLoop sta OptionsHere+128 lda FastSoilDown sta OptionsHere+88 + lda TeamGame + sta OptionsHere+8 YPos = temp2 XPos = temp2+1 diff --git a/scorch.asm b/scorch.asm index 4d71a95..51961c9 100644 --- a/scorch.asm +++ b/scorch.asm @@ -65,7 +65,7 @@ AdditionalZPvariables = $20 .zpvar MeteorsRound .byte ; set 7th bit - block meteors in round -FirstZpageVariable = $50 +FirstZpageVariable = $4f .zpvar DliColorBack .byte = FirstZpageVariable .zpvar ClearSky .byte ; $ff - Crear sky during drawmountains, 0 - no clear sky .zpvar PaddleState .byte ; old state 2nd button for 2 buttons joysticks @@ -156,6 +156,7 @@ FirstZpageVariable = $50 ; (0 - round only, >0 - each turn) .zpvar FastSoilDown .byte ; 0 - standard, >0 - fast .zpvar BlackHole .byte ; 0 - no, >0 - yes + .zpvar TeamGame .byte ; 0 - no, >0 - Teams .zpvar XHit .word .zpvar delta .word .zpvar HowMuchToFall .byte diff --git a/scorch.xex b/scorch.xex index eca68f2..ac63037 100644 Binary files a/scorch.xex and b/scorch.xex differ