pebbles-anti_hangover 0.1.0

data/History.txt

@@ -0,0 +1,6 @@
+=== 0.1.0 / 2011-08-18
+
+* 1 major enhancement
+
+  * Birthday!
+

data/Manifest.txt

@@ -0,0 +1,8 @@
+History.txt
+Manifest.txt
+README.txt
+Rakefile
+lib/pebbles/anti_hangover.rb
+spec/spec_helper.rb
+spec/anti_hangover_spec.rb
+autotest/discover.rb

data/README.txt

@@ -0,0 +1,49 @@
+= pebbles-anti_hangover
+
+* https://github.com/kwappa/pebbles-anti_hangover
+
+== DESCRIPTION:
+
+* 体重と睡眠時間、種類から「二日酔いせずに飲める酒量」を計算します。
+ * http://www.nikkeibp.co.jp/archives/347/347655.html
+
+== FEATURES/PROBLEMS:
+
+* (あとでかく)
+
+== SYNOPSIS:
+
+  (あとでかく)
+
+== REQUIREMENTS:
+
+* pebbles
+
+== INSTALL:
+
+* gem install pebbles-anti_hangover
+
+== LICENSE:
+
+(The MIT License)
+
+Copyright (c) 2011 SHIOYA, Hiromu
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+'Software'), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/Rakefile

@@ -0,0 +1,11 @@
+# -*- coding: utf-8 -*-
+# -*- ruby -*-
+Encoding.default_external = Encoding.find("UTF-8")
+
+require 'rubygems'
+require 'hoe'
+
+Hoe.spec 'pebbles-anti_hangover' do
+  developer('SHIOYA, Hiromu', 'kwappa.856@gmail.com')
+  extra_deps << ['pebbles', '>= 0']
+end

data/autotest/discover.rb

@@ -0,0 +1,2 @@
+# -*- coding: utf-8 -*-
+Autotest.add_discovery { "rspec2" }

data/lib/pebbles/anti_hangover.rb

@@ -0,0 +1,96 @@
+# -*- coding: utf-8 -*-
+require 'pebbles'
+
+class Pebbles::AntiHangover
+  VERSION = '0.1.0'
+
+  ALCOHOL_TYPE = {
+    beer: {
+      name:         'ビール',
+      glass:        'レギュラー缶',
+      unit:         '本',
+      alcoholicity:   5,
+      net:          350,
+    },
+    chuhi: {
+      name:         '酎ハイ',
+      glass:        'サワーグラス',
+      unit:         '杯',
+      alcoholicity:   7,
+      net:          200,
+    },
+    sake: {
+      name:         '日本酒',
+      glass:        '小徳利',
+      unit:         '本',
+      alcoholicity:  12,
+      net:          180,
+    },
+    wine: {
+      name:         'ワイン',
+      glass:        'ワイングラス',
+      unit:         '杯',
+      alcoholicity:  15,
+      net:          120,
+    },
+    shochu: {
+      name:         '焼酎',
+      glass:        '焼酎グラス',
+      unit:         '杯',
+      alcoholicity:  25,
+      net:           60,
+    },
+    whiskey: {
+      name:         'ウイスキー',
+      glass:        'ショットグラス',
+      unit:         '杯',
+      alcoholicity:  40,
+      net:           40,
+    },
+  }
+
+  def initialize drunker_weight, drinking_hours
+    @drunker_weight = drunker_weight
+    @drinking_hours = drinking_hours
+    raise ArgumentError unless @drunker_weight > 0
+    raise ArgumentError unless @drinking_hours > 0
+    @drunk_glasses = Hash[ALCOHOL_TYPE.keys.zip(Array.new(ALCOHOL_TYPE.count).fill(0))]
+  end
+
+  def permissible_alcohol
+    (15 * @drunker_weight * @drinking_hours / 80).round
+  end
+
+  def drink kind, glasses = 1
+    raise ArgumentError unless ALCOHOL_TYPE.include?(kind)
+    @drunk_glasses[kind] += glasses
+  end
+
+  def total_drunk
+    @drunk_glasses.inject(0) do |total, drunk|
+      glass = ALCOHOL_TYPE[drunk.first]
+      total + (drunk.last * glass[:alcoholicity] * glass[:net] / 100.0).round
+    end
+  end
+
+  def hangover?
+    total_drunk > permissible_alcohol
+  end
+
+  def dump
+    result = "体重#{@drunker_weight}kgのあなたは、\n"
+    drunk_logs = ''
+    @drunk_glasses.each do |kind, glasses|
+      drunk_logs += "、\n" unless drunk_logs.empty?
+      glass = ALCOHOL_TYPE[kind]
+      drunk_logs += "#{glass[:name]}を#{glass[:glass]}に#{glasses}#{glass[:unit]}"
+    end
+    percentage = (total_drunk.to_f / permissible_alcohol.to_f * 1000.0).floor / 10.0
+    result += drunk_logs + "飲んで、\n#{@drinking_hours}時間後に起きなければなりません。\n\n"
+    result += 'そのときあなたは、おそらく二日酔いに'
+    result += "#{hangover? ? 'なる' : 'ならない'}でしょう。\n\n"
+    result += "(許容量の#{percentage}%を飲んでいます)\n"
+
+    result
+  end
+end

