SaveData.eve ɂĂ̐


z肳gp

	EÕZ[uf[^pƂ

	EV[Ỹ̕Z[uf[^pƂ

	Ep͂ȂONATt^Ƃ


ӓ_Ȃ

	̃Q[̃Z[uf[^ƓT󂯂邾ɂꍇ

		gΏۃQ[ eve t@Chɂg@`hp̃Q[
		LqKv͂Ȃ

	l╨pꍇ

		gΏۃQ[ eve t@Chɂg@`hp̃Q[ɂ
		LqȂ΂ȂȂ
		܂͓O̐l╨et@CŒ`ĂȂ΂ȂȂ

	tH[}bg̊mF

		lׂƂɐl邩AOׂƂɖO邩
		ƂȒPȔ݂̂łAeÓł邩̌؂͍sĂȂ
		ȒPȔʉ߂ĐɏIĂAZ[uf[^ƂĂ
		sȏꍇit@C̔jAςɂsj

		L̊ȒPȔ̌ʁAt@C̔j܂͖m̃tH[}bg
		肳ꂽꍇłgm̃tH[}bgƈvƂ܂Łh
		Azzɐݒ肵Ă
		ɂt@CjĂĂȕQƂł

	

		gViIt@ĈtH_Ƃ̔z̃tH_hȊOɂ
		ANZXłȂiSRC ̐j


gp

	Local fileName = _
		LoadFileDialog("Simulation RPG Construction Z[uf[^", "src")
	If Len(fileName) > 0 Then
		Require "Lib\SaveData.eve"
		Local saveData
		Local result = Call(ParseSaveData, fileName)
		If result = 0 Then
			// o[W
			Local val = saveData["Version"]
			Talk VXe
				Version $(val)
			End

			// Option(Qs\͎gp) ̒l
			val = saveData["Option", "Qs\͎gp"]
			Talk VXe
				Qs\͎gp $(val)
			End

			// t@C
			//
			// ̃t@CŁgǂ܂ŃQ[i߂hm邱Ƃł
			// Q[NA̔ޗ̂ЂƂɂȂ
			val = saveData["FileName"]
			Talk VXe
				t@C $(val)
			End

			// Relation ̒l
			//
			// Z[uf[^ɑ݂pCbǵAҋ@EE̎҂݂̂
			// 폜ꂽpCbg݂͑Ȃ
			// îȂǕʓrǗĂ͍폜c悤j
			// ̂߁gׂĂ relationhQƂɂ͎O
			// SpCbg̔zKv
			// igParseSaveData Ăяoh̃Q[҂́Ap[X
			// Q[̑SpCbgm邱Ƃł͂j
			//
			// ȉ pilotList ͎Oɍ쐬ꂽSpCbg̔zƂ
			// iSpCbg̔z쐬鏈͏ȗj
			Local i j name name2
			Local last = Count(pilotList)
			For i = 1 To last
				name = pilotList[i]

				For j = 1 To last
					name2 = pilotList[j]
					If i = j Then
						// l
						Skip
					EndIf

					val = saveData["Relation", name, name2]
					Talk VXe
						$(name)  $(name2) ɑ΂ Relation $(val)
					End
				Next
			Next

			// pCbg̖OAxAol
			Local lv exp
			last = saveData["TotalPilot"]
			For i = 1 To last
				name = saveData["PilotNameList", i]
				lv = saveData["Pilot", name, "Lv"]
				exp = saveData["Pilot", name, "Exp"]
				Talk VXe
					$(name);Lv $(lv);Exp $(exp)
				End
			Next

			// jbg
			Local id rank status
			last = saveData["TotalUnitId"]
			For i = 1 To last
				id = saveData["UnitIdList", i]
				name = saveData["Unit", id, "Name"]
				rank = saveData["Unit", id, "Rank"]
				status = saveData["Unit", id, "Status"]
				Talk VXe
					$(name);Rank $(rank) $(status)
				End
			Next
		ElseIf result = 1 Then
			Talk VXe
				'$(fileName)' ͐퓬̃Z[uf[^łB
			End
		ElseIf result = 2 Then
			// jsĂm̃tH[}bgƈvƂ܂ł
			// ǂݍ܂Ă̂ŁAǂݍ܂ꂽeɂĂ͐탋[g
			// 邩ĂǂȂ

			Talk VXe
				'$(fileName)' ̓t@CjĂ邩AΉ̃o[W SRC ŕۑĂ܂B
			End
		EndIf

		UnSet saveData
	Else
		Talk VXe
			LZ܂B
		End
	EndIf
