local csm = require('csm')
local core = require('core')
local graphics = require('graphics')
local draw = require('draw')
local mycsm
local canvas



function onRedraw()
  print('onRedraw')
end



function onCreate()
  print('onCreate')
end


function onClose()
  print('onClose')
end



function onFocus()
  print('onFocus')
end



function onUnFocus()
  print('onUnFocus')
end



function onKey(type, key)
  print('onKey')
  return 0
end



function csm_onCreate(csm_data)
  canvas = graphics.new(onRedraw,
		     onCreate,
		     onClose,
		     onFocus, 
		     onUnFocus,
		     onKey)
  
  csm.parentOfGui(csm_data, canvas:id())
end


function onExit(csm_data)
  print('Exiting...')
  canvas = nil
  sys.exit();
end



function onMessage(csm_data, msg)
  return 1
end


mycsm = csm.new(1, "Oo", csm_onCreate, onExit, onMessage)