luikore-cici 0.0.9 → 0.1.1

data/README.rdoc

@@ -1,4 +1,4 @@
-= Cici
+= cici
 
 Mini Ruby text-based traditional GUI lib for Windows. (project just started)
 
@@ -6,13 +6,22 @@ No other prepared libraries needed, that is -- No Qt, Gtk, Mfc ...
 
 Light and small with nice efficiency. 
 
-== Download
+== download
 
-Cici is packed with this ruby1.9.1.zip
+require:
+Ruby-1.9.1-mswin32-90 || Ruby-1.9.1-mingw32
 
+Either can be obtained at:
 http://github.com/LuiKore/Cici/downloads
 
-== Example
+then: (mswin32-90 binary)
+  gem install luikore-cici
+
+or build from source ~ ~
+
+Currently the mingw32 version does not support images.
+
+== example
 
   require 'cici'
   include Cici::View
@@ -22,13 +31,13 @@ http://github.com/LuiKore/Cici/downloads
 
 Find more in examples folder.
 
-== Document
+== document
 
 http://wiki.github.com/LuiKore/Cici
 
-== License (MIT)
+== license (MIT)
 
-Copyright (c) 2009 Lui Kore
+Copyright (c) 2009 luikore
     
 Permission is hereby granted, free of charge, to any person obtaining a copy
 of this software and associated documentation files (the "Software"), to
@@ -47,7 +56,7 @@ THE AUTHORS 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.
 
-== My blog (中文)
+== my blog (中文)
 
 http://night-stalker.javaeye.com
 

data/examples/button.rb

@@ -0,0 +1,11 @@
+require 'cici.rb'
+include Cici::View
+
+view [300, 80] do
+  @cb = checkbox
+  text 'checkbox'
+
+  button 'see if checked' do
+    alert "checked = #{@cb.checked ? 'true' : 'false'}"
+  end
+end

data/examples/calculator.rb

@@ -0,0 +1,43 @@
+require 'cici.rb'
+include Cici::View
+
+def calculate txt 
+  (eval txt).to_s
+rescue Exception => ex
+  ex.message
+end
+
+def calc_button x
+  b = button x
+  b.onclick = proc do |this|
+	@edt.text = @edt.text + x
+	@edt.focus
+  end
+  b
+end
+
+view [200, 200] do
+  paint [200, 90] do
+    (0..9).each do |i|
+	  br if (i == 4 or i == 8)
+      num = i.to_s
+      calc_button num
+    end
+	button 'C' do
+	  @edt.text = ''
+	end
+  end
+  br
+  paint [200, 30] do
+    %w[+ - * /].each do |op|
+      calc_button op
+    end
+	button('=').onclick = proc do |this|
+	  @edt.text = calculate @edt.text
+	  @edt.focus
+	end
+  end
+  br
+  @edt = edit [180, 20]
+end
+

data/examples/cici.rb

@@ -0,0 +1 @@
+require File.dirname(__FILE__) + "/../lib/cici.rb"

data/examples/common_dialogs.rb

@@ -0,0 +1,23 @@
+require 'cici'
+include Cici::View
+
+view [200, 100] do
+  button 'choose file' do
+    f = choose_file 'all'=>'*.*', 'ruby'=>'*.rb'
+    alert(f || 'nil')
+  end
+  button 'save file' do
+    f = save_file 'all'=>'*.*', 'ruby'=>'*.rb'
+    alert(f || 'nil')
+  end
+  br
+  button 'choose font' do
+    f = choose_font
+    alert(f || 'nil')
+  end
+  button 'choose color' do
+    c = choose_color
+    alert(c || 'nil')
+  end
+  br
+end

data/examples/destroy.rb

@@ -0,0 +1,17 @@
+require 'cici.rb'
+include Cici::View
+
+view [300, 300] do
+  @p = paint [40, 30] do |p|
+    p.bkcolor = RGB[100,100,100]
+
+    paint [10, 10] do
+    end
+  end
+
+  @b = button 'destroy' do
+    @p.destroy
+    @b.onclick = nil
+  end
+end
+

