3D World 136/3DW_136.iso/pc/3dw.exe/3dw.dxr/Internal_22_item_thumb_button.ls

Text File | 2009-06-30 | 532 b | 32 lines

property sp, mySecNum, myNode

on beginSprite me
  sp = sprite(me.spriteNum)
  mySecNum = 0
  myNode = 0
end

on mouseEnter me
  cursor(280)
  setGreenHilight(sp.locH, sp.locV)
end

on mouseLeave me
  cursor(-1)
  hideGreenHilight()
end

on setContentNode me, node
  myNode = node
end

on getPropertyDescriptionList me
  vPDList = [:]
  setaProp(vPDList, #mySecNum, [#comment: "Which number button am I", #format: #integer, #default: 1, #range: [1, 2, 3, 4, 5, 6]])
  return vPDList
end

on mouseUp me
  showContentPage(myNode)
end