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

20 lines
497 B
QBasic
Raw Normal View History

DIM SHARED Version AS STRING
DIM SHARED IsCiVersion AS _BYTE
2018-11-02 09:17:33 +00:00
Version$ = "0.5.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$ <> "" then
IsCiVersion = -1
end if
2018-11-02 09:17:33 +00:00
CLOSE #versionfile
END IF