教你做一个最简单的「比特币报价微信机器人」
Author: 林兴陆 | Created: 2019-06-27
小林的预测只是玩笑和谈资切勿直接作为投资参考
此前写过一篇《用 Perl 语言 Mojo::Weixin 模组开发微信聊天机器人》，小林陆陆续续开发了圣经查询、数字货币价格查询、实时汇率价格转换和类 MUD 动作等趣味小功能。
去年5月上旬比特币价格到达10000美元顶点之后很快进入了熊市，很多此前连睡觉都觉得奢侈的3点钟不眠人作为区块链信仰者有的倾家荡产，有的叛逃了，比特币再次被质疑。
小林以极其无厘头的直觉推测今年6月份比特币会到达1万美金。最近比特币的价格确实又飚升起来了，并且很快就超过了去年的价格，最高将近14000美金，信仰又回来了。
很多人对数字货币报价机器人比较感兴趣，不少人还拉小林进群当真的机器人使，各种调侃，小林可是真人啊，有人问你是机器人吗？小林只好告诉对方：「我不是机器人，但是我有机器人！」。
发送 BTC 查询比特币价格
因为目前 Chatbot 在微信生态属于灰色地带，据了解如果被判恶意，严重的情况会被关闭 Web 版的使用权限，但是 iPad、Mac 和 Windows 版权限 并不会被关闭，这也解释了新注册的 ID 为什么无法使用 Web 版的原因。
小林真不能也不应该被拉到 N 个群去当报价机使唤，如果你们有自己的社群，大可以用自己的 ID 或者小号体验一下，先给出一个最简易的版本大家部署来玩玩，如果不是币圈炒币群，只查询 BTC 够了！
部署方法参考此前的文章，这个版本使用的代码使用 blockchain.info 的免费 API，只返回比特币的美元价格和人民币价格供参考。将代码保存下来，在安装好 JSON 和 Mojo::Weixin 模组的环境中，执行后会提示一个二维码相关路径，拷贝地址通过浏览器打开再通过微信客户端扫描既可。
小林自己有一个使用 CoinMarketCap 的版本，支持常见的数千种数字货币。因为免费 API 的配额每个月只有10000个信用点，小林只能做到每5分钟更新一次，感兴趣的朋友先加入小林读者群体验。
#!/usr/local/bin/perluse JSON;use Mojo::Weixin;my $client = Mojo::Weixin->new(http_debug => 0,log_level => "info");$client->load("ShowMsg");$client->on(ready => sub {my $client = shift;$client->on(receive_message => sub {my ( $client, $msg ) = @_;if($msg->format eq 'text' && $msg->type eq 'group_message' ){ # 群组:group_message / 好友: friend_messageif ( $msg->content =~ /^\s*BTC\s*$/i ) {my $message = &btc();$msg->reply($message);}}});});$client->run();sub btc {my $ticker = `curl -s "https://blockchain.info/ticker"`;if ($ticker) {my $json = from_json($ticker);return "1 BTC\n$json->{'USD'}->{'symbol'}$json->{'USD'}->{'last'} USD\n$json->{'CNY'}->{'symbol'}$json->{'CNY'}->{'last'} CNY";}}
小林读者群已满500人。目前还有一个预备群，若你已经是小林微信好友，只要向「小林」私信发送关键字「networknews」就可以自动邀请你加入群聊。对于尚未添加小林微信好友的读者，请先添加微信测试号（91123），然后再私信发送关键字「networknews」自动邀请你加入群聊。
【延伸阅读】
启示录 20:1 “我又看见一位天使从天降下，手里拿着无底坑的钥匙和一条大链子。”
若你喜欢请点「在看」并「分享到朋友圈」～
Publish: 网林