1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-09 20:05:12 +00:00
QB64-PE/source/global/version.bas

22 lines
602 B
QBasic
Raw Normal View History

DIM SHARED Version AS STRING
DIM SHARED IsCiVersion AS _BYTE
2018-11-02 09:17:33 +00:00
2022-08-26 13:05:07 +00:00
Version$ = "3.0.0"
$VERSIONINFO:FileVersion#=3,0,0,0
$VERSIONINFO:ProductVersion#=3,0,0,0
' If ./internal/version.txt exist, then this is some kind of CI build with a label
If _FILEEXISTS("internal/version.txt") THEN
2018-11-02 09:17:33 +00:00
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
2018-11-02 09:17:33 +00:00
CLOSE #versionfile
END IF