Skip to content

Instantly share code, notes, and snippets.

View dto's full-sized avatar

dto dto

146 followers · 13 following
View GitHub Profile
@dto
dto / RLX legacy code
Created September 17, 2010 12:38
;;; rlx.el --- RLX development tools for GNU Emacs
;; Copyright (C) 2006, 2007, 2008 David O'Toole
;; Author: David O'Toole <dto@gnu.org>
;; Keywords: multimedia, games
;; Version: 0.81
;; This file is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
@dto
dto / gist:741804
Created December 15, 2010 09:25 — forked from stassats/gist:741780
;;; Usage (percentage (analyze-systems '(a b c d))) => 42.23
(eval-when (:compile-toplevel :load-toplevel :execute)
(when (asdf:find-system :named-readtables nil)
(asdf:load-system :named-readtables)))
(defun analyze-form (form)
(typecase form
(symbol
(when (eql (symbol-package form) (find-package 'cl))
@dto
dto / rlx.el
Created November 19, 2012 18:48
RLX, early elisp prototype of Blocky
;;; rlx.el --- RLX development tools for GNU Emacs
;; Copyright (C) 2006, 2007, 2008 David O'Toole
;; Author: David O'Toole <dto@gnu.org>
;; Keywords: multimedia, games
;; Version: 0.81
;; This file is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
@dto
dto / xiomacs-theme.el
Created July 18, 2013 04:49
Xiomacs color theme
(deftheme xiomacs "Remix of the default emacs color theme.")
(apply 'custom-theme-set-faces
'(xiomacs
(default ((t (:stipple nil :background "cornsilk" :foreground "gray10" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal ))))
(bg:erc-color-face0 ((t (:background "White"))))
(bg:erc-color-face1 ((t (:background "black"))))
(bg:erc-color-face10 ((t (:background "lightblue1"))))
(bg:erc-color-face11 ((t (:background "cyan"))))
(bg:erc-color-face12 ((t (:background "blue"))))
@dto
dto / dance.lisp
Created May 29, 2014 18:01
;;; dance.lisp --- rhythm tools for USB dance pads
;; Copyright (C) 2009, 2010 David O'Toole
;; Author: David O'Toole <dto@ioforms.org>
;; Keywords: games
;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation, either version 3 of the License, or
@dto
dto / gist:0774ee86e716756b3c3f
Created June 22, 2014 05:53
xiomacs color theme for emacs 24
(deftheme xiomacs "Remix of the default emacs color theme.")
(apply 'custom-theme-set-faces
'(xiomacs
(default ((t (:stipple nil :background "cornsilk" :foreground "gray10" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal ))))
(bg:erc-color-face0 ((t (:background "White"))))
(bg:erc-color-face1 ((t (:background "black"))))
(bg:erc-color-face10 ((t (:background "lightblue1"))))
(bg:erc-color-face11 ((t (:background "cyan"))))
(bg:erc-color-face12 ((t (:background "blue"))))
@dto
dto / cypress-devcast-highlight-links
Created December 22, 2015 02:57
@dto
dto / cypress-devcast-highlight-links-2b
Created December 22, 2015 02:59
@dto
dto / gist:76f3ff48654e87378a22
Created December 22, 2015 03:01
industry anecdote https://www.youtube.com/watch?v=aqB0K7CNwdE&feature=youtu.be&t=14m24s
snow backgrounds, story about my town https://www.youtube.com/watch?v=aqB0K7CNwdE&feature=youtu.be&t=6m
creepy creature and cemetery https://www.youtube.com/watch?v=hL_wzPa4Vsc&feature=youtu.be&t=2m16s
too much stuff! and Cryptghast combat https://www.youtube.com/watch?v=hL_wzPa4Vsc&feature=youtu.be&t=10m58s
final battle (spoilers!) https://www.youtube.com/watch?v=hL_wzPa4Vsc&feature=youtu.be&t=21m49s
animation influences https://youtu.be/syp8oAyhDV8?t=21m1s
@dto
dto / cl-frame.lisp
Created March 25, 2017 21:45
;;; cl-frame.lisp --- open emacs-style frames with structured graphics.
;; _ __
;; ___| | / _|_ __ __ _ _ __ ___ ___
;; / __| |_____| |_| '__/ _` | '_ ` _ \ / _ \
;; | (__| |_____| _| | | (_| | | | | | | __/
;; \___|_| |_| |_| \__,_|_| |_| |_|\___|
;;
;; Copyright (C) 2006 David O'Toole
;;
;; Author: David O'Toole <dto@gnu.org>