agri-controller 0.0.0 → 0.0.8

data/lib/agri-controller/bcc.rb

@@ -1,53 +1,86 @@
-module AgriController
-  module Bcc
-  module_function
-    def _xor(x,y)
-      x1=Bit.new(x.ord)
-      y1=Bit.new(y.ord)
-    #p x1.tos(8,2)
-    #p y1.tos(8,2)
-      (0..7).each do |i|
-    x1.boolbit(!(((x1.on?(i) && y1.on?(i))or x1.off?(i) && y1.off?(i))),i)
-    end
-    #p ret=x1.tos(8,2)
-
-    x1.bit
-
-    end
-
-    #xor check SUM
-    def bcc(str)
-    x=str[0]
-    (str.size-1).times do |i|
-    x=_xor(x,str[i+1])
-    end
-    #p x
-    ret=Bit.new(x).tos(2,16).upcase
-    end
-  end
-def bcc?(str,bcc_char=nil)
-  str2=str.chomp.upcase
-  unless bcc_char && str2.size>2
-    bcc_char=str2[-2..-1]
-    str2=str2[0..-3]
-  else
-    bcc_char=bcc_char.chomp.upcase
-  end
-    bcc_char==bcc(str2)
-end
-end
-
-if $0==__FILE__
-require "bit"
-
-str="%01#RCSX0000"
-include AgriController
-AgriController::Bcc::bcc(str)
-str1="%01#RCSX0000"+"1d\r"
-str2="%01#RCSX0000"
-p Bcc::bcc?(str1)==true
-p Bcc::bcc?(str2,"1D")==true
-p Bcc::bcc?(str2,"1d\r")==true
-
-
-end
+module AgriController
+  ##
+  #module Bcc is simple bcc check SUM
+  #
+  #=== example
+  #
+  # require "rubygems"
+  # require "agri-controller"
+  # include AgriController
+  # 
+  # Bcc::bcc(str) # =>Bcc_String
+  # Bcc::bcc("%01#RCSX0000")         # => "1d"
+  #
+  # Bcc::bcc?("%01#RCSX00001d\r")    # => true
+  # Bcc::bcc?("%01#RCSX0000FF\r")    # => false
+  # Bcc::bcc?("%01#RCSX0000","1d\r") # => true
+  # Bcc::bcc?("%01#RCSX0000","1d")   # => true
+  # Bcc::bcc?("error_str","error")   # => nil
+  module Bcc
+  module_function
+    #_xor(6,2) # =>4
+    def _xor(x,y)
+      x.ord ^ y.ord
+    end
+    
+    #xor check SUM
+    def bcc(str)
+      x=str[0]
+      (str.size-1).times do |i|
+        x=x.ord ^ str[i+1].ord
+      end
+      #p x
+      res=x.to_s(16).upcase
+      res="0"+res if res.size==1
+      p res
+      return res
+    end
+    
+    ## 
+    #Bcc::bcc?
+    #
+    #=== example
+    #
+    # require "agri-controller"
+    # include AgriController
+    #
+    #     str1="%01#RCSX0000"+"1d\r"
+    #  bad_bcc="%01#RCSX0000"+"00\r"
+    #     str2="%01#RCSX0000"
+    #  Bcc::bcc?(str1)       # =>true
+    #  Bcc::bcc?(bad_bcc)    # =>false
+    #  Bcc::bcc?(str2,"1D")  # =>true
+    #  Bcc::bcc?(str2,"1d\r")# =>true
+    def bcc?(str,bcc_char=nil)
+      #on Error returns nil...
+      begin
+        str2=str.chomp.upcase
+        unless bcc_char && str2.size>2
+          bcc_char=str2[-2..-1]
+          str2=str2[0..-3]
+        else
+          bcc_char=bcc_char.chomp.upcase
+        end
+          return bcc_char==bcc(str2)
+      rescue
+        return nil
+      end
+    end
+  end
+end
+
+if $0==__FILE__
+require "bit"
+require "profile"
+str="%01#RCSX0000"
+include AgriController
+p AgriController::Bcc::bcc(str)
+str1="%01#RCSX0000"+"1d\r"
+str2="%01#RCSX0000"
+p Bcc::bcc?(str1)==true
+p Bcc::bcc?(str2,"1D")==true
+p Bcc::bcc?(str2,"1d\r")==true
+1000.times do
+Bcc::_xor(rand(256),rand(256))
+end
+end

