1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-01 13:50:36 +00:00
QB64-PE/source/global/version.bas
2022-06-10 22:35:38 -04:00

22 lines
602 B
QBasic

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