diff --git a/Atari/display_static.asm b/Atari/display_static.asm index 2cda5cf..69f9112 100644 --- a/Atari/display_static.asm +++ b/Atari/display_static.asm @@ -19,13 +19,31 @@ OptionsScreen dta d" " dta d" Press " dta d"Return"* - dta d" to proceed " + dta d" to proceed " ; this text has common part with OptionsSubTitle (7bytes) :) .ELIF TARGET = 5200 dta d" Please select option with joystick one " - dta d" and press FIRE to proceed " + dta d" and press FIRE to proceed " ; this text has common part with OptionsSubTitle (7bytes) :) .ENDIF ; 0123456789012345678901234567890123456789 ;----------------------------------------------- +OptionsSubTitle + dta d" Unknown Father of All Games" +;----------------------------------------------- +MoreUp + dta d" " ; common part of this text and OptionsSubTitle :) + dta 92,92,92 + dta d" more " + dta 92,92,92 +; dta d" " +MoreDown + dta d" " ; common part of both texts + dta 93,93,93 + dta d" more " + dta 93,93,93 +; dta d" " ; common part of text and empty line :) +EmptyLine + dta d" " +;----------------------------------------------- NameScreen .IF TARGET = 800 dta d" Enter names of players " @@ -57,24 +75,6 @@ NameScreen5 dta d"FIRE"* dta d" - Proceed " .ENDIF -;----------------------------------------------- -OptionsSubTitle - dta d" Unknown Father of All Games" -;----------------------------------------------- -MoreUp - dta d" " ; common part of this text and OptionsSubTitle :) - dta 92,92,92 - dta d" more " - dta 92,92,92 -; dta d" " -MoreDown - dta d" " ; common part of both texts - dta 93,93,93 - dta d" more " - dta 93,93,93 -; dta d" " ; common part of text and empty line :) -EmptyLine - dta d" " WeaponsDescription ; 0123456789012345678901234567890123456789 .IF TARGET = 800 diff --git a/ai.asm b/ai.asm index e40abb9..2499000 100644 --- a/ai.asm +++ b/ai.asm @@ -10,6 +10,16 @@ ; - shoots random direction and force ; greeeting to myself 10 years older in 2013-11-09... still no idea +;---------------- +AIRoutines + .word Moron-1 + .word Shooter-1 ;Shooter + .word Poolshark-1 ;Poolshark + .word Tosser-1 ;Tosser + .word Chooser-1 ;Chooser + .word Spoiler-1 ;Spoiler + .word Cyborg-1 ;Cyborg + .word Unknown-1 ;Unknown ;---------------------------------------------- .proc ArtificialIntelligence ; @@ -53,28 +63,11 @@ WepTableToTemp sta temp+1 rts .endp -;---------------- -AIRoutines - .word Moron-1 - .word Shooter-1 ;Shooter - .word Poolshark-1 ;Poolshark - .word Tosser-1 ;Tosser - .word Chooser-1 ;Chooser - .word Spoiler-1 ;Spoiler - .word Cyborg-1 ;Cyborg - .word Unknown-1 ;Unknown - ;---------------------------------------------- .proc Unknown ; random robotank (from Poolshark to Cyborg) - randomize 4 13 - and #%11111110 - tay - lda AIRoutines+1,y - pha - lda AIRoutines,y - pha - rts + randomize 3 7 + bne ArtificialIntelligence ; We know that PrepareAIShoot is already done, but.... who cares :) .endp ;---------------------------------------------- .proc Moron diff --git a/scorch.bin b/scorch.bin index d069191..32c1a75 100644 Binary files a/scorch.bin and b/scorch.bin differ diff --git a/scorch.xex b/scorch.xex index 0ae6f21..05ebf19 100644 Binary files a/scorch.xex and b/scorch.xex differ