Skip to content

Instantly share code, notes, and snippets.

@youz

youz/helloworld.ppn

Created March 29, 2011 12:04
Show Gist options
  • Save youz/892230 to your computer and use it in GitHub Desktop.
Save youz/892230 to your computer and use it in GitHub Desktop.
Download ZIP
grassの w → "ぽ" W → "ー" v → "ん"
Raw
helloworld.ppn
ref. http://twitter.com/gengar68/status/52532965556748288
ぽんぽーぽぽぽぽーぽぽぽぽぽぽーーーーーぽーーーーーぽぽぽぽんぽぽぽぽーーーぽぽ
ーぽぽーーーーーーぽぽぽぽーぽぽんぽーーぽーぽぽんぽぽーーぽんぽーーーぽぽーーー
ーーぽぽぽーぽぽーーーーーーぽーーーーーーーぽーーーーぽーーーーーぽーーーーーー
ぽーーーーーーーーーーーーーーぽぽぽぽぽぽぽぽーぽーぽーーーぽぽーーーーぽぽぽぽ
ぽぽぽーーーーーぽぽぽぽぽぽぽーーーーーーぽぽぽぽぽぽぽーーーーーーーーーーーー
ーーーーーーーーーぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽーぽぽぽぽぽぽぽぽぽ
ぽぽぽぽぽぽぽぽぽぽぽーーぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽーーぽぽぽぽぽぽぽぽぽ
ぽぽぽぽぽーーぽぽぽぽぽぽぽーーぽぽぽぽぽぽぽぽーーーぽぽぽぽぽぽぽぽーーーーー
ぽーーーーーぽぽぽぽぽぽぽぽぽーーーーーーーぽーーーーーーーーぽーーーーーーーー
ーぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽーーーーーーーーーーーぽーぽぽぽーーぽーー
ーぽーーーーぽーーーーーーーーーーーーーーーーーぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽ
ぽーぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽ
ーぽぽぽぽぽぽぽぽぽぽぽぽーーぽぽぽぽぽぽぽぽぽぽぽーーーぽぽぽぽぽぽぽーーーー
ぽーーーーーぽぽぽぽぽぽぽぽーーーーーーぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽー
ーーーーーーぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽーーーーーー
ーーーぽぽぽぽぽぽぽぽーぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽ
ぽぽぽぽーーぽぽぽぽぽぽぽぽぽぽぽぽぽーーーぽぽぽぽぽぽぽぽぽぽぽぽぽーーーーぽ
ぽぽぽぽぽぽぽーーーーーぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽーーーーー
ーぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽ
Raw
popopopo-n.l
(require "grass") ; https://github.com/youz/xyzzy-lisp/blob/master/grass.l
(defun popopopo-n (str)
(map () (lambda (b a) (setq str (substitute a b str))) "ぽーん" "wWv")
(grass:run str))
; (popopopo-n "ぽーーぽぽぽぽん")
; | w
; #<lexical-closure: (anonymous)>
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment