diff --git a/constants.asm b/constants.asm index 2b9874f..3b62172 100644 --- a/constants.asm +++ b/constants.asm @@ -228,8 +228,7 @@ TanksNamesDefault dta d"4th.Tank" dta d"5th.Tank" dta d"6th.Tank" -CheatName - dta d" 008.T" + WeaponPriceH ; weapons prices (tables with prices of weapons) .by >price_Baby_Missile___ .by >price_Missile________ diff --git a/scorch.asm b/scorch.asm index 7a9cc8f..7f14758 100644 --- a/scorch.asm +++ b/scorch.asm @@ -1909,6 +1909,39 @@ font4x4 ;---------------------------------------------- ;RMT PLAYER and song loading shenaningans icl 'artwork/sfx/rmtplayr_modified.asm' +;------------------------------------------------- +.proc CheckTankCheat + ldy #$07 + lda TankNr + asl + asl + asl ; 8 chars per name + tax +@ + lda CheatName,y + sec + sbc tanksnames,x + cmp #$27 + bne NoCheat + inx + dey + bpl @- +YesCheat + ldx TankNr + lda TanksWeaponsTableL,x + sta temp + lda TanksWeaponsTableH,x + sta temp+1 + lda #99 +@ iny + sta (temp),y + cpy #(last_defensive_____ - first_offensive____) + bne @- +NoCheat + rts +.endp +CheatName + dta d" 008.T"+$27 ;---------------------------------------------- .IF * > MODUL-1 .ECHO * diff --git a/scorch.bin b/scorch.bin index 928e251..f5e66f6 100644 Binary files a/scorch.bin and b/scorch.bin differ diff --git a/scorch.xex b/scorch.xex index 1e4afa0..93026a4 100644 Binary files a/scorch.xex and b/scorch.xex differ diff --git a/textproc.asm b/textproc.asm index 5361795..40f64e8 100644 --- a/textproc.asm +++ b/textproc.asm @@ -2537,36 +2537,6 @@ NextChar02 rts .endp ;------------------------------------------------- -.proc CheckTankCheat -; puts name of the tank on the screen - ldy #$07 - lda TankNr - asl - asl - asl ; 8 chars per name - tax -@ - lda tanksnames,x - cmp CheatName,y - bne NoCheat - inx - dey - bpl @- -YesCheat - ldx TankNr - lda TanksWeaponsTableL,x - sta temp - lda TanksWeaponsTableH,x - sta temp+1 - lda #99 -@ iny - sta (temp),y - cpy #(last_defensive_____ - first_offensive____) - bne @- -NoCheat - rts -.endp -;------------------------------------------------- .proc RoundOverSprites ; fill sprites with bytes ldy numberOfPlayers