IRGoggles 0.0.1.alpha

data/lib/IRGoggles.rb

@@ -0,0 +1,52 @@
+module IRGoggles
+
+ require 'sdl'
+ require 'open3'
+
+ DURR = (File.dirname(__FILE__) + "/")
+ SRCFLD = DURR + "IRGoggles/"
+ DATFLD = DURR + "datum/"
+
+ SDL.init(SDL::INIT_VIDEO)
+ SDL::WM::set_caption("IR Goggles!",'Super Sexy Terminal Display for Lovers')
+ SDL::TTF.init
+
+Frames = [
+[0.0,0.0,1.0,1.0],
+[0.2,0.2,0.8,0.8],
+[0.0,0.0,1.0,0.6],
+[0.0,0.6,1.0,1.0],
+[0.0,0.0,1.0,0.55],
+[0.0,0.65,1.0,1.0],
+[0.0,0.55,1.0,0.65],
+[0.0,0.8,1.0,1.0]
+]
+Opts = {
+:Back_Color => [20,150,150],
+:Text_Color => [210,230,210],
+:Frame_Color => [40,200,200],
+:Back_Alpha => 200,
+:Text_Alpha => 200,
+:Frame_Alpha => 200,
+:Use_Font => [:LOCAL, 0],
+:Font_Size => 24,
+:Resolution => [800,600]
+}
+
+
+ def IRGoggles.massload(duhrekt)
+  Dir.entries(duhrekt).each{|e|
+   if e[-3,3] == '.rb'
+    Kernel.load(duhrekt + e)
+   end
+  }
+ end
+
+ def IRGoggles.start
+  Strap.engauge!
+ end
+
+
+ IRGoggles.massload(SRCFLD)
+ Strap = Session.new
+end

data/lib/IRGoggles/Redicle.rb

@@ -0,0 +1,215 @@
+module IRGoggles
+
+class IRGoggleERR < Exception
+end
+
+class Redicle
+
+attr_accessor :imary, :ents, :rin, :rout, :rerr
+attr_reader :w, :h, :cx, :cy
+
+ def initialize(matron)
+  @matron = matron
+  @imary = []
+  @sorted = []
+  @ents = []
+  @w, @h = Opts[:Resolution]
+  @cx = 0
+  @cy = 0
+  @thrds = []
+  @datelist = []
+  @keeplist = []
+  @anilist = []
+  @corrections = []
+  @marked = []
+  @update = false
+  @upkeep = false
+  @aminate = false
+  @gtg = false
+ end
+
+#@imary stores all the graphics to be printed to the mainscreen
+ #[surface,width,height,pos_x,pos_y,priority]
+  #everything is an integer, except for the surface
+  #priority	:to determine display order for #sort_imgz command.
+
+ def add_img(e)
+  unless c = @imary.rindex(nil)
+   c = @imary.size
+  end
+  @imary[c] = e
+  return c
+ end
+ 
+ def del_img(e)
+  @sorted.delete(e)
+  @imary[e][0].destroy
+  @imary[e] = nil
+ end
+
+ def sort_imgz
+  cow = 0
+  @imary.each_index.sort{|a,b| @imary[a][5] <=> @imary[b][5]}.each{|i|
+   @sorted[cow] = i
+   cow += 1
+  }
+  while @sorted.size > cow
+   @sorted.delete(-1)
+  end
+ end
+
+ def cull_lists
+  if @datelist.empty?
+   @update = false 
+ end
+  if @keeplist.empty?
+   @upkeep = false
+  end
+  if @anilist.empty?
+   @aminate = false
+  end
+ end
+
+#because I used this framework for other programs, an object contained in the @ents array
+# are hardly ever of a uniform class.  Therefore, they are referenced by index in the various 
+# update and display loops.  Here, in #add_ent are they orginized:
+
+def add_ent(e)
+c = @ents.size
+@ents[c] = e
+ if e.methods.include?(:animate)
+  @anilist << c
+ end
+
+ if e.methods.include?(:update)
+  @datelist << c
+ end
+
+ if e.methods.include?(:upkeep)
+  @keeplist << c
+ end
+
+ if e.methods.include?(:correct)
+  @corrections << c
+ end
+
+ if e.methods.include?(:set_dex)
+  @ents[c].set_dex(c)
+ end
+return c
+end
+
+#auspizer	:sets (or resets) the window and the display surfaces which rely on the size of the window:
+ def auspizer(w,h)
+  @w = w
+  @h = h
+  @img = SDL::Screen.open(@w, @h, 32, SDL::RESIZABLE)
+  @corrections.each{|e| @ents[e].correct(@w, @h)}
+ end
+
+#begins update, upkeep and animation threads.  Then, activates the display cycle
+ def instigate
+  raise IRGoggleERR, "Cannot display nothing!" if (@ents.size == 0)
+  @update = true
+  @upkeep = true
+  @aminate = true
+  @gtg = true
+  aniloop
+  updateloop
+  upkeeploop
+  mainloop
+ end
+
+#resolve  stops and clears any current threads, pausing a moment to complete, then ends the display cycle
+ def resolve
+  @update = false
+  @upkeep = false
+  @aminate = false
+  sleep 1
+  @thrds.clear
+  @gtg = false
+ end
+
+
+private
+
+
+#finally, we have various loops.  Only the #mainloop function is called in the current processes,
+# all other loops are inbedded within Threads.
+# The intention here is to streamline the mainloop so any function which does not have do to with
+# keyboard & mouse input or drawing the window is shunted elsewhere.
+
+ def aniloop
+  @thrds << Thread.new{
+   begin
+    while @aminate
+     @anilist.each{|a| @ents[a].animate}
+     sleep(0.6)
+    end
+   rescue Exception
+    @aminate = false
+    puts("animatino error\n#{$!}\n#{$!.backtrace}")
+   end
+  }
+ end
+
+ def updateloop
+  @thrds << Thread.new{
+   begin
+    while @update
+     @datelist.each{|a| @ents[a].update}
+     sleep(0.03)
+    end
+   rescue Exception
+    @update = false
+    p("update error\n#{$!}\n#{$!.backtrace}")
+   end
+  }
+ end
+
+ def upkeeploop
+  @thrds << Thread.new{
+   begin
+    while @upkeep
+     @keeplist.each{|a| @ents[a].upkeep}
+     sleep(0.05)
+    end
+   rescue Exception
+    @upkeep = false
+    p("upkeep error\n#{$!}\n#{$!.backtrace}")
+   end
+  }
+ end
+
+ def mainloop
+  while @gtg
+   @img.draw_rect(0,0,@w,@h,[0,0,0],true,50)
+   @sorted.each{|x|
+    SDL::Surface.blit(@imary[x][0],0,0,@imary[x][1],@imary[x][2],@img,@imary[x][3],@imary[x][4])
+   }
+   @img.flip
+   sleep(0.02)
+   while eve = SDL::Event.poll
+    case eve
+     when SDL::Event::VideoResize
+      auspizer(eve.w, eve.h)
+     when SDL::Event::Quit
+      @gtg = false
+     when SDL::Event::KeyUp
+      @matron.keyin.insert(0,[eve.sym,false])
+     when SDL::Event::KeyDown
+      @matron.keyin.insert(0, [eve.sym,true])
+     when SDL::Event::MouseMotion
+      @cx = eve.x
+      @cy = eve.y
+     when SDL::Event::MouseButtonUp
+      @matron.mousin.insert(0,[eve.button, false])
+     when SDL::Event::MouseButtonDown
+      @matron.mousin.insert(0,[eve.button, true])
+    end
+   end
+  end
+ end
+end
+
+end

data/lib/IRGoggles/Strap.rb

@@ -0,0 +1,311 @@
+module IRGoggles
+
+class Session
+attr_accessor :keyin, :mousin
+attr_reader :active
+def initialize
+@matron = Redicle.new(self)
+@sessions = []
+@select = nil
+@size = 0
+@active = false
+@threads = []
+@keyin = []
+@mousin = []
+@shft_l = false
+@cntrl_l = false
+@shft_r = false
+@caps = false
+@caplock = false
+@cntrl_r = false
+end
+
+def new_ir
+@sessions[@size] = Open3.popen3('irb --noinspect')
+@size += 1
+return (@size-1)
+end
+
+def engauge!
+unless @active
+@active = true
+@select = new_ir
+w, h = IRGoggles::Opts[:Resolution]
+@matron.auspizer(w,h)
+@spout = @matron.add_ent(Texen.new(@matron, 4))
+@spin = @matron.add_ent(Texen.new(@matron, 5))
+text_relay
+text_reply
+logic_bomb
+@matron.instigate
+@active = false
+end
+end
+
+ def capcheck
+  if @caplock
+   if @shft_l
+    @caps = false
+   elsif @shft_r
+    @caps = false
+   else
+    @caps = true
+   end
+  else
+   if @shft_l
+    @caps = true
+   elsif @shft_r
+    @caps = true
+   else
+    @caps = false
+   end
+  end
+ end
+
+ def controller(chr,bool)
+  if bool
+   case chr
+    when 8#backspace
+      @matron.ents[@spin].bckspx  
+    #when 9#tab
+    when 13#return
+     if @cntrl_l || @cntrl_r
+      @sessions[@select][0].puts(@matron.ents[@spin].slasher)
+     else
+      @matron.ents[@spin].newlin
+     end
+    #when 27#esc
+    #when 32#space
+    when 39#'
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append('"')
+     else
+      @matron.ents[@spin].append("'")
+     end
+    when 44# comma
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append("<")
+     else
+      @matron.ents[@spin].append(",")
+     end
+    when 45#minus -
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append("_")
+     else
+      @matron.ents[@spin].append("-")
+     end
+    when 46# period
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append(">")
+     else
+      @matron.ents[@spin].append(".")
+     end
+    when 47#foreslash?
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append("?")
+     else
+      @matron.ents[@spin].append("/")
+     end
+    when 48#0
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append(")")
+     else
+      @matron.ents[@spin].append("0")
+     end
+    when 49#1
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append("!")
+     else
+      @matron.ents[@spin].append("1")
+     end
+    when 50#2
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append("@")
+     else
+      @matron.ents[@spin].append("2")
+     end
+    when 51#3
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append("#")
+     else
+      @matron.ents[@spin].append("3")
+     end
+    when 52#4
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append("$")
+     else
+      @matron.ents[@spin].append("4")
+     end
+    when 53#5
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append("%")
+     else
+      @matron.ents[@spin].append("5")
+     end
+    when 54#6
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append("^")
+     else
+      @matron.ents[@spin].append("6")
+     end
+    when 55#7
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append("&")
+     else
+      @matron.ents[@spin].append("7")
+     end
+    when 56#8
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append("*")
+     else
+      @matron.ents[@spin].append("8")
+     end
+    when 57#9
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append("(")
+     else
+      @matron.ents[@spin].append("9")
+     end
+    when 59
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append(":")
+     else
+      @matron.ents[@spin].append(";")
+     end
+    when 61#plus +
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append("+")
+     else
+      @matron.ents[@spin].append("=")
+     end
+    when 91#bra
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append("{")
+     else
+      @matron.ents[@spin].append("[")
+     end
+    when 92#bar and backslash
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append("|")
+     else
+      @matron.ents[@spin].append("\\")
+     end
+    when 93#ket
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append("}")
+     else
+      @matron.ents[@spin].append("]")
+     end
+    when 96#tilde&backquote
+     if @shft_l || @sft_r
+      @matron.ents[@spin].append("~")
+     else
+      @matron.ents[@spin].append("`")
+     end
+    when 127#delete
+     @matron.ents[@spin].leet
+    when 273#up
+     @matron.ents[@spin].uparrow
+    when 274#down
+     @matron.ents[@spin].downarrow
+    when 275#right
+     @matron.ents[@spin].rightarrow
+    when 276#left
+     @matron.ents[@spin].leftarrow
+    when 277#insert
+     @matron.ents[@spin].certify
+    when 278#HOme
+     @matron.ents[@spin].homekey
+    when 279#end
+     @matron.ents[@spin].endkey
+    when 280#pageup
+     @matron.ents[@spin].pageup
+    when 281#pagedown
+     @matron.ents[@spin].pagedown
+    #when 282#F1
+    #when 293#F12
+    when 303
+     @shft_r = true
+    when 304
+     @shft_l = true
+    when 305
+     @cntrl_l = true
+    when 306
+     @cntrl_r = true
+
+    else
+     capcheck
+     if (@caps == true)
+      @matron.ents[@spin].append(chr.chr.upcase)
+     else
+      @matron.ents[@spin].append(chr.chr)
+     end
+   end
+  else #key is lifted
+   case chr
+    when 303
+     @shft_r = false
+    when 304
+     @shft_l = false
+    when 305
+     @cntrl_l = false
+    when 306
+     @cntrl_r = false
+   end
+  end
+ end
+
+ def text_reply
+  @threads << Thread.new{
+p("Thread start")
+   begin
+    while @active
+     while line = @sessions[@select][1].gets
+      p("GETTING LINE = #{line}")
+      @matron.ents[@spout].dump(line)
+     end
+     sleep(0.06)
+    end
+   rescue Exception
+    p("FEED error\n#{$!}\n#{$!.backtrace}")
+    @active = false
+   end
+p("Threadstop    ply")
+  }
+ 
+ end
+ def text_relay
+  @threads << Thread.new{
+p("Thread start")
+   begin
+    while @active
+     while lout = @keyin.pop
+      controller(lout[0],lout[1])
+      p("KEYING INT =  #{lout}")
+     end
+     sleep(0.1)
+    end
+   rescue Exception
+    p("FEED error\n#{$!}\n#{$!.backtrace}")
+    @active = false
+   end
+p("Threadstop    lay")
+  }
+ end
+
+def logic_bomb
+@threads << Thread.new{
+begin
+while @active
+@matron.sort_imgz
+@matron.cull_lists
+sleep 2
+end
+rescue Exception
+p("LOGICERR error\n#{$!}\n#{$!.backtrace}")
+@active = false
+end
+}
+end
+end
+end

data/lib/IRGoggles/entities.rb

@@ -0,0 +1,358 @@
+module IRGoggles
+
+class OperatingSystemErr < StandardError
+end
+
+class Overlay
+def initialize(mat,frmst)
+@matron = mat
+@margie = [0.1,0.05,0.03,0.03] 
+@spd = 0.07
+@frmst = IRGoggles::Frames[frmst]
+@x = 0
+@y = 0
+@w = 0
+@h = 0
+@kex = Array.new(4, 0.0)
+@p = 1000
+@refresh = true
+
+setdat
+correct(@matron.w, @matron.h)
+make_margin
+
+set_image_array
+end
+def set_dex(c)
+@entdex = c
+end
+def setdat
+@bgc = Opts[:Back_Color]
+@txtc = Opts[:Text_Color]
+@fgc = Opts[:Frame_Color]
+@bga = Opts[:Back_Alpha]
+@txta = Opts[:Text_Alpha]
+@fga = Opts[:Frame_Alpha]
+end
+def correct(w,h)
+x,y,xx,yy = @frmst
+@tw = ((xx - x)*w).to_i
+@th = ((yy - y)*h).to_i
+@tx = (x*w).to_i
+@ty = (y*h).to_i
+
+end
+
+def set_image_array
+preren = SDL::Surface.new(SDL::HWSURFACE,@w,@h,32,0,0,0,0)
+preren.set_color_key(SDL::SRCALPHA, 0)
+@idex = @matron.add_img([preren.display_format_alpha,@w,@h,@x,@y,@p])
+end
+
+def make_margin
+@marg_t = (@h*@margie[0]).round
+@marg_b = (@h*@margie[1]).round
+@marg_l = (@w*@margie[2]).round
+@marg_r = (@w*@margie[3]).round
+end
+def fixed_margin
+@marg_t, @marg_b, @marg_l, @marg_r = @margie.collect{|e| (e*512).to_i}
+end
+
+ def update
+#p("tz = #{[@tx,@ty,@tw,@th]}\t\tzz = #{[@x,@y,@w,@h]}\n\tk = #{@kex}")
+  k = (@tx - @x)
+#p("\n\t\t\tk = #{k}")
+  if k.abs < 10
+   @kex[0] = 0.0
+   @x = @tx
+  else
+   @kex[0] = (@kex[0] + k)*@spd
+  end
+  k = (@ty - @y)
+#p("\n\t\t\tk = #{k}")
+  if k.abs < 10
+   @kex[1] = 0.0
+   @y = @ty
+  else
+   @kex[1] = (@kex[1] + k)*@spd
+  end
+  k = (@tw - @w)
+#p("\n\t\t\tk = #{k}")
+  if k.abs < 10
+   @kex[2] = 0.0
+   @w = @tw
+  else
+   @kex[2] = (@kex[2] + k)*@spd
+  end
+   k = (@th - @h)
+#p("\n\t\t\tk = #{k}")
+  if k.abs < 10
+   @kex[3] = 0.0
+   @h = @th
+  else
+   @kex[3] = (@kex[3] + k)*@spd
+  end
+  unless @kex[0] == 0.0
+   @matron.imary[@idex][3] = @x = (@x + @kex[0]).round
+   @refresh = true
+  end
+  unless @kex[1] == 0.0
+   @matron.imary[@idex][4] = @y = (@y + @kex[1]).round
+   @refresh = true
+  end
+  unless @kex[2] == 0.0
+#p "matroim = #{@matron.imary[@idex]}"
+   @matron.imary[@idex][1] = @w = (@w + @kex[2]).round
+   @refresh = true
+  end
+  unless @kex[3] == 0.0
+   @matron.imary[@idex][2] = @h = (@h + @kex[3]).round
+   @refresh = true
+  end
+ end
+
+def upkeep
+if @refresh
+@matron.imary[@idex][0] = @matron.imary[@idex][0].copy_rect(0,0,@w,@h)
+make_margin
+@matron.imary[@idex][0].draw_rect(0,0,@w,@h,@bgc,true,@bga)
+@matron.imary[@idex][0].draw_rect(0,0,@w,@marg_t,@fgc,true,@fga)
+@matron.imary[@idex][0].draw_rect(0,@h-@marg_b,@w,@marg_b,@fgc,true,@fga)
+@matron.imary[@idex][0].draw_rect(0,@marg_t,@marg_l,@h-@marg_b-@marg_b,@fgc,true,@fga)
+@matron.imary[@idex][0].draw_rect(@w-@marg_r,@marg_t,@marg_r,@h-@marg_b-@marg_b,@fgc,true,@fga)
+@refresh = false
+end
+end
+end#end overlayclass
+
+
+class Texen < Overlay
+def initialize(mat,frmst)
+super
+set_fawnt
+@tileW = @fawn.text_size('W')[0]
+@tileH = @ch = @fawn.line_skip
+@space = @fawn.text_size(' ')[0]
+@xset = 0
+@yset = 0
+@xcur = 0
+@ycur = 0
+@tlin = 0
+@tcur = 0
+@cursed = false
+@wrap = false
+@texas = ['']
+@cert = true
+@page = 0
+@gappe = 0
+@xscroll = 0
+@yscroll = 0
+@mamory = []
+end
+ def dump(str)
+  str.lines("\n").to_a.collect{|e| e.lines("\r").to_a}.flatten.each{|w|
+   @texas << w.rstrip
+   @tlin += 1
+  }
+  @tcur = @texas[-1].size#-1
+  seek
+  @refresh = true
+ end
+ def slasher
+  dat = (@texas.join('') + "\r")
+  @mamory << dat
+  @texas = ['']
+  @tlin = 0
+  @tcur = 0
+  @refresh = true
+  return dat
+ end
+ def seek
+  @yscroll = (@tlin-(@page/2))
+  @xscroll = (@tcur-(@gappe/2))
+  if @yscroll < 0
+   @yscroll = 0
+  end
+  if @xscroll < 0
+   @xscroll = 0
+  end
+  @refresh = true
+ end
+ def homekey
+  @tcur = 0
+  seek
+ end
+ def endkey
+  @tcur = @texas[@tlin].size
+  seek
+ end
+ def pageup
+  @tlin -= @page
+  if @tlin < 0
+   @tlin = 0
+  end
+  seek
+ end
+ def pagedown
+  @tlin += @page
+  if @tlin > @texas.size
+   @tlin = @texas.size 
+  end
+  seek
+ end
+ def uparrow
+  unless @tlin == 0
+   @tlin -= 1
+   seek
+  else
+   homekey
+  end
+ end
+
+ def downarrow
+  if @tlin < (@texas.size-1)
+   @tlin += 1
+   seek
+  else
+   endkey
+  end
+ end
+
+ def leftarrow
+  if @tcur == 0
+   uparrow
+   @tcur = @texas[@tlin].size
+  else
+   @tcur -= 1
+  end
+  seek
+ end
+ def rightarrow
+  if @tcur == @texas[@tlin].size
+   downarrow
+   @tcur = 0
+  else
+   @tcur += 1
+  end
+  seek
+ end
+
+ def newlin
+  a = "#{@texas[@tlin][0..@tcur]}\n"
+  b = "#{@texas[@tlin][@tcur+1..-1]}"
+  @texas[@tlin] = a
+  @tlin += 1
+  @texas.insert(@tlin,b)
+  @tcur = 0
+ end
+ def bckspx
+  leftarrow
+  @texas[@tlin][@tcur] = ''
+  @refresh = true
+ end
+ def leet
+  @texas[@tlin][@tcur] = ''
+ end
+ def append(crz)
+  if @cert
+   @texas[@tlin].insert(@tcur,crz)
+   @tcur += 1
+  else
+   @texas[@tlin][@tcur] = crz
+   @tcur += 1
+  end
+  @refresh = true
+ end
+ def certify
+  @cert = !@cert
+ end
+ def resolve_scope
+  @h_span = (@h - @marg_t - @marg_b)
+  @w_span = (@w - @marg_l - @marg_r)
+  @page = ( @h_span / @tileH)
+  @gappe = ( @w_span / @space)
+ end
+def set_fawnt
+param, val = Opts[:Use_Font]
+case param
+ when :WINXP
+  raise OperatingSystemERR, "You're using windows xp?  fuhreal??  ohmegurd, Mr. Babbage, you're not allowed."
+ when :WIN7
+t = IRGoggles.win7_fonts[val]
+ when :NIXIE
+t = IRGoggles.nix_fonts[val]
+ when :LOCAL
+t = (IRGoggles.ttf_durr(DATFLD))[val]
+end
+@fawn = SDL::TTF.open(t[1],Opts[:Font_Size])
+@fawn.style = SDL::TTF::STYLE_NORMAL
+end
+
+ def rend(wrd)
+  wrd.rstrip!
+  unless wrd.size == 0
+   len = @fawn.text_size(wrd)[0]
+    if ((@xset + len) > (@w_span))
+     if @wrap
+      @xset = @marg_l
+      @yset += @tileH
+      @fawn.draw_solid_utf8(@matron.imary[@idex][0],wrd,@xset,@yset,@txtc[0],@txtc[1],@txtc[2])
+      @xset += (len + @space)
+     end
+    else
+     @fawn.draw_solid_utf8(@matron.imary[@idex][0],wrd,@xset,@yset,@txtc[0],@txtc[1],@txtc[2])
+     @xset += (len + @space)
+    end
+   end
+  end
+ 
+ def texprint
+#  p("printing text!!! #{self.__id__},  #{@bstring}: :#{@fstring}")
+  @yset = @marg_t
+  @xset = @marg_l
+  sample = @texas[@yscroll,@page]
+  lin_cow = @yscroll
+  wrd_cow = @xscroll
+  sample.each{|line|
+   sline = line[@xscroll, @gappe]
+   unless sline == nil
+    if @tlin == lin_cow
+     sline[0..(@tcur-1)].lines(' ').each{|wrd| rend(wrd) }
+     nxcur = @xset-@space
+     nycur = @yset
+     @matron.imary[@idex][0].draw_rect(nxcur,nycur,@tileW,@tileH,[100,20,120],true,60)
+     unless sline[@tcur] == nil
+      sline[@tcur..-1].lines(' ').each{|wrd| rend(wrd) }
+     end
+    else
+     sline.lines(' ').each{|wrd| rend(wrd) }
+    end
+   end
+   lin_cow += 1
+   @yset += @tileH
+   @xset = @marg_l
+  }
+ end
+ def upkeep
+  if @refresh
+#p("refreshing ket = #{@kex}")
+   @matron.imary[@idex][0] = @matron.imary[@idex][0].copy_rect(0,0,@w,@h)
+   @matron.imary[@idex][0].draw_rect(0,0,@w,@h,@bgc,true,@bga)
+   make_margin
+   resolve_scope 
+   texprint
+   @matron.imary[@idex][0].draw_rect(0,0,@w,@marg_t,@fgc,true,@fga)
+   @matron.imary[@idex][0].draw_rect(0,@h-@marg_b,@w,@marg_b,@fgc,true,@fga)
+   @matron.imary[@idex][0].draw_rect(0,@marg_t,@marg_l,@h-@marg_b-@marg_b,@fgc,true,@fga)
+   @matron.imary[@idex][0].draw_rect(@w-@marg_r,@marg_t,@marg_r,@h-@marg_b-@marg_b,@fgc,true,@fga)
+   @refresh = false
+  end
+ end
+
+end
+
+end#end mod
+
+
+

data/lib/IRGoggles/utilities.rb

@@ -0,0 +1,51 @@
+module IRGoggles
+
+def IRGoggles.ttf_durr(lookin)
+ret = []
+Dir.entries(lookin).keep_if{|g| g[-4,4] == '.ttf'}.each{|v|
+ret << [v[0..-4], (lookin + v)]
+}
+return ret
+end
+
+def IRGoggles.winXP_fonts
+tink = []
+lookin = ENV['SystemRoot'] + "/Fonts/"
+Dir.entries(lookin).keep_if{|g| g[-4,4] == '.ttf'}.each{|v|
+tink << [v[0..-4], (lookin + v)]
+}
+return tink
+end
+
+def IRGoggles.win7_fonts
+fink = []
+lookin = "C:/Windows/winsxs"
+ffix = "amd64_microsoft-windows-font-truetype-/"
+tup = Dir.entries(path).keep_if{|g| g[-4,4] == ".ttf"}
+a = Dir.entries(lookin).keep_if{|x| (x[0,ffix.size] == ffix)}
+b = a.collect{|v| Dir.entries(lookin + v) }
+b.size.times{|g|
+if b[g][-4,4] == ".ttf" 
+fink << [b[g][0..-4], a[g], tup]
+end
+}
+return fink
+end
+
+def IRGoggles.nix_fonts
+flib = []
+sear = "/usr/share/fonts/truetype/"
+Dir.entries(sear).each{|p|
+unless ((p == '.') || (p == '..'))
+fin = (sear + "/" + p)
+Dir.entries(fin).each{|e|
+if e[-4,4] == '.ttf'
+flib << [e[0..-4], (fin + e)]
+end
+}
+end
+}
+return flib
+end
+
+end#endmod

metadata

@@ -0,0 +1,67 @@
+--- !ruby/object:Gem::Specification
+name: IRGoggles
+version: !ruby/object:Gem::Version
+  version: 0.0.1.alpha
+  prerelease: 6
+platform: ruby
+authors:
+- Nietzschette
+- Bangarang
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2015-06-26 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: rubysdl
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 2.0.0
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 2.0.0
+description: SDL-based interface for IRB.
+email: Nietzschette01@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- lib/IRGoggles.rb
+- lib/IRGoggles/entities.rb
+- lib/IRGoggles/Redicle.rb
+- lib/IRGoggles/Strap.rb
+- lib/IRGoggles/utilities.rb
+- lib/datum/Basicdots.ttf
+homepage: http://irgoggles.sourceforge.net
+licenses: []
+post_install_message: 
+rdoc_options: []
+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: 1.3.1
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.23
+signing_key: 
+specification_version: 3
+summary: IR = Interactive Ruby.  Goggles = for your face!
+test_files: []