Olib 0.0.8 → 0.0.9

data/lib/Olib/combat/creatures.rb

@@ -1,57 +1,62 @@
-# a collection for managing all of the creatures in a room
-module Olib
-  class Creatures
-
-    def Creatures.first
-      all.first
-    end
-
-    def Creatures.all
-      GameObj.npcs
-        .map    { |creature| Olib::Creature.new(creature) }
-        .select { |creature| !creature.dead?              }
-        .select { |creature| !creature.ignorable?         }
-        .select { |creature| !creature.tags.include?('animate') }
-        .select { |creature| !creature.gone? } || []
-    end
-
-    def Creatures.each(&block)
-      all.each(&block)
-    end
-
-    def Creatures.[](exp)
-      regexp = exp.class == String ? /#{exp}/ : exp
-
-      all.select { |creature| creature.name =~ regexp || creature.id == exp }
-    end
-    
-    def Creatures.filter(&block); 
-      all.select(&block)                                
-    end
-
-    def Creatures.bandits;     all.select { |creature| creature.is?('bandit') }    ;end;
-    def Creatures.ignoreable;  all.select { |creature| creature.is?('ignoreable') }    ;end;
-    def Creatures.flying;      all.select { |creature| creature.is?('flying') }    ;end;
-    def Creatures.living;      all.select { |creature| creature.is?('living') }    ;end;
-    def Creatures.antimagic;   all.select { |creature| creature.is?('antimagic') } ;end;
-    def Creatures.undead;      all.select { |creature| creature.is?('undead') }    ;end;
-
-    def Creatures.grimswarm;   all.select { |creature| creature.is?('grimswarm') } ;end;
-    def Creatures.invasion;    all.select { |creature| creature.is?('invasion')  } ;end;
-    def Creatures.escortees;   GameObj.npcs.map {|creature| Creature.new(creature) }.select {|creature| creature.is?('escortee') } ;end;
-
-    def Creatures.stunned;     all.select(&:stunned?)   ;end;
-    def Creatures.active;      all.select(&:active?)    ;end;
-    def Creatures.dead;        all.select(&:dead?)      ;end;
-    def Creatures.prone;       all.select(&:prone?)     ;end;
-    
-    def Creatures.ambushed?
-      last_line = $_SERVERBUFFER_.reverse.find { |line| line =~ /<pushStream id='room'\/>|An? .*? fearfully exclaims, "It's an ambush!"|#{Olib::Dictionary.bandit_traps.values.join('|')}/ }
-      echo "detected ambush..." if !last_line.nil? && last_line !~ /pushStream id='room'/
-
-      !last_line.nil? && last_line !~ /pushStream id='room'/
-    end
-
-
-  end
+# a collection for managing all of the creatures in a room
+module Olib
+  class Creatures
+    def Creatures.first
+      all.first
+    end
+
+    def Creatures.all
+      GameObj.npcs
+        .map    { |creature| Creature.new(creature) }
+        .select { |creature| !creature.dead?              }
+        .select { |creature| !creature.ignorable?         }
+        .select { |creature| !creature.tags.include?('animate') }
+        .select { |creature| !creature.gone? } || []
+    end
+
+    def Creatures.each(&block)
+      all.each(&block)
+    end
+
+    def Creatures.[](exp)
+      regexp = exp.class == String ? /#{exp}/ : exp
+
+      filter { |creature| creature.name =~ regexp || creature.id == exp }
+    end
+    
+    def Creatures.filter(&block); 
+      all.select(&block)                                
+    end
+
+    def Creatures.bandits;    filter { |creature| creature.is?('bandit') }    ;end;
+    def Creatures.ignoreable; filter { |creature| creature.is?('ignoreable') };end;
+    def Creatures.flying;     filter { |creature| creature.is?('flying') }    ;end;
+    def Creatures.living;     filter { |creature| creature.is?('living') }    ;end;
+    def Creatures.antimagic;  filter { |creature| creature.is?('antimagic') } ;end;
+    def Creatures.undead;     filter { |creature| creature.is?('undead') }    ;end;
+
+    def Creatures.grimswarm;  filter { |creature| creature.is?('grimswarm') } ;end;
+    def Creatures.invasion;   filter { |creature| creature.is?('invasion')  } ;end;
+    
+    def Creatures.escortees
+      GameObj.npcs
+        .map {|creature| Creature.new(creature) }
+        .select {|creature| creature.is?('escortee') } 
+    end
+
+    def Creatures.stunned;     all.select(&:stunned?)   ;end;
+    def Creatures.active;      all.select(&:active?)    ;end;
+    def Creatures.dead;        all.select(&:dead?)      ;end;
+    def Creatures.prone;       all.select(&:prone?)     ;end;
+    
+    def Creatures.ambushed?
+      last_line = $_SERVERBUFFER_.reverse.find { |line| line =~ /<pushStream id='room'\/>|An? .*? fearfully exclaims, "It's an ambush!"|#{Olib::Dictionary.bandit_traps.values.join('|')}/ }
+      echo "detected ambush..." if !last_line.nil? && last_line !~ /pushStream id='room'/
+
+      !last_line.nil? && last_line !~ /pushStream id='room'/
+    end
+  end
+end
+
+class Creatures < Olib::Creatures
 end

data/lib/Olib/core/container.rb

@@ -1,149 +1,201 @@
-# for defining containers ala lootsack and using them across scripts
-
-require 'Olib/core/extender'
-
-class String
-  def to_class
-    Kernel.const_get self
-  rescue NameError 
-    nil
-  end
-
-  def is_a_defined_class?
-    true if self.to_class
-  rescue NameError
-    false
-  end
-end
-
-module Olib
-  class Container < Gameobj_Extender
-    attr_accessor :ref
-
-    def initialize(id=nil)
-      # extract the class name to attempt to lookup the item by your settings
-      # ex: class Lootsack
-      # ex: class Gemsack
-      name       = if self.class.name.include?("::") then self.class.name.downcase.split('::').last.strip else self.class.name.downcase end 
-      candidates = Olib.Inventory[Vars[name]]
-      raise Olib::Errors::DoesntExist.new("#{name} could not be initialized are you sure you:\n ;var set #{name}=<something>") if candidates.empty? && id.nil?
-
-      @ref = GameObj[id] || candidates.first
-      
-      unless GameObj[@ref.id].contents
-        tops = [
-          'table'
-        ]
-
-        action = tops.include?(@ref.noun) ? "look on ##{@ref.id}" : "look in ##{@ref.id}"
-         
-        fput action
-      end
-      
-      super @ref
-            
-    end
-
-    def contents
-      GameObj[@ref.id].contents.map{ |item| Item.new(item) }
-    end
-
-    def where(conditions)
-      contents.select { |item|
-        !conditions.keys.map { |key|
-          if conditions[key].class == Array
-            item.props[key].class == Array && !conditions[key].map { |ele| item.props[key].include? ele }.include?(false)
-          else
-            item.props[key] == conditions[key]
-          end
-        }.include?(false)
-      }
-    end
-
-    def find_by_tags(*tags)  
-      contents.select { |item|
-        !tags.map {|tag| item.is?(tag) }.include? false
-      }
-    end
-
-
-    def [](query)
-      return contents.select do |item| 
-        item if (item.type =~ query || item.noun =~ query || item.name =~ query)
-      end
-    end
-
-    def 
-
-    def __verbs__
-      @verbs = 'open close analyze inspect weigh'.split(' ').map(&:to_sym)
-      singleton = (class << self; self end)
-      @verbs.each do |verb|
-        singleton.send :define_method, verb do
-          fput "#{verb.to_s} ##{@id}"
-          self
-        end
-      end
-    end
-
-    def gems
-      find_by_tags('gem')
-    end
-
-    def magic_items
-      find_by_tags('magic')
-    end
-
-    def jewelry
-      find_by_tags('jewelry')
-    end
-
-    def skins
-      find_by_tags('skin')
-    end
-
-    def boxes
-      find_by_tags('boxes')
-    end
-
-    def scrolls
-      find_by_tags('scroll')
-    end
-
-    def full?
-      is? 'full'
-    end
-
-    def add(item)
-      result = Olib.do "_drag ##{item.id} ##{@id}", /#{[Olib::Dictionary.put[:success], Olib::Dictionary.put[:failure].values].flatten.join('|')}/
-      tag 'full' if result =~ /won't fit in the/
-      self
-    end
-  end
-
-  class Lootsack < Container
-
-  end
-    
-  def Olib.Lootsack
-    return @@lootsack if @@lootsack
-    @@lootsack = Lootsack.new
-    @@lootsack
-  end
-
-end
-
-module Containers
-  @@containers = {}
-
-  def Containers.define(name)
-    @@containers[name] = Object.const_set(name.capitalize, Class.new(Olib::Container)).new
-    @@containers[name]
-  end
-
-  def Containers.method_missing(name)
-    return @@containers[name] if @@containers[name]
-    return Containers.define(name)
- end
-
+# for defining containers ala lootsack and using them across scripts
+
+require 'Olib/core/extender'
+
+class String
+  def to_class
+    Kernel.const_get self
+  rescue NameError 
+    nil
+  end
+
+  def is_a_defined_class?
+    true if self.to_class
+  rescue NameError
+    false
+  end
+end
+
+module Olib
+  class Container < Gameobj_Extender
+    attr_accessor :ref, :nested, :containers, :ontop
+
+    def initialize(id=nil)
+      # extract the class name to attempt to lookup the item by your settings
+      # ex: class Lootsack
+      # ex: class Gemsack
+      name       = if self.class.name.include?("::") then self.class.name.downcase.split('::').last.strip else self.class.name.downcase end 
+      candidates = Olib.Inventory[Vars[name]]
+      raise Olib::Errors::DoesntExist.new("#{name} could not be initialized are you sure you:\n ;var set #{name}=<something>") if candidates.empty? && id.nil?
+
+      @ref   = GameObj[id] || candidates.first
+      @ontop = Array.new
+      
+      unless GameObj[@ref.id].contents
+        tops = [
+          'table'
+        ]
+
+        action = tops.include?(@ref.noun) ? "look on ##{@ref.id}" : "look in ##{@ref.id}"
+         
+        fput action
+      end
+      
+      super @ref
+            
+    end
+
+    def contents
+      [
+        @ontop,
+        GameObj[@ref.id].contents.map { |item| Item.new(item) }
+      ].flatten
+    end
+
+    def where(conditions)
+      contents.select { |item|
+        !conditions.keys.map { |key|
+          if conditions[key].class == Array
+            item.props[key].class == Array && !conditions[key].map { |ele| item.props[key].include? ele }.include?(false)
+          else
+            item.props[key] == conditions[key]
+          end
+        }.include?(false)
+      }
+    end
+
+    def find_by_tags(*tags)  
+      contents.select { |item|
+        !tags.map {|tag| item.is?(tag) }.include? false
+      }
+    end
+
+
+    def [](query)
+      return contents.select do |item| 
+        item if (item.type =~ query || item.noun =~ query || item.name =~ query)
+      end
+    end
+
+    def 
+
+    def __verbs__
+      @verbs = 'open close analyze inspect weigh'.split(' ').map(&:to_sym)
+      singleton = (class << self; self end)
+      @verbs.each do |verb|
+        singleton.send :define_method, verb do
+          fput "#{verb.to_s} ##{@id}"
+          self
+        end
+      end
+    end
+
+    def at
+      Olib.wrap_stream("look at ##{@id}") { |line|
+        if line =~ /You see nothing unusual|prompt time|You gaze through (.*?) and see...|written/
+          raise Olib::Errors::Mundane
+        end
+
+        if line =~ /Looking at the (.*?), you see (?<nested>.*)/
+          @nested = true
+
+          @containers = line
+            .match(/Looking at the (.*?), you see (?<nested>.*)/)[:nested]
+            .scan(/<a exist="(?<id>.*?)" noun="(?<noun>.*?)">(?<name>.*?)<\/a>/)
+            .map {|matches| Container.new GameObj.new *matches }
+          raise Olib::Errors::Mundane
+        end
+        
+      }
+      self
+    end
+
+    def look
+      self
+    end
+
+    def on
+      return self unless @id
+      Olib.wrap_stream("look on ##{@id}") { |line|
+        raise Olib::Errors::Mundane if line =~ /There is nothing on there|prompt time/
+        if line =~ /On the (.*?) you see/
+          @ontop << line.match(Dictionary.contents)[:items]
+            .scan(Dictionary.tag)
+            .map {|matches| Item.new GameObj.new *matches }
+          raise Olib::Errors::Mundane
+        end
+        next
+      }
+      self
+    end
+
+    def in
+      fput "look in ##{@id}"
+      self
+    end
+
+    def nested?
+      @nested
+    end
+
+    def gems
+      find_by_tags('gem')
+    end
+
+    def magic_items
+      find_by_tags('magic')
+    end
+
+    def jewelry
+      find_by_tags('jewelry')
+    end
+
+    def skins
+      find_by_tags('skin')
+    end
+
+    def boxes
+      find_by_tags('boxes')
+    end
+
+    def scrolls
+      find_by_tags('scroll')
+    end
+
+    def full?
+      is? 'full'
+    end
+
+    def add(item)
+      result = Olib.do "_drag ##{item.id} ##{@id}", /#{[Olib::Dictionary.put[:success], Olib::Dictionary.put[:failure].values].flatten.join('|')}/
+      tag 'full' if result =~ /won't fit in the/
+      self
+    end
+  end
+
+  class Lootsack < Container
+
+  end
+    
+  def Olib.Lootsack
+    return @@lootsack if @@lootsack
+    @@lootsack = Lootsack.new
+    @@lootsack
+  end
+
+end
+
+module Containers
+  @@containers = {}
+
+  def Containers.define(name)
+    @@containers[name] = Object.const_set(name.capitalize, Class.new(Olib::Container)).new
+    @@containers[name]
+  end
+
+  def Containers.method_missing(name)
+    return @@containers[name] if @@containers[name]
+    return Containers.define(name)
+ end
+
 end