I just noticed a solution to this, I dont know if this is the best solution but it does work:

1) use txt_for_dir to get all the model name on startup (/only once)
2) do str_for_entfile when needed
3) compare returned string from str_for_entfile with the text you used in txt_for_dir (use str_cmpi for comparison in a for loop), when match use uppercase correct string from text pstring (e.g. (myText.pstring)[i] ) and break;.