1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-06 02:20:25 +00:00
QB64-PE/source/global/version.bas
2022-06-07 16:57:33 -04:00

22 lines
602 B
QBasic

DIM SHARED Version AS STRING
DIM SHARED IsCiVersion AS _BYTE
Version$ = "0.8.0"
$VERSIONINFO:FileVersion#=0,8,0,0
$VERSIONINFO:ProductVersion#=0,8,0,0
' If ./internal/version.txt exist, then this is some kind of CI build with a label
If _FILEEXISTS("internal/version.txt") THEN
versionfile = FREEFILE
OPEN "internal/version.txt" FOR INPUT AS #versionfile
LINE INPUT #versionfile, VersionLabel$
Version$ = Version$ + VersionLabel$
if VersionLabel$ <> "" AND VersionLabel$ <> "-UNKNOWN" then
IsCiVersion = -1
end if
CLOSE #versionfile
END IF