Create a cross-compatible version of the desktop resolution algorithm.

This commit is contained in:
Daniel Marsee 2019-12-12 16:06:23 +00:00
parent 26939f6c10
commit b11feede4f

View file

@ -1,4 +1,4 @@
CONST versionvrsn = "v1.1:0004-indev" 'Update this each build! CONST versionvrsn = "v1.1:0006-indev" 'Update this each build!
_TITLE "Electric" _TITLE "Electric"
DIM SHARED ignore`, ignorethrot`, swidth, sheight, xoffset%, yoffset%, graphsetting, gamepad, screenanchorx%, screenanchory% DIM SHARED ignore`, ignorethrot`, swidth, sheight, xoffset%, yoffset%, graphsetting, gamepad, screenanchorx%, screenanchory%
@ -12,16 +12,16 @@ GET #1, 19, vol
IF swidth > 0 AND sheight > 0 THEN IF swidth > 0 AND sheight > 0 THEN
SCREEN _NEWIMAGE(swidth, sheight, 32) SCREEN _NEWIMAGE(swidth, sheight, 32)
ELSE ELSE
desktop& = _SCREENIMAGE dw = _DESKTOPWIDTH
IF desktop& THEN dh = _DESKTOPHEIGHT
swidth = _WIDTH(desktop&) IF dw AND dh THEN
sheight = _HEIGHT(desktop&) swidth = dw
sheight = dh
ELSE ELSE
swidth = 800 swidth = 800
sheight = 600 sheight = 600
END IF END IF
SCREEN _NEWIMAGE(swidth, sheight, 32) SCREEN _NEWIMAGE(swidth, sheight, 32)
IF desktop& THEN _FREEIMAGE desktop&
fs = 1 fs = 1
blue = 255 blue = 255
steering = 1 steering = 1
@ -3104,7 +3104,7 @@ END SUB
FUNCTION getfact$ FUNCTION getfact$
DIM facts$(7) DIM facts$(7)
'facts$(0) = "The airplane in this game is losely based on the Lockheed-Martin F-35 Lightning II and the General Dynamics F-16 Fighting Falcon, the major difference being the means of propultion." 'facts$(0) = "The airplane in this game is losely based on the Lockheed-Martin F-35 Lightning II and the General Dynamics F-16 Fighting Falcon, the major difference being the means of propultion."
'facts$(1) = "The premise for 'Electric' was conceived when I discovered this tidbit of information about Lt. Surge from 'Pokemon: Fire Red': 'Lt. Surge is rumored to have been a pilot while home in America. He used the electricity generated by Pokémon to power his plane.' Having said that, the generators in 'Electric' are just normal generators." 'facts$(1) = "The premise for 'Electric' was conceived when I discovered this tidbit of information about Lt. Surge from 'Pokemon: Fire Red': 'Lt. Surge is rumored to have been a pilot while home in America. He used the electricity generated by Pok<EFBFBD>mon to power his plane.' Having said that, the generators in 'Electric' are just normal generators."
'facts$(2) = "'Descent II' by Parallax had a significant influence on 'Electric', which is ironic because 'Electric' has nothing to do with space." 'facts$(2) = "'Descent II' by Parallax had a significant influence on 'Electric', which is ironic because 'Electric' has nothing to do with space."
facts$(0) = "In most of the code, " + CHR$(34) + "laser" + CHR$(34) + " is misspelled " + CHR$(34) + "lazer." + CHR$(34) facts$(0) = "In most of the code, " + CHR$(34) + "laser" + CHR$(34) + " is misspelled " + CHR$(34) + "lazer." + CHR$(34)
facts$(1) = "Change 'Planes per Team' to 2 or more. Shoot your AI helper. Look in the top left corner of the screen. It only appears for 1/60 of a second." facts$(1) = "Change 'Planes per Team' to 2 or more. Shoot your AI helper. Look in the top left corner of the screen. It only appears for 1/60 of a second."