Create spinner.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(bar_object), | intent(inout) | :: | self | Bar. |
||
| class(*), | intent(in), | optional | :: | string | Spinner char. |
|
| character(len=*), | intent(in), | optional | :: | color_fg | Spinner char foreground color. |
|
| character(len=*), | intent(in), | optional | :: | color_bg | Spinner char background color. |
|
| character(len=*), | intent(in), | optional | :: | style | Spinner char style. |
subroutine create_spinner(self, string, color_fg, color_bg, style)
!< Create spinner.
class(bar_object), intent(inout) :: self !< Bar.
class(*), intent(in), optional :: string !< Spinner char.
character(len=*), intent(in), optional :: color_fg !< Spinner char foreground color.
character(len=*), intent(in), optional :: color_bg !< Spinner char background color.
character(len=*), intent(in), optional :: style !< Spinner char style.
character(len=:, kind=UCS4), allocatable :: string_ !< Spinner char, local variable
! integer(I4P) :: s !< Counter.
if (present(string)) then
string_ = ucs4_string(input=string)
select case(string_)
case(UCS4_'|')
allocate(self%spinner(1:4))
call self%spinner(1)%initialize(string='|', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='/', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='-', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4)%initialize(string='\', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'⠋')
allocate(self%spinner(1:10))
call self%spinner(1 )%initialize(string='⠋', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2 )%initialize(string='⠙', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3 )%initialize(string='⠹', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4 )%initialize(string='⠸', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5 )%initialize(string='⠼', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6 )%initialize(string='⠴', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(7 )%initialize(string='⠦', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(8 )%initialize(string='⠧', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(9 )%initialize(string='⠇', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(10)%initialize(string='⠏', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'⣾')
allocate(self%spinner(1:8))
call self%spinner(1)%initialize(string='⣾', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='⣽', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='⣻', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4)%initialize(string='⢿', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5)%initialize(string='⡿', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6)%initialize(string='⣟', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(7)%initialize(string='⣯', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(8)%initialize(string='⣷', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'⠓')
allocate(self%spinner(1:10))
call self%spinner(1 )%initialize(string='⠋', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2 )%initialize(string='⠙', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3 )%initialize(string='⠚', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4 )%initialize(string='⠞', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5 )%initialize(string='⠖', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6 )%initialize(string='⠦', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(7 )%initialize(string='⠴', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(8 )%initialize(string='⠲', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(9 )%initialize(string='⠳', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(10)%initialize(string='⠓', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'⠄')
allocate(self%spinner(1:14))
call self%spinner(1 )%initialize(string='⠄', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2 )%initialize(string='⠆', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3 )%initialize(string='⠇', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4 )%initialize(string='⠋', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5 )%initialize(string='⠙', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6 )%initialize(string='⠸', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(7 )%initialize(string='⠰', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(8 )%initialize(string='⠠', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(9 )%initialize(string='⠰', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(10)%initialize(string='⠸', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(11)%initialize(string='⠙', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(12)%initialize(string='⠋', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(13)%initialize(string='⠇', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(14)%initialize(string='⠆', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'⠐')
allocate(self%spinner(1:17))
call self%spinner(1 )%initialize(string='⠋', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2 )%initialize(string='⠙', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3 )%initialize(string='⠚', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4 )%initialize(string='⠒', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5 )%initialize(string='⠂', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6 )%initialize(string='⠂', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(7 )%initialize(string='⠒', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(8 )%initialize(string='⠲', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(9 )%initialize(string='⠴', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(10)%initialize(string='⠦', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(11)%initialize(string='⠖', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(12)%initialize(string='⠒', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(13)%initialize(string='⠐', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(14)%initialize(string='⠐', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(15)%initialize(string='⠒', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(16)%initialize(string='⠓', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(17)%initialize(string='⠋', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'⠒')
allocate(self%spinner(1:24))
call self%spinner(1 )%initialize(string='⠈', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2 )%initialize(string='⠉', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3 )%initialize(string='⠋', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4 )%initialize(string='⠓', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5 )%initialize(string='⠒', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6 )%initialize(string='⠐', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(7 )%initialize(string='⠐', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(8 )%initialize(string='⠒', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(9 )%initialize(string='⠖', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(10)%initialize(string='⠦', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(11)%initialize(string='⠤', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(12)%initialize(string='⠠', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(13)%initialize(string='⠠', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(14)%initialize(string='⠤', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(15)%initialize(string='⠦', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(16)%initialize(string='⠖', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(17)%initialize(string='⠒', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(18)%initialize(string='⠐', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(19)%initialize(string='⠐', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(20)%initialize(string='⠒', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(21)%initialize(string='⠓', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(22)%initialize(string='⠋', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(23)%initialize(string='⠉', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(24)%initialize(string='⠈', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'⠁')
allocate(self%spinner(1:29))
call self%spinner(1 )%initialize(string='⠁', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2 )%initialize(string='⠁', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3 )%initialize(string='⠉', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4 )%initialize(string='⠙', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5 )%initialize(string='⠚', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6 )%initialize(string='⠒', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(7 )%initialize(string='⠂', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(8 )%initialize(string='⠂', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(9 )%initialize(string='⠒', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(10)%initialize(string='⠲', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(11)%initialize(string='⠴', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(12)%initialize(string='⠤', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(13)%initialize(string='⠄', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(14)%initialize(string='⠄', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(15)%initialize(string='⠤', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(16)%initialize(string='⠠', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(17)%initialize(string='⠠', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(18)%initialize(string='⠤', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(19)%initialize(string='⠦', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(20)%initialize(string='⠖', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(21)%initialize(string='⠒', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(22)%initialize(string='⠐', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(23)%initialize(string='⠐', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(24)%initialize(string='⠒', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(25)%initialize(string='⠓', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(26)%initialize(string='⠋', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(27)%initialize(string='⠉', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(28)%initialize(string='⠈', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(29)%initialize(string='⠈', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'⣸')
allocate(self%spinner(1:8))
call self%spinner(1)%initialize(string='⢹', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='⢺', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='⢼', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4)%initialize(string='⣸', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5)%initialize(string='⣇', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6)%initialize(string='⡧', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(7)%initialize(string='⡗', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(8)%initialize(string='⡏', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'⡐')
allocate(self%spinner(1:7))
call self%spinner(1)%initialize(string='⢄', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='⢂', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='⢁', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4)%initialize(string='⡁', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5)%initialize(string='⡈', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6)%initialize(string='⡐', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(7)%initialize(string='⡠', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'⡀')
allocate(self%spinner(1:8))
call self%spinner(1)%initialize(string='⠁', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='⠂', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='⠄', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4)%initialize(string='⡀', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5)%initialize(string='⢀', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6)%initialize(string='⠠', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(7)%initialize(string='⠐', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(8)%initialize(string='⠈', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'⡃⢐')
allocate(self%spinner(1:56))
call self%spinner(1 )%initialize(string='⢀⠀', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2 )%initialize(string='⡀⠀', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3 )%initialize(string='⠄⠀', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4 )%initialize(string='⢂⠀', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5 )%initialize(string='⡂⠀', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6 )%initialize(string='⠅⠀', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(7 )%initialize(string='⢃⠀', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(8 )%initialize(string='⡃⠀', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(9 )%initialize(string='⠍⠀', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(10)%initialize(string='⢋⠀', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(11)%initialize(string='⡋⠀', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(12)%initialize(string='⠍⠁', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(13)%initialize(string='⢋⠁', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(14)%initialize(string='⡋⠁', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(15)%initialize(string='⠍⠉', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(16)%initialize(string='⠋⠉', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(17)%initialize(string='⠋⠉', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(18)%initialize(string='⠉⠙', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(19)%initialize(string='⠉⠙', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(20)%initialize(string='⠉⠩', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(21)%initialize(string='⠈⢙', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(22)%initialize(string='⠈⡙', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(23)%initialize(string='⢈⠩', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(24)%initialize(string='⡀⢙', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(25)%initialize(string='⠄⡙', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(26)%initialize(string='⢂⠩', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(27)%initialize(string='⡂⢘', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(28)%initialize(string='⠅⡘', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(29)%initialize(string='⢃⠨', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(30)%initialize(string='⡃⢐', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(31)%initialize(string='⠍⡐', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(32)%initialize(string='⢋⠠', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(33)%initialize(string='⡋⢀', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(34)%initialize(string='⠍⡁', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(35)%initialize(string='⢋⠁', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(36)%initialize(string='⡋⠁', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(37)%initialize(string='⠍⠉', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(38)%initialize(string='⠋⠉', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(39)%initialize(string='⠋⠉', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(40)%initialize(string='⠉⠙', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(41)%initialize(string='⠉⠙', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(42)%initialize(string='⠉⠩', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(43)%initialize(string='⠈⢙', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(44)%initialize(string='⠈⡙', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(45)%initialize(string='⠈⠩', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(46)%initialize(string='⠀⢙', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(47)%initialize(string='⠀⡙', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(48)%initialize(string='⠀⠩', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(49)%initialize(string='⠀⢘', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(50)%initialize(string='⠀⡘', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(51)%initialize(string='⠀⠨', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(52)%initialize(string='⠀⢐', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(53)%initialize(string='⠀⡐', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(54)%initialize(string='⠀⠠', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(55)%initialize(string='⠀⢀', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(56)%initialize(string='⠀⡀', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'┤')
allocate(self%spinner(1:8))
call self%spinner(1)%initialize(string='┤', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='┘', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='┴', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4)%initialize(string='└', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5)%initialize(string='├', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6)%initialize(string='┌', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(7)%initialize(string='┬', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(8)%initialize(string='┐', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'✶')
allocate(self%spinner(1:6))
call self%spinner(1)%initialize(string='✶', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='✸', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='✹', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4)%initialize(string='✺', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5)%initialize(string='✹', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6)%initialize(string='✷', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'_')
allocate(self%spinner(1:12))
call self%spinner(1 )%initialize(string='_', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2 )%initialize(string='_', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3 )%initialize(string='_', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4 )%initialize(string='-', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5 )%initialize(string='`', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6 )%initialize(string='`', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(7 )%initialize(string="'", color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(8 )%initialize(string='´', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(9 )%initialize(string='-', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(10)%initialize(string='_', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(11)%initialize(string='_', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(12)%initialize(string='_', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'▃')
allocate(self%spinner(1:10))
call self%spinner(1 )%initialize(string='▁', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2 )%initialize(string='▃', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3 )%initialize(string='▄', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4 )%initialize(string='▅', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5 )%initialize(string='▆', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6 )%initialize(string='▇', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(7 )%initialize(string='▆', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(8 )%initialize(string='▅', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(9 )%initialize(string='▄', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(10)%initialize(string='▃', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'▉')
allocate(self%spinner(1:12))
call self%spinner(1 )%initialize(string='▏', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2 )%initialize(string='▎', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3 )%initialize(string='▍', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4 )%initialize(string='▌', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5 )%initialize(string='▋', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6 )%initialize(string='▊', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(7 )%initialize(string='▉', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(8 )%initialize(string='▊', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(9 )%initialize(string='▋', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(10)%initialize(string='▌', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(11)%initialize(string='▍', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(12)%initialize(string='▎', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'@')
allocate(self%spinner(1:7))
call self%spinner(1)%initialize(string=' ', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='.', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='o', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4)%initialize(string='O', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5)%initialize(string='@', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6)%initialize(string='*', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(7)%initialize(string=' ', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'°')
allocate(self%spinner(1:7))
call self%spinner(1)%initialize(string='.', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='o', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='O', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4)%initialize(string='°', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5)%initialize(string='O', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6)%initialize(string='o', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(7)%initialize(string='.', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'▒')
allocate(self%spinner(1:3))
call self%spinner(1)%initialize(string='▓', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='▒', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='░', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'⠂')
allocate(self%spinner(1:4))
call self%spinner(1)%initialize(string='⠁', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='⠂', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='⠄', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4)%initialize(string='⠂', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'▖')
allocate(self%spinner(1:4))
call self%spinner(1)%initialize(string='▖', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='▘', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='▝', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4)%initialize(string='▗', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'◢')
allocate(self%spinner(1:4))
call self%spinner(1)%initialize(string='◢', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='◣', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='◤', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4)%initialize(string='◥', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'◜')
allocate(self%spinner(1:6))
call self%spinner(1)%initialize(string='◜', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='◠', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='◝', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4)%initialize(string='◞', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5)%initialize(string='◡', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6)%initialize(string='◟', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'⊙')
allocate(self%spinner(1:3))
call self%spinner(1)%initialize(string='◡', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='⊙', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='◠', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'◰')
allocate(self%spinner(1:4))
call self%spinner(1)%initialize(string='◰', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='◳', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='◲', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4)%initialize(string='◱', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'◴')
allocate(self%spinner(1:4))
call self%spinner(1)%initialize(string='◴', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='◷', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='◶', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4)%initialize(string='◵', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'◐')
allocate(self%spinner(1:4))
call self%spinner(1)%initialize(string='◐', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='◓', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='◑', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4)%initialize(string='◒', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'⊶')
allocate(self%spinner(1:2))
call self%spinner(1)%initialize(string='⊶', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='⊷', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'▫')
allocate(self%spinner(1:2))
call self%spinner(1)%initialize(string='▫', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='▪', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'□')
allocate(self%spinner(1:2))
call self%spinner(1)%initialize(string='□', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='■', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'▪')
allocate(self%spinner(1:4))
call self%spinner(1)%initialize(string='■', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='□', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='▪', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4)%initialize(string='▫', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'▯')
allocate(self%spinner(1:2))
call self%spinner(1)%initialize(string='▮', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='▯', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'⦿')
allocate(self%spinner(1:2))
call self%spinner(1)%initialize(string='⦾', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='⦿', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'◍')
allocate(self%spinner(1:2))
call self%spinner(1)%initialize(string='◍', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='◌', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'◉')
allocate(self%spinner(1:2))
call self%spinner(1)%initialize(string='◉', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='◎', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'㊂')
allocate(self%spinner(1:3))
call self%spinner(1)%initialize(string='㊂', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='㊀', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='㊁', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'( ● )')
allocate(self%spinner(1:10))
call self%spinner(1 )%initialize(string='( ● )', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2 )%initialize(string='( ● )', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3 )%initialize(string='( ● )', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4 )%initialize(string='( ● )', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5 )%initialize(string='( ●)', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6 )%initialize(string='( ● )', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(7 )%initialize(string='( ● )', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(8 )%initialize(string='( ● )', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(9 )%initialize(string='( ● )', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(10)%initialize(string='(● )', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'🌔 ')
allocate(self%spinner(1:8))
call self%spinner(1)%initialize(string='🌑 ', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='🌒 ', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(3)%initialize(string='🌓 ', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(4)%initialize(string='🌔 ', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(5)%initialize(string='🌕 ', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(6)%initialize(string='🌖 ', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(7)%initialize(string='🌗 ', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(8)%initialize(string='🌘 ', color_fg=color_fg, color_bg=color_bg, style=style)
case(UCS4_'🚶 ')
allocate(self%spinner(1:2))
call self%spinner(1)%initialize(string='🚶 ', color_fg=color_fg, color_bg=color_bg, style=style)
call self%spinner(2)%initialize(string='🏃 ', color_fg=color_fg, color_bg=color_bg, style=style)
endselect
endif
endsubroutine create_spinner