update script reader

gframe/replay_mode.cpp

@@ -938,9 +938,19 @@ void ReplayMode::ReplayReload() {
 	mainGame->dField.UpdateFieldCard(mainGame->LocalPlayer(1), LOCATION_REMOVED, (char*)queryBuffer);
 }
 byte* ReplayMode::ScriptReaderEx(const char* script_name, int* slen) {
-	char sname[256] = "./expansions";
-	strcat(sname, script_name + 1);//default script name: ./script/c%d.lua
+	char sname[256] = "./specials";
+	strcat(sname, script_name + 8);//default script name: ./script/c%d.lua
 	byte* buffer = default_script_reader(sname, slen);
+	if(!buffer) {
+		char sname[256] = "./expansions";
+		strcat(sname, script_name + 1);
+		buffer = default_script_reader(sname, slen);
+	}
+	if(!buffer) {
+		char sname[256] = "./beta";
+		strcat(sname, script_name + 1);
+		buffer = default_script_reader(sname, slen);
+	}
 	if(buffer)
 		return buffer;
 	else

gframe/single_duel.cpp

@@ -1551,9 +1551,19 @@ void SingleDuel::RefreshSingle(int player, int location, int sequence, int flag)
 	}
 }
 byte* SingleDuel::ScriptReaderEx(const char* script_name, int* slen) {
-	char sname[256] = "./expansions";
-	strcat(sname, script_name + 1);//default script name: ./script/c%d.lua
+	char sname[256] = "./specials";
+	strcat(sname, script_name + 8);//default script name: ./script/c%d.lua
 	byte* buffer = default_script_reader(sname, slen);
+	if(!buffer) {
+		char sname[256] = "./expansions";
+		strcat(sname, script_name + 1);
+		buffer = default_script_reader(sname, slen);
+	}
+	if(!buffer) {
+		char sname[256] = "./beta";
+		strcat(sname, script_name + 1);
+		buffer = default_script_reader(sname, slen);
+	}
 	if(buffer)
 		return buffer;
 	else

gframe/single_mode.cpp

@@ -852,9 +852,20 @@ void SingleMode::SinglePlayReload() {
 	mainGame->dField.UpdateFieldCard(mainGame->LocalPlayer(1), LOCATION_REMOVED, (char*)queryBuffer);
 }
 byte* SingleMode::ScriptReaderEx(const char* script_name, int* slen) {
-	char sname[256] = "./expansions";
-	strcat(sname, script_name + 1);//default script name: ./script/c%d.lua
-	if(ScriptReader(sname, slen))
+	char sname[256] = "./specials";
+	strcat(sname, script_name + 8);//default script name: ./script/c%d.lua
+	byte* buffer = ScriptReader(sname, slen);
+	if(!buffer) {
+		char sname[256] = "./expansions";
+		strcat(sname, script_name + 1);
+		buffer = ScriptReader(sname, slen);
+	}
+	if(!buffer) {
+		char sname[256] = "./beta";
+ 		strcat(sname, script_name + 1);
+ 		buffer = ScriptReader(sname, slen);
+ 	}
+	if(buffer)
 		return buffer;
 	else
 		return ScriptReader(script_name, slen);

gframe/tag_duel.cpp

@@ -1676,9 +1676,19 @@ void TagDuel::RefreshSingle(int player, int location, int sequence, int flag) {
 	}
 }
 byte* TagDuel::ScriptReaderEx(const char* script_name, int* slen) {
-	char sname[256] = "./expansions";
-	strcat(sname, script_name + 1);//default script name: ./script/c%d.lua
+	char sname[256] = "./specials";
+	strcat(sname, script_name + 8);//default script name: ./script/c%d.lua
 	byte* buffer = default_script_reader(sname, slen);
+	if(!buffer) {
+		char sname[256] = "./expansions";
+		strcat(sname, script_name + 1);
+		buffer = default_script_reader(sname, slen);
+	}
+	if(!buffer) {
+		char sname[256] = "./beta";
+		strcat(sname, script_name + 1);
+		buffer = default_script_reader(sname, slen);
+	}
 	if(buffer)
 		return buffer;
 	else