kill9/index.md

4.3 KiB

kill-9.xyz

This is a website made by qorg11. This is a "blog" about anything. It runs werc as its "cms"

The horrible theme is based on the Structure and Interpretation of Computer Programs cover.

Anything that I've written in this website is under CC BY license. Images might or might not be under that license.

Any article in this website is WIP. And they will always be WIP.

Contributing to this website

Go to the Github repository, fork it, change whatever, make a pull request, ill merge, and your change will appear here.

Onion

(defconstant NUMBER_OF_PEOPLE 10)
(defvar *key*)
(defvar *i* 0)


(defun rewrite (n) n) ;; idk what's this
(defun memory (n) n)  ;; so it don't do anything

(princ "Beginning System Reset.....")
(terpri)
(princ "ALL RESET? y/n")
(terpri)
(setq *key* (read))

(if (string-equal *key* "y")

    (loop while (<= *i* NUMBER_OF_PEOPLE)
       do
         (rewrite (memory *i*))
         (defparameter *i* (+ *i* 1))))

car car car car cdr cdr cdr cdr car cdr eval apply car cdr eval apply car cdr eval apply car cdr eval apply car cdr eval apply car cdr eval apply