data/examples/flow.rb

@@ -0,0 +1,23 @@
+require 'cici'
+include Cici::View
+
+view [300, 200], layout: :flow, title: 'flow layout' do |v|
+  v.flow_width = 200
+  [80, 100, 80, 300].each do |i|
+    e = edit [i, 20]
+    e
+  end
+
+  @change_flow_width = proc do
+    t = @e.text
+    if t.respond_to? :to_i
+      v.flow_width = t.to_i
+    else
+      alert 'flow width not valid'
+    end
+  end    
+  button 'change flow width:', &@change_flow_width
+  @e = edit [80, 20]
+  @e.text = v.flow_width.toString
+  @e.onenter = @change_flow_width
+end

data/examples/hello world.rb

@@ -0,0 +1,7 @@
+require 'cici'
+include Cici::View
+view [100, 80] do
+  button 'hello' do
+   	alert 'world'
+  end
+end

data/examples/img.rb

@@ -0,0 +1,11 @@
+require 'cici.rb'
+include Cici::View
+
+view [600, 400], :title => 'img' do |v|
+  image 'collective intelligence.png'
+  @neko = image 'quantummi7.jpg', [50, 100]
+  br
+  button 'make full size of neko shojo' do
+	@neko.size = nil
+  end
+end

data/examples/key.rb

@@ -0,0 +1,9 @@
+require 'cici'
+include Cici::View
+
+view [100, 100] do
+  text 'press ctrl+A'
+  keymap 'A', :ctrl do
+    alert 'hi'
+  end
+end

data/examples/list.rb

@@ -0,0 +1,19 @@
+require 'cici'
+include Cici::View
+
+view [300,300] do |v|
+  v.marginx = 5
+  br 10
+
+  text 'listbox:'
+  br
+  @l = listbox [200, 130]
+  @l.onchange = proc{ |l| @d.cur_select = l.cur_select }
+  @l.items = (1..9).map{ |e| "listbox item #{e}"}
+  br 10
+
+  text 'droplist:'
+  br
+  @d = droplist
+  @d.items = (1..9).map{ |e| "combobox item #{e}"}
+end

data/examples/menu.rb

@@ -0,0 +1,17 @@
+require 'cici.rb'
+include Cici::View
+
+@cost = proc{|money, this| alert "cost #{money}"}.curry
+
+view [200, 100] do |v|
+  v.menu '&bread' => @cost[0.2],
+    'soup'   => {
+      'salty'   => @cost[0.1],  
+      'line'    => nil,
+      'sw&eety' => @cost[0.1]
+    }
+
+  @t = text 'r-click to popup menu'
+  @t.menu 'exit' => proc{ exit }
+end
+

data/examples/mk

@@ -0,0 +1,2 @@
+cd ../src
+mk

data/examples/mk.bat

@@ -0,0 +1,2 @@
+cd ..\src
+mk

data/examples/position.rb

@@ -0,0 +1,15 @@
+require 'cici.rb'
+include Cici::View
+
+view [500,500] do |v|
+  b = button 'move(relative to parent)' do |this|
+    this.pos = [nil, 80]
+    puts this.pos
+  end
+  br
+  button 'move(absolute position)' do |this|
+    this.absolute_pos = [320, 320]
+    puts this.absolute_pos
+  end
+end
+

data/examples/regexp_test.rb

