memory heap
367 subscribers
2.5K photos
509 videos
52 files
3.09K links
science ∩ art = wonder

all memory blocks here are allocated by @a_v_p

GitHub: https://github.com/artyom-poptsov
Mastodon: https://fosstodon.org/@avp

https://memory-heap.org/~avp/
Download Telegram
ИИ точно заменит человека
Работа во FreeCAD — форма медитации.

#freecad
memory heap
Работа во FreeCAD — форма медитации. #freecad
"This color drawing depicts a levitating gnu, deep in meditation, wrapped snugly in a gold robe. Both he and his computer float gracefully above the floor—only his tail lightly touches the ground. He gently holds a recorder between his front hooves, as if he has just gotten the inspiration to charm his computer with music. There is a gleam in his eyes as he gazes ahead at his computer screen."

https://www.gnu.org/graphics/meditate.en.html
Forwarded from Каблог
A hydroelectric dam is also known as a heavy water reactor. [xkcd]
Выпустил релиз Guile-PNG 0.3.0:
https://github.com/artyom-poptsov/guile-png/releases/tag/v0.3.0

В новом релизе:
- Улучшен парсер PNG.
- Улучшен кодировщик PNG.
- Библиотека теперь даёт возможность создавать PNG-изображения "с нуля", а не только загружать готовые.
- Добавлена возможность рисовать многоугольники и прямоугольники с заливкой.
- Обновлена и дополнена документация.
- Добавлены новые тесты.

#guile #png #parser #projects #dev
2👍2
Говорят, этот персонаж появляется рядом с 3D-принтерами, заставляет их делать музыкальные звуки и исчезает также неожиданно, как и появился.
💩31
Эксперименты с рекурсивной отрисовкой в Guile-PNG.

(use-modules (oop goops)
(png)
(png image)
(png graphics))

(define (draw-square! image x y size color)
(let ((square (make <rectangle>
#:position (make <point>
#:x x
#:y y)
#:width size
#:height size
#:color color)))
(draw! image square)))

(define (draw-squares! image x y size color)
(draw-square! image x y size color)
(when (> size 10)
(draw-squares! image
(+ x size)
(+ y (floor/ size 2))
(floor/ size 2)
color)))

(define (main args)
(let ((image (make <png-image>
#:width 1000
#:height 600))
(color #vu8(255 255 255 0)))
(draw-squares! image 0 50 500 color)
(scm->png image)))


#guile #png #scheme #lisp #graphics
💩3
Forwarded from Вееzzаrе
💩3
Прочитал.
💩31
memory heap
Эксперименты с рекурсивной отрисовкой в Guile-PNG. (use-modules (oop goops) (png) (png image) (png graphics)) (define (draw-square! image x y size color) (let ((square (make <rectangle> #:position…
Решил проблему с отрисовкой вертикальных и горизонтальных линий в Guile-PNG, сделав для них частные случаи, вместо использования алгоритма Брезенхэма.

#guile #png #scheme #lisp #graphics
4💩3