Added/updated components to be isolated rectangles.

This commit is contained in:
2026-06-17 07:48:07 +02:00
parent cccc4fb06c
commit 6605d86916
6 changed files with 489 additions and 49 deletions
+126
View File
@@ -0,0 +1,126 @@
package simulator
import "core:fmt"
import "core:strings"
import rl "vendor:raylib"
MEM_INDICATOR_W :: 14
MEM_ADDRESS_W :: 72
MEM_ROW_H :: 20
MEM_HEADER_H :: 24
MEM_BYTES_PER_ROW :: 16
MEM_TOTAL_ROWS :: 256
MEM_FONT_ROWS :: 5
MEM_ROM_START :: 512
MEM_VIRTUAL_ROWS :: MEM_FONT_ROWS + 1 + (256 - 32)
MEM_COL_LABELS := [16]string{"0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F"}
byte_col_w :: proc(rect: rl.Rectangle) -> f32 {
used := f32(MEM_INDICATOR_W + MEM_ADDRESS_W + 12)
return (rect.width - used) / 16
}
gui_tab_memory :: proc(rect: rl.Rectangle, sim: ^Simulator) {
rl.DrawRectangleRec(rect, rl.DARKGRAY)
// Header background
rl.DrawRectangle(i32(rect.x), i32(rect.y), i32(rect.width), MEM_HEADER_H, rl.BLACK)
// Header: Address label
rl.DrawTextEx(sim.font, "Address", {rect.x + MEM_INDICATOR_W, rect.y + 4}, 16, 1, rl.GRAY)
// Header: column labels 0-F
col_w := byte_col_w(rect)
for col in 0..<16 {
x := rect.x + MEM_INDICATOR_W + MEM_ADDRESS_W + f32(col) * col_w
label := strings.clone_to_cstring(MEM_COL_LABELS[col], context.temp_allocator)
rl.DrawTextEx(sim.font, label, {x, rect.y + 4}, 16, 1, rl.GRAY)
}
// Header separator
rl.DrawLine(
i32(rect.x), i32(rect.y + MEM_HEADER_H),
i32(rect.x + rect.width), i32(rect.y + MEM_HEADER_H),
rl.GRAY,
)
// Scroll panel area (below header)
panel_rect := rl.Rectangle{
rect.x,
rect.y + MEM_HEADER_H,
rect.width,
rect.height - MEM_HEADER_H,
}
content_rect := rl.Rectangle{
0, 0,
rect.width - 12,
f32(MEM_VIRTUAL_ROWS) * MEM_ROW_H,
}
view : rl.Rectangle
rl.GuiScrollPanel(panel_rect, nil, content_rect, &sim.mem_scroll, &view)
rl.BeginScissorMode(i32(view.x), i32(view.y), i32(view.width), i32(view.height))
draw_row := 0
// --- Font rows (0x000 - 0x04F) ---
for row in 0..<MEM_FONT_ROWS {
addr := row * MEM_BYTES_PER_ROW
row_y := panel_rect.y + f32(draw_row) * MEM_ROW_H + sim.mem_scroll.y
draw_memory_row(rect, sim, draw_row, addr, row_y)
draw_row += 1
}
// --- Divider ---
divider_y := panel_rect.y + f32(draw_row) * MEM_ROW_H + sim.mem_scroll.y
rl.DrawRectangle(i32(rect.x), i32(divider_y), i32(rect.width), MEM_ROW_H, rl.ColorAlpha(rl.BLACK, 0.4))
rl.DrawTextEx(
sim.font,
"---- reserved (0x0050 - 0x01FF) ----",
{rect.x + MEM_INDICATOR_W, divider_y + 2},
16, 1, rl.DARKGRAY,
)
draw_row += 1
// --- ROM rows (0x200 onwards) ---
for i := 0; MEM_ROM_START + i * MEM_BYTES_PER_ROW < 4096; i += 1 {
addr := MEM_ROM_START + i * MEM_BYTES_PER_ROW
row_y := panel_rect.y + f32(draw_row) * MEM_ROW_H + sim.mem_scroll.y
draw_memory_row(rect, sim, draw_row, addr, row_y)
draw_row += 1
}
rl.EndScissorMode()
}
draw_memory_row :: proc(rect: rl.Rectangle, sim: ^Simulator, visual_row: int, addr: int, row_y: f32) {
col_w := byte_col_w(rect)
if visual_row % 2 == 0 {
rl.DrawRectangle(i32(rect.x), i32(row_y), i32(rect.width), MEM_ROW_H, rl.ColorAlpha(rl.BLACK, 0.2))
}
addr_str := fmt.tprintf("%04X", addr)
rl.DrawTextEx(
sim.font,
strings.clone_to_cstring(addr_str, context.temp_allocator),
{rect.x + MEM_INDICATOR_W, row_y + 2},
16, 1, rl.RAYWHITE,
)
for col in 0..<16 {
byte_val := sim.machine.memory[addr + col]
byte_str := fmt.tprintf("%02X", byte_val)
x := rect.x + MEM_INDICATOR_W + MEM_ADDRESS_W + f32(col) * col_w
color := rl.RAYWHITE if byte_val != 0 else rl.GRAY
rl.DrawTextEx(
sim.font,
strings.clone_to_cstring(byte_str, context.temp_allocator),
{x, row_y + 2},
16, 1, color,
)
}
}