The Dink Network

Ok guys, new problem came to surface!

void main(void)
{
	int &var;
	&var = create_sprite(164, 100, 0, 341, 1);
}

void talk(void)
{
	int &junk = free_items();
	freeze(1);
	choice:
	choice_start()

	set_y 240
	set_title_color 9

	title_start()
	Welcome to my store
	title_end()

	"Ask About The Store"
	"Ask About him"
	"Ask About the Earthquake"
	"See what's for sale"
	"Nevermind"
	(&story == 4) "Can you make a siege gun?"

	choice_end()

	If (&result ==  1)
	{
		say_stop("`8Well, i'm taking shipmets of swords from the south", &var);
		say_stop("`8But now with this god dang earthquake", &var);
		say_stop("`8I cant get shipments", &var);
		goto choice;
	}

	If (&result ==  2)
	{
		say_stop("`8My name is Alex Pua", &var);
		say_stop("Hrumph", 1);
		say_stop("`8Do not laugh please", &var);
		say_stop("`8I come from England", &var);
		say_stop("How did you get here?", 1);
		say_stop("`8I got here because i thought i'd found more customers", &var);
		goto choice;
	}

	If (&result ==  3)
	{
		say_stop("`8It striked suddently as most earthquakes", &var);
		say_stop("`8It was gigantic", &current_sprite);
		say_stop("`8Even there was lava blowing out south of my house!", &var);
		say_stop("Were there any victrims?", 1);
		say_stop("`8Yea...a house north fo here collapsed", &var);
		say_stop("`8Leaving Mary and here husband dead...", &var);
		say_stop("I'm Sorry", 1);
		goto choice;
	}

	If (&result ==  4)
	{
		
		choice_start();

		set_y 240
		set_title_color 9

		title_start();
		I've got some stuff for you
		title_end();

		"Longsword -- 400"
		"Clawsword -- 1000"
		"No Thanks"

		choice_end();

		If (&result ==  1)
		{
			if (&junk < 1)
			{		choice_start();

		set_y 240
		set_title_color 9

		title_start();
I don't have any room in my backpack
		title_end();
		"Ok"
		choice_end();
		if (&result == 1)
				{
				unfreeze(1);
				}	

			}
			
			if (&gold < 400)
			{
				
				choice_start();

				set_y 240
				set_title_color 9

				title_start();
				I dont have enough money
				title_end();

				"Ok"

				choice_end();
				if (&result == 1)
				{
				unfreeze(1);
				}	
				&gold -= 400;
				add_item("item-sw1", 438, 7);

			}
		}

		If (&result ==  2)
		{
						if (&junk < 1)
			{		choice_start();

		set_y 240
		set_title_color 9

		title_start();
I don't have any room in my backpack
		title_end();
		"Ok"
		choice_end();
		if (&result == 1)
				{
				unfreeze(1);
				}	

			}
			
			if (&gold < 1000)
			{
				
				choice_start();

				set_y 240
				set_title_color 9

				title_start();
				I dont have enough money
				title_end();

				"Ok"

				choice_end();
				if (&result == 1)
				{
				unfreeze(1);
				}	
				&gold -= 1000;
				add_item("item-sw2", 438, 23);

		}

		If (&result ==  3)
		{
			unfreeze(1);
		}

	}

	If (&result ==  5)
	{
			unfreeze(1);
	}

	If (&result ==  6)
	{
			say_stop("`8Are you nuts?", &var);
			say_stop("`8It needs at least a thousand pieces of gold!", &var);
			say_stop("Perhaps i could find the gold!", 1);
			&story += 1;
			goto choice;
	}

	
}

void hit(void)

{
	int &crap = random(5,1);
	if(&crap == 1)
	{
		say("`@Stop Hitting my bench!", &var);
	}
	if(&crap == 2)
	{
		say("`@Go away!", &var);
	}
	if(&crap == 3)
	{
		say("`@Are you nuts?", &var);
	}
	if(&crap == 4)
	{
		say("`@This sword will get in your chest!", &var);
	}
	if(&crap == 5)
	{
		say("`@Is your skull empty?", &var);
	}
}

When i try to buy something, there are three possible things that should happen:

~ Crash
~ Give the sword & the money you needed for it
~ Stay Freezed

PLEASE HELP ÌÅÅÅ!