data/lib/agri-controller/bit.rb

@@ -1,143 +1,158 @@
-##
-#class Bit
-#          is simple bit culcurater.
-#  if on or off
-#        on(bit) # => on bit
-#        on(1)   # =>2 (if @bit==0)
-#        on(1)   # =>3 (if @bit==1)
-#        on(1)   # =>7 (if @bit==5)
-#    bit_on(bit) # => on bit
-#
-#        off(1)  # =>0 (if @bit==2)
-#        off(1)  # =>1 (if @bit==3)
-#        off(1)  # =>5 (if @bit==7)
-#    bit_off(bit)# => off bit
-#
-#  if check_bit
-#     on?(bit)# =>true or false
-#    off?(bit)# =>true or false
-#
-#  boolbit(true,bit) # ==on(bit)
-#  boolbit(false,bit)# ==off(bit)
-module AgriController
-  class Bit
-  attr_accessor:bit
-    def initialize(bit=0)
-      @bit=bit
-    end
-    
-    def boolbit(bool,bit)
-      if bool
-        bit_on(bit)
-      else
-        bit_off(bit)
-      end
-    end
-    
-    def bit_on(bit)
-      unless on?(bit)
-        @bit+= 2**bit
-      end
-      @bit
-    end
-    
-    def tos(int=6,bit_num=16)
-      x=@bit.to_s(bit_num)
-      (int-x.size).times do
-        x="0"+x
-      end
-      return x.upcase
-    end
-    
-    def bit_off(bit)
-      if on?(bit)
-        @bit=@bit - 2**bit
-      end
-      @bit
-    end
-    
-    def on?(bit)
-      str=tos(24,2)
-        case str.slice(-1-bit,1)
-        when "1"
-          true
-        when "0"
-          false
-        else
-          nil
-        end
-    end
-    def off?(bit)
-      not(on?(bit))
-    end
-    def help
-  "##
-  #class Bit
-  #          is simple bit culcurater.
-  #  if on or off
-  #        on(bit) # => on bit
-  #        on(1)   # =>2 (if @bit==0)
-  #        on(1)   # =>3 (if @bit==1)
-  #        on(1)   # =>7 (if @bit==5)
-  #    bit_on(bit) # => on bit
-  #
-  #        off(1)  # =>0 (if @bit==2)
-  #        off(1)  # =>1 (if @bit==3)
-  #        off(1)  # =>5 (if @bit==7)
-  #    bit_off(bit)# => off bit
-  #
-  #  if check_bit
-  #     on?(bit)# =>true or false
-  #    off?(bit)# =>true or false
-  #
-  #  boolbit(true,bit) # ==on(bit)
-  #  boolbit(false,bit)# ==off(bit)
-  #
-  "
-   end
-   alias on bit_on
-   alias off bit_off
-  end
-end
-if $0==__FILE__
-#require "profile"
-#Test of class Bit
-a=AgriController::Bit.new
-p a
-a.bit_on(1)
-a.bit_on(0)
-a.bit_on(23)
-
-1000.times do
-a.bit_on(1)
-end
-a.bit_on(3)
-a.bit_off(1)
-a.bit_off(1)
-p x=a.bit
-p x.to_s(16)
-a.bit_off(4)
-p x.to_s(2)
-p a.off?(3)
-p a.off?(2)
-p a.off?(1)
-p a.off?(0)
-p a.on?(3)
-p a.on?(2)
-p a.on?(1)
-p a.on?(0)
-p a
-p b=AgriController::Bit.new(11)
-p b.bit.to_s(2)
-print b.help
-c=AgriController::Bit.new(8388621)
-p c
-p c.tos
-p c.boolbit(true,4)
-p c.tos
-p c.boolbit(false,4)
-p c.tos
-p c.on(4)
-p c.bit
-
-end
+##
+#class Bit
+#          is simple bit culcurater.
+#  if on or off
+#        on(bit) # => on bit
+#        on(1)   # =>2 (if @bit==0)
+#        on(1)   # =>3 (if @bit==1)
+#        on(1)   # =>7 (if @bit==5)
+#    bit_on(bit) # => on bit
+#
+#        off(1)  # =>0 (if @bit==2)
+#        off(1)  # =>1 (if @bit==3)
+#        off(1)  # =>5 (if @bit==7)
+#    bit_off(bit)# => off bit
+#
+#  if check_bit
+#     on?(bit)# =>true or false
+#    off?(bit)# =>true or false
+#
+#  boolbit(true,bit) # ==on(bit)
+#  boolbit(false,bit)# ==off(bit)
+#
+#  blink(bit) #=> !bit   (change true<=>false)
+module AgriController
+  class Bit
+  attr_accessor:bit
+    def initialize(bit=0)
+      @bit=bit
+    end
+    
+    def boolbit(bool,bit)
+      if bool
+        bit_on(bit)
+      else
+        bit_off(bit)
+      end
+    end
+    
+    def blink(i)
+      boolbit(!on?(i),i)
+    end
+    
+    def bit_on(bit)
+      unless on?(bit)
+        @bit+= 2**bit
+      end
+      @bit
+    end
+    
+    def tos(int=6,bit_num=16)
+      x=@bit.to_s(bit_num)
+      
+      # 17.tos(1,16) # => "1"
+      # 17.tos(2,16) # => "11"
+      (int-x.size).times do
+        x="0"+x
+      end
+      
+      if x.size > int
+        x=x.slice(x.size-int,int)
+      end
+      
+      return x.upcase
+    end
+    
+    def bit_off(bit)
+      if on?(bit)
+        @bit=@bit - 2**bit
+      end
+      @bit
+    end
+    
+    def on?(bit)
+      str=tos(24,2)
+        case str.slice(-1-bit,1)
+        when "1"
+          true
+        when "0"
+          false
+        else
+          nil
+        end
+    end
+    def off?(bit)
+      not(on?(bit))
+    end
+    def help
+  "##
+  #class Bit
+  #          is simple bit culcurater.
+  #  if on or off
+  #        on(bit) # => on bit
+  #        on(1)   # =>2 (if @bit==0)
+  #        on(1)   # =>3 (if @bit==1)
+  #        on(1)   # =>7 (if @bit==5)
+  #    bit_on(bit) # => on bit
+  #
+  #        off(1)  # =>0 (if @bit==2)
+  #        off(1)  # =>1 (if @bit==3)
+  #        off(1)  # =>5 (if @bit==7)
+  #    bit_off(bit)# => off bit
+  #
+  #  if check_bit
+  #     on?(bit)# =>true or false
+  #    off?(bit)# =>true or false
+  #
+  #  boolbit(true,bit) # ==on(bit)
+  #  boolbit(false,bit)# ==off(bit)
+  #
+  "
+   end
+   alias on bit_on
+   alias off bit_off
+  end
+end
+if $0==__FILE__
+#require "profile"
+#Test of class Bit
+a=AgriController::Bit.new
+p a
+a.bit_on(1)
+a.bit_on(0)
+a.bit_on(23)
+
+1000.times do
+a.bit_on(1)
+end
+a.bit_on(3)
+a.bit_off(1)
+a.bit_off(1)
+p x=a.bit
+p x.to_s(16)
+a.bit_off(4)
+p x.to_s(2)
+p a.off?(3)
+p a.off?(2)
+p a.off?(1)
+p a.off?(0)
+p a.on?(3)
+p a.on?(2)
+p a.on?(1)
+p a.on?(0)
+p a
+p b=AgriController::Bit.new(11)
+p b.bit.to_s(2)
+print b.help
+c=AgriController::Bit.new(8388621)
+p c
+p c.tos
+p c.boolbit(true,4)
+p c.tos
+p c.boolbit(false,4)
+p c.tos
+p c.on(4)
+p c.bit
+p c.blink(24)
+p c.blink(24)
+end

