Gammon Forum

CellFromHotspot = function(id)
  local _, _, x, y = string.find(id, "-h%((%d+),(%d+)%)")
  return grid:Cell(tonumber(x), tonumber(y))
end

CellBlur = function(flags, id)
  local cell = CellFromHotspot(id)
  
  cell.backcolor = 0xFFFFFF
  
  grid:Draw(true)
end

OnPluginInstall = function()
  grid = CharacterGrid.new(3, 3)
  grid:Anchor(12)
  grid:Font(TICTACTOE_FONT, 15)
  grid.backcolor = 0xFFFFFF
  
  for y = 1, 3 do
    for x = 1, 3 do
      grid:Cell(x, y).hotspot = {
        mouseup = "CellClick",
        mouseover = "CellFocus",
        cancelmouseover = "CellBlur",
      }
    end
  end
end

name = "03829336f30e9f2dcace86e9:w1"
hotspot = "03829336f30e9f2dcace86e9:w1-h(2,2)"

_G[WindowHotspotInfo(name, hotspot, 6)](0, hotspot)

<?xml version="1.0" encoding="iso-8859-1"?>
<!DOCTYPE muclient>

<muclient>
<plugin
   name="TicTacToe"
   author="Soludra"
   id="03829336f30e9f2dcace86e9"
   language="Lua"
   purpose="Play a game of Tic Tac Toe!"
   date_written="2009-11-22 07:46:00"
   requires="4.43"
   version="1.0"
/>

<!--  Triggers  -->

<triggers>
</triggers>

<!--  Aliases  -->

<aliases>
  <alias
   match="^ttt=(.*)$"
   enabled="y"
   regexp="y"
   send_to="12"
   ignore_case="y"
   sequence="100"
  >
  <send>print(%1)</send>
  </alias>
</aliases>

<!--  Script  -->

<script>
<![CDATA[

require('tprint')

CharacterGrid = require("MWidget\\CharacterGrid")

-- Defines the default grid font.
TICTACTOE_FONT = "Lucida Console"

players = {
  [1] = {
    piece = 'X',
    color = 0x00FF00,
    lastmove = nil,
  },
  [2] = {
    piece = 'O',
    color = 0x0000FF,
    lastmove = nil,
  },
}
current_player = 1


CellFromHotspot = function(id)
  local _, _, x, y = string.find(id, "-h%((%d+),(%d+)%)")
  return grid:Cell(tonumber(x), tonumber(y))
end

CellClick = function(flags, id)
  local cell = CellFromHotspot(id)
  
  if cell.char ~= " " then
    return
  end
  
  if players[current_player].lastmove then
    players[current_player].lastmove.backcolor = 0xFFFFFF
  end
  
  cell.char = players[current_player].piece
  cell.backcolor = players[current_player].color
  
  players[current_player].lastmove = cell
  current_player = (current_player%2) + 1
  grid:Draw(true)
end

CellFocus = function(flags, id)
  local cell = CellFromHotspot(id)

  cell.backcolor = 0xFF0000
  
  grid:Draw(true)
end

CellBlur = function(flags, id)
  local cell = CellFromHotspot(id)
  
  cell.backcolor = 0xFFFFFF
  
  grid:Draw(true)
end

Reset = function()
  grid:ResetGrid()
  
  for y = 1, 3 do
    for x = 1, 3 do
      local cell = grid:Cell(x, y)
      cell.forecolor = 0x000000
      cell.hotspot = {
        mouseup = "CellClick",
        -- mouseover = "CellFocus",
        -- cancelmouseover = "CellBlur",
      }
    end
  end
  
  grid:Draw(true)
end

OnPluginInstall = function()
  grid = CharacterGrid.new(3, 3)
  grid:Anchor(12)
  grid:Font(TICTACTOE_FONT, 15)
  grid.backcolor = 0xFFFFFF

  Reset()
end

OnPluginClose = function()
  grid:Destroy()
end

OnPluginEnable = OnPluginInstall
OnPluginDisable = OnPluginClose

]]>
</script>
</muclient>

    // cancel previous move-over hotspot (in this miniwindow)

 Draw = function(self, show)
    local flags = self.flags or 0
    if self.position.absolute then
      flags = bit.bor(flags, 2)
    end
    
    WindowCreate(self.name, self.position.x, self.position.y,
	     self.width, self.height, self.position.anchor, flags, self.backcolor)
    if show then
      WindowShow(self.name, true)
    end
  end,

  // a newly created window has no hotspots
  DeleteAllHotspots ();

      WindowAddHotspot(self.name, self.name .. "-h(" .. x .. "," .. y .. ")",
         left, top, left+self.fonts["f"].width-1, top+self.fonts["f"].height-1,
         cell.hotspot.mouseover, cell.hotspot.cancelmouseover,
         cell.hotspot.mousedown, cell.hotspot.cancelmousedown,
         cell.hotspot.mouseup, cell.hotspot.tooltip,
         cell.hotspot.cursor, 0)

local Instance = {}

function Instance:Show ()
  print (self.name)
end

Instance.name = "nick"

Instance:Show ()  --> prints "nick"

    if ok == 30073 then -- eNoSuchWindow
      return false, "no such window"
    elseif ok == 30065 then -- eCannotAddFont
      return false, "unable to add font"
    else

    if ok == error_code.eNoSuchWindow then 
      return false, "no such window"
    elseif ok == error_code.eCannotAddFont then
      return false, "unable to add font"
    else

tbl = {
  foo = nil,
  bar = nil,
}

function tbl:foo()
end

function tbl:bar()
end