mirror of
https://github.com/Ed94/Odin.git
synced 2026-06-28 00:01:48 -07:00
gingerBill
104 lines
2.9 KiB
Odin
104 lines
2.9 KiB
Odin
STD_INPUT_HANDLE :: -10;
|
|
STD_OUTPUT_HANDLE :: -11;
|
|
STD_ERROR_HANDLE :: -12;
|
|
|
|
CS_VREDRAW :: 1;
|
|
CS_HREDRAW :: 2;
|
|
CW_USEDEFAULT :: 0x80000000;
|
|
|
|
WS_OVERLAPPED :: 0;
|
|
WS_MAXIMIZEBOX :: 0x00010000;
|
|
WS_MINIMIZEBOX :: 0x00020000;
|
|
WS_THICKFRAME :: 0x00040000;
|
|
WS_SYSMENU :: 0x00080000;
|
|
WS_CAPTION :: 0x00C00000;
|
|
WS_VISIBLE :: 0x10000000;
|
|
WS_OVERLAPPEDWINDOW :: WS_OVERLAPPED|WS_CAPTION|WS_SYSMENU|WS_THICKFRAME|WS_MINIMIZEBOX|WS_MAXIMIZEBOX;
|
|
|
|
WM_DESTROY :: 0x02;
|
|
WM_CLOSE :: 0x10;
|
|
WM_QUIT :: 0x12;
|
|
|
|
PM_REMOVE :: 1;
|
|
|
|
COLOR_BACKGROUND : rawptr : 1; // NOTE(bill): cast to HBRUSH when needed
|
|
|
|
|
|
type HANDLE: rawptr;
|
|
type HWND: HANDLE;
|
|
type HDC: HANDLE;
|
|
type HINSTANCE: HANDLE;
|
|
type HICON: HANDLE;
|
|
type HCURSOR: HANDLE;
|
|
type HMENU: HANDLE;
|
|
type HBRUSH: HANDLE;
|
|
type WPARAM: uint;
|
|
type LPARAM: int;
|
|
type LRESULT: int;
|
|
type ATOM: i16;
|
|
type POINT: struct { x, y: i32 }
|
|
type BOOL: i32;
|
|
|
|
type WNDPROC: proc(hwnd: HWND, msg: u32, wparam: WPARAM, lparam: LPARAM) -> LRESULT;
|
|
|
|
type WNDCLASSEXA: struct {
|
|
cbSize, style: u32,
|
|
wndProc: WNDPROC,
|
|
cbClsExtra, cbWndExtra: i32,
|
|
hInstance: HINSTANCE,
|
|
hIcon: HICON,
|
|
hCursor: HCURSOR,
|
|
hbrBackground: HBRUSH,
|
|
menuName, className: ^u8,
|
|
hIconSm: HICON,
|
|
}
|
|
|
|
type MSG: struct {
|
|
hwnd: HWND,
|
|
message: u32,
|
|
wparam: WPARAM,
|
|
lparam: LPARAM,
|
|
time: u32,
|
|
pt: POINT,
|
|
}
|
|
|
|
|
|
GetStdHandle :: proc(h: i32) -> HANDLE #foreign
|
|
CloseHandle :: proc(h: HANDLE) -> i32 #foreign
|
|
WriteFileA :: proc(h: HANDLE, buf: rawptr, len: i32, written_result: ^i32, overlapped: rawptr) -> i32 #foreign
|
|
GetLastError :: proc() -> i32 #foreign
|
|
ExitProcess :: proc(exit_code: u32) #foreign
|
|
GetDesktopWindow :: proc() -> HWND #foreign
|
|
GetCursorPos :: proc(p: ^POINT) -> i32 #foreign
|
|
ScreenToClient :: proc(h: HWND, p: ^POINT) -> i32 #foreign
|
|
|
|
GetModuleHandleA :: proc(module_name: ^u8) -> HINSTANCE #foreign
|
|
|
|
QueryPerformanceFrequency :: proc(result: ^i64) -> i32 #foreign
|
|
QueryPerformanceCounter :: proc(result: ^i64) -> i32 #foreign
|
|
|
|
sleep_ms :: proc(ms: i32) {
|
|
Sleep :: proc(ms: i32) -> i32 #foreign
|
|
Sleep(ms);
|
|
}
|
|
|
|
OutputDebugStringA :: proc(c_str: ^u8) #foreign
|
|
|
|
|
|
RegisterClassExA :: proc(wc: ^WNDCLASSEXA) -> ATOM #foreign
|
|
CreateWindowExA :: proc(ex_style: u32,
|
|
class_name, title: ^u8,
|
|
style: u32,
|
|
x, y, w, h: i32,
|
|
parent: HWND, menu: HMENU, instance: HINSTANCE,
|
|
param: rawptr) -> HWND #foreign
|
|
|
|
ShowWindow :: proc(hwnd: HWND, cmd_show: i32) -> BOOL #foreign
|
|
UpdateWindow :: proc(hwnd: HWND) -> BOOL #foreign
|
|
PeekMessageA :: proc(msg: ^MSG, hwnd: HWND,
|
|
msg_filter_min, msg_filter_max, remove_msg: u32) -> BOOL #foreign
|
|
TranslateMessage :: proc(msg: ^MSG) -> BOOL #foreign
|
|
DispatchMessageA :: proc(msg: ^MSG) -> LRESULT #foreign
|
|
|
|
DefWindowProcA :: proc(hwnd: HWND, msg: u32, wparam: WPARAM, lparam: LPARAM) -> LRESULT #foreign
|