mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-07-06 03:30:23 +00:00
22 lines
602 B
QBasic
22 lines
602 B
QBasic
DIM SHARED Version AS STRING
|
|
DIM SHARED IsCiVersion AS _BYTE
|
|
|
|
Version$ = "3.2.1"
|
|
$VERSIONINFO:FileVersion#=3,2,1,0
|
|
$VERSIONINFO:ProductVersion#=3,2,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
|