data/spec/anti_hangover_spec.rb

@@ -0,0 +1,119 @@
+# -*- coding: utf-8 -*-
+require File.join(File.dirname(__FILE__), 'spec_helper')
+
+describe AntiHangover do
+  # コンストラクタ
+  #     体重と起きるまでの時間を受け取る
+  #     総摂取可能アルコール量(ml)を算出
+  describe '#initialize' do
+    context '64kg drunker wakes 8hour later' do
+      subject { @anti_hangover = AntiHangover.new(64, 8) }
+      its(:permissible_alcohol) { should == 96 }
+    end
+
+    context 'minus weight given' do
+      specify do
+        expect { @anti_hangover = AntiHangover.new(-1, 8) }.to raise_error ArgumentError
+      end
+    end
+
+    context 'minus hours given' do
+      specify do
+        expect { @anti_hangover = AntiHangover.new(64, -1) }.to raise_error ArgumentError
+      end
+    end
+  end
+
+  # 飲む : 種類と数を渡して今まで飲んだ数を返す
+  describe '#drink' do
+    before do
+      @anti_hangover = AntiHangover.new(75, 8)
+    end
+
+    context 'drink first beer' do
+      subject { @anti_hangover.drink :beer }
+      it { should == 1 }
+    end
+
+    context 'drink second beer' do
+      before { @anti_hangover.drink :beer }
+      subject { @anti_hangover.drink :beer }
+      it { should == 2 }
+    end
+
+    context 'drunk 3 sake' do
+      subject { @anti_hangover.drink :sake, 3 }
+      it { should == 3 }
+    end
+
+    context 'drunk unknown alcohol' do
+      specify do
+        expect { @anti_hangover.drink :unknwon_alcohol }.to raise_error ArgumentError
+      end
+    end
+  end
+
+  # 現在までに飲んだアルコールの総量を返す (ml)
+  describe '#total_drunk' do
+    before do
+      @anti_hangover = AntiHangover.new(75, 8)
+    end
+
+    context 'drunk beer, beer, sake, wine' do
+      before do
+        @anti_hangover.drink :beer, 2
+        @anti_hangover.drink :sake
+        @anti_hangover.drink :wine
+      end
+      subject { @anti_hangover.total_drunk }
+      it { should == 35 + 22 + 18 }
+    end
+  end
+
+  # 二日酔いするかどうかを返す
+  describe '#hangover?' do
+    before do
+      @anti_hangover = AntiHangover.new(64, 8)
+    end
+    context 'without drinking' do
+      subject { @anti_hangover.hangover? }
+      it { should be_false }
+    end
+    context 'too much drinking' do
+      before do
+        @anti_hangover.drink :beer        # 17.5
+        @anti_hangover.drink :chuhi       # 14.0
+        @anti_hangover.drink :sake        # 21.6
+        @anti_hangover.drink :wine        # 18.0
+        @anti_hangover.drink :shochu      # 15.0
+        @anti_hangover.drink :whiskey     # 16.0
+      end
+      subject { @anti_hangover.hangover? }
+      it { should be_true }
+    end
+  end
+
+  describe '#dump' do
+    before do
+      @anti_hangover = AntiHangover.new(64, 8)
+    end
+
+    context 'without drinking' do
+      subject { r = @anti_hangover.dump ; puts r ; r }
+      it { should be_instance_of String }
+    end
+
+    context 'after too much drinking' do
+      before do
+        @anti_hangover.drink :beer,     0 # 17.5
+        @anti_hangover.drink :chuhi,    2 # 14.0
+        @anti_hangover.drink :sake        # 21.6
+        @anti_hangover.drink :wine,     3 # 18.0
+        @anti_hangover.drink :shochu,  12 # 15.0
+        @anti_hangover.drink :whiskey,  1 # 16.0
+      end
+      subject { r = @anti_hangover.dump ; puts r ; r }
+      it { should be_instance_of String }
+    end
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,5 @@
+# -*- coding: utf-8 -*-
+require 'rspec'
+$: << File.join(File.dirname(File.dirname(__FILE__)), 'lib')
+
+require 'pebbles/anti_hangover'