@@ -0,0 +1,73 @@
+require 'cici.rb'
+include Cici::View
+
+Cici::Config << {
+  :default_font => Font['Courier New', 12, '', 0],
+}
+
+@check_reg = proc do
+  begin
+    re = Regexp.new @reg.text
+    match = (re =~ @txt.text)
+    @result.text = (match ? match.to_s : 'nil')
+    @globals.each_with_index do |g, i|
+      g.text = (eval "$#{i+1}") || 'nil'
+    end
+  rescue Exception => ex
+    @result.text = ex.message
+    @globals.each do |g|
+      g.text = 'nil'
+    end
+  end
+end
+
+view [890, 245], :title => 'Regular Expression Test' do |v|
+  v.bkcolor = RGB[0xaabbff]
+  v.marginx = 8
+  br 10
+
+  sz1 = [780, 20]
+
+  text 'regexp:/'
+  @reg = edit sz1
+  @reg.ontab = proc { @txt.focus; @check_reg[] }
+  text '/'
+  br
+
+  text 'string: '
+  @txt = edit sz1
+  @txt.ontab = proc { @reg.focus; @check_reg[] }
+  br
+
+  text 'result: '
+  @result = edit sz1
+  br 10
+
+  paint [780, 115] do
+    @globals = (1..9).map do |i|
+      text " $#{i}", Font['Monaco', 12]
+      e = edit [210, 20]
+      br if (i==3 or i==6)
+      e
+    end
+  end
+
+  paint [60, 115] do
+    sz = [60, 22]
+    button('match', sz).onclick = @check_reg
+    br 8
+
+    button('copy', sz).onclick  = proc do
+      @reg.copy
+      alert "\"#{@reg.text}\" copied."
+    end
+    br 8
+
+    button('escape', sz).onclick = proc do
+      @reg.text = Regexp.escape @reg.text
+    end
+  end
+
+  @reg.focus
+end
+

data/examples/scintilla.rb

@@ -0,0 +1,27 @@
+# Coding: utf-8
+require 'cici'
+include Cici::View
+
+SysMenu = {
+  '&File' => {
+    '&Open' => proc{ (fn = choose_file 'ruby file'=>'*.rb', 'all'=>'*.*') and (@s.text = File.read(fn).encode 'utf-8') },
+    '&Save' => proc{ puts 'ss'; (fn = save_file) and File.open(fn,'w'){ |f| f << @s.text } },
+    'E&xit' => proc{ exit },
+  }
+}
+
+cx = 800
+cy = 600
+view [cx, cy], title: 'Scintilla', layout: :zoom do |v|
+  v.menu SysMenu
+  @s = scintilla [cx - 8, cy - 46]
+  @s.style_set_default_font Font['Monaco',9]
+  @s.line_margin = 1 # show line number
+  @s.fold_margin = 2
+  @s.text        = File.read(__FILE__).encode 'utf-8' # read in self
+  @s.indent      = 2 # auto indent 2 chars when needed
+  @s.onstyle = proc do |sci, startp, endp|
+    puts startp, endp
+    sci.set_styling endp - startp, 1
+  end
+end

data/examples/style.rb

@@ -0,0 +1,33 @@
+# coding: utf-8
+require 'cici'
+include Cici::View
+
+view [400, 400] do |v|
+  v.bkcolor = RGB[0xffff66]
+  v.marginx = 5
+
+  text 'Arial', Font['Arial', 22 ,'si']
+  br
+
+  @t1 = text 'Courier New', Font['Courier New', 18, 'u']
+  @t1.color = RGB[18, 128, 0]
+  br
+
+  text 'AvQest', Font['AvQest', 33]
+  br
+
+  @t2 = text '黑体', Font['黑体', 22 ,'b', Cici::GB2312_CHARSET]
+  @t2.color = RGB[0xff3300]
+  br
+
+  b = button '宋体'
+  b.font_size = 15
+  b.size = [80, 20]
+  br
+
+  paint [250, 80] do |c|
+    c.bkcolor = RGB[0x99ccff]
+    c.border_stroke = Stroke[RGB[0x00cc00], dot:2]
+    c.border_radius = 5
+  end
+end

data/examples/tab.rb

@@ -0,0 +1,21 @@
+require 'cici'
+include Cici::View
+
+view [200, 250] do
+  @t = paint [170, 170], :layout => :tab do
+  end
+
+  @t['one'] = paint [170, 170] do
+    button 'one inside'
+  end
+
+  @t['two'] = paint [170, 170] do
+    button 'two inside'
+  end
+
+  @t['three'] = paint [170, 170] do
+    button 'three inside'
+  end
+
+  @t.tab_index = 0
+end

data/examples/timer.rb

@@ -0,0 +1,64 @@
+require 'cici.rb'
+include Cici::View
+
+module Second
+  attr_writer :carry_target
+
+  def incr
+    txt = self.text.succ
+    if txt == '60.0'
+      self.text = '0.0'
+      @carry_target.text = @carry_target.text.succ
+    else
+      self.text = txt
+    end
+  end
+
+  def stop
+    (self.kill_timer @tid) if @tid
+  end
+
+  def start
+    @tid = self.set_timer 95 do |ds|
+      ds.incr
+    end
+  end
+end
+
+# time text
+def ttext txt
+  text txt, Font['Arial', 14]
+end
+
+view [230, 63], :title => 'Timer' do |box|
+  br
+  box.bkcolor = 0x88ffff
+
+  @min = ttext '0'
+  ttext 'min'
+
+  @sec = ttext '0.0'
+  @sec.__send__ :extend, Second
+  @sec.carry_target = @min
+  ttext 'sec'
+
+  @start = ->this {
+    @sec.start
+    this.text = 'pause'
+    this.onclick = @pause
+  }
+
+  @pause = ->this {
+    @sec.stop
+    this.text = 'start'
+    this.onclick = @start
+  }
+
+  @spbutton = button 'start', &@start # start button
+
+  button 'reset' do
+    @pause[@spbutton]
+    @sec.text = '0.0'
+    @min.text = '0'
+  end
+end

data/lib/cici/canvas.rb

@@ -1,6 +1,7 @@
 # Coding: utf-8
 module Cici
   class Canvas
+
     # downing: the biggest bottom position of current elements
     # padding: space between horizontal elements
     attr_reader :padding, :downing, :turtlex, :turtley, :children
@@ -17,10 +18,19 @@ module Cici
       end.join ','
     end
 
+    def destroy
+      @children.each{ |c| c.destroy }
+      @children = nil
+      _destroy # call build in delete
+    end
+
+
     # ----------------------------------------------------------------
     # fixed layout
     module Fixed
+
       private
+
       def onresize
       end
 
@@ -37,17 +47,21 @@ module Cici
       end
 
       public
+
       def br space = 5 
         @turtlex = @marginx
         @turtley += (@downing + space)
         @downing = 0
       end
+
     end
 
     # ----------------------------------------------------------------
     # flow layout
     module Flow
+      
       private
+
       def onresize
       end
 
@@ -61,7 +75,7 @@ module Cici
         to_append = @children.dup
         @children = []
         to_append.each do |c|
-          self.append c, *c.size
+          onappend c, *c.size
         end
         # self.invalidate_rect # FIXME doesn't work...
       end
@@ -89,20 +103,23 @@ module Cici
       end
 
       public
+
       def flow_width= fw
         @flow_width = fw.to_i
-        self.onchildresize nil
+        onchildresize nil
         fw
       end
 
       attr_reader :flow_width
+
     end # module Flow
 
     # ----------------------------------------------------------------
-    # zoom layout
+    # zoom layout FIXME when removing child ?
     module Zoom
-      # FIXME when removing child ?
+
       private
+
       def onresize
         if @percents
           @turtlex = @marginx
@@ -114,7 +131,7 @@ module Cici
           szx, szy = self.size
           to_append.each_with_index do |c, i|
             px, py = stored_percents[i]
-            self.append c, px*szx, py*szy
+            onappend c, px*szx, py*szy
           end
         else
           @percents = []
@@ -137,17 +154,21 @@ module Cici
       end
 
       public
+
       def br space = 5 
         @turtlex = @marginx
         @turtley += (@downing + space)
         @downing = 0
-      end      
+      end
+
     end
 
     # ----------------------------------------------------------------
     # tab layout (or say, navigate / tabbook layout)
     module Tab
+
       private
+
       def check_index idx
         raise "index #{idx} out of range" if @pages.empty? or (not ((0...(@pages.size)).include? idx))
       end
@@ -180,7 +201,9 @@ module Cici
       end
 
       public
+
       attr_reader :tab_index, :pages, :labels
+
       def tab_index= idx
         check_index idx
         if idx != @tab_index
@@ -201,7 +224,42 @@ module Cici
         page.pos = [0, 22]
         @tab_index = @pages.size - 1
       end
+
     end
 
   end # class Canvas
 end
+
+module Cici
+  module View
+
+    # new canvas
+    def paint sz, opts = {}, &block
+      mod = {
+        flow: Canvas::Flow,
+        zoom: Canvas::Zoom,
+        tab:  Canvas::Tab
+      }[opts[:layout]]
+      mod ||= Canvas::Fixed  # default
+      Canvas.paint nil, sz[0], sz[1], mod, &block
+    end
+
+    # main
+    def view sz = nil, opts = {}, &block
+      Config[:external_font_paths].each do |p|
+        Cici.load_external_font p
+      end
+      raise 'Config[:default_font] should be a Font' unless Config[:default_font].is_a? Cici::FontClass
+      Cici.set_default_font Config[:default_font]
+
+      Cici.app (opts[:title] || 'Cici') do
+        paint sz, opts, &block
+      end
+    end
+
+    def br space = 5
+      Canvas.current.br space
+    end
+
+  end
+end

data/lib/cici/countlines.rb

@@ -1,8 +1,6 @@
 # Coding: utf-8
 sz = 0
-(Dir.new('.').entries - ['.','..']).each do |f|
-  if (f =~ /\.rb$/)
-    File.read(f).scan(/\n/){sz+=1} rescue 'do nothing'
-  end
+Dir.glob('./*.rb').each do |f|
+  File.read(f).scan(/\n/){sz+=1} rescue 'do nothing'
 end
 puts sz

data/lib/cici/dlg.rb

@@ -0,0 +1,24 @@
+# coding: utf-8
+module Cici
+  module View
+    def choose_file filter = nil
+      arg = "All (*.*)\0*.*\0"
+      if filter.is_a? Hash
+        arg = filter.map do |(k, v)|
+          "#{k} (#{v})\0#{v}\0"
+        end.join
+      end
+      Cici.choose_file "#{arg}\0"
+    end
+
+    def save_file filter = nil
+      arg = "All (*.*)\0*.*\0"
+      if filter.is_a? Hash
+        arg = filter.map do |(k, v)|
+          "#{k} (#{v})\0#{v}\0"
+        end.join
+      end
+      Cici.save_file "#{arg}\0"
+    end
+  end
+end

data/lib/cici/element.rb

@@ -0,0 +1,48 @@
+# Coding: utf-8
+module Cici
+  class ElementBase
+    def parent= p
+      @parent.children.delete self
+      self._parent = p
+      @parent = p
+      p.children << self
+    end
+    attr_reader :parent
+  end
+end
+
+module Cici
+  module View
+    def button txt, sz=nil, &block
+      b = Button.create nil, txt.toString, 0
+      b.onclick = block if block
+      b.size = sz if sz.is_a? Array
+      b
+    end
+
+    # BS_AUTOCHECKBOX
+    def checkbox &block
+      b = Button.create nil, '', 3
+      b.onclick = block if block
+      b
+    end
+
+    def text txt, font = nil
+      font = nil unless font.is_a? FontClass
+      Text.create nil, txt.toString, font
+    end
+
+    def image path, sz = nil
+      x, y = nil, nil
+      if sz.is_a? Array
+        x, y = *sz
+      end
+      Image.create nil, path, x, y
+    end
+
+    def edit sz = nil
+      sz = [200, 28] unless (sz.is_a? Array)
+      Edit.create nil, sz[0], sz[1], nil
+    end
+  end
+end

data/lib/cici/keymap.rb

