[Scummvm-cvs-logs] SF.net SVN: scummvm:[54608] scummvm/trunk/engines/mohawk/myst_areas.cpp

bgk at users.sourceforge.net bgk at users.sourceforge.net
Mon Nov 29 21:53:26 CET 2010


Revision: 54608
          http://scummvm.svn.sourceforge.net/scummvm/?rev=54608&view=rev
Author:   bgk
Date:     2010-11-29 20:53:26 +0000 (Mon, 29 Nov 2010)

Log Message:
-----------
MOHAWK: Implement slider value setting

Modified Paths:
--------------
    scummvm/trunk/engines/mohawk/myst_areas.cpp

Modified: scummvm/trunk/engines/mohawk/myst_areas.cpp
===================================================================
--- scummvm/trunk/engines/mohawk/myst_areas.cpp	2010-11-29 20:53:14 UTC (rev 54607)
+++ scummvm/trunk/engines/mohawk/myst_areas.cpp	2010-11-29 20:53:26 UTC (rev 54608)
@@ -554,6 +554,23 @@
 	// Draw slider
 	drawConditionalDataToScreen(1);
 
+	// Save slider value
+	uint16 value = 0;
+	if (_flagHV & 2) {
+		if (_stepsV) {
+			value = (_pos.y - _minV) / _stepV;
+		} else {
+			value = _pos.y;
+		}
+	} else if (_flagHV & 1) {
+		if (_stepsH) {
+			value = (_pos.x - _minH) / _stepH;
+		} else {
+			value = _pos.x;
+		}
+	}
+	_vm->_scriptParser->setVarValue(_var8, value);
+
 	// No longer in drag mode
 	_vm->_dragResource = 0;
 }


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.




More information about the Scummvm-git-logs mailing list