On this page:
qr-write
qr-read

2 Usage

 (require simple-qr) package: simple-qr

procedure

(qr-write data    
  output_file_path    
  #:mode mode    
  #:error_level error_level    
  #:module_width module_width)  void?
  data : (string?)
  output_file_path : (path-string?)
  mode : string?
  error_level : string?
  module_width : exact_nonngegative-integer?
output qr code image to file.

procedure

(qr-read image_file_path)  string?

  image_file_path : (path-string?)
read qr code image’s content, if failed, return "".

#lang racket

 

(require simple-qr)

 

;; block's default width is 5

(qr-write "https://github.com/simmone" "normal.png")

 

(qr-write "https://github.com/simmone" "small.png" #:module_width 2)

 

(qr-write "https://github.com/simmone" "large.png" #:module_width 10)

 

(printf "~a\n~a\n~a\n"

        (qr-read "normal.png")

        (qr-read "small.png")

        (qr-read "large.png"))

https://github.com/simmone

https://github.com/simmone

https://github.com/simmone