@@ -0,0 +1,23 @@
+# coding: utf-8
+module Cici
+  module View
+    def keymap char, *mods, &block
+      modnum = 0
+      mods.each do |mod|
+        modnum |= 1 if mod == :shift
+        modnum |= 2 if mod == :ctrl
+        modnum |= 4 if mod == :alt
+      end
+      charnum = nil
+      if char.is_a? Fixnum
+        charnum = char.to_i
+      else
+        charnum = Cici::KEYMAP[char]
+        charnum ||= char.upcase.ord
+      end
+      raise 'char not valid' unless charnum
+      Cici.register_key charnum, modnum, block
+    end
+  end
+end
+

data/lib/cici/list.rb

@@ -20,3 +20,16 @@ module Cici
     include ListBase
   end
 end
+
+module Cici
+  module View
+    def listbox sz
+      ListBox.create(nil, sz[0].to_i, sz[1].to_i)
+    end
+
+    def droplist sz = nil
+      sz = [200, 28] unless (sz.is_a? Array)
+      DropList.create(nil, sz[0].to_i, sz[1].to_i)
+    end
+  end
+end

data/lib/cici/{misc.rb → menu.rb}

@@ -6,7 +6,7 @@ module Cici
       hash.each do |key, val| # key.toString called in C
         sz = self.size
         if val.is_a? Proc
-          self.insert sz, key, val
+          self.insert_item sz, key, val
         elsif val.is_a? Hash
           self.insert_menu sz, key, Menu.popup(@parent).build(val)
         elsif val.nil?
@@ -31,3 +31,11 @@ module Cici
     end
   end
 end
+
+module Cici
+  module View
+    def popup_menu hash
+      Menu.popup(Canvas.current).build hash
+    end
+  end
+end

data/lib/cici/scintilla.rb

@@ -1,21 +1,23 @@
 module Cici
   class Scintilla
-    def lexer= l
-      l.downcase!
-      self._lexer = l
-      eval File.read(File.dirname(__FILE__) + '\\lexers\\' + l)
-      l
-    end
-    alias lexer _lexer
 
     # set all font to f
     def font= f
-      33.times{ |i| style_set_font i, f }
+      style_set_default_font f
       @font = f
     end
+
     attr_reader :font
 
-    attr_accessor :onchar
+    # ------------------------------------------------------------------------------
+    # events
+
+    # event binding example
+    #   @s.onchar  = proc do |sci, lparam|
+    #     scn = Cici::Scintilla.scn lparam
+    #     puts scn.ch.chr 'utf-8'
+    #   end
+    attr_accessor :onchar, :onstyle
 
     # called when an indentation is needed
     # lineno: current line number
@@ -41,5 +43,14 @@ module Cici
       end
       self.set_line_indent lineno, i
     end
+
   end # class Scintilla
 end
+
+module Cici
+  module View
+    def scintilla sz
+      Scintilla.create nil, sz[0], sz[1]
+    end
+  end
+end

data/lib/cici.rb

@@ -1,7 +1,14 @@
 libdir = File.dirname(__FILE__) + '/cici/'
-%w[ext.so support.rb misc.rb element_base.rb canvas.rb list.rb view.rb config.rb].each do |e|
+
+if RUBY_PLATFORM =~ /mswin32_90/
+  require "#{libdir}mswin32_90/ext.so"
+elsif RUBY_PLATFORM =~ /mingw32/
+  require "#{libdir}mingw32/ext.so"
+end
+
+%w[support.rb keymap.rb canvas.rb config.rb element.rb list.rb dlg.rb menu.rb].each do |e|
   require "#{libdir}#{e}"
 end
 
-Cici.scintilla_init(libdir + 'SciLexer.dll')
+Cici.scintilla_init(libdir + 'Scintilla.dll')
 require "#{libdir}scintilla.rb"

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: luikore-cici
 version: !ruby/object:Gem::Version 
-  version: 0.0.9
+  version: 0.1.1
 platform: ruby
 authors: 
 - luikore