metadata

@@ -0,0 +1,87 @@
+--- !ruby/object:Gem::Specification 
+name: pebbles-anti_hangover
+version: !ruby/object:Gem::Version 
+  prerelease: 
+  version: 0.1.0
+platform: ruby
+authors: 
+- SHIOYA, Hiromu
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-08-20 00:00:00 Z
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: pebbles
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+  type: :runtime
+  version_requirements: *id001
+- !ruby/object:Gem::Dependency 
+  name: hoe
+  prerelease: false
+  requirement: &id002 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ~>
+      - !ruby/object:Gem::Version 
+        version: "2.10"
+  type: :development
+  version_requirements: *id002
+description: "* \xE4\xBD\x93\xE9\x87\x8D\xE3\x81\xA8\xE7\x9D\xA1\xE7\x9C\xA0\xE6\x99\x82\xE9\x96\x93\xE3\x80\x81\xE7\xA8\xAE\xE9\xA1\x9E\xE3\x81\x8B\xE3\x82\x89\xE3\x80\x8C\xE4\xBA\x8C\xE6\x97\xA5\xE9\x85\x94\xE3\x81\x84\xE3\x81\x9B\xE3\x81\x9A\xE3\x81\xAB\xE9\xA3\xB2\xE3\x82\x81\xE3\x82\x8B\xE9\x85\x92\xE9\x87\x8F\xE3\x80\x8D\xE3\x82\x92\xE8\xA8\x88\xE7\xAE\x97\xE3\x81\x97\xE3\x81\xBE\xE3\x81\x99\xE3\x80\x82\n * http://www.nikkeibp.co.jp/archives/347/347655.html"
+email: 
+- kwappa.856@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- History.txt
+- Manifest.txt
+- README.txt
+files: 
+- History.txt
+- Manifest.txt
+- README.txt
+- Rakefile
+- lib/pebbles/anti_hangover.rb
+- spec/spec_helper.rb
+- spec/anti_hangover_spec.rb
+- autotest/discover.rb
+- .gemtest
+homepage: https://github.com/kwappa/pebbles-anti_hangover
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --main
+- README.txt
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+requirements: []
+
+rubyforge_project: pebbles-anti_hangover
+rubygems_version: 1.8.5
+signing_key: 
+specification_version: 3
+summary: "* \xE4\xBD\x93\xE9\x87\x8D\xE3\x81\xA8\xE7\x9D\xA1\xE7\x9C\xA0\xE6\x99\x82\xE9\x96\x93\xE3\x80\x81\xE7\xA8\xAE\xE9\xA1\x9E\xE3\x81\x8B\xE3\x82\x89\xE3\x80\x8C\xE4\xBA\x8C\xE6\x97\xA5\xE9\x85\x94\xE3\x81\x84\xE3\x81\x9B\xE3\x81\x9A\xE3\x81\xAB\xE9\xA3\xB2\xE3\x82\x81\xE3\x82\x8B\xE9\x85\x92\xE9\x87\x8F\xE3\x80\x8D\xE3\x82\x92\xE8\xA8\x88\xE7\xAE\x97\xE3\x81\x97\xE3\x81\xBE\xE3\x81\x99\xE3\x80\x82 * http://www.nikkeibp.co.jp/archives/347/347655.html"
+test_files: []
+