QR Code Generator and Documentation

Overview
Configuration
Sample URLs
Generate QR Codes
- Examples
  - Control
  - Test

Overview

Tool for generating QR codes with configurable paths.

Configuration

(defvar qr-base-url "https://wal.sh/research/qr/"
  "Base URL for QR code generation")

(defun qr-generate-url (path)
  "Generate full URL for QR code"
  (concat qr-base-url path))

(defun qr-encode-url (url)
  "Create QR code from URL using qrencode"
  (let ((output-file (concat (make-temp-name "qr-") ".png")))
    (call-process "qrencode" nil nil nil 
                 "-o" output-file 
                 url)
    output-file))

(provide 'qr-config)

Sample URLs

Generate QR Codes

(require 'qr-config)

(dolist (path '("1.html" "2.html"))
  (let ((url (qr-generate-url path)))
    (message "Generating QR code for %s" url)
    (qr-encode-url url)))

Examples

Control

█▀▀▀▀▀█ ▄▄ ▄▄▀▄▄██▀█▄ █▀▀▀▀▀█ █ ███ █ ▀▀ ███▄▀ ▀█▀ █ ███ █ █ ▀▀▀ █ ▀▄▄▄▄▄▀ ▀██ █ ▀▀▀ █ ▀▀▀▀▀▀▀ ▀▄█ ▀▄█ █▄█ ▀ ▀▀▀▀▀▀▀ █▄█ █▄▀ ▄ ▄█ ██▀█▄ ▄ ▄ ▀▄ ▀▄ ▀ █▀█ ▀ █ █▀ ▄█▄█▄ █ ▄ ▀█▀ ▀███▄▀ █▀▄█▄▄ ▄▀█▄ ███▄ █ ▀█ ▀ ▀ ▄█▀█▀ ▄▀▄▄█▄██▀▄▄▄ ██ █▀ ▀█ ▀▄ ▀█▄▄█▀▄ █▀█▀▀ █▄█ █▄▀█ ▀▄▄▀▄▄▀▄▄▀▄▄▄▀ ▄▄█▄ ▀▄█▀▄ █▀ ▀ ▀ ▀▀ █▄ █▀▄ ▀███ █▀▀▀█ ▄▄▄ █▀▀▀▀▀█ █▀▄▀▄█▄█▄█▀█ ▀ ██ ▀▀ █ ███ █ ▀▀ ▀▀▄█ ▄▀▀ ▀▀▀██ ▄▄█ █ ▀▀▀ █ ▀▀▀▀▀▄▄▄▀█ ███ ▀█▀ ▄▀ ▀▀▀▀▀▀▀ ▀▀ ▀▀ ▀▀▀ ▀▀ ▀▀▀ ▀▀

Encoded Text: https://wal.sh/research/qr/1.html

Test

█▀▀▀▀▀█ ▀█▄▀█▄▄▀█▀▀▄ █▀▀▀▀▀█ █ ███ █ ▀▀▄ █▄▄▀▀▀█ █ ███ █ █ ▀▀▀ █ ▄█▄▄ ██ ▀██▄▄ █ ▀▀▀ █ ▀▀▀▀▀▀▀ ▀ █▄█ █ ▀▄█▄▀ ▀▀▀▀▀▀▀ █▄ ▀▄▀▀ █▀ ▀▄ ▄█▀▄▄ █▀▄▀ ▄ ▄ ▄ █▀▀█▀██▀▀█ ▄▄▄ ██▄ ▄▄▄▀██ ▄█ ▀ ▀██▀▄█ ▄██▄▄██▀▄ ▀ ▀▀ ▄ ▄▄▄▀█ ▀ ▀▄▄▄█▄▀▄█▄ ▀██▀█▀ █▄▀█▀█▀█ ▀ ▀▀▀▄█▀▀▀▄▄▄ ▄ ▀▄ ▀ ▄▀ ▀▄▀▄▄█ █ ▄ █▄▄ ▀ █▀ ██ ▀ ▀ ▀▀ ▄▄▄██▄▀▀█▄█ █▀▀▀█ █▄▄ █▀▀▀▀▀█ ▄ █ █▀▄▄▀▀ █ ▀ █▄▄▀ █ ███ █ ▄█▄█▄ █ ▀▀▄▀▀███▄▄▄▀ █ ▀▀▀ █ ▀▀▀▀█ ▄▀▄ █▄█ █▀▀▄▀ ▀▀▀▀▀▀▀ ▀▀▀▀ ▀ ▀ ▀ ▀ ▀▀▀ ▀

Encoded Text: https://wal.sh/research/qr/2.html