@@ -28,17 +28,40 @@ files:
 - lib/cici/canvas.rb
 - lib/cici/config.rb
 - lib/cici/countlines.rb
-- lib/cici/element_base.rb
-- lib/cici/ext.so
-- lib/cici/lexers
-- lib/cici/lexers/ruby
+- lib/cici/dlg.rb
+- lib/cici/element.rb
+- lib/cici/keymap.rb
 - lib/cici/list.rb
-- lib/cici/misc.rb
-- lib/cici/SciLexer.dll
+- lib/cici/menu.rb
+- lib/cici/mingw32
+- lib/cici/mingw32/ext.so
+- lib/cici/mswin32_90
+- lib/cici/mswin32_90/ext.so
+- lib/cici/Scintilla.dll
 - lib/cici/scintilla.rb
 - lib/cici/support.rb
-- lib/cici/view.rb
 - lib/cici.rb
+- examples/button.rb
+- examples/calculator.rb
+- examples/cici.rb
+- examples/Collective Intelligence.png
+- examples/common_dialogs.rb
+- examples/destroy.rb
+- examples/flow.rb
+- examples/hello world.rb
+- examples/img.rb
+- examples/key.rb
+- examples/list.rb
+- examples/menu.rb
+- examples/mk
+- examples/mk.bat
+- examples/position.rb
+- examples/quantummi7.jpg
+- examples/regexp_test.rb
+- examples/scintilla.rb
+- examples/style.rb
+- examples/tab.rb
+- examples/timer.rb
 has_rdoc: false
 homepage: http://wiki.github.com/luikore/cici
 licenses: 

data/lib/cici/element_base.rb

@@ -1,12 +0,0 @@
-# Coding: utf-8
-module Cici
-  class ElementBase
-    def parent= p
-      @parent.children.delete self
-      self._parent = p
-      @parent = p
-      p.children << self
-    end
-    attr_reader :parent
-  end
-end

data/lib/cici/lexers/ruby

