После длительного обдумывания, планирования и проектирования, мы пришли к кардинально новой методике 3D-печати.

#REPLICADR #projects

Зачем что-то печатать, если можно объект телепортировать из той параллельной вселенной, где он уже есть?

Приняли патч с Guile-ICS 0.4.0 в GNU Guix:
https://git.savannah.gnu.org/cgit/guix.git/commit/?id=63b7dbc7327ba7c86781f0ceeaccf1b832219f09

Новую версию можно установить так:

$ guix install guile-ics

\o/

#projects #guile #guix #ics

Сегодня в 20:00 по МСК буду проводить мастер-класс по моделированию во FreeCAD, в формате конференции в Jitsi и трансляцией на YouTube. Ссылку пришлю на конференцию ближе к началу.

Yes, "Roundabout" (from JoJo Bizarre Adventure)

Авторы проекта:
Михаил Л. и Даниил К.

#arduino #jojo #music

Sailor Moon, "OP 1" (1992)

Автор:
Генералов Владислав

#arduino #music

Кстати, тут от ННГУ и ИЦАЭ опять лекции всякие, довольно интересные:
https://icae-nn.timepad.ru/event/2229346/

#events

John M. Vlissides, Mark A. Linton, "Applying Object-Oriented Design to Structured Graphics"

https://www.softwarepreservation.org/projects/c_plus_plus/library/interviews/graphic.pdf

#articles #graphics #oop #programming

Экспериментирую с API для рисования в Guile-PNG.

Исходный код для генерации рисунка:

(define (main args)
  (let* ((image  (png->scm))
         (color  (u8-list->bytevector '(255 255 255 0))))

    (let loop ((w 10))
      (unless (= w 490)
        (let ((rect   (make <rectangle>
                        #:position (make <point>
                                     #:x 10
                                     #:y 10)
                        #:width  w
                        #:height w
                        #:color color)))
          (draw! image rect))
        (loop (+ w 10))))

    (scm->png image)))

В качестве входного изображения программе подаю на stdin изображение с чёрным фоном размером 500x500px, поверх которого выполняется отрисовка. Результат программа выводит в stdout, который уже перенаправляю в файл.

#guile #png #graphics #projects #scheme

Реализовал алгоритм отрисовки эллипсов.

(define (main args)
  (let* ((image  (png->scm))
         (color  (u8-list->bytevector '(255 255 255 0)))
         (ellipse (make <ellipse>
                    #:width 300
                    #:height 200
                    #:center (make <point>
                               #:x 250
                               #:y 250)
                    #:color color)))

    (draw! image ellipse)

    (scm->png image)))

#guile #png #graphics #projects #scheme

Круг — частный случай эллипса.

(use-modules (rnrs bytevectors)
             (oop goops)
             (png)
             (png graphics))

(define (main args)
  (let* ((image  (png->scm))
         (color  (u8-list->bytevector '(255 255 255 0)))
         (circle (make <circle>
                   #:radius 200
                   #:center (make <point>
                              #:x 250
                              #:y 250)
                   #:color color)))

    (draw! image circle)

    (scm->png image)))

#guile #png #graphics #projects #scheme

David Thompson выпустил релиз Guile-WebSocket 0.1.0:
https://lists.gnu.org/archive/html/guile-user/2022-11/msg00045.html

Реализация клиенской и серверной стороны протокола WebSocket (RFC 6455).

Сайт проекта:
https://dthompson.us/projects/guile-websocket.html

#guile #scheme #websocket #networking

Выпустил релиз Guile-PNG 0.2.0 с добавлением API по отрисовке графических примитивов (точек, линий, ломаных линий, прямоугольников, эллипсов, кругов) поверх PNG-изображений:
https://lists.gnu.org/archive/html/guile-user/2022-11/msg00050.html

#guile #png #projects #scheme

#music

Solar Fake, "More Than This":
https://www.youtube.com/watch?v=-GUAbxGio6w

#music

Solar Fake, "Creep" (Radiohead cover):
https://www.youtube.com/watch?v=hwr9OzDbH2c