Scramble (arcade game remake)

[madscijr]

Code: (Select All)

$LET HI_RES = 1
...
    $IF HI_RES THEN

First, a simple question about this (probably more of a general QB64PE question).
In QB64/PE, isn't the boolean TRUE value -1?
Because the program is setting HI_RES to 1, not -1, and it still evaluates to true.
Did QB64 & QB64PE always evaluate both -1 and 1 to true, and I just never noticed?
Example:

Code: (Select All)

Const FALSE = 0
Const TRUE = Not FALSE
Const HI_RES = 1
Cls
Print "FALSE  = " + _Trim$(Str$(FALSE))
Print "TRUE   = " + _Trim$(Str$(TRUE))
Print "HI_RES = " + _Trim$(Str$(HI_RES))
Print
If HI_RES Then
    Print "HI_RES evaluates to true"
Else
    Print "HI_RES evaluates to false"
End If
Print
Print "press any key to continue"
Sleep
System

3) There was a lot of code scattered around that required tweaking so it wasn't a simple case of increasing TILE_WIDTH and TILE_HEIGHT. To simplify it a little I added a TILE_SCALE so that all the original position placements and calculations didn't need modifying - just the actual rendering to the virtual screen display.

Code: (Select All)

$IF HI_RES THEN
    CONST TILE_SCALE = 2
$ELSE
        CONST TILE_SCALE = 1
$END IF

4) I added a bunch of pre-processor settings so that it's easy to switch gaming modes around. All of your modifications are included in these -

Code: (Select All)

$LET HI_RES = 1
$LET WIDESCREEN = 1
$LET SPEED_CONTROLS = 0
$LET EXTRA_BOMBS = 0
$LET EXTRA_LIVES = 1
$LET FREE_ROAMING_SHIP = 0

So if we want to try x4 resolution, we need to set both TILE_SCALE and HI_RES, right? Like this:

Code: (Select All)

$IF HI_RES THEN
    CONST TILE_SCALE = 4
...
$LET HI_RES = 1

My final question is about the background stars. A few seconds into the game, the sky turns from black to gray. Is this supposed to happen? How can we keep the sky black? 

The game starts out with black skies:


But then around the time the ship flies over the 2nd hill, this happens:


Like the song says, "Grey skies are gonna clear up, put on a happy face!" LoL

Thanks again for all the work you put into this and your time with helping to customize it!