'api_console.sbp #ifndef _INC_CONSOLE #define _INC_CONSOLE 'console text color Const FOREGROUND_BLUE = &H0001 Const FOREGROUND_GREEN = &H0002 Const FOREGROUND_RED = &H0004 Const FOREGROUND_INTENSITY = &H0008 Const BACKGROUND_BLUE = &H0010 Const BACKGROUND_GREEN = &H0020 Const BACKGROUND_RED = &H0040 Const BACKGROUND_INTENSITY = &H0080 Declare Function AllocConsole Lib "kernel32" () As Long Declare Function FreeConsole Lib "kernel32" () As Long Declare Function SetConsoleCursorPosition Lib "kernel32" (hConsoleOutput As HANDLE, dwCursorPosition As DWord) As Long Declare Function ReadConsole Lib "kernel32" Alias "ReadConsoleA" (hConsoleInput As HANDLE, pBuffer As VoidPtr, nNumberOfCharsToRead As DWord, ByRef NumberOfCharsRead As DWord, pReserved As VoidPtr) As BOOL Declare Function WriteConsole Lib "kernel32" Alias "WriteConsoleA" (hConsoleOutput As HANDLE, pBuffer As VoidPtr, nNumberOfCharsToWrite As DWord, ByRef NumberOfCharsWritten As DWord, pReserved As VoidPtr) As BOOL Declare Function CreateConsoleScreenBuffer Lib "kernel32" (dwDesiredAccess As DWord, dwShareMode As DWord, pSecurityAttributes As *SECURITY_ATTRIBUTES, dwFlags As DWord, pScreenBufferData As VoidPtr) As HANDLE Declare Function SetConsoleActiveScreenBuffer Lib "kernel32" (hConsoleOutput As HANDLE) As BOOL #endif '_INC_CONSOLE