diff --git a/lib/botlib.pm b/lib/botlib.pm
index daaec7c..6dd6992 100644
--- a/lib/botlib.pm
+++ b/lib/botlib.pm
@@ -70,7 +70,7 @@ sub command {
 	} elsif (substr ($text, 1) eq 'cat'  ||  substr ($text, 1) eq 'кис') {
 		$reply = kitty ();
 		$msg->typing ();
-		sleep (int ( rand (2) + 1));
+		sleep (irand (2) + 1);
 		$msg->replyMd ($reply);
 		return;
 	} elsif (substr ($text, 1) eq 'lat'  ||  substr ($text, 1) eq 'лат') {
@@ -90,7 +90,9 @@ sub command {
 	} elsif (substr ($text, 1) eq 'friday'  ||  substr ($text, 1) eq 'пятница') {
 		$reply = friday ();
 	} elsif (substr ($text, 1) eq 'fortune'  ||  substr ($text, 1) eq 'фортунка'  ||  substr ($text, 1) eq 'f'  ||  substr ($text, 1) eq 'ф') {
-		$reply = fortune ();
+		$reply = sprintf "```\n%s\n```\n", trim (fortune ());
+		$msg->replyMd ($reply);
+		return;
 	} elsif (substr ($text, 1) eq 'f 1'  ||  substr ($text, 1) eq 'fortune 1'  ||  substr ($text, 1) eq 'фортунка 1'  ||  substr ($text, 1) eq 'ф 1') {
 		$reply = fortune_toggle ($chatid, 1);
 	} elsif (substr ($text, 1) eq 'f 0'  ||  substr ($text, 1) eq 'fortune 0'  ||  substr ($text, 1) eq 'фортунка 0'  ||  substr ($text, 1) eq 'ф 0') {
@@ -100,13 +102,13 @@ sub command {
 	} elsif (substr ($text, 1) eq 'dig' || substr ($text, 1) eq 'копать') {
 		$reply = dig ($highlight);
 		$msg->typing ();
-		sleep (int ( rand (2) + 1));
+		sleep (irand (2) + 1);
 		$msg->replyMd ($reply);
 		return;
 	} elsif (substr ($text, 1) eq 'fish' || substr ($text, 1) eq 'fishing' || substr ($text, 1) eq 'рыба' || substr ($text, 1) eq 'рыбка' || substr ($text, 1) eq 'рыбалка' ) {
 		$reply = fish ($highlight);
 		$msg->typing ();
-		sleep (int ( rand (2) + 1));
+		sleep (irand (2) + 1);
 		$msg->replyMd ($reply);
 		return;
 	} elsif (substr ($text, 1) eq 'help'  ||  substr ($text, 1) eq 'помощь') {
@@ -187,15 +189,15 @@ sub botsleep {
 	# TODO: Parametrise this with fuzzy sleep time in seconds
 	my $msg = shift;
 	# let's emulate real human and delay answer
-	sleep (int ( rand (2) + 1));
+	sleep (irand (2) + 1);
 
-	for (0..(4 + int (rand (3)))) {
+	for (0..(4 + irand (3))) {
 		$msg->typing ();
 		sleep 3;
 		sleep 3 unless ($_);
 	}
 
-	sleep ( 3 + int ( rand (2)));
+	sleep ( 3 + irand (2));
 	return;
 }
 
diff --git a/lib/telegrambot.pm b/lib/telegrambot.pm
index 3e6875a..74594d4 100644
--- a/lib/telegrambot.pm
+++ b/lib/telegrambot.pm
@@ -11,6 +11,7 @@ use English qw ( -no_match_vars );
 use Carp qw (cluck carp);
 use File::Path qw (make_path);
 use Hailo;
+use Math::Random::Secure qw (irand);
 use Mojo::Base 'Teapot::Bot::Brain';
 use botlib qw (randomCommonPhrase command highlight botsleep);
 use conf qw (loadConf);
@@ -47,8 +48,9 @@ sub __cron {
 	if ($hour == 8 && ($min >= 0 && $min <= 14)) {
 		foreach my $enabledfortunechat (fortune_toggle_list ()) {
 			my $send_args;
-			$send_args->{text} = sprintf "%s\n%s", $intro[int (rand ($#intro + 1))], fortune ();
+			$send_args->{text} = sprintf "%s\n```\n%s\n```\n", $intro[irand ($#intro + 1)], trim (fortune ());
 			$send_args->{chat_id} = $enabledfortunechat;
+			$send_args->{parse_mode} = 'Markdown';
 			Teapot::Bot::Brain::sendMessage ($self, $send_args);
 		}
 	}
@@ -296,7 +298,7 @@ sub __on_msg {
 			}
 
 			$msg->typing ();
-			sleep (int (rand (2)));
+			sleep (irand (2));
 			carp sprintf ('[DEBUG] In public chat %s (%s) bot reply to %s: %s', $chatname, $chatid, $vis_a_vi, $reply) if $c->{debug};
 			$msg->reply ($reply);
 		} else {