data/lib/agri-controller/device.rb

@@ -0,0 +1,7 @@
+#!ruby
+#coding:utf-8
+$KCODE="u" if RUBY_VERSION < "1.9.0"
+
+Dir.glob(File.dirname(__FILE__)+"/device/*.rb").each do |file|
+    require file 
+end

data/lib/agri-controller/device/dacs.rb

@@ -0,0 +1,148 @@
+#require "serial"
+#require "Win32API" #for windows.
+
+module AgriController
+  module_function
+  ##
+  #use Dacs_32bit_I/O_photoMOS_reray on usb_serial_port (win,linux compatible)
+  #*Usage
+  #  requrie "agri-controll"
+  #  include AgriController
+  #  include Dacs # also use Dacs::
+  #
+  #==Windows
+  #export is a simple IO_command send(set),and recieve(import)
+  #search com_port(3-19) and communicate
+  #export("ffffff")# =>"R0FFFFFF&"
+  #
+  #com_port number recommended
+  #com_port=6                   #(see system infomation)
+  #  export("ffffff",com_port,0)#return =>"R0FFFFFF&"
+  #  export("000000",com_port,0)#return =>"R0FFFFFF&"
+  #  export("R",com_port,1)     #return =>"R883DFFF&"
+  #  export("R",com_port)       #return =>"R0FFFFFF&"
+  #
+  #hex_6
+  #ex.          # =>"FBD017","ffffff"
+  #recieve only.# =>"R"
+  #
+  ############################################################
+  #==Linux
+  #  include dacs
+  #  export("W0FFFFFF\r","ttyUsb0") 
+  #  import("R0R\r")
+  #
+  module Dacs
+    module_function
+
+    if RUBY_PLATFORM.include?("mswin")
+      def export(hex_6,com_port=port?,io_port=0,dip=0)
+        #hex_6
+        #ex.          # =>"FBD017","ffffff"
+        #recieve only.# =>"R"
+
+        case io_port
+        #io_port must be io_port*8+dip_switch(on board)
+        when 1
+          io_port=8*io_port+dip#2nd word
+        else#io_port should be 0
+          io_port=dip#2nd word
+        end
+        a=Serial.new
+          #search COM port 3-9
+          if a.open(com_port,0,57600,8,0,0,4096,4096)!=-1
+            command="W#{(io_port).to_s}#{hex_6}\r"
+            
+            yield command if block_given?
+            #p command
+            a.send(command)
+            sleep 0.04
+            receive=a.receive
+            a.close
+            return receive
+          else
+            return false
+          end
+        nil
+      end
+        
+      ##
+      #search ports COM3-19
+      #if sucsess return int(port number)
+      #else return nil.
+      def port?(x=3)
+        a=Serial.new
+          #search COM port 3-19
+          bool=false#serch flag
+          
+          while bool==false
+            x+=1
+            if x > 20
+              return nil
+            end
+
+            if a.open(x,0,57600,8,0,0,108,324) == -1
+              if x > 20
+                return nil
+              end
+            else
+              a.send("W0R\r")
+              sleep 0.1
+              receive=a.receive#should_be "R0xxxxxx\r",x=hex
+              #p receive.split(//).last
+              #p x
+              #p receive
+              if receive
+                if receive.split(//).last=="\r"
+                  if receive.split(//).first=="R"
+                    bool=true
+                  end
+                end
+              end
+              a.close
+            end
+          end
+
+        return x
+      end
+      
+      def import(com_port=port?,io_port=0,dip=0)
+        export("R",com_port,io_port,dip)
+      end
+      
+      def import_bit(com_port=port?,io_port=0,dip=0)
+        
+        port_bit=import(com_port=port?,io_port,dip)
+        if port_bit
+          import_bits=port_bit.slice(2,6).to_i(16)
+        else
+          import_bits=0
+        end
+        return import_bits
+      end
+    else#should be Linux
+      def export(command,device) 
+      end
+    end
+    
+    def toi(res)
+      begin
+        bit=res.slice(2,6).to_i(16)
+        return bit
+      rescue
+        nil
+      end
+    end
+    
+    def sample
+      "W0FFFFFF\r"
+    end
+  end
+end
+
+if $0==__FILE__
+  include AgriController::Dacs
+  p port?
+p x=export("FFFFFF",5)
+#p x.to_s(16)
+end