precompile checks

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

View file

@ -1,3 +1,5 @@
$if SaveAnsi = undefined then
$let SaveAnsi = defined
Sub SaveAnsi (Handle As Long, Filename As String)
If _PixelSize <> 0 Then Exit Sub
Dim Bold As _Byte
@ -60,4 +62,5 @@ Function ansicolor$ (BasicColor)
Case 6: ansicolor$ = "3"
Case 7: ansicolor$ = "7"
End Select
End Function
End Function
$end if