mgr's weblog

Alex Wenger, Max-Gerd Retzlaff:
The Invisible Tree

December 13, 2012, Electronics

Zum dritten Mal in Folge nehmen Alex Wenger und ich an der Weihnachtsbaumausstellung der Staatlichen Hochschule für Gestaltung Karlsruhe teil:

The Invisible Tree

— shy but photogenic —

Please take a picture!

Alex Wenger & Max-Gerd Retzlaff

The Invisible Tree; click for a larger version (204 kB).

WEB: tannenbaum.matroid.org
FEEDBACK: tannenbaum@matroid.org

Ein unscheinbarer kleiner Kasten. Miit dem bloßen Auge ist nichts zu sehen. Erst im Blick durch eine Kamera (oder auch ein Handy) erscheint auf dem schwarzem Karton ein lila glimmender Baum.



Gemeinsame, frühere Projekte: »uoısuǝɯıp ɹǝɥʇo«, Tannenbaum braucht Zuwendung, LED Cube Modeller, Paraflows edition, and Hacking OpenGL (in Lisp), LED Cube Modeller, 22C3 Edition, LED-Cube (Entropia-Wiki), 3d Baby Cube (Weblog von Alex).

»uoısuǝɯıp ɹǝɥʇo««

June 29, 2011, Electronics

»uoısuǝɯıp ɹǝɥʇo«

»uoısuǝɯıp ɹǝɥʇo«; click for a larger version (202 kB).

Max-Gerd Retzlaff, Alex Wenger, 2011

Wahrnehmung zwischen Mensch und Maschine ist ein ambivalenter Prozeß. Die Bewußtwerdung des Seins und deren Gegenüberstellung mit der Maschinenwahrnehmung eröffnen neue Möglichkeiten der Begegnung.

In »uoısuǝɯıp ɹǝɥʇo« wird der selbstreflektierende Moment spielerisch dargestellt und erfahrbar gemacht. Einzeln oder gemeinsam mit anderen wird der Betrachter analysiert, visualisiert, vernetzt und kann sich selbst reflektieren. Eine wahrnehmungveränderte Dimension wird erschlossen.

WEB: www.other-dimension.net

FEEDBACK: team@other-dimension.net

PDF des Textes / reiner Text

Teil der Ausstellung »Gewebtes Licht« im ZKM vom 1. bis 16. Juli 2011. Ausstellungseröffnung am 1. Juli 2011 im ZKM_Foyer, 16 Uhr, Eintritt frei. Einladung zur Ausstellungseröffnung
Ausschreibung des Wettbewerbs
Flyer zur Ausstellung


Weitere Bilder, Videos und Informationen gibt es unter:
    www.other-dimension.net


Kudos to OpenLase and ECL! Great projects, though both could benefit from a little more documentation. Thanks Héctor for your mails!



Gemeinsame, frühere Projekte: Tannenbaum braucht Zuwendung, LED Cube Modeller, Paraflows edition, and Hacking OpenGL (in Lisp), LED Cube Modeller, 22C3 Edition, LED-Cube (Entropia-Wiki), 3d Baby Cube (Weblog von Alex).

Max-Gerd Retzlaff, Alex Wenger:
Tannenbaum braucht Zuwendung

December 14, 2010, Electronics

Alex Wenger und ich haben unsere erfolgreiche Zusammenarbeit im Rahmen von früheren Projekten wie zum Beispiel dem LED Cube fortgesetzt und nehmen an der 7. Weihnachtsbaumausstellung der Staatlichen Hochschule für Gestaltung Karlsruhe teil:

Tannenbaum braucht Zuwendung

Ein Weihnachtsbaum steht kurz vor seinem Ende. All seine Nadeln hat er bereits verloren. Doch seine Zuversicht strahlt noch aus: er leuchtet noch mit ganzer, letzter Kraft. Der Baum hängt am ETG (Elektrotannenbaumgramm); anhand dessen alter Bildröhre kann sein Zustand genau beobachtet werden und man hört seinen Herzschlag.

Er braucht Zuwendung! Sonst stirbt er. Wird er hin- und wieder vorsichtig gerüttelt — sacht und leicht —, so bleibt er am Leben, läßt seine Lichter leuchten und hat einen regelmäßigen Puls. Doch wird er zu lange vernachlässigt, dann stirbt er. Sein Puls beschleunigt, wird ungleichmäßig und setzt schließlich — so niemand eingreift — aus. Doch Vorsicht: liebloses Durchschütteln ist keine Zuwendung. Rohe Gewalt ist das letzte, was er verkraften kann.

