calculate stringpointer

var got_key = 0;	// did the player find the key?
STRING* dia_str = "";	// this String will be showen while talking

/////// First entity ///////
// First dialog (while player haven't find the key)
STRING* dia_1_1_1 = "Hello little man.";
STRING* dia_1_1_2 = "I lost my key.";
STRING* dia_1_1_3 = "Would be nice if you find him.";

// Second dialog (the player had found the key)
STRING* dia_1_2_1 = "Wow, you have found the key.";
STRING* dia_1_2_2 = "Thanks a lot.";

/////// Second entity ///////
// First dialog
STRING* dia_str_2_1_1 = "What do you want???";
STRING* dia_str_2_1_2 = "Don't bend my ears!";
//(...)

function talk(C, D)  // C = ID for NPC, D = Dialoggroup
{
	var S = 1;  		// S = current string to show
	STRING* my_string = "";	// this string should contain the pointer of the string

	str_cpy(my_string, "dia_");		// Prefix
	str_cat_num(my_string, "%.0f_", C);	// add the NPC-ID and a _
	str_cat_num(my_string, "%.0f_", D);	// add the ID for the dialoggroup and a _
	str_cat_num(my_string, "%.0f", S);	// add the ID for the current string

/*!!!*/	while(str_to_ptr(my_string) != NULL)  // ptr_for_str don't exist, this is what i'm seraching for!
	{
		str_cpy(dia_str, str_to_ptr(my_string));  // by the first time my_string contains dia_str_1_1_1
		wait(-1);	// display the text at minimum 1 second...
		while(key_space != 1){wait(1);}  // ...then wait till space is pressed
		S += 1;	// raise for next string

	// this is same like before whith new value of S
	// existence will be checked at the top of the loop
	str_cpy(my_string, "dia_");
	str_cat_num(my_string, "%.0f_", C);
	str_cat_num(my_string, "%.0f_", D);
	str_cat_num(my_string, "%.0f", S);
	}
}

action anyone()
{
//	(...)
	if(got_key == 0)	{talk(1,1);}	// first dialog
	else			{talk(1,2);}	// second dialog
//	(...)
}

STRING* my_string = "";

///////////////////////////////////////////////////////////////////////
//	requires GSHashmap.dll and GSHashmap.h from:
//	http://www.opserver.de/wiki/index.php?title=Plugins#GSHashmap_DLL
///////////////////////////////////////////////////////////////////////


#include <acknex.h>
#include "GSHashmap.h"

STRING* dia_str = "";	// this String will be showen while talking
STRING* my_str = "";		// this string contains the pointer of the string
STRING* info_str = "press T";

var got_key = 0;			// did the player find the key?

TEXT* show_dialog =
{
	pos_x = 10; pos_y = 10;
	string = dia_str;
	flags = SHOW;
}

TEXT* show_info = 
{
	pos_x = 20; pos_y = 50;
	string = info_str;
	flags = SHOW;
}

function anyone();
function create_dialogs();

function exit_prog(){sys_exit("");}

void main()
{
    video_screen = 2;
    on_q = exit_prog;
    create_dialogs();
    anyone();
}


function create_dialogs()		// called in main-function
{
/////// First entity ///////
// First dialog (while player haven't find the key)
	addToGSHashmap(_chr("dia_1_1_1"), _str("Hello little man."));
	addToGSHashmap(_chr("dia_1_1_2"), _str("I lost my key."));
	addToGSHashmap(_chr("dia_1_1_3"), _str("Would be nice if you find him."));

// Second dialog (the player had found the key)
	addToGSHashmap(_chr("dia_1_2_1"), _str("Wow, you have found the key"));
	addToGSHashmap(_chr("dia_1_2_2"), _str("Thanks a lot"));

/////// Second entity ///////
// First dialog
	addToGSHashmap(_chr("dia_2_1_1"), _str("What do you want???"));
	addToGSHashmap(_chr("dia_2_1_2"), _str("Don't bend my ears!"));
//(...)
}

function talk(var C, D)  // C = ID for NPC, D = Dialoggroup
{
	var S = 1;  		// S = current string to show

	str_cpy(my_str, "dia_");			// Prefix
	str_cat_num(my_str, "%.0f_", C);	// add the NPC-ID and a _
	str_cat_num(my_str, "%.0f_", D);	// add the ID for the dialoggroup and a _
	str_cat_num(my_str, "%.0f", S);		// add the ID for the current string

	while(isInGSHashmap(_chr(my_str)) == 1)  // check if the entry with the given key exists in the hashmap
	{
		str_cpy(dia_str, (STRING*)getFromGSHashmap(_chr(my_str)));  // by the first time my_str contains dia_str_1_1_1
		wait(-0.5);	// display the text at minimum 0.5 seconds...
		while(key_space != 1){wait(1);}  // ...then wait till space is pressed
		S += 1;	// raise for next string

	// this is same like before whith new value of S
	// existence will be checked at the top of the loop
	str_cpy(my_str, "dia_");
	str_cat_num(my_str, "%.0f_", C);
	str_cat_num(my_str, "%.0f_", D);
	str_cat_num(my_str, "%.0f", S);
	}
	
	str_cpy(dia_str, "");
	str_cpy(info_str, "press T");
}

function anyone()
{
	while(1)
	{
		while (!key_t){wait(1);}
		while (key_t){wait(1);}
		
		str_cpy(info_str, "press space");
		if(got_key == 0)	{talk(1,1); got_key = 1;}	// first dialog
		else			{talk(1,2); got_key = 0;}	// second dialog
	}
}