@@ -1,64 +0,0 @@
-# normal keywords
-set_keywords 0, "DATA __END__ __FILE__ __LINE__ alias and begin break case class def defined? do else elsif end ensure false for if in module next nil not or raise redo rescue retry return self super then true undef unless until when while yield"
-
-# indent keywords
-set_keywords 1, "def class module if unless begin do elsif else case while for when"
-
-# unindent keywords
-set_keywords 2, "end rescue ensure when"
-
-# line number
-style_set_color 33, nil, 0XC0C0C0
-
-#brace highlight
-style_set_color 34, 0X00009F, 0XFFFF80
-
-#brace incomplete highlight
-style_set_color 35, 0XFF0000, 0X000000
-
-#control chars
-style_set_color 36, 0X000000, nil
-
-#indent guides
-style_set_color 37, 0XC0C0C0, 0XFFFFFF
-
-# from scite
-{
-  0=>0X808080,
-  2=>0X007f00,
-  3=>0X004000,
-  4=>0X7f7f00,
-  5=>0X7f0000,
-  6=>0X7f007f,
-  7=>0X7f007f,
-  8=>0Xff0000,
-  9=>0X7f7f00,
-  12=>0X000000,
-  13=>0X800080,
-  14=>0X30a0c0,
-  15=>0Xa000a0,
-  16=>0X8000b0,
-  17=>0Xb00080,
-  18=>0X00ffff,
-  19=>0X000060,
-  20=>0X000000,
-  21=>0X7f007f,
-  22=>0X7f007f,
-  23=>0X7f007f,
-  24=>0X7f007f,
-  26=>0X00ffff,
-  27=>0X000000,
-  28=>0X000000,
-  34=>0Xff0000,
-  35=>0X0000ff
-}.each do |n, c|
-  style_set_color n, c, nil
-end
-
-@indent_pattern = /^\s*
-  (?:def|class|if|elsif|else|case|while|for)\b.*
-  |
-  .*(?:\bdo|\{)(?:\s*\|[^\|]*?\|)?
-  \s*$/x
-
-@unindent_pattern = %r"^\s*(?:end|\})\s*$"

data/lib/cici/view.rb

@@ -1,130 +0,0 @@
-# coding: utf-8
-module Cici
-  module View
-    def choose_file filter = nil
-      arg = "All (*.*)\0*.*\0"
-      if filter.is_a? Hash
-        arg = filter.map do |(k, v)|
-          "#{k} (#{v})\0#{v}\0"
-        end.join
-      end
-      Cici.choose_file "#{arg}\0"
-    end
-
-    def save_file filter = nil
-      arg = "All (*.*)\0*.*\0"
-      if filter.is_a? Hash
-        arg = filter.map do |(k, v)|
-          "#{k} (#{v})\0#{v}\0"
-        end.join
-      end
-      Cici.save_file "#{arg}\0"
-    end
-
-    def popup_menu hash
-      Menu.popup(Canvas.current).build hash
-    end
-
-    def button txt, sz=nil, &block
-      b = Button.create nil, txt.toString, 0
-      b.onclick = block if block
-      b.size = sz if sz.is_a? Array
-      b
-    end
-
-    # BS_AUTOCHECKBOX
-    def checkbox &block
-      b = Button.create nil, '', 3
-      b.onclick = block if block
-      b
-    end
-
-    # BS_AUTORADIOBUTTON
-=begin
-  def radio txt, sz=nil, &block
-    b = Button.create nil, txt.toString, 9
-    b.onclick = block if block
-    b.size = sz if sz.is_a? Array
-    b
-  end
-=end
-
-    def text txt, font = nil
-      font = nil unless font.is_a? FontClass
-      Text.create nil, txt.toString, font
-    end
-
-    def image path, sz = nil
-      x, y = nil, nil
-      if sz.is_a? Array
-        x, y = *sz
-      end
-      Image.create nil, path, x, y
-    end
-
-    def edit sz = nil
-      sz = [200, 28] unless (sz.is_a? Array)
-      Edit.create nil, sz[0], sz[1], nil
-    end
-
-    def listbox sz
-      ListBox.create(nil, sz[0].to_i, sz[1].to_i)
-    end
-
-    def droplist sz = nil
-      sz = [200, 28] unless (sz.is_a? Array)
-      DropList.create(nil, sz[0].to_i, sz[1].to_i)
-    end
-
-    # new canvas
-    def paint sz, opts = {}, &block
-      mod = {
-        flow: Canvas::Flow,
-        zoom: Canvas::Zoom,
-        tab:  Canvas::Tab
-      }[opts[:layout]]
-      mod ||= Canvas::Fixed  # default
-      Canvas.paint nil, sz[0], sz[1], mod, &block
-    end
-
-    def scintilla sz
-      Scintilla.create nil, sz[0], sz[1]
-    end
-
-    # main
-    def view sz = nil, opts = {}, &block
-      Config[:external_font_paths].each do |p|
-        Cici.load_external_font p
-      end
-      raise 'Config[:default_font] should be a Font' unless Config[:default_font].is_a? Cici::FontClass
-      Cici.set_default_font Config[:default_font]
-
-      Cici.app (opts[:title] || 'Cici') do
-        paint sz, opts, &block
-      end
-    end
-
-    def br space = 5
-      Canvas.current.br space
-    end
-
-    def keymap char, *mods, &block
-      modnum = 0
-      mods.each do |mod|
-        modnum |= 1 if mod == :shift
-        modnum |= 2 if mod == :ctrl
-        modnum |= 4 if mod == :alt
-      end
-      charnum = nil
-      if char.is_a? Fixnum
-        charnum = char.to_i
-      else
-        charnum = Cici::KEYMAP[char]
-        charnum ||= char.upcase.ord
-      end
-      raise 'char not valid' unless charnum
-      Cici.register_key charnum, modnum, block
-    end
-
-  end
-end