first commit

shit_to_do.nimble

@@ -0,0 +1,15 @@
+# Package
+
+version       = "0.1.0"
+author        = "cynic"
+description   = "tells me shit-to-do"
+license       = "MIT"
+srcDir        = "src"
+bin           = @["shit_to_do"]
+
+
+# Dependencies
+
+requires "nim >= 1.6.4"
+
+requires "sdl2"

src/shit_to_do.nim

@@ -0,0 +1,145 @@
+import std/strformat
+import std/sugar
+
+import sdl2
+import sdl2/ttf
+
+##################################################
+
+proc setDrawColorUnpacked(r: RendererPtr, c: Color): void =   
+  discard r.setDrawColor(c.r, c.g, c.b, c.a)
+
+proc `+`*(a, b: Color): Color =  
+  (uint8(a.r+b.r), uint8(a.g+b.g), uint8(a.b+b.b), uint8(a.a+b.a))
+
+proc `+`*(a: Color, b: uint8): Color =  
+  (uint8(a.r+b), uint8(a.g+b), uint8(a.b+b), uint8(a.a+b))
+
+proc shrink*(r: Rect, amt: int): Rect =  
+  ((r.x+amt).cint, (r.y+amt.cint), (r.w-amt).cint, (r.h-amt).cint)
+
+##################################################
+
+const TEXT_RESOLUTION: int = 100
+const TEXT_REFIT_TO: int = 20
+const TEXT_REFIT: float = TEXT_REFIT_TO/TEXT_RESOLUTION
+const TEXT_VERT_DILATION: float = 0.8
+
+const LEFTWARD_ORIGIN: cint = 10
+const VERTICAL_PADDING: cint = TEXT_REFIT_TO+5
+const BACKGROUND_COLOR: Color = (13.uint8, 11.uint8, 15.uint8, 255.uint8).Color
+const HIGHLIGHT_COLOR: Color = BACKGROUND_COLOR+100
+const FOREGROUND_COLOR: Color = BACKGROUND_COLOR+40
+const FORESTGROUND_COLOR: Color = (255.uint8, 255.uint8, 255.uint8, 255.uint8).Color
+
+var FONT_DEFAULT: FontPtr = openFont("./liberation-sans.ttf".cstring, TEXT_RESOLUTION.cint)
+
+##################################################
+
+type
+  camelia* = object
+    xbounds: Rect
+    mouse: tuple[x, y: cint, buttons: uint8]
+
+    verticalTracker: int
+    currentTab: int
+
+proc newCamelia*(): camelia = 
+  result.xbounds = (x: 0.cint, y: 0.cint, w: 100.cint, h: 100.cint).Rect
+  result.mouse = (x: 0.cint, y: 0.cint, buttons: 0.uint8)
+
+  result.verticalTracker = 0
+  result.currentTab = -1
+
+proc isMouseInRect(c: var camelia, testee: Rect): bool =  
+  (c.mouse.x > testee.x and
+  c.mouse.y > testee.y and
+  c.mouse.x < testee.x + testee.w and
+  c.mouse.y < testee.y + testee.h)
+
+proc textSize(f: FontPtr, label: string): tuple[w, h: int] =  
+  var cw, ch: cint
+  discard f.sizeText(label.cstring, addr cw, addr ch)
+  (cw.int, ch.int)
+
+proc easyText(r: RendererPtr, re: var Rect, label: string): void =   
+  let surf: SurfacePtr = ttf.renderTextSolid(FONT_DEFAULT, label.cstring, FORESTGROUND_COLOR)
+  let tex: TexturePtr = r.createTextureFromSurface(surf)
+  r.copy(tex, nil, addr re)
+  surf.freeSurface()
+  tex.destroy()
+
+proc drawButton(c: var camelia, r: RendererPtr, label: string, action: () -> void): void =  
+  r.setDrawColorUnpacked(FOREGROUND_COLOR)
+  c.verticalTracker += VERTICAL_PADDING
+  let textWidth = FONT_DEFAULT.textSize(label).w
+  var re: Rect = (x: LEFTWARD_ORIGIN, y: c.verticalTracker.cint, w: (TEXT_VERT_DILATION*TEXT_REFIT*textWidth.float).cint, h: (TEXT_REFIT*TEXT_RESOLUTION.float).cint).Rect
+  if isMouseInRect(c, re):
+    r.setDrawColorUnpacked(HIGHLIGHT_COLOR)
+    if c.mouse.buttons == 1:
+      action()
+  r.fillRect(re)
+  r.easyText(re, label)
+
+proc drawToggle(c: var camelia, r: RendererPtr, label: string, value: var bool): void =  
+  r.setDrawColorUnpacked(FOREGROUND_COLOR)
+  c.verticalTracker += VERTICAL_PADDING
+  var textWidth = FONT_DEFAULT.textSize("#").w
+  var re: Rect = (x: LEFTWARD_ORIGIN, y: c.verticalTracker.cint, w: (TEXT_VERT_DILATION*TEXT_REFIT*textWidth.float).cint, h: (TEXT_REFIT*TEXT_RESOLUTION.float).cint).Rect
+  if isMouseInRect(c, re):
+    r.setDrawColorUnpacked(HIGHLIGHT_COLOR)
+    if c.mouse.buttons == 1:
+      value = not value
+  r.fillRect(re)
+  r.easyText(re, (if value: "X" else: " "))
+  textWidth = FONT_DEFAULT.textSize(label).w
+  var textRe: Rect = (x: LEFTWARD_ORIGIN+(TEXT_REFIT*TEXT_RESOLUTION.float).cint, y: c.verticalTracker.cint, w: (TEXT_VERT_DILATION*TEXT_REFIT*textWidth.float).cint, h: (TEXT_REFIT*TEXT_RESOLUTION.float).cint).Rect
+  r.easyText(textRe, label)
+
+proc drawMutex(c: var camelia, r: RendererPtr, label: string, entries: seq[string]): void =  
+  discard
+
+proc render*(c: var camelia, r: RendererPtr): void = 
+  c.verticalTracker = 0
+  var mx, my: cint
+  let buttons = getMouseState(mx, my)
+  var oldButtons {.global.}: uint8
+  c.mouse = (x: mx, y: my, buttons: buttons)
+  if buttons == oldButtons:
+    c.mouse.buttons = 0
+  oldButtons = buttons
+
+  r.setDrawColorUnpacked(FOREGROUND_COLOR)
+  var a {.global.}: bool = false
+  c.drawToggle(r, fmt"toggle test ({$a})", a)
+  c.drawButton(r, "button test (reset toggle to false)", () => (a = false))
+
+##################################################
+
+discard sdl2.init(INIT_EVERYTHING)
+discard ttfInit()
+
+var window: WindowPtr = createWindow("hello", 100, 10, 640, 480, SDL_WINDOW_SHOWN or SDL_WINDOW_RESIZABLE)
+var renderer: RendererPtr = createRenderer(window, -1, Renderer_Accelerated or Renderer_TargetTexture)
+
+var running: bool = true
+var e: Event = sdl2.defaultEvent
+
+var c: camelia = newCamelia()
+
+FONT_DEFAULT = openFont("./NotoSans-Regular.ttf".cstring, TEXT_RESOLUTION.cint)
+
+while running:
+  while pollEvent(e):
+    if e.kind == QuitEvent:
+      running = false
+
+  renderer.setDrawColorUnpacked(BACKGROUND_COLOR)
+  renderer.clear()
+
+  c.render(renderer)
+
+  renderer.present()
+
+destroy window
+destroy renderer