GLK: ADVSYS: More opcodes

3 files changed, 31 insertions, 0 deletions

diff --git a/engines/glk/advsys/glk_interface.cpp b/engines/glk/advsys/glk_interface.cpp
index c83f0c137c..800d70836e 100644
--- a/engines/glk/advsys/glk_interface.cpp
+++ b/engines/glk/advsys/glk_interface.cpp
@@ -39,5 +39,10 @@ void GlkInterface::print(int number) {
 	print(s);
 }
 
+Common::String GlkInterface::getLine() {
+	// TODO: Stub
+	return "";
+}
+
 } // End of namespace AdvSys
 } // End of namespace Glk
diff --git a/engines/glk/advsys/glk_interface.h b/engines/glk/advsys/glk_interface.h
index b316f1f84f..44f3db9939 100644
--- a/engines/glk/advsys/glk_interface.h
+++ b/engines/glk/advsys/glk_interface.h
@@ -52,6 +52,11 @@ protected:
 	 * @param number	Number to print
 	 */
 	void print(int number);
+
+	/**
+	 * Get an input line
+	 */
+	Common::String getLine();
 public:
 	/**
 	 * Constructor
diff --git a/engines/glk/advsys/vm.cpp b/engines/glk/advsys/vm.cpp
index ef943e620f..a06cd28512 100644
--- a/engines/glk/advsys/vm.cpp
+++ b/engines/glk/advsys/vm.cpp
@@ -285,30 +285,51 @@ void VM::opSVAR() {
 }
 
 void VM::opSSET() {
+	setVariable(getCodeByte(), _stack.top());
 }
 
 void VM::opSPLIT() {
+	_stack.top() = readCodeByte();
 }
 
 void VM::opSNLIT() {
+	_stack.top() = readCodeByte();
 }
 
 void VM::opYORN() {
+	Common::String line = getLine();
+	_stack.top() = line[0] == 'Y' || line[0] == 'y' ? TRUE : NIL;
 }
 
 void VM::opSAVE() {
+	if (saveGame().getCode() != Common::kNoError)
+		print("Sorry, the savegame couldn't be created");
 }
 
 void VM::opRESTORE() {
+	if (saveGame().getCode() != Common::kNoError)
+		print("Sorry, the savegame couldn't be restored");
 }
 
 void VM::opARG() {
+	int argNum = readCodeByte();
+	int varsSize = _stack[_fp - 3];
+	if (argNum >= varsSize)
+		error("Invalid argument number");
+	_stack.top() = _stack[_fp - 4 - argNum];
 }
 
 void VM::opASET() {
+	int argNum = readCodeByte();
+	int varsSize = _stack[_fp - 3];
+	if (argNum >= varsSize)
+		error("Invalid argument number");
+	_stack[_fp - 4 - argNum] = _stack.top();
 }
 
 void VM::opTMP() {
+	int val = readCodeByte();
+
 }
 
 void VM::opTSET() {