epicmorphism
/
vantabot
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

smaller leaf, thanks desvox

This commit is contained in:
epic morphism 2019-05-20 00:03:24 +02:00
parent 7c18bfb7a2
commit 11661c51cb
1 changed files with 19 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

33
vantabot.ml
View File

@ -53,23 +53,28 @@ let inc_tokers_count () =
let leaf = [
" W ";
" WWW ";
" WWW ";
" WWWWW ";
"W WWWWW W";
"WWW WWWWW WWW";
" WWW WWWWW WWW ";
" WWW WWW WWW ";
" WWW WWW WWW ";
" WWWWWWW ";
" WWWW | WWWW ";
" | ";
" | "]
" W ";
"WWW";
" | "]
(* let leaf = [
* " W ";
* " WWW ";
* " WWW ";
* " WWWWW ";
* "W WWWWW W";
* "WWW WWWWW WWW";
* " WWW WWWWW WWW ";
* " WWW WWW WWW ";
* " WWW WWW WWW ";
* " WWWWWWW ";
* " WWWW | WWWW ";
* " | ";
* " | "] *)
let show_leaf connection =
leaf |> Lwt_list.iter_s (fun l ->
C.send_msg connection ~is_big:true (bold_text (color_text ~fg:Green ~bg:Black l)))
C.send_msg connection ~is_big:false (bold_text (color_text ~fg:Green ~bg:Black l)))
let start_toke connection =
toke_in_progress := true;