Source file `spinner.ml`

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
let line = Sprite.make [| "|"; "/"; "-"; "\\" |] ~fps:(Fps.of_int 10)

let dot =
  Sprite.make
    [| "⣾ "; "⣽ "; "⣻ "; "⢿ "; "⡿ "; "⣟ "; "⣯ "; "⣷ " |]
    ~fps:(Fps.of_int 10)

let mini_dot =
  Sprite.make
    [| "⠋"; "⠙"; "⠹"; "⠸"; "⠼"; "⠴"; "⠦"; "⠧"; "⠇"; "⠏" |]
    ~fps:(Fps.of_int 12)

let jump =
  Sprite.make [| "⢄"; "⢂"; "⢁"; "⡁"; "⡈"; "⡐"; "⡠" |] ~fps:(Fps.of_int 10)

let pulse = Sprite.make [| "█"; "▓"; "▒"; "░" |] ~fps:(Fps.of_int 8)

let points = Sprite.make [| "∙∙∙"; "●∙∙"; "∙●∙"; "∙∙●" |] ~fps:(Fps.of_int 7)

let meter =
  Sprite.make
    [| "▱▱▱"; "▰▱▱"; "▰▰▱"; "▰▰▰"; "▰▰▱"; "▰▱▱"; "▱▱▱" |]
    ~fps:(Fps.of_int 7)

let globe = Sprite.make [| "🌍"; "🌎"; "🌏" |] ~fps:(Fps.of_int 4)

let moon =
  Sprite.make [| "🌑"; "🌒"; "🌓"; "🌔"; "🌕"; "🌖"; "🌗"; "🌘" |] ~fps:(Fps.of_int 8)

let monkey = Sprite.make [| "🙈"; "🙉"; "🙊" |] ~fps:(Fps.of_int 3)
let hamburger = Sprite.make [| "☱"; "☲"; "☴"; "☲" |] ~fps:(Fps.of_int 3)
let ellipsis = Sprite.make [| ""; "."; ".."; "..." |] ~fps:(Fps.of_int 3)