aboutsummaryrefslogtreecommitdiff
path: root/code/punity.odin
diff options
context:
space:
mode:
Diffstat (limited to 'code/punity.odin')
-rw-r--r--code/punity.odin286
1 files changed, 143 insertions, 143 deletions
diff --git a/code/punity.odin b/code/punity.odin
index 83d22854f..fb93189ec 100644
--- a/code/punity.odin
+++ b/code/punity.odin
@@ -1,34 +1,34 @@
-#import "win32.odin";
-#import "fmt.odin";
-#import "os.odin";
+#import "win32.odin"
+#import "fmt.odin"
+#import "os.odin"
-CANVAS_WIDTH :: 128;
-CANVAS_HEIGHT :: 128;
-CANVAS_SCALE :: 3;
-FRAME_TIME :: 1.0/30.0;
-WINDOW_TITLE :: "Punity\x00";
+CANVAS_WIDTH :: 128
+CANVAS_HEIGHT :: 128
+CANVAS_SCALE :: 3
+FRAME_TIME :: 1.0/30.0
+WINDOW_TITLE :: "Punity\x00"
-_ := compile_assert(CANVAS_WIDTH % 16 == 0);
+_ := compile_assert(CANVAS_WIDTH % 16 == 0)
-WINDOW_WIDTH :: CANVAS_WIDTH * CANVAS_SCALE;
-WINDOW_HEIGHT :: CANVAS_HEIGHT * CANVAS_SCALE;
+WINDOW_WIDTH :: CANVAS_WIDTH * CANVAS_SCALE
+WINDOW_HEIGHT :: CANVAS_HEIGHT * CANVAS_SCALE
-STACK_CAPACITY :: 1<<20;
-STORAGE_CAPACITY :: 1<<20;
+STACK_CAPACITY :: 1<<20
+STORAGE_CAPACITY :: 1<<20
-DRAW_LIST_RESERVE :: 128;
+DRAW_LIST_RESERVE :: 128
-MAX_KEYS :: 256;
+MAX_KEYS :: 256
Core :: struct {
- stack: ^Bank;
- storage: ^Bank;
+ stack: ^Bank
+ storage: ^Bank
- running: bool;
- key_modifiers: u32;
- key_states: [MAX_KEYS]byte;
- key_deltas: [MAX_KEYS]byte;
+ running: bool
+ key_modifiers: u32
+ key_states: [MAX_KEYS]byte
+ key_deltas: [MAX_KEYS]byte
perf_frame,
perf_frame_inner,
@@ -36,70 +36,70 @@ Core :: struct {
perf_audio,
perf_blit,
perf_blit_cvt,
- perf_blit_gdi: Perf_Span;
+ perf_blit_gdi: Perf_Span
- frame: i64;
+ frame: i64
- canvas: Canvas;
- draw_list: ^Draw_List;
+ canvas: Canvas
+ draw_list: ^Draw_List
}
Perf_Span :: struct {
- stamp: f64;
- delta: f32;
+ stamp: f64
+ delta: f32
}
Bank :: struct {
- memory: []byte;
- cursor: int;
+ memory: []byte
+ cursor: int
}
Bank_State :: struct {
- state: Bank;
- bank: ^Bank;
+ state: Bank
+ bank: ^Bank
}
Color :: raw_union {
- using channels: struct{ a, b, g, r: byte; };
- rgba: u32;
+ using channels: struct{ a, b, g, r: byte; }
+ rgba: u32
}
Palette :: struct {
- colors: [256]Color;
- colors_count: byte;
+ colors: [256]Color
+ colors_count: byte
}
Rect :: raw_union {
using minmax: struct {
- min_x, min_y, max_x, max_y: int;
- };
+ min_x, min_y, max_x, max_y: int
+ }
using pos: struct {
- left, top, right, bottom: int;
- };
- e: [4]int;
+ left, top, right, bottom: int
+ }
+ e: [4]int
}
Bitmap :: struct {
- pixels: []byte;
- width: int;
- height: int;
+ pixels: []byte
+ width: int
+ height: int
}
Font :: struct {
- using bitmap: Bitmap;
- char_width: int;
- char_height: int;
+ using bitmap: Bitmap
+ char_width: int
+ char_height: int
}
Canvas :: struct {
- using bitmap: ^Bitmap;
- palette: Palette;
- translate_x: int;
- translate_y: int;
- clip: Rect;
- font: ^Font;
+ using bitmap: ^Bitmap
+ palette: Palette
+ translate_x: int
+ translate_y: int
+ clip: Rect
+ font: ^Font
}
DrawFlag :: enum {
@@ -114,7 +114,7 @@ Draw_List :: struct {
Item :: struct {
}
- items: []Item;
+ items: []Item
}
Key :: enum {
@@ -272,77 +272,77 @@ Key :: enum {
key_down :: proc(k: Key) -> bool {
- return _core.key_states[k] != 0;
+ return _core.key_states[k] != 0
}
key_pressed :: proc(k: Key) -> bool {
- return (_core.key_deltas[k] != 0) && key_down(k);
+ return (_core.key_deltas[k] != 0) && key_down(k)
}
-win32_perf_count_freq := win32.GetQueryPerformanceFrequency();
+win32_perf_count_freq := win32.GetQueryPerformanceFrequency()
time_now :: proc() -> f64 {
- assert(win32_perf_count_freq != 0);
+ assert(win32_perf_count_freq != 0)
- counter: i64;
- win32.QueryPerformanceCounter(^counter);
- result := counter as f64 / win32_perf_count_freq as f64;
- return result;
+ counter: i64
+ win32.QueryPerformanceCounter(^counter)
+ result := counter as f64 / win32_perf_count_freq as f64
+ return result
}
-_core: Core;
+_core: Core
run :: proc(user_init, user_step: proc(c: ^Core)) {
- using win32;
+ using win32
- _core.running = true;
+ _core.running = true
win32_proc :: proc(hwnd: HWND, msg: u32, wparam: WPARAM, lparam: LPARAM) -> LRESULT #no_inline #stdcall {
win32_app_key_mods :: proc() -> u32 {
- mods: u32 = 0;
+ mods: u32 = 0
if is_key_down(Key_Code.SHIFT) {
- mods |= Key.MOD_SHIFT as u32;
+ mods |= Key.MOD_SHIFT as u32
}
if is_key_down(Key_Code.CONTROL) {
- mods |= Key.MOD_CONTROL as u32;
+ mods |= Key.MOD_CONTROL as u32
}
if is_key_down(Key_Code.MENU) {
- mods |= Key.MOD_ALT as u32;
+ mods |= Key.MOD_ALT as u32
}
if is_key_down(Key_Code.LWIN) || is_key_down(Key_Code.RWIN) {
- mods |= Key.MOD_SUPER as u32;
+ mods |= Key.MOD_SUPER as u32
}
- return mods;
+ return mods
}
match msg {
case WM_KEYDOWN:
- _core.key_modifiers = win32_app_key_mods();
+ _core.key_modifiers = win32_app_key_mods()
if wparam < MAX_KEYS {
- _core.key_states[wparam] = 1;
- _core.key_deltas[wparam] = 1;
+ _core.key_states[wparam] = 1
+ _core.key_deltas[wparam] = 1
}
- return 0;
+ return 0
case WM_KEYUP:
- _core.key_modifiers = win32_app_key_mods();
+ _core.key_modifiers = win32_app_key_mods()
if wparam < MAX_KEYS {
- _core.key_states[wparam] = 0;
- _core.key_deltas[wparam] = 1;
+ _core.key_states[wparam] = 0
+ _core.key_deltas[wparam] = 1
}
- return 0;
+ return 0
case WM_CLOSE:
- PostQuitMessage(0);
- _core.running = false;
- return 0;
+ PostQuitMessage(0)
+ _core.running = false
+ return 0
}
- return DefWindowProcA(hwnd, msg, wparam, lparam);
+ return DefWindowProcA(hwnd, msg, wparam, lparam)
}
@@ -354,26 +354,26 @@ run :: proc(user_init, user_step: proc(c: ^Core)) {
wnd_proc = win32_proc,
// wnd_proc = DefWindowProcA,
background = GetStockObject(BLACK_BRUSH) as HBRUSH,
- };
+ }
if RegisterClassExA(^window_class) == 0 {
- fmt.fprintln(os.stderr, "RegisterClassExA failed");
- return;
+ fmt.fprintln(os.stderr, "RegisterClassExA failed")
+ return
}
- screen_width := GetSystemMetrics(SM_CXSCREEN);
- screen_height := GetSystemMetrics(SM_CYSCREEN);
+ screen_width := GetSystemMetrics(SM_CXSCREEN)
+ screen_height := GetSystemMetrics(SM_CYSCREEN)
- rc: RECT;
- rc.left = (screen_width - WINDOW_WIDTH) / 2;
- rc.top = (screen_height - WINDOW_HEIGHT) / 2;
- rc.right = rc.left + WINDOW_WIDTH;
- rc.bottom = rc.top + WINDOW_HEIGHT;
+ rc: RECT
+ rc.left = (screen_width - WINDOW_WIDTH) / 2
+ rc.top = (screen_height - WINDOW_HEIGHT) / 2
+ rc.right = rc.left + WINDOW_WIDTH
+ rc.bottom = rc.top + WINDOW_HEIGHT
- style: u32 = WS_CAPTION | WS_SYSMENU | WS_MINIMIZEBOX;
- assert(AdjustWindowRect(^rc, style, 0) != 0);
+ style: u32 = WS_CAPTION | WS_SYSMENU | WS_MINIMIZEBOX
+ assert(AdjustWindowRect(^rc, style, 0) != 0)
- wt := WINDOW_TITLE;
+ wt := WINDOW_TITLE
win32_window := CreateWindowExA(0,
window_class.class_name,
@@ -382,101 +382,101 @@ run :: proc(user_init, user_step: proc(c: ^Core)) {
rc.left, rc.top,
rc.right-rc.left, rc.bottom-rc.top,
nil, nil, window_class.instance,
- nil);
+ nil)
if win32_window == nil {
- fmt.fprintln(os.stderr, "CreateWindowExA failed");
- return;
+ fmt.fprintln(os.stderr, "CreateWindowExA failed")
+ return
}
- window_bmi: BITMAPINFO;
- window_bmi.size = size_of(BITMAPINFO.HEADER) as u32;
- window_bmi.width = CANVAS_WIDTH;
- window_bmi.height = CANVAS_HEIGHT;
- window_bmi.planes = 1;
- window_bmi.bit_count = 32;
- window_bmi.compression = BI_RGB;
+ window_bmi: BITMAPINFO
+ window_bmi.size = size_of(BITMAPINFO.HEADER) as u32
+ window_bmi.width = CANVAS_WIDTH
+ window_bmi.height = CANVAS_HEIGHT
+ window_bmi.planes = 1
+ window_bmi.bit_count = 32
+ window_bmi.compression = BI_RGB
- user_init(^_core);
+ user_init(^_core)
- ShowWindow(win32_window, SW_SHOW);
+ ShowWindow(win32_window, SW_SHOW)
- window_buffer := new_slice(u32, CANVAS_WIDTH * CANVAS_HEIGHT);
- assert(window_buffer.data != nil);
- defer free(window_buffer.data);
+ window_buffer := new_slice(u32, CANVAS_WIDTH * CANVAS_HEIGHT)
+ assert(window_buffer.data != nil)
+ defer free(window_buffer.data)
for i := 0; i < window_buffer.count; i++ {
- window_buffer[i] = 0xff00ff;
+ window_buffer[i] = 0xff00ff
}
- prev_time, curr_time,dt: f64;
- prev_time = time_now();
- curr_time = time_now();
- total_time : f64 = 0;
- offset_x := 0;
- offset_y := 0;
+ prev_time, curr_time,dt: f64
+ prev_time = time_now()
+ curr_time = time_now()
+ total_time : f64 = 0
+ offset_x := 0
+ offset_y := 0
- message: MSG;
+ message: MSG
for _core.running {
- curr_time = time_now();
- dt = curr_time - prev_time;
- prev_time = curr_time;
- total_time += dt;
+ curr_time = time_now()
+ dt = curr_time - prev_time
+ prev_time = curr_time
+ total_time += dt
- offset_x += 1;
- offset_y += 2;
+ offset_x += 1
+ offset_y += 2
{
- data: [128]byte;
- buf := data[:0];
- fmt.bprintf(^buf, "Punity: % ms\x00", dt*1000);
- win32.SetWindowTextA(win32_window, buf.data);
+ data: [128]byte
+ buf := data[:0]
+ fmt.bprintf(^buf, "Punity: % ms\x00", dt*1000)
+ win32.SetWindowTextA(win32_window, buf.data)
}
for y := 0; y < CANVAS_HEIGHT; y++ {
for x := 0; x < CANVAS_WIDTH; x++ {
- g := (x % 32) * 8;
- b := (y % 32) * 8;
- window_buffer[x + y*CANVAS_WIDTH] = (g << 8 | b) as u32;
+ g := (x % 32) * 8
+ b := (y % 32) * 8
+ window_buffer[x + y*CANVAS_WIDTH] = (g << 8 | b) as u32
}
}
- _core.key_deltas = nil;
+ _core.key_deltas = nil
for PeekMessageA(^message, nil, 0, 0, PM_REMOVE) != 0 {
if message.message == WM_QUIT {
- _core.running = false;
+ _core.running = false
}
- TranslateMessage(^message);
- DispatchMessageA(^message);
+ TranslateMessage(^message)
+ DispatchMessageA(^message)
}
- user_step(^_core);
+ user_step(^_core)
- dc := GetDC(win32_window);
+ dc := GetDC(win32_window)
StretchDIBits(dc,
0, 0, CANVAS_WIDTH * CANVAS_SCALE, CANVAS_HEIGHT * CANVAS_SCALE,
0, 0, CANVAS_WIDTH, CANVAS_HEIGHT,
window_buffer.data,
^window_bmi,
DIB_RGB_COLORS,
- SRCCOPY);
- ReleaseDC(win32_window, dc);
+ SRCCOPY)
+ ReleaseDC(win32_window, dc)
{
- delta := time_now() - prev_time;
- ms := ((FRAME_TIME - delta) * 1000) as i32;
+ delta := time_now() - prev_time
+ ms := ((FRAME_TIME - delta) * 1000) as i32
if ms > 0 {
- win32.Sleep(ms);
+ win32.Sleep(ms)
}
}
- _core.frame++;
+ _core.frame++
}
}