zzkt

recent supercollider activity...
  https://github.com/search?o=desc&q=language%3ASuperCollider&s=updated&type=Repositories

zzkt

[
  {
    "name": "Charybdis 4x6",
    "author": "https://github.com/zzkt/charybdis"
  },
  [
    {
      "x": 3.5,
      "a": 5
    },

zzkt

[
  {
    "name": "crkbd - zzkt - emacs",
    "author": "https://github.com/zzkt/crkbd"
  },
  [
    {
      "x": 3,
      "a": 7
    },

zzkt

[
  {
    "name": "crkbd - zzkt - alphalikes",
    "author": "https://github.com/zzkt/crkbd"
  },
  [
    {
      "x": 3,
      "t": "#000000\n\n#dd3c84"
    },

zzkt

++++++++++[>+++++++>++++++++++>+++>+<<<<-]>++.>+.+++++++..+++.>++.<<++++++++++++.>++++++.---.---------.+++++.-------.>.

zzkt

#!/usr/local/bin/fontforge

# convert a font (or list of fonts) to truetype

if ( $argc==1 )
  Print("usage: fontforge -script otf2ttf.pe FONT.otf")  
else
  i=1
  while ( i<$argc )
    in=$argv[i]

zzkt

Keybase proof

I hereby claim:

• I am zzkt on github.
• I am zzkt (https://keybase.io/zzkt) on keybase.
• I have a public key ASAcOoktPHT7fQBG9gzC6aCq6Lot6yZzj_vtsaI7lkt8bAo

To claim this, I am signing this object:

zzkt

婂allopurinol圑whip恄幖is怤hatch怴搝war娻屗easily come唭frame奊唀Chuai峔Wild Mountain埯S hi廇嗕closet who sing嚵Posing壛carved peaks墥sound understanding壋kitchen altar喿fascine奰Xiao-Lun恛visit a prostitute Jie姴啷嬂ugly woman saint嫤triazine娐pharyngeal峈decoy嬻particularly愰啴屽嶍屽lonesome mountain valley喿嶐treasury唥dumb corpse彐Qixiang帄funeral car啯idle choke open嗙Reclassification唅exactly what憛Qi Zhe悐You call幮nervous Well do not suggest惐recalcitrant啹donated戠Xiao sad olfactory rugged frame strike拀唹Cement block嵄single彠Where You囏庰抂唋岰媮Cape夣宐彋媀恦cylinder彐cry姩宔嬀

http://www.flickr.com/photos/35468141611@N01/3518306770/

zzkt

;; http://repository.readscheme.org/ftp/papers/PLoP2001_dferguson0_1.pdf

(define coroutine-maker 
  (lambda (proc) 
    (let ((saved-continuation '())) 
      (let ((update-continuation! (lambda (v) 
                                    (display "updating") 
                                    (set! saved-continuation v)))) 
        (let ((resumer (resume-maker update-continuation!)) 
              (first-time #t)) 

zzkt

;; convert a hex rgb or argb colour string to a vector of 3 or 4 floats [0..1]

(define (hex2rgb str)
  (define (h2n h)
    (/ (string->number (string-append "#x" h) 16) 255.0))
  (cond ((= 9 (string-length str))
         (let ((a (substring str 1 3))
               (r (substring str 3 5))
               (g (substring str 5 7))
               (b (substring str 7 9)))