Trotz allem ist ein Weihnachtsbaum allerdings ein robustes Wesen. Auch Gestorben besteht noch Hoffnung: Mit ein wenig Aufmerksamkeit ist er jederzeit durch behutsames Wachrütteln wiederzuerwecken.

WEB: tannenbaum.matroid.org

FEEDBACK: tannenbaum@matroid.org

PDF des Textes / reiner Text



Gemeinsame, frühere Projekte: LED Cube Modeller, Paraflows edition, and Hacking OpenGL (in Lisp), LED Cube Modeller, 22C3 Edition, LED-Cube (Entropia-Wiki), 3d Baby Cube (Weblog von Alex).

GPN8-Plakat fertig! \o/

June 17, 2009, Typography
Last edited on June 17, 2009

GPN8-Plakat; click for a larger version (114 kB).

Yeah!

Ein Web-PDF des Plakates gibt es auch: GPN8-Space-Invader-Plakat-final.pdf. (Nicht für den Ausdruck auf üblichen CMYK-Druckern geeignet.)

Der Druck ist schwarz auf grünem Neonpapier erfolgt, was ziemlich fett aussieht. (Dank für die Hilfe an Flowhase!) Actionshots folgen! :-)

Die Poster haben nun gedruckt und beschnitten eine Größe von etwa 56,8 cm x 83,3 cm, was einem Seitenverhältnis von 1,467 entspricht. Nicht ganz das gewollte Verhältnis 1,492 bei Kinoplakatgröße von 61 x 91 cm, aber näher daran als an dem etwas uneleganten √2-Verhältnis (~1,414) der DIN-Papierformate.

Flyer, Tassen, T-Shirts und Namensschilder gibt es ebenfalls, beziehungsweise sind in der Herstellung. Auch die GPN8-Webseite hat Dank Einsatz von Neingeist und mir ein entsprechendes Design inklusive grüner Retrokarte erhalten.

Ich hoffe, es gefällt.


Design by Max-Gerd Retzlaff <m.retzlaff@gmx.net>, 2009.

Space Invaders (including artwork) designed by Tomohiro Nishikado, released 1978.

Font "Dirty Headline" (Freeware) by S. John Ross / Cumberland Fontworks, http://www222.pair.com/sjohn/fonts.htm.

Thank you to both of you!

Earth

April 11, 2009, Literature

"Funny, funny word play! … I'd like to tell them, 'Look, madam, why the hell should we be interested in your damned world? We don't want to be hanging on the outside of any planet and waiting to fall off or get blown off. We don't want raw air puffing at us and dirty water falling on us. We don't want your damned germs and your smelly grass and your dull blue sky and your dull white clouds. We can see Earth in our own sky when we want to, and we don't often want to. The Moon is our home and it's what we make it; exactly what we make it. We own it and we build our own ecology, and we don't need you here being sorry for us going our own way. Go back to your own world and let your gravity pull your breasts down to your knees.' That's when I'd say."

Isaac Asimov, The Gods themselves, 1972, pp. 233/234.

Nice and well written book. Physics, science fiction, sex education / facts of life, emancipation of women. Really a book of the seventies!

Thanks, Johann, for the recommendation and for lending it to me!




The English Wikipedia mentions an interesting comment by Isaac Asimov concerning the middle section of the book:

Asimov was also criticized for the general absence of sexuality and of extraterrestrial life in his science fiction. Asimov once explained that his reluctance to write about aliens came from an incident early in his career when Astounding's editor John Campbell rejected one of his early science fiction stories because the alien characters were portrayed as superior to the humans. He decided that, rather than write weak alien characters, he would not write about aliens at all. Nevertheless, in response to these criticisms he wrote The Gods Themselves, which contains aliens, sex, and alien sex. Asimov said that of all his writings, he was most proud of the middle section of The Gods Themselves, the part which deals with those themes.

Isaac Asimov, I, Asimov: A Memoir, 1994, New York: Doubleday, p. 250.

The English Wikipedia, the page on Isaac Asimov, section Criticisms, online, accessed April 11th, 2009.


The little excerpt you've already read would generally be enough for me but on the first page of the book there is such a nice and well selected section of a conversation that's actually taken from the second half of the first part of the book. In short words it depicts the main topic of the book. Here you go:

'Then why worry?'

'Because, sir, upon the strength of the strong nuclear interaction rests the rate at which hydrogen fuses to helium in the core of the Sun. If the interaction strengthens even unnoticeably, the rate of hydrogen fusion in the sun will increase markedly. The Sun maintains the balance between radiation and gravitation with great delicacy and to upset that balance in favour of radiation, as we are now doing—'

