first demo for credocument

frontend/ui/reader/readerrolling.lua

@@ -0,0 +1,50 @@
+ReaderRolling = InputContainer:new{
+	key_events = {
+		GotoNextView = { {Input.group.PgFwd}, doc = "go to next view", event = "GotoViewRel", args = 1 },
+		GotoPrevView = { {Input.group.PgBack}, doc = "go to previous view", event = "GotoViewRel", args = -1 },
+
+		GotoFirst = { {"1"}, doc = "go to start", event = "GotoPercent", args = 0},
+		Goto11 = { {"2"}, doc = "go to 11%", event = "GotoPercent", args = 11},
+		Goto22 = { {"3"}, doc = "go to 22%", event = "GotoPercent", args = 22},
+		Goto33 = { {"4"}, doc = "go to 33%", event = "GotoPercent", args = 33},
+		Goto44 = { {"5"}, doc = "go to 44%", event = "GotoPercent", args = 44},
+		Goto55 = { {"6"}, doc = "go to 55%", event = "GotoPercent", args = 55},
+		Goto66 = { {"7"}, doc = "go to 66%", event = "GotoPercent", args = 66},
+		Goto77 = { {"8"}, doc = "go to 77%", event = "GotoPercent", args = 77},
+		Goto88 = { {"9"}, doc = "go to 88%", event = "GotoPercent", args = 88},
+		GotoLast = { {"0"}, doc = "go to end", event = "GotoPercent", args = 100},
+	},
+	current_pos = 0,
+	length = nil,
+}
+
+function ReaderRolling:init()
+	self.length = self.ui.document.info.length
+end
+
+function ReaderRolling:onPosUpdate(new_pos)
+	self.current_pos = new_pos
+end
+
+function ReaderRolling:gotoPos(new_pos)
+	if new_pos == self.current_pos then return end
+	if new_pos < 0 then new_pos = 0 end
+	if new_pos > self.length then new_pos = self.length end
+	self.ui:handleEvent(Event:new("PosUpdate", new_pos))
+end
+
+function ReaderRolling:onGotoPercent(percent)
+	DEBUG("goto document offset in percent:", percent)
+	self:gotoPos(percent * self.length / 10000)
+	return true
+end
+
+function ReaderRolling:onGotoViewRel(diff)
+	DEBUG("goto relative screen:", diff)
+	self:gotoPos(self.current_pos + diff * self.ui.dimen.h)
+	return true
+end
+
+function ReaderRolling:onZoom()
+	--@TODO re-read length info after font or lineheight changes  05.06 2012 (houqp)
+end