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 = [ let leaf = [
" W "; " W ";
" WWW "; "WWW";
" WWW "; " | "]
" WWWWW ";
"W WWWWW W"; (* let leaf = [
"WWW WWWWW WWW"; * " W ";
" WWW WWWWW WWW "; * " WWW ";
" WWW WWW WWW "; * " WWW ";
" WWW WWW WWW "; * " WWWWW ";
" WWWWWWW "; * "W WWWWW W";
" WWWW | WWWW "; * "WWW WWWWW WWW";
" | "; * " WWW WWWWW WWW ";
" | "] * " WWW WWW WWW ";
* " WWW WWW WWW ";
* " WWWWWWW ";
* " WWWW | WWWW ";
* " | ";
* " | "] *)
let show_leaf connection = let show_leaf connection =
leaf |> Lwt_list.iter_s (fun l -> 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 = let start_toke connection =
toke_in_progress := true; toke_in_progress := true;