'Yes?'

'—will cause an enormous explosion. Under our laws of nature, it is impossible for a star as small as the Sun to become a supernova. Under the altered laws, it may not be. I doubt that we would have warning. The Sun would build up to a vast explosion and in eight minutes after that you and I will be dead and the Earth will quickly vaporize into an expanding puff of vapor.'

pp. 1 & 56.

:-(

April 11, 2009, Miscellaneous

gestauchter Rahmen; click for a larger version  (277 kB).

Allerdings ist es wohl besser, daß der Rahmen den Großteil der kinetische Energie aufgenommen hat, und nicht ich… Erstaunlich nur, daß das Vorderrad noch völlig intakt ist und nicht etwa eine Acht.

photofont.lisp

December 6, 2008, Lisp
Last edited on December 8, 2008

Yesterday I've stumbled upon Photofonts, a font format where every letter is a fully colored bitmap image. It also supports kerning and Unicode encoding. The file format specification is publicly documented: it's an xml file, the characters are Base64-encoded PNG images in a MIME-container. How nice! And certainly the most efficient way to store binary data.

Sadly there is no Gimp plug-in yet, but you can download a plug-in for Adobe Photoshop, Adobe Illustrator, and Corel Painter for free, and the company has announced plug-ins for Adobe InDesign as well as QuarkXPress. Well, the graphic designers will be happy with those… They have also developed Flash-based embedded web font stuff, but for the program to convert photofonts into that format, called Photofont WebReady, they want to see some money.

Enough of that! A quick look into the CLiki — the Common Lisp Wiki informed me about XMLS, CL-MIME, s-base64, and CL-PNG. Everything I need. Thanks go to the authors and maintainers Drew Crampsie, Robert Marlow, Sven Van Caekenberghe, Harald Musum, and Vebjorn Ljosa! The interfaces are all quite usable and after looking into some free photofonts from the aforementioned homepage (mostly from my Lisp image using XMLS:PARSE) and some hacking I now have a photofont:

example of my Tea Light Candle Photofont; please click for the huge
version (277 kB).

Please click on the image to have a look at the HUGE version! I hope you like it! Every single character of this font is a photograph of some arranged tea light candles. But this article is about the photofont format and my program to generate photofonts, and not about my particular Tea Light Canle Font. Perhaps there will be a separate article some time in the future…

Well, here comes the quick and dirty implementation in Common Lisp:

;;; photofont.lisp - A program to generate photofonts
;;; Dec 5, 2008 by Max-Gerd Retzlaff <m.retzlaff@gmx.net>
;;; Version 1
;;;
;;; See http://www.photofont.com/ for more information.
;;; The "Photofont format specification" is here:
;;;                     http://www.photofont.com/photofont/devel/
;;;
;;; Example call:
;;;   (photofont "Teelichter256" "font-spec-256" "Teelichter256.phf" :indent nil)
;;;
;;; The font-spec file is expected to contain lines like this one:
;;; ! Teelichter-256/!_dscf5475.jpg.png
;;; (single character, a single space, filename with relative path, newline character)   
 
(require :xmls)
(require :cl-mime)
(require :s-base64)
(require :png) ;; cl-png
 
(defun png->mime (pathname)
  (with-output-to-string (mime-out)
    (let ((png (with-open-file (in pathname
                                   :element-type '(unsigned-byte 8))
                 (with-output-to-string (out)
                   (s-base64:encode-base64 in out)))))
      (mime:print-mime mime-out
                       (make-instance 'mime:text-mime
                                      :type "image"
                                      :subtype "png"
                                      :charset "US-ASCII"
                                      :content-encoding :base64
                                      :encoding :base64
                                      :content png)
                       t nil))))
;; (png->mime "Teelichter/256/A_dscf5380.jpg.png")
 
(defun png-dimensions (pathname) 
  (let ((png (with-open-file (in pathname
                                 :element-type '(unsigned-byte 8))
               (png:decode in))))
    (values (png:image-width png)
            (png:image-height png))))
 
(defun root (children)
  (xmls:make-node :name "PhF" :attrs '(("version" "1.0"))
                  :children children))
 
#+(or)
(defun header ()
  (xmls:make-node :name "header"
                  (make-node :name "version" :attrs (xmls:make-node :name "type" :attrs "string"))
                  (make-node :name)
                  ))
(defun header (fontname &key (encoding "ISO 8859- 1 Latin 1 (Western)")
                             (ascender 256)
                             (descender 51)
                             (internal-leading 77)
                             (upm 256))
  `("header" NIL ("version" (("type" "string")))
    ("family" (("type" "string")) ,fontname)
    ("full_name" (("type" "string")) ,fontname)
    ("codepage" (("type" "string")) ,(princ-to-string encoding))
    ("ascender" (("type" "int")) ,(princ-to-string ascender))
    ("descender" (("type" "int")) ,(princ-to-string descender))
    ("internal_leading" (("type" "int")) ,(princ-to-string internal-leading))
    ("upm" (("type" "int")) ,upm)))
 
(defun letter->id (letter)
  "More or less a bugfix, as the photofont plug-in for Adobe Photoshop CS3 (Windows),
seems to have a problem with XML encodings like \"§\"... Otherwise I would just
use STRING."
  (let ((code (char-code letter)))
    (if (< 127 code)
        (char-name letter)
        ;; (format nil "~a+0x80" (code-char (- code 128)))
        (string letter))))
 
(defun mapping (letter)
  `("map" (("unc" ,(princ-to-string (char-code letter))) ("id" ,(letter->id letter)))))
 
(defun all-mappings (letters)
  (mapcar #'mapping letters))
 
(defun globals (all-mappings)
  `("globals" NIL
              ("unicode_mapping" (("subtype" "map_unicode") ("type" "array"))
                                 ,@all-mappings)))
;; (globals  (all-mappings (coerce "ABCDß!§$" 'list)))
 
(defun glyph (letter pathname)
  (multiple-value-bind (width height)
      (png-dimensions pathname)
    (let ((width-string (princ-to-string width))
          (height-string (princ-to-string height)))
      `("glyph" (("id" ,(letter->id letter)))
                ("image" (("type" "photo")
                          ("id" "v0"))
                         ("shape" (("embedded" ,(file-namestring pathname)))
                                  ("ppm" (("int" ,height-string)))
                                  ("bbox" (("height" ,height-string) ("width" ,width-string)
                                           ("y" "0") ("x" "0")))
                                  ("base" (("y" ,height-string) ("x" "0")))
                                  ("delta" (("y" "0") ("x" ,(princ-to-string (- width 2)))))))))))
 
(defun all-glyphs (list)
  (xmls:make-node :name "glyphs"
                  :children (mapcar (lambda (glyph-spec)
                                      (apply #'glyph glyph-spec))
                                    list)))
#+(or)
(all-glyphs '((#\A #p"Teelichter/256/A_dscf5380.jpg.png")
                       (#\B #p"Teelichter/256/B_dscf5702.jpg.png")))
 
(defun image (pathname)
  (xmls:make-node :name "image" :attrs `(("id" ,(file-namestring pathname)))
                  :children (list (png->mime pathname))))
;; (image "Teelichter/256/A_dscf5380.jpg.png")
 
(defun all-images (pathnames)
  (xmls:make-node :name "data"
                  :children (list (xmls:make-node :name "photo"
                                             :children (mapcar #'image pathnames)))))
#+(or)
(all-images (list "Teelichter/256/A_dscf5380.jpg.png"
                  "Teelichter/256/B_dscf5702.jpg.png"))
 
(defun parse-fontspec (pathname)
  (let ((glyph-specs))

(with-open-file (file pathname) (do ((line (read-line file nil 'eof) (read-line file nil 'eof))) ((eq line 'eof)) (push (list (elt line 0) (subseq line 2)) glyph-specs))) (nreverse glyph-specs)))     (defun generate-photofont (fontname pathname) (let ((glyph-specs (parse-fontspec pathname))) (multiple-value-bind (width height) (png-dimensions (second (first glyph-specs))) (declare (ignore height)) (root (list (header fontname :ascender (princ-to-string width) :upm (princ-to-string width)) (globals (all-mappings (mapcar #'car glyph-specs))) (all-glyphs glyph-specs) (all-images (mapcar #'second glyph-specs)))))))   (defun photofont (fontname source target &key indent) (with-open-file (out target :direction :output :if-exists :overwrite :if-does-not-exist :create) (princ "<?xml version=\"1.0\" ?> " out) (xmls:write-xml (generate-photofont fontname source) out :indent indent))) ;; (photofont "Teelichter256" "font-spec-256" "Teelichter256.phf" :indent nil) ;; (princ (xmls:toxml * :indent t))


Please send me an email if you have a use for this code or have a nice photofont for me. Thanks in advance!

Older entries...

Select a Theme:

Basilique du Sacré-Cœur de Montmartre (Paris) Parc Floral de Paris Castillo de Santa Barbara (Alicante) About the photos

Entries: