1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-06 05:50:22 +00:00
QB64-PE/source/global/version.bas
2022-05-22 23:59:16 -04:00

22 lines
602 B
QBasic

DIM SHARED Version AS STRING
DIM SHARED IsCiVersion AS _BYTE
Version$ = "0.7.1"
$VERSIONINFO:FileVersion#=0,7,1,0
$VERSIONINFO:ProductVersion#=0,7,1,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