diff options
Diffstat (limited to 'browse-slack')
-rw-r--r-- | browse-slack/environment.mu | 25 |
1 files changed, 19 insertions, 6 deletions
diff --git a/browse-slack/environment.mu b/browse-slack/environment.mu index 15252d73..bdf62282 100644 --- a/browse-slack/environment.mu +++ b/browse-slack/environment.mu @@ -5,6 +5,7 @@ type environment { } # static buffer sizes in this file: +# main-panel-hor # in characters # item-padding-hor # in pixels # item-padding-ver # in characters # avatar-side # in pixels @@ -67,28 +68,40 @@ fn render-item screen: (addr screen), _item: (addr item), _users: (addr array us break-if-= var y/edx: int <- copy y y <- shift-left 4/log2font-height - render-image screen, author-avatar, 0x18/item-padding-hor, y, 0x50/avatar-side, 0x50/avatar-side + var x/eax: int <- copy 0x20/main-panel-hor + x <- shift-left 3/log2font-width + x <- add 0x18/item-padding-hor + render-image screen, author-avatar, x, y, 0x50/avatar-side, 0x50/avatar-side } # channel var channel-name-ah/eax: (addr handle array byte) <- get item, channel var channel-name/eax: (addr array byte) <- lookup *channel-name-ah - set-cursor-position screen, 0x40/channel-offset-x y + { + var x/eax: int <- copy 0x20/main-panel-hor + x <- add 0x40/channel-offset-x + set-cursor-position screen, x y + } draw-text-wrapping-right-then-down-from-cursor-over-full-screen screen, "#", 7/grey 0/black draw-text-wrapping-right-then-down-from-cursor-over-full-screen screen, channel-name, 7/grey 0/black # author name var author-real-name-ah/eax: (addr handle array byte) <- get author, real-name var author-real-name/eax: (addr array byte) <- lookup *author-real-name-ah - set-cursor-position screen, 0x10/avatar-space-hor, y - draw-text-wrapping-right-then-down-from-cursor-over-full-screen screen, author-real-name, 0xf/white 0/black + { + var x/ecx: int <- copy 0x20/main-panel-hor + x <- add 0x10/avatar-space-hor + set-cursor-position screen, x y + draw-text-wrapping-right-then-down-from-cursor-over-full-screen screen, author-real-name, 0xf/white 0/black + } increment y # text var text-ah/eax: (addr handle array byte) <- get item, text var _text/eax: (addr array byte) <- lookup *text-ah var text/edx: (addr array byte) <- copy _text - var x/eax: int <- copy 0x10/avatar-space-hor + var x/eax: int <- copy 0x20/main-panel-hor + x <- add 0x10/avatar-space-hor var text-y/ecx: int <- copy y text-y <- add 1/author-name-padding-ver - x, text-y <- draw-text-wrapping-right-then-down screen, text, x text-y, 0x50/xmax=post-right-coord screen-height, x text-y, 7/fg 0/bg + x, text-y <- draw-text-wrapping-right-then-down screen, text, x text-y, 0x70/xmax=post-right-coord screen-height, x text-y, 7/fg 0/bg # flush add-to y, 6 compare y, text-y |