diff --git a/balloon/abstract_syntax_tree.cpp b/balloon/abstract_syntax_tree.cpp
deleted file mode 100644
index cb79ed0..0000000
--- a/balloon/abstract_syntax_tree.cpp
+++ /dev/null
@@ -1,1373 +0,0 @@
-#ifndef __ABSTRACT_SYNTAX_TREE_CPP__
-#define __ABSTRACT_SYNTAX_TREE_CPP__
-#include "abstract_syntax_tree.h"
-
-
-int exit_type=0;
-std::stack<var> ret_stack; // for function ret use(especially the recursion)
-int recursion_depth=0;     // avoid deep recursion to sigsegv 
-std::string str_for_input; // avoid stack overflow
-var* append_addr;          // used in append function
-
-var abstract_syntax_tree::calculation()
-{
-	++recursion_depth;
-	if(recursion_depth>512)
-	{
-		exit_type=__sigsegv_segmentation_error;
-		std::cout<<">>[Runtime-error] line "<<line<<":[SIGSEGV] too deep recursion(calc)."<<std::endl;
-		return error_var;
-	}
-	var temp;
-	temp.set_type(__null_type);
-	if(this->type==__number)
-	{
-		temp.set_type(__var_number);
-		temp.set_number(number);
-		--recursion_depth;
-		return temp;
-	}
-	else if(this->type==__string)
-	{
-		temp.set_type(__var_string);
-		temp.set_string(str);
-		--recursion_depth;
-		return temp;
-	}
-	else if(this->type==__id)
-	{
-		temp=this->call_identifier();
-		--recursion_depth;
-		return temp;
-	}
-	else if(this->type==__array)
-	{
-		temp.set_type(__var_array);
-		if(!children.empty())
-			for(std::list<abstract_syntax_tree>::iterator i=children.begin();i!=children.end();++i)
-				temp.append_array(i->calculation());
-		--recursion_depth;
-		return temp;
-	}
-	else if(this->type==__hash)
-	{
-		temp.set_type(__var_hash);
-		if(!children.empty())
-			for(std::list<abstract_syntax_tree>::iterator i=children.begin();i!=children.end();++i)
-			{
-				var t;
-				t=i->children.front().calculation();
-				t.set_name(i->name);
-				temp.append_hash(t);
-			}
-		--recursion_depth;
-		return temp;
-	}
-	else if(this->type==__function)
-	{
-		temp.set_type(__var_function);
-		temp.set_function(*this);
-		--recursion_depth;
-		return temp;
-	}
-	if(this->type==__nor_operator)
-	{
-		temp.set_type(__var_number);
-		temp=children.front().calculation();
-		if(temp.get_type()!=__var_number)
-		{
-			exit_type=__error_value_type;
-			std::cout<<">>[Runtime-error] line "<<line<<": must use a number to use \'!\' but use \'";
-			print_scalar(temp.get_type());
-			std::cout<<"\'."<<std::endl;
-		}
-		else
-		{
-			if(temp.get_number())
-				temp.set_number(0);
-			else
-				temp.set_number(1);
-		}
-		--recursion_depth;
-		return temp;
-	}
-	else if(this->type==__add_operator)
-	{
-		temp.set_type(__var_number);
-		var left_child=children.front().calculation();
-		var right_child=children.back().calculation();
-		if(left_child.get_type()==__var_number && right_child.get_type()==__var_number)
-			temp.set_number(left_child.get_number()+right_child.get_number());
-		else
-		{
-			exit_type=__error_value_type;
-			std::cout<<">>[Runtime-error] line "<<line<<": must use a number to use \'+\' but use \'";
-			print_scalar(left_child.get_type());
-			std::cout<<"\' and \'";
-			print_scalar(right_child.get_type());
-			std::cout<<"\'."<<std::endl;
-		}
-	}
-	else if(this->type==__sub_operator)
-	{
-		temp.set_type(__var_number);
-		std::list<abstract_syntax_tree>::iterator i=children.begin();
-		++i;
-		if(i==children.end())
-		{
-			temp=children.front().calculation();
-			if(temp.get_type()==__var_number)
-				temp.set_number(temp.get_number()*(-1));
-			else
-			{
-				exit_type=__error_value_type;
-				std::cout<<">>[Runtime-error] line "<<line<<": must use a number to use \'-\' but use \'";
-				print_scalar(temp.get_type());
-				std::cout<<"\'."<<std::endl;
-			}
-		}
-		else
-		{
-			var left_child=children.front().calculation();
-			var right_child=children.back().calculation();
-			if(left_child.get_type()==__var_number && right_child.get_type()==__var_number)
-				temp.set_number(left_child.get_number()-right_child.get_number());
-			else
-			{
-				exit_type=__error_value_type;
-				std::cout<<">>[Runtime-error] line "<<line<<": must use a number to use \'-\' but use \'";
-				print_scalar(left_child.get_type());
-				std::cout<<"\' and \'";
-				print_scalar(right_child.get_type());
-				std::cout<<"\'."<<std::endl;
-			}
-		}
-	}
-	else if(this->type==__mul_operator)
-	{
-		temp.set_type(__var_number);
-		var left_child=children.front().calculation();
-		var right_child=children.back().calculation();
-		if(left_child.get_type()==__var_number && right_child.get_type()==__var_number)
-			temp.set_number(left_child.get_number()*right_child.get_number());
-		else
-		{
-			exit_type=__error_value_type;
-			std::cout<<">>[Runtime-error] line "<<line<<": must use a number to use \'*\' but use \'";
-			print_scalar(left_child.get_type());
-			std::cout<<"\' and \'";
-			print_scalar(right_child.get_type());
-			std::cout<<"\'."<<std::endl;
-		}
-	}
-	else if(this->type==__div_operator)
-	{
-		temp.set_type(__var_number);
-		var left_child=children.front().calculation();
-		var right_child=children.back().calculation();
-		if(left_child.get_type()==__var_number && right_child.get_type()==__var_number)
-		{
-			temp.set_number(left_child.get_number()/right_child.get_number());
-			if(std::isnan(temp.get_number()) || std::isinf(temp.get_number()))
-			{
-				exit_type=__sigfpe_arithmetic_exception;
-				std::cout<<">>[Runtime-error] line "<<line<<": get number \'NaN\' or \'Inf\'."<<std::endl;
-			}
-		}
-		else
-		{
-			exit_type=__error_value_type;
-			std::cout<<">>[Runtime-error] line "<<line<<": must use a number to use \'/\' but use \'";
-			print_scalar(left_child.get_type());
-			std::cout<<"\' and \'";
-			print_scalar(right_child.get_type());
-			std::cout<<"\'."<<std::endl;
-		}
-	}
-	else if(this->type==__link_operator)
-	{
-		temp.set_type(__var_string);
-		var left_child=children.front().calculation();
-		var right_child=children.back().calculation();
-		if(left_child.get_type()==__var_string && right_child.get_type()==__var_string)
-			temp.set_string(left_child.get_string()+right_child.get_string());
-		else
-		{
-			exit_type=__error_value_type;
-			std::cout<<">>[Runtime-error] line "<<line<<": must use a string to use \'~\' but use \'";
-			print_scalar(left_child.get_type());
-			std::cout<<"\' and \'";
-			print_scalar(right_child.get_type());
-			std::cout<<"\'."<<std::endl;
-		}
-	}
-	else if(this->type==__cmp_equal)
-	{
-		temp.set_type(__var_number);
-		var left_child=children.front().calculation();
-		var right_child=children.back().calculation();
-		if(left_child.get_type()==right_child.get_type())
-		{
-			if(left_child.get_type()==__var_number)
-				temp.set_number((double)(left_child.get_number()==right_child.get_number()));
-			else if(left_child.get_type()==__var_string)
-				temp.set_number((double)(left_child.get_string()==right_child.get_string()));
-			else
-			{
-				exit_type=__error_value_type;
-				std::cout<<">>[Runtime-error] line "<<line<<": must use number or string to use \'==\' but use \'";
-				print_scalar(left_child.get_type());
-				std::cout<<"\'."<<std::endl;
-			}
-		}
-		else
-		{
-			exit_type=__error_value_type;
-			std::cout<<">>[Runtime-error] line "<<line<<": must use same type to use \'==\' but use \'";
-			print_scalar(left_child.get_type());
-			std::cout<<"\' and \'";
-			print_scalar(right_child.get_type());
-			std::cout<<"\'."<<std::endl;
-		}
-	}
-	else if(this->type==__cmp_not_equal)
-	{
-		temp.set_type(__var_number);
-		var left_child=children.front().calculation();
-		var right_child=children.back().calculation();
-		if(left_child.get_type()==right_child.get_type())
-		{
-			if(left_child.get_type()==__var_number)
-				temp.set_number((double)(left_child.get_number()!=right_child.get_number()));
-			else if(left_child.get_type()==__var_string)
-				temp.set_number((double)(left_child.get_string()!=right_child.get_string()));
-			else
-			{
-				exit_type=__error_value_type;
-				std::cout<<">>[Runtime-error] line "<<line<<": must use number or string to use \'!=\' but use \'";
-				print_scalar(left_child.get_type());
-				std::cout<<"\'."<<std::endl;
-			}
-		}
-		else
-		{
-			exit_type=__error_value_type;
-			std::cout<<">>[Runtime-error] line "<<line<<": must use same type to use \'!=\' but use \'";
-			print_scalar(left_child.get_type());
-			std::cout<<"\' and \'";
-			print_scalar(right_child.get_type());
-			std::cout<<"\'."<<std::endl;
-		}
-	}
-	else if(this->type==__cmp_less)
-	{
-		temp.set_type(__var_number);
-		var left_child=children.front().calculation();
-		var right_child=children.back().calculation();
-		if(left_child.get_type()==right_child.get_type())
-		{
-			if(left_child.get_type()==__var_number)
-				temp.set_number((double)(left_child.get_number()<right_child.get_number()));
-			else if(left_child.get_type()==__var_string)
-				temp.set_number((double)(left_child.get_string()<right_child.get_string()));
-			else
-			{
-				exit_type=__error_value_type;
-				std::cout<<">>[Runtime-error] line "<<line<<": must use number or string to use \'<\' but use \'";
-				print_scalar(left_child.get_type());
-				std::cout<<"\'."<<std::endl;
-			}
-		}
-		else
-		{
-			exit_type=__error_value_type;
-			std::cout<<">>[Runtime-error] line "<<line<<": must use same type to use \'<\' but use \'";
-			print_scalar(left_child.get_type());
-			std::cout<<"\' and \'";
-			print_scalar(right_child.get_type());
-			std::cout<<"\'."<<std::endl;
-		}
-	}
-	else if(this->type==__cmp_more)
-	{
-		temp.set_type(__var_number);
-		var left_child=children.front().calculation();
-		var right_child=children.back().calculation();
-		if(left_child.get_type()==right_child.get_type())
-		{
-			if(left_child.get_type()==__var_number)
-				temp.set_number((double)(left_child.get_number()>right_child.get_number()));
-			else if(left_child.get_type()==__var_string)
-				temp.set_number((double)(left_child.get_string()>right_child.get_string()));
-			else
-			{
-				exit_type=__error_value_type;
-				std::cout<<">>[Runtime-error] line "<<line<<": must use number or string to use \'>\' but use \'";
-				print_scalar(left_child.get_type());
-				std::cout<<"\'."<<std::endl;
-			}
-		}
-		else
-		{
-			exit_type=__error_value_type;
-			std::cout<<">>[Runtime-error] line "<<line<<": must use same type to use \'>\' but use \'";
-			print_scalar(left_child.get_type());
-			std::cout<<"\' and \'";
-			print_scalar(right_child.get_type());
-			std::cout<<"\'."<<std::endl;
-		}
-	}
-	else if(this->type==__cmp_less_or_equal)
-	{
-		temp.set_type(__var_number);
-		var left_child=children.front().calculation();
-		var right_child=children.back().calculation();
-		if(left_child.get_type()==right_child.get_type())
-		{
-			if(left_child.get_type()==__var_number)
-				temp.set_number((double)(left_child.get_number()<=right_child.get_number()));
-			else if(left_child.get_type()==__var_string)
-				temp.set_number((double)(left_child.get_string()<=right_child.get_string()));
-			else
-			{
-				exit_type=__error_value_type;
-				std::cout<<">>[Runtime-error] line "<<line<<": must use number or string to use \'<=\' but use \'";
-				print_scalar(left_child.get_type());
-				std::cout<<"\'."<<std::endl;
-			}
-		}
-		else
-		{
-			exit_type=__error_value_type;
-			std::cout<<">>[Runtime-error] line "<<line<<": must use same type to use \'<=\' but use \'";
-			print_scalar(left_child.get_type());
-			std::cout<<"\' and \'";
-			print_scalar(right_child.get_type());
-			std::cout<<"\'."<<std::endl;
-		}
-	}
-	else if(this->type==__cmp_more_or_equal)
-	{
-		temp.set_type(__var_number);
-		var left_child=children.front().calculation();
-		var right_child=children.back().calculation();
-		if(left_child.get_type()==right_child.get_type())
-		{
-			if(left_child.get_type()==__var_number)
-				temp.set_number((double)(left_child.get_number()>=right_child.get_number()));
-			else if(left_child.get_type()==__var_string)
-				temp.set_number((double)(left_child.get_string()>=right_child.get_string()));
-			else
-			{
-				exit_type=__error_value_type;
-				std::cout<<">>[Runtime-error] line "<<line<<": must use number or string to use \'>=\' but use \'";
-				print_scalar(left_child.get_type());
-				std::cout<<"\'."<<std::endl;
-			}
-		}
-		else
-		{
-			exit_type=__error_value_type;
-			std::cout<<">>[Runtime-error] line "<<line<<": must use same type to use \'>=\' but use \'";
-			print_scalar(left_child.get_type());
-			std::cout<<"\' and \'";
-			print_scalar(right_child.get_type());
-			std::cout<<"\'."<<std::endl;
-		}
-	}
-	else if(this->type==__or_operator)
-	{
-		temp.set_type(__var_number);
-		var left_child=children.front().calculation();
-		var right_child=children.back().calculation();
-		if(left_child.get_type()==__var_number && right_child.get_type()==__var_number)
-			temp.set_number((double)(left_child.get_number() || right_child.get_number()));
-		else
-		{
-			exit_type=__error_value_type;
-			std::cout<<">>[Runtime-error] line "<<line<<": must use same type to use \'or\' but use \'";
-			print_scalar(left_child.get_type());
-			std::cout<<"\' and \'";
-			print_scalar(right_child.get_type());
-			std::cout<<"\'."<<std::endl;
-		}
-	}
-	else if(this->type==__and_operator)
-	{
-		temp.set_type(__var_number);
-		var left_child=children.front().calculation();
-		var right_child=children.back().calculation();
-		if(left_child.get_type()==__var_number && right_child.get_type()==__var_number)
-			temp.set_number((double)(left_child.get_number() && right_child.get_number()));
-		else
-		{
-			exit_type=__error_value_type;
-			std::cout<<">>[Runtime-error] line "<<line<<": must use same type to use \'and\' but use \'";
-			print_scalar(left_child.get_type());
-			std::cout<<"\' and \'";
-			print_scalar(right_child.get_type());
-			std::cout<<"\'."<<std::endl;
-		}
-	}
-	else
-	{
-		exit_type=__error_value_type;
-		std::cout<<">>[Runtime-error] line "<<line<<": error type \'";
-		print_detail_token(this->type);
-		std::cout<<"\' occurred when doing calculation."<<std::endl;
-	}
-	--recursion_depth;
-	return temp;
-}
-
-bool abstract_syntax_tree::condition_check()
-{
-	++recursion_depth;
-	if(recursion_depth>512)
-	{
-		exit_type=__sigsegv_segmentation_error;
-		std::cout<<">>[Runtime-error] line "<<line<<":[SIGSEGV] too deep recursion(check)."<<std::endl;
-		return false;
-	}
-	if(type==__null_node) // this is set for "for(;;)"
-	{
-		--recursion_depth;
-		return true;
-	}
-	bool ret=false;
-	var temp=calculation();
-	if(temp.get_type()==__var_number)
-	{
-		if(temp.get_number())
-			ret=true;
-	}
-	else
-	{
-		exit_type=__error_value_type;
-		std::cout<<">>[Runtime-error] line "<<line<<": must use a number to make a choice but use \'";
-		print_scalar(temp.get_type());
-		std::cout<<"\'."<<std::endl;
-	}
-	--recursion_depth;
-	return ret;
-}
-
-var abstract_syntax_tree::call_identifier()
-{
-	++recursion_depth;
-	if(recursion_depth>512)
-	{
-		exit_type=__sigsegv_segmentation_error;
-		std::cout<<">>[Runtime-error] line "<<line<<":[SIGSEGV] too deep recursion(call)."<<std::endl;
-		return error_var;
-	}
-	var temp;
-	temp.set_type(__null_type);
-	if(scope.search_var(name))
-		temp=scope.get_var(name);
-	else
-	{
-		std::cout<<">>[Runtime-error] line "<<line<<": cannot find a var named \'"<<name<<"\'."<<std::endl;
-		exit_type=__find_var_failure;
-		--recursion_depth;
-		return temp;
-	}
-	if(!children.empty())
-	{
-		for(std::list<abstract_syntax_tree>::iterator i=children.begin();i!=children.end();++i)
-		{
-			if(i->type==__call_array && temp.get_type()==__var_array)
-			{
-				var place=i->children.front().calculation();
-				if(place.get_type()==__var_number)
-				{
-					if(place.get_number()>=0)
-						temp=temp.get_array_member((int)place.get_number());
-					else
-					{
-						exit_type=__get_value_failure;
-						std::cout<<">>[Runtime-error] line"<<i->line<<": number shouldn't be less than 0 when calling an array."<<std::endl;
-						break;
-					}
-				}
-				else
-				{
-					exit_type=__error_value_type;
-					std::cout<<">>[Runtime-error] line "<<i->line<<": ";
-					print_detail_token(i->type);
-					std::cout<<": incorrect type \'";
-					print_scalar(temp.get_type());
-					std::cout<<"\'."<<std::endl;
-					break;
-				}
-			}
-			else if(i->type==__call_hash && temp.get_type()==__var_hash)
-			{
-				temp=temp.get_hash_member(i->name);
-				if(temp.get_type()==__null_type)
-				{
-					exit_type=__get_value_failure;
-					std::cout<<">>[Runtime-error] line "<<i->line<<": cannot find a hash-member named \'"<<i->name<<"\' or this value is set to __null_type. detail: ";
-					temp.print_var();
-					std::cout<<"."<<std::endl;
-					break;
-				}
-			}
-			else if(i->type==__call_function && temp.get_type()==__var_function)
-			{
-				var self;
-				self.set_type(__var_function);
-				self.set_name(temp.get_name());
-				self.set_function(temp.get_function());
-				if(temp.get_name()=="append")
-				{
-					append_addr=NULL;
-					if(!i->children.empty())
-						append_addr=i->children.begin()->get_var_addr();
-				}
-				std::list<var> parameter;
-				if(!i->children.empty())
-					for(std::list<abstract_syntax_tree>::iterator j=i->children.begin();j!=i->children.end();++j)
-						parameter.push_back(j->calculation());
-				temp=temp.get_function().run_func(parameter,self);
-			}
-			else
-			{
-				exit_type=__error_value_type;
-				std::cout<<">>[Runtime-error] line "<<i->line<<": ";
-				print_detail_token(i->type);
-				std::cout<<": incorrect type \'";
-				print_scalar(temp.get_type());
-				std::cout<<"\'."<<std::endl;
-				break;
-			}
-		}
-	}
-	--recursion_depth;
-	return temp;
-}
-
-var* abstract_syntax_tree::get_var_addr()
-{
-	++recursion_depth;
-	if(recursion_depth>512)
-	{
-		exit_type=__sigsegv_segmentation_error;
-		std::cout<<">>[Runtime-error] line "<<line<<":[SIGSEGV] too deep recursion(addr)."<<std::endl;
-		return &error_var;
-	}
-	var* addr=&error_var;
-	if(scope.search_var(name))
-		addr=scope.get_addr(name);
-	else
-	{
-		std::cout<<">>[Runtime-error] line "<<line<<": cannot find a var named \'"<<name<<"\'."<<std::endl;
-		exit_type=__find_var_failure;
-		return addr;
-	}
-	if(!children.empty())
-	{
-		for(std::list<abstract_syntax_tree>::iterator i=children.begin();i!=children.end();++i)
-		{
-			if(i->type==__call_array && addr->get_type()==__var_array)
-			{
-				var place=i->children.front().calculation();
-				if(place.get_type()==__var_number)
-				{
-					if(place.get_number()>=0)
-						addr=addr->get_array_member_addr((int)place.get_number());
-					else
-					{
-						exit_type=__get_value_failure;
-						std::cout<<">>[Runtime-error] line"<<i->line<<": number shouldn't be less than 0 when calling an array."<<std::endl;
-						break;
-					}
-				}
-				else
-				{
-					exit_type=__error_value_type;
-					std::cout<<">>[Runtime-error] line "<<i->line<<": ";
-					print_detail_token(i->type);
-					std::cout<<": incorrect type \'";
-					print_scalar(addr->get_type());
-					std::cout<<"\'."<<std::endl;
-					break;
-				}
-			}
-			else if(i->type==__call_hash && addr->get_type()==__var_hash)
-			{
-				addr=addr->get_hash_member_addr(i->name);
-				if(addr->get_type()==__null_type)
-				{
-					exit_type=__get_value_failure;
-					std::cout<<">>[Runtime-error] line "<<i->line<<": cannot find a hash-member named \'"<<i->name<<"\'."<<std::endl;
-					break;
-				}
-			}
-			else if(i->type==__call_function && addr->get_type()==__var_function)
-			{
-				exit_type=__error_value_type;
-				std::cout<<">>[Runtime-error] line "<<i->line<<": function-returned value cannot be assigned."<<std::endl;
-				break;
-			}
-			else
-			{
-				exit_type=__error_value_type;
-				std::cout<<">>[Runtime-error] line "<<i->line<<": ";
-				print_detail_token(i->type);
-				std::cout<<": incorrect type \'";
-				print_scalar(addr->get_type());
-				std::cout<<"\'."<<std::endl;
-				break;
-			}
-		}
-	}
-	--recursion_depth;
-	return addr;
-}
-
-var abstract_syntax_tree::assignment()
-{
-	++recursion_depth;
-	if(recursion_depth>512)
-	{
-		exit_type=__sigsegv_segmentation_error;
-		std::cout<<">>[Runtime-error] line "<<line<<":[SIGSEGV] too deep recursion(assignment)."<<std::endl;
-		return error_var;
-	}
-	var ret,temp;
-	abstract_syntax_tree id=children.front();
-	abstract_syntax_tree value=children.back();
-	var* addr=id.get_var_addr();
-	if(value.type==__equal || value.type==__add_equal || value.type==__sub_equal || value.type==__mul_equal || value.type==__div_equal || value.type==__link_equal)
-		temp=value.assignment();
-	else
-		temp=value.calculation();
-	if(type==__equal)
-	{
-		std::string tname=addr->get_name();
-		*addr=temp;
-		addr->set_name(tname);
-	}
-	else if(type==__add_equal || type==__sub_equal || type==__mul_equal || type==__div_equal)
-	{
-		if(addr->get_type()==__var_number && temp.get_type()==__var_number)
-		{
-			switch(type)
-			{
-				case __add_equal:addr->set_number(addr->get_number()+temp.get_number());break;
-				case __sub_equal:addr->set_number(addr->get_number()-temp.get_number());break;
-				case __mul_equal:addr->set_number(addr->get_number()*temp.get_number());break;
-				case __div_equal:addr->set_number(addr->get_number()/temp.get_number());break;
-			}
-			if(std::isnan(addr->get_number()) || std::isinf(addr->get_number()))
-			{
-				exit_type=__sigfpe_arithmetic_exception;
-				std::cout<<">>[Runtime-error] line "<<line<<": get number \'NaN\' or \'Inf\'."<<std::endl;
-			}
-		}
-		else
-		{
-			exit_type=__error_value_type;
-			std::cout<<">>[Runtime-error] line "<<line<<": incorrect type \'";
-			print_scalar(addr->get_type());
-			std::cout<<"\' and \'";
-			print_scalar(temp.get_type());
-			std::cout<<"\' but this operator ";
-			print_detail_token(type);
-			std::cout<<" must use \'number\' and \'number\'."<<std::endl;
-		}
-	}
-	else if(type==__link_equal)
-	{
-		if(addr->get_type()==__var_string && temp.get_type()==__var_string)
-			addr->set_string(addr->get_string()+temp.get_string());
-		else
-		{
-			exit_type=__error_value_type;
-			std::cout<<">>[Runtime-error] line "<<line<<": incorrect type \'";
-			print_scalar(addr->get_type());
-			std::cout<<"\' and \'";
-			print_scalar(temp.get_type());
-			std::cout<<"\' but this operator ~ must use \'string\' and \'string\'."<<std::endl;
-		}
-	}
-	
-	ret=*addr;
-	--recursion_depth;
-	return ret;
-}
-
-void abstract_syntax_tree::run_root()
-{
-	recursion_depth=0;
-	++recursion_depth;
-	
-	// before running initializing
-	while(!ret_stack.empty())ret_stack.pop();
-	scope.set_clear();
-	srand(unsigned(time(NULL)));
-	int beg_time,end_time;
-	exit_type=__process_exited_successfully;
-	
-	beg_time=time(NULL);
-	for(std::list<abstract_syntax_tree>::iterator i=children.begin();i!=children.end();++i)
-	{
-		if(i->type==__definition)
-		{
-			var new_var;
-			std::list<abstract_syntax_tree>::iterator j=i->children.begin();
-			std::string _name=j->name;
-			if(!scope.check_redefine(_name))
-			{
-				++j;
-				if(j!=i->children.end())
-					new_var=j->calculation();
-				new_var.set_name(_name);
-				scope.add_new_var(new_var);
-			}
-			else
-			{
-				std::cout<<">>[Runtime-error] line "<<i->line<<": redeclaration of \'"<<_name<<"\'."<<std::endl;
-				exit_type=__redeclaration;
-				break;
-			}
-		}
-		else if(i->type==__equal || i->type==__add_equal || i->type==__sub_equal || i->type==__mul_equal || i->type==__div_equal || i->type==__link_equal)
-			i->assignment();
-		else if(i->type==__add_operator || i->type==__sub_operator || i->type==__mul_operator || i->type==__div_operator || i->type==__link_operator || i->type==__or_operator || i->type==__and_operator || i->type==__nor_operator)
-			var t=i->calculation();
-		else if(i->type==__number || i->type==__string)
-			;
-		else if(i->type==__id)
-			i->call_identifier();
-		else if(i->type==__while || i->type==__for)
-		{
-			scope.add_new_block_scope();
-			int ret_type=i->run_loop();
-			if(ret_type==__return)
-			{
-				std::cout<<"[Runtime-error] line "<<i->line<<": incorrect use of break/continue."<<std::endl;
-				exit_type=__error_command_use;
-			}
-			scope.pop_last_block_scope();
-		}
-		else if(i->type==__ifelse)
-		{
-			scope.add_new_block_scope();
-			int ret_type=i->run_ifelse();
-			if(ret_type==__continue || ret_type==__break || ret_type==__return)
-			{
-				std::cout<<"[Runtime-error] line "<<i->line<<": incorrect use of break/continue."<<std::endl;
-				exit_type=__error_command_use;
-			}
-			scope.pop_last_block_scope();
-		}
-		if(exit_type!=__process_exited_successfully)
-			break;
-	}
-	end_time=time(NULL);
-	std::cout<<std::endl<<"------------------------------------------------------------------------------"<<std::endl;
-	if(exit_type!=__process_exited_successfully)
-		alert_sound();
-	std::cout<<">>[Runtime] process exited after "<<end_time-beg_time<<" sec(s) with returned state \'";
-	print_exit_type(exit_type);
-	std::cout<<"\'."<<std::endl;
-	scope.set_clear();
-	return;
-}
-
-int abstract_syntax_tree::run_loop()
-{
-	++recursion_depth;
-	if(recursion_depth>512)
-	{
-		exit_type=__sigsegv_segmentation_error;
-		std::cout<<">>[Runtime-error] line "<<line<<":[SIGSEGV] too deep recursion(loop)."<<std::endl;
-		return 0;
-	}
-	int ret=0;
-	if(type==__while)
-	{
-		abstract_syntax_tree condition=children.front();
-		abstract_syntax_tree blk=children.back();
-		while(condition.condition_check())
-		{
-			int type=blk.run_block();
-			if(type==__break)
-				break;
-			else if(type==__return)
-			{
-				ret=__return;
-				break;
-			}
-			if(exit_type!=__process_exited_successfully)
-				break;
-		}
-	}
-	else if(type==__for)
-	{
-		std::list<abstract_syntax_tree>::iterator iter=children.begin();
-		abstract_syntax_tree def=*iter;
-		++iter;
-		abstract_syntax_tree condition=*iter;
-		++iter;
-		abstract_syntax_tree var_changement=*iter;
-		abstract_syntax_tree blk=children.back();
-		
-		scope.add_new_local_scope();
-		if(def.type==__definition)
-		{
-			var new_var;
-			std::list<abstract_syntax_tree>::iterator j=def.children.begin();
-			std::string _name=j->name;
-			if(!scope.check_redefine(_name))
-			{
-				++j;
-				if(j!=def.children.end())
-					new_var=j->calculation();
-				new_var.set_name(_name);
-				scope.add_new_var(new_var);
-			}
-			else
-			{
-				std::cout<<">>[Runtime-error] line "<<line<<": redeclaration of \'"<<_name<<"\'."<<std::endl;
-				exit_type=__redeclaration;
-			}
-		}
-		else if(def.type==__equal || def.type==__add_equal || def.type==__sub_equal || def.type==__mul_equal || def.type==__div_equal || def.type==__link_equal)
-			def.assignment();
-		else if(def.type==__id)
-			def.call_identifier();
-		
-		while(condition.condition_check())
-		{
-			int type=blk.run_block();
-			if(type==__break)
-				break;
-			else if(type==__return)
-			{
-				ret=__return;
-				break;
-			}
-			if(exit_type!=__process_exited_successfully)
-				break;
-			if(var_changement.type==__equal || var_changement.type==__add_equal || var_changement.type==__sub_equal || var_changement.type==__mul_equal || var_changement.type==__div_equal || var_changement.type==__link_equal)
-				var_changement.assignment();
-			else if(var_changement.type==__id)
-				var_changement.call_identifier();
-		}
-		scope.pop_last_local_scope();
-	}
-	--recursion_depth;
-	return ret;
-}
-
-int abstract_syntax_tree::run_ifelse()
-{
-	++recursion_depth;
-	if(recursion_depth>512)
-	{
-		exit_type=__sigsegv_segmentation_error;
-		std::cout<<">>[Runtime-error] line "<<line<<":[SIGSEGV] too deep recursion(choose)."<<std::endl;
-		return 0;
-	}
-	int ret=0;
-	for(std::list<abstract_syntax_tree>::iterator i=children.begin();i!=children.end();++i)
-	{
-		if((i->type==__if || i->type==__elsif) && i->children.front().condition_check())
-		{
-			ret=i->children.back().run_block();
-			break;
-		}
-		else if(i->type==__else)
-		{
-			ret=i->children.back().run_block();
-			break;
-		}
-	}
-	--recursion_depth;
-	return ret;
-}
-
-var abstract_syntax_tree::run_func(std::list<var> parameter,var self_func)
-{
-	++recursion_depth;
-	if(recursion_depth>512)
-	{
-		exit_type=__sigsegv_segmentation_error;
-		std::cout<<">>[Runtime-error] line "<<line<<":[SIGSEGV] too deep recursion(function)."<<std::endl;
-		return error_var;
-	}
-	
-	var ret;
-	// ret is used to return function's value
-	// ret must be pushed into stack:ret_stack
-	// ret_stack is used for recursion
-	// before each function ends,a var will be poped from stack
-	// and the ret will be set as this poped var.
-	scope.add_new_block_scope();
-	scope.add_new_local_scope();
-	
-	scope.add_new_var(self_func);
-	
-	abstract_syntax_tree para=children.front();// get parameter name(declared in function)
-	abstract_syntax_tree blk=children.back();  // get block
-	std::list<abstract_syntax_tree>::iterator para_name=para.children.begin();
-	std::list<var>::iterator para_value=parameter.begin();
-	
-	
-	if(self_func.get_name()=="print")
-	{
-		std::string temp_str;
-		for(std::list<var>::iterator i=parameter.begin();i!=parameter.end();++i)
-		{
-			switch(i->get_type())
-			{
-				case __null_type:std::cout<<">>[Runtime-error] cannot print null value."<<std::endl;exit_type=__error_value_type;break;
-				case __var_number:std::cout<<i->get_number();break;
-				case __var_string:
-					temp_str=i->get_string();
-					for(int j=0;j<temp_str.length();++j)
-					{
-						if(temp_str[j]!='\\')
-							std::cout<<temp_str[j];
-						else
-						{
-							++j;
-							switch(temp_str[j])
-							{
-								case 'n':std::cout<<'\n';break;
-								case 't':std::cout<<'\t';break;
-								case 'r':std::cout<<'\r';break;
-								case '\\':std::cout<<'\\';break;
-								case '\'':std::cout<<'\'';break;
-								case '\"':std::cout<<'\"';break;
-								default:--j;break;
-							}
-						}
-					}
-					break;
-				case __var_array:std::cout<<">>[Runtime-error] cannot print array value."<<std::endl;exit_type=__error_value_type;break;
-				case __var_hash:std::cout<<">>[Runtime-error] cannot print hash value."<<std::endl;exit_type=__error_value_type;break;
-				case __var_function:std::cout<<">>[Runtime-error] cannot print function."<<std::endl;exit_type=__error_value_type;break;
-				default:std::cout<<">>[Runtime-error] cannot print unknown value."<<std::endl;exit_type=__error_value_type;break;
-			}
-			if(exit_type==__error_value_type)
-				break;
-		}
-		// this must be added when running a function
-		ret.set_type(__var_number);
-		if(exit_type!=__error_value_type)
-			ret.set_number(1);
-		else
-			ret.set_number(0);
-		ret_stack.push(ret);
-	}
-	else if(self_func.get_name()=="append")
-	{
-		if(append_addr)
-		{
-			std::list<var>::iterator i=parameter.begin();
-			if(append_addr->get_type()==__var_array)
-			{
-				++i;
-				for(;i!=parameter.end();++i)
-					append_addr->append_array(*i);
-			}
-			else if(append_addr->get_type()==__null_type)
-			{
-				std::cout<<">>[Runtime-error] line "<<line<<": cannot find a var named \'"<<parameter.begin()->get_name()<<"\'."<<std::endl;
-				exit_type=__find_var_failure;
-			}
-			else
-			{
-				std::cout<<">>[Runtime-error] line "<<line<<": called var's type is not an array."<<std::endl;
-				exit_type=__error_value_type;
-			}
-		}
-		else
-		{
-			exit_type=__lack_parameter;
-			std::cout<<">>[Runtime-error] line "<<line<<": lack parameter(s)."<<std::endl;
-		}
-		// this must be added when running a function
-		ret.set_type(__var_number);
-		if(exit_type!=__find_var_failure)
-			ret.set_number(1);
-		else
-			ret.set_number(0);
-		ret_stack.push(ret);
-	}
-	else if(self_func.get_name()=="int")
-	{
-		if(!parameter.empty())
-		{
-			std::list<var>::iterator i=parameter.begin();
-			if(i->get_type()==__var_number)
-			{
-				int temp;
-				temp=(int)(i->get_number());
-				ret.set_type(__var_number);
-				ret.set_number((double)temp);
-			}
-			else
-			{
-				exit_type=__error_value_type;
-				std::cout<<">>[Runtime-error] line "<<this->line<<": incorrect value type.must use a number."<<std::endl;
-			}
-		}
-		else
-		{
-			exit_type=__lack_parameter;
-			std::cout<<">>[Runtime-error] line "<<this->line<<": lack parameter(s)."<<std::endl;
-		}
-		// this must be added when running a function
-		if(exit_type!=__process_exited_successfully)
-			ret.set_type(__null_type);
-		ret_stack.push(ret);
-	}
-	else if(self_func.get_name()=="num")
-	{
-		if(!parameter.empty())
-		{
-			std::list<var>::iterator i=parameter.begin();
-			if(i->get_type()==__var_string && check_number(i->get_string()))
-			{
-				std::string str=i->get_string();
-				ret.set_type(__var_number);
-				// use this->set_number to help trans the str to number
-				this->set_number(str);
-				ret.set_number(this->number);
-			}
-			else
-			{
-				exit_type=__error_value_type;
-				std::cout<<">>[Runtime-error] line "<<this->line<<": incorrect value type.must use a string that can be put into a number."<<std::endl;
-			}
-		}
-		else
-		{
-			exit_type=__lack_parameter;
-			std::cout<<">>[Runtime-error] line "<<this->line<<": lack parameter(s)."<<std::endl;
-		}
-		// this must be added when running a function
-		if(exit_type!=__process_exited_successfully)
-			ret.set_type(__null_type);
-		ret_stack.push(ret);
-	}
-	else if(self_func.get_name()=="input")
-	{
-		ret.set_type(__var_string);
-		str_for_input="";
-		std::cin>>str_for_input;
-		ret.set_string(str_for_input);
-		ret_stack.push(ret);
-	}
-	else if(self_func.get_name()=="size")
-	{
-		if(!parameter.empty())
-		{
-			std::list<var>::iterator i=parameter.begin();
-			if(i->get_type()==__var_array)
-			{
-				int cnt=0;
-				cnt=i->get_array_size();
-				ret.set_type(__var_number);
-				ret.set_number((double)cnt);
-			}
-			else
-			{
-				exit_type=__error_value_type;
-				std::cout<<">>[Runtime-error] line "<<this->line<<": incorrect value type.must use an array."<<std::endl;
-			}
-		}
-		else
-		{
-			exit_type=__lack_parameter;
-			std::cout<<">>[Runtime-error] line "<<this->line<<": lack parameter(s)."<<std::endl;
-		}
-		// this must be added when running a function
-		if(exit_type!=__process_exited_successfully)
-			ret.set_type(__null_type);
-		ret_stack.push(ret);
-	}
-	else if(self_func.get_name()=="rand")
-	{
-		ret.set_type(__var_number);
-		double content=rand();
-		while(content>=1)content/=10;
-		ret.set_number(content);
-		// this must be added when running a function
-		ret_stack.push(ret);
-	}
-	else if(self_func.get_name()=="chars")
-	{
-		if(!parameter.empty())
-		{
-			std::list<var>::iterator i=parameter.begin();
-			if(i->get_type()==__var_string)
-			{
-				std::string str=i->get_string();
-				ret.set_type(__var_array);
-				std::string temp="";
-				for(int j=0;j<str.length();++j)
-				{
-					temp="";
-					temp+=str[j];
-					var new_var;
-					new_var.set_type(__var_string);
-					new_var.set_string(temp);
-					ret.append_array(new_var);
-				}
-			}
-			else
-			{
-				exit_type=__error_value_type;
-				std::cout<<">>[Runtime-error] line "<<this->line<<": incorrect value type.must use a string."<<std::endl;
-			}
-		}
-		else
-		{
-			exit_type=__lack_parameter;
-			std::cout<<">>[Runtime-error] line "<<this->line<<": lack parameter(s)."<<std::endl;
-		}
-		// this must be added when running a function
-		if(exit_type!=__process_exited_successfully)
-			ret.set_type(__null_type);
-		ret_stack.push(ret);
-	}
-	else if(self_func.get_name()=="read")
-	{
-		if(!parameter.empty())
-		{
-			std::list<var>::iterator i=parameter.begin();
-			if(i->get_type()==__var_string)
-			{
-				std::string str=i->get_string();
-				ret.set_type(__var_array);
-				std::ifstream fin(str);
-				if(fin.fail())
-				{
-					exit_type=__open_file_failed;
-					std::cout<<">>[Runtime-error] line "<<this->line<<": cannot open file named \'"<<str<<"\' ."<<std::endl;
-				}
-				if(exit_type==__process_exited_successfully)
-				{
-					while(!fin.eof())
-					{
-						fin>>str;
-						var new_str;
-						new_str.set_type(__var_string);
-						new_str.set_string(str);
-						ret.append_array(new_str);
-					}
-				}
-				fin.close();
-			}
-			else
-			{
-				exit_type=__error_value_type;
-				std::cout<<">>[Runtime-error] line "<<this->line<<": incorrect value type.filename is a string."<<std::endl;
-			}
-		}
-		else
-		{
-			exit_type=__lack_parameter;
-			std::cout<<">>[Runtime-error] line "<<this->line<<": lack parameter(s)."<<std::endl;
-		}
-		// this must be added when running a function
-		if(exit_type!=__process_exited_successfully)
-			ret.set_type(__null_type);
-		ret_stack.push(ret);
-	}
-	else if(self_func.get_name()=="write")
-	{
-		ret.set_type(__null_type);
-		if(!parameter.empty())
-		{
-			std::list<var>::iterator i=parameter.begin();
-			if(i->get_type()==__var_string)
-			{
-				std::string str=i->get_string();
-				std::ofstream fout(str);
-				if(fout.fail())
-				{
-					exit_type=__open_file_failed;
-					std::cout<<">>[Runtime-error] line "<<this->line<<": cannot open file named \'"<<str<<"\' ."<<std::endl;
-					fout.close();
-				}
-				if(exit_type==__process_exited_successfully)
-				{
-					++i;
-					if(i!=parameter.end())
-					{
-						if(i->get_type()==__var_array)
-						{
-							int size=i->get_array_size();
-							for(int j=0;j<size;++j)
-							{
-								var temp=i->get_array_member(j);
-								if(temp.get_type()==__var_number)
-									fout<<temp.get_number()<<(j<size-1? ' ':'\n');
-								else if(temp.get_type()==__var_string)
-									fout<<temp.get_string()<<(j<size-1? ' ':'\n');
-								else
-									std::cout<<">>[Runtime] warning: line "<<this->line<<": cannot put array/hash/function into a file."<<std::endl;
-							}
-						}
-						else
-						{
-							exit_type=__error_value_type;
-							std::cout<<">>[Runtime-error] line "<<this->line<<": output must use an array."<<std::endl;
-						}
-					}
-					else
-					{
-						exit_type=__lack_parameter;
-						std::cout<<">>[Runtime-error] line "<<this->line<<": lack parameter(s)."<<std::endl;
-					}	
-					fout.close();
-				}
-			}
-			else
-			{
-				exit_type=__error_value_type;
-				std::cout<<">>[Runtime-error] line "<<this->line<<": incorrect value type.filename is a string."<<std::endl;
-			}
-		}
-		else
-		{
-			exit_type=__lack_parameter;
-			std::cout<<">>[Runtime-error] line "<<this->line<<": lack parameter(s)."<<std::endl;
-		}
-		// this must be added when running a function
-		ret_stack.push(ret);
-	}
-	else
-	{
-		for(;para_name!=para.children.end();++para_name,++para_value)
-		{
-			if(para_value==parameter.end() && para_name!=para.children.end())
-			{
-				exit_type=__lack_parameter;
-				std::cout<<">>[Runtime-error] line "<<line<<": lack parameter(s)."<<std::endl;
-				break;
-			}
-			var new_var;
-			new_var=*para_value;
-			new_var.set_name(para_name->name);
-			scope.add_new_var(new_var);
-		}
-		// this must be added when running a function
-		if(exit_type==__process_exited_successfully)
-		{
-			int _t=blk.run_block();
-			// in case the exit_type is not __process_exited_successfully in run_block
-			// or the function does not have return value;
-			if(_t!=__return)
-				ret_stack.push(error_var);
-		}
-		else
-			ret_stack.push(error_var);
-	}
-	
-	//get return
-	scope.pop_last_block_scope();
-	ret=ret_stack.top();
-	ret_stack.pop();
-	--recursion_depth;
-	return ret;
-}
-
-int abstract_syntax_tree::run_block()
-{
-	++recursion_depth;
-	if(recursion_depth>512)
-	{
-		exit_type=__sigsegv_segmentation_error;
-		std::cout<<">>[Runtime-error] line "<<line<<":[SIGSEGV] too deep recursion(block)."<<std::endl;
-		return 0;
-	}
-	scope.add_new_local_scope();
-	int ret=0;
-	for(std::list<abstract_syntax_tree>::iterator i=children.begin();i!=children.end();++i)
-	{
-		if(i->type==__definition)
-		{
-			var new_var;
-			std::list<abstract_syntax_tree>::iterator j=i->children.begin();
-			std::string _name=j->name;
-			if(!scope.check_redefine(_name))
-			{
-				++j;
-				if(j!=i->children.end())
-					new_var=j->calculation();
-				new_var.set_name(_name);
-				scope.add_new_var(new_var);
-			}
-			else
-			{
-				std::cout<<">>[Runtime-error] line "<<i->line<<": redeclaration of \'"<<_name<<"\'."<<std::endl;
-				exit_type=__redeclaration;
-			}
-		}
-		else if(i->type==__number || i->type==__string)
-			;
-		else if(i->type==__id)
-			i->call_identifier();
-		else if(i->type==__equal || i->type==__add_equal || i->type==__sub_equal || i->type==__mul_equal || i->type==__div_equal || i->type==__link_equal)
-			i->assignment();
-		else if(i->type==__add_operator || i->type==__sub_operator || i->type==__mul_operator || i->type==__div_operator || i->type==__link_operator || i->type==__or_operator || i->type==__and_operator || i->type==__nor_operator)
-			i->calculation();
-		else if(i->type==__while || i->type==__for)
-		{
-			int type=i->run_loop();
-			if(type)
-			{
-				if(type==__return)
-				{
-					ret=type;
-					break;
-				}
-				else
-				{
-					std::cout<<"[Runtime-error] line "<<i->line<<": incorrect use of break/continue."<<std::endl;
-					exit_type=__error_command_use;
-				}
-			}
-		}
-		else if(i->type==__ifelse)
-		{
-			int type=i->run_ifelse();
-			if(type)
-			{
-				ret=type;
-				break;
-			}
-		}
-		else if(i->type==__continue || i->type==__break)
-		{
-			ret=i->type;
-			break;
-		}
-		else if(i->type==__return)
-		{
-			var temp;
-			temp.set_type(__null_type);
-			if(!(i->children.empty()))
-				temp=i->children.front().calculation();
-			ret_stack.push(temp);
-			ret=__return;
-			break;
-		}
-		if(exit_type!=__process_exited_successfully)
-			break;
-	}
-	scope.pop_last_local_scope();
-	--recursion_depth;
-	return ret;
-}
-
-
-#endif