visionmercer/qb64-include
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

precompile checks

Browse source
This commit is contained in:
visionmercer 2022-09-19 01:27:48 +02:00
commit 3edb188921
22 changed files with 458 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

5
consolecolor.bm
View file

@ -1,3 +1,5 @@
$if ConsoleColor = undefined then
$let ConsoleColor = defined
Sub ConsoleColor (Colour As _Unsigned Long)
Select Case Colour
Case 0 TO 255
@ -5,4 +7,5 @@ Sub ConsoleColor (Colour As _Unsigned Long)
Case Is > 255
Print Chr$(27) + "[38;2;" + _Trim$(Str$(_Red32(Colour))) + ";" + _Trim$(Str$(_Green32(Colour))) + ";" + _Trim$(Str$(_Blue32(Colour))) + "m";
End Select
End Sub
End Sub
$end if