diff --git a/src/control/Script.cpp b/src/control/Script.cpp
index e01743e2..319ba419 100644
--- a/src/control/Script.cpp
+++ b/src/control/Script.cpp
@@ -894,6 +894,11 @@ int CTheScripts::ScriptToLoad = 0;
 
 int CTheScripts::OpenScript()
 {
+	// glfwGetKey doesn't work because of CGame::Initialise is blocking
+	CPad::UpdatePads();
+	if (CPad::GetPad(0)->GetChar('G')) ScriptToLoad = 0;
+	if (CPad::GetPad(0)->GetChar('R')) ScriptToLoad = 1;
+	if (CPad::GetPad(0)->GetChar('D')) ScriptToLoad = 2;
 	CFileMgr::ChangeDir("\\");
 	switch (ScriptToLoad) {
 	case 0: return CFileMgr::OpenFile("DATA\\main.scm", "rb");