Load, Change, Save

# load, change, save. for EU4 Game.
eu4Game = {
	
}

Main =
{
	$call = { id = 0 }
} 

Event =
{
	id = 0

	$load_only_data = { fileName = { "input.eu4" } dir = { eu4Game } }
	
	$print = { val = { "load end" } }
	$print = { enter = { \n } }
	
	$iterate = { dir = { /eu4Game/provinecs/$/ } events = { test } recursive = { TRUE } }
	
	$print = { val = { "change end" } }
	$print = { val = { \n } }
	
	$call = { id = save } 
	
	$print = { val = { "save end" } }
	$print = { val = { \n } }
	
	$_getch = { } # pause
}


Event =
{
	id = save
	
	$save_data_only2 = { dirName = { eu4Game } fileName = { "save1.eu4" } option = { 1 } }
}
 
Event = {
	id = test
	
	$local = { name value }

	$parameter = { name value is_user_type real_dir }
	
	$if = { condition = { $AND = { $EQ = { FALSE $parameter.is_user_type } 
			$EQ = { base_tax $parameter.name }
			}
		} 
		then = {
			$assign = { $local.name data = { $parameter.name } }
 			$assign = { $local.value data = { 
							$add = { 100.0 $parameter.value } } } 
	
			$return = { name = $local.name value = $local.value }
		}
	}
}

Event = {
	id = print
	
	$local = { name value }

	$parameter = { name value is_user_type real_dir }
	
	$print = { data = { "name : " } }
	$print = { data = { $parameter.name } }
	$print = { enter = { \n } }
}