a13x

use anyhow;
use embedded_hal::prelude::*;
use esp_idf_hal::gpio;
use esp_idf_hal::prelude::*;
use esp_idf_hal::spi;
use esp_idf_hal::delay::FreeRtos;

use epd_waveshare::{epd5in65f::Epd5in65f, prelude::*};

a13x

Verifying that +a13x is my blockchain ID. https://onename.com/a13x

a13x

(ql:quickload :clack :silent t)
(ql:quickload :vecto :silent t)
(ql:quickload :ningle :silent t)
(ql:quickload :babel :silent t)
(ql:quickload :babel-streams :silent t)

(in-package :cl-user)

(defpackage imger
  (:use :cl :ningle :babel :babel-streams :vecto)

a13x

 ~/ sbcl --version
SBCL 1.3.2
 ~/ sbcl
This is SBCL 1.3.2, an implementation of ANSI Common Lisp.
More information about SBCL is available at <http://www.sbcl.org/>.

SBCL is free software, provided as is, with absolutely no warranty.
It is mostly in the public domain; some portions are provided under
BSD-style licenses.  See the CREDITS and COPYING files in the
distribution for more information.

a13x

#!/usr/local/bin/gsi-script

(define (bigram lst)
  (cons (car lst) (cadr lst)))

(define (bigrams lst)
    (if (> (length lst) 2)
      (cons (bigram lst) (bigrams (cdr lst)))
      (cons (bigram lst) '())))

a13x

#!/usr/bin/env python
import bobo

@bobo.query('/:txt/:num')
def serve(txt, num):
	return '\n'.join("%d: %s" % (i, txt) for i in xrange(int(num)))

application = bobo.Application(bobo_resources=__name__)