[examples] add some testcase

src/include/xconfigs.h

@@ -33,7 +33,7 @@ extern "C" {
 #endif
 
 #if !defined(CONFIG_AUTO_BOOT_COMMAND)
-#define	CONFIG_AUTO_BOOT_COMMAND					"exec /romdisk/demos/"
+#define	CONFIG_AUTO_BOOT_COMMAND					"exec /romdisk/examples/"
 #endif
 
 #if !defined(CONFIG_MAX_BRIGHTNESS)

src/romdisk/examples/graphics/balls/Ball.lua

@@ -3,19 +3,20 @@ local M = Class(DisplayObject)
 function M:init(image)
 	self.super:init()
 
-	local width, height = application:getScreenSize()
+	local w, h = application:getScreenSize()
 	local assets = application:getAssets()
 
-	self.maxWidth = width
-	self.maxHeight = height
+	self.maxWidth = w
+	self.maxHeight = h
 	self.xdirection = 1
 	self.ydirection = 1
 	self.xspeed = math.random(40, 100) / 10
 	self.yspeed = math.random(40, 100) / 10
+	self.rspeed = math.random(-360, 360) * math.pi / 180 * 2
 
-	self:setX(math.random(0, self.maxWidth - 80))
-	self:setY(math.random(0, self.maxHeight - 80))
-	self:addChild(assets:loadDisplay(image))
+	self:setX(math.random(40, self.maxWidth - 40))
+	self:setY(math.random(40, self.maxHeight - 40))
+	self:addChild(assets:loadDisplay(image):setAnchor(0.5, 0.5))
 	self:addEventListener(Event.ENTER_FRAME, self.onEnterFrame, self)
 end
 
@@ -26,23 +27,24 @@ function M:onEnterFrame(e)
 	x = x + (self.xspeed * self.xdirection)
 	y = y + (self.yspeed * self.ydirection)
 
-	if x < 0 then
+	if x < 40 then
 		self.xdirection = 1
 	end
 
-	if x > self.maxWidth - 80 then
+	if x > self.maxWidth - 40 then
 		self.xdirection = -1
 	end
 
-	if y < 0 then
+	if y < 40 then
 		self.ydirection = 1
 	end
 
-	if y > self.maxHeight - 80 then
+	if y > self.maxHeight - 40 then
 		self.ydirection = -1
 	end
 
 	self:setPosition(x, y)
+	self:setRotation(self:getRotation() + self.rspeed)
 end
 
 return M

src/romdisk/demos/graphics/balls/init.lua → src/romdisk/examples/graphics/balls/init.lua

@@ -5,6 +5,13 @@ local M = Class(DisplayObject)
 function M:init()
 	self.super:init()
 
+	local w, h = application:getScreenSize()
+	local assets = application:getAssets()
+
+	self:addChild(DisplayShape.new(w, h)
+		:setSource(Pattern.texture(assets:loadTexture("graphics/balls/bg.png")):setExtend(Pattern.EXTEND_REPEAT))
+		:paint())
+
 	self:addChild(Ball.new("graphics/balls/ball1.png"))
 	self:addChild(Ball.new("graphics/balls/ball2.png"))
 	self:addChild(Ball.new("graphics/balls/ball3.png"))

src/romdisk/examples/graphics/cursor/init.lua

@@ -0,0 +1,23 @@
+local M = Class(DisplayObject)
+
+function M:init()
+	self.super:init()
+
+	local w, h = application:getScreenSize()
+	local assets = application:getAssets()
+
+	local w, h = application:getScreenSize()
+	self:addChild(DisplayShape.new(w, h):setSourceColor(1, 1, 1):paint())
+
+	local cursor = assets:loadDisplay("graphics/cursor/cursor.png")
+		:addEventListener(Event.MOUSE_DOWN, function(d, e) d:setPosition(e.info.x, e.info.y) end)
+		:addEventListener(Event.MOUSE_MOVE, function(d, e) d:setPosition(e.info.x, e.info.y) end)
+		:addEventListener(Event.MOUSE_UP, function(d, e) d:setPosition(e.info.x, e.info.y) end)
+		:addEventListener(Event.TOUCHES_BEGIN, function(d, e) d:setPosition(e.info.x, e.info.y) end)
+		:addEventListener(Event.TOUCHES_MOVE, function(d, e) d:setPosition(e.info.x, e.info.y) end)
+		:addEventListener(Event.TOUCHES_END, function(d, e) d:setPosition(e.info.x, e.info.y) end)
+		:addEventListener(Event.TOUCHES_CANCEL, function(d, e) d:setPosition(e.info.x, e.info.y) end)
+	self:addChild(cursor)
+end
+
+return M

src/romdisk/demos/scene1.lua → src/romdisk/examples/graphics/dragme/init.lua

@@ -3,19 +3,18 @@ local M = Class(DisplayObject)
 function M:init()
 	self.super:init()
 
-	local width, height = application:getScreenSize()
-	local assets = application:getAssets()
-	self:addChild(assets:loadDisplay("scene1.png"))
+	local w, h = application:getScreenSize()
+	self:addChild(DisplayShape.new(w, h):setSourceColor(0.8, 0.7, 0.5):paint())
 
-	for i=1,5 do
+	for i = 1, 5 do
 		local shape = DisplayShape.new(100, 50)
 			:setLineWidth(6)
 			:rectangle(0, 0, 100, 50)
 			:setSourceColor(1, 0, 0, 0.5)
 			:fillPreserve()
 			:setSourceColor(0, 0, 0)
 			:stroke()
-			:setPosition(math.random(0, width - 100), math.random(0, height - 50))
+			:setPosition(math.random(0, w - 100), math.random(0, h - 50))
 
 		shape:addEventListener(Event.MOUSE_DOWN, self.onMouseDown, shape)
 		shape:addEventListener(Event.MOUSE_MOVE, self.onMouseMove, shape)