Mercurial > repo

view src/ploki/examples/quine.pk @ 8352:9992dab882dc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<moon_> mkx bin/brand//for i in {1..8}; do echo -n $((RANDOM % $1)); done
author HackBot
date Sun, 05 Jun 2016 23:50:00 +0000
parents ac0403686959
children
line wrap: on
line source

#!../ploki
REM My first quine! Lukas Mai, 07.03.2003
LET b "b"
LET n "n"
LET v "v"
LET bb "\\"
LET nn "\n"
LET vv "\""
LET bn "#!../ploki"
LET vvv "REM My first quine! Lukas Mai, 07.03.2003"
LET vb "LET "
LET nv " "
LET bnv "WUNT (bn_nn _vvv_nn _vb_b_nv_vv_b_vv_nn _vb_n_nv_vv_n_vv_nn _vb_v_nv_vv_v_vv_nn _vb_b_b_nv_vv_bb_bb_vv_nn _vb_n_n_nv_vv_bb_n_vv_nn _vb_v_v_nv_vv_bb_vv_vv_nn _vb_b_n_nv_vv_bn_vv_nn _vb_v_v_v_nv_vv_vvv_vv_nn _vb_v_b_nv_vv_vb_vv_nn _vb_n_v_nv_vv_nv_vv_nn _vb_b_n_v_nv_vv_bnv_vv_nn _bnv_nn)"
WUNT (bn_nn _vvv_nn _vb_b_nv_vv_b_vv_nn _vb_n_nv_vv_n_vv_nn _vb_v_nv_vv_v_vv_nn _vb_b_b_nv_vv_bb_bb_vv_nn _vb_n_n_nv_vv_bb_n_vv_nn _vb_v_v_nv_vv_bb_vv_vv_nn _vb_b_n_nv_vv_bn_vv_nn _vb_v_v_v_nv_vv_vvv_vv_nn _vb_v_b_nv_vv_vb_vv_nn _vb_n_v_nv_vv_nv_vv_nn _vb_b_n_v_nv_vv_bnv_vv_nn _bnv_nn)