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    
  #:express? express?    
  #:express_path express_path])  void?
  data : (string?)
  output_file_path : (path-string?)
  mode : string? = "B"
  error_level : string? = "H"
  module_width : natural? = 5
  express? : boolean? = #f
  express_path : path-string? = "imgfile + '.write.express'"
output qr code image to file.

procedure

(qr-read image_file_path    
  [#:express? express?    
  #:express_path express_path])  string?
  image_file_path : (path-string?)
  express? : boolean? = #f
  express_path : path-string? = "imgfile + '.read.express'"
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"))

 

(printf "~a\n" (qr-read "damaged.png"))

https://github.com/simmone

https://github.com/simmone

https://github.com/simmone

https://github.com/simmone