Ulric Multi Language

//Ulric Multi Language by Xaviour212
#include <a_samp>

#if defined _Language_included
    #endinput
#endif
#define _Language_included

#if !defined FALSE
    stock bool:FALSE = false;
#endif

#define SendMultiLangMsgEx(%0,%1,%2,%3,%4)    do{new str[128]; format(str, 128, ShowWord(%2, %3), %4); SendClientMessage(%0, %1, str);}while(FALSE)

stock SetPlayerLanguage(playerid, langname[])
    return SetPVarString(playerid, "Language", langname);

stock GetPlayerLanguage(playerid)
{
    new str[50];
    GetPVarString(playerid, "Language", str, 50);
    return str;
}

stock SendMultiLangMsg(playerid, colour, langname[], wordcode[])
{
    new str[256];
    format(str, sizeof(str), "%s", ShowWord(langname, wordcode));
    SendClientMessage(playerid, colour, str);
    return 1;
}

stock SendMultiLangMsg2(playerid, colour, wordcode[])
{
    new str[50], str2[256];
    format(str, sizeof(str), "%s", GetPlayerLanguage(playerid));
    format(str2, sizeof(str2), "%s", ShowWord(str, wordcode));
    SendClientMessage(playerid, colour, str2);
    return 1;
}

stock ShowWord(langname[], wordcode[]) //function gets from Dini by Dracoblue
{
    new tmpres[256];

    new key_length = strlen(wordcode);
    if (key_length==0 || key_length+2>256) return tmpres;

    new File:Langfile;
    Langfile=fopen(LFile(langname),io_read);
    if (!Langfile) return tmpres;

    while (fread(Langfile,tmpres))
    {
        if (tmpres[key_length]=='=' && !strcmp(tmpres, wordcode, true, key_length))
        {
            NewLine(tmpres);
            strmid(tmpres, tmpres, key_length + 1, strlen(tmpres), 256);
            fclose(Langfile);
            return tmpres;
        }
    }
    fclose(Langfile);
    return tmpres;
}

stock NewLine(string[]) //from Dini (DINI_StripNewLine)
{
    new len = strlen(string);
    if (string[0]==0) return ;
    if ((string[len - 1] == '\n') || (string[len - 1] == '\r'))
    {
        string[len - 1] = 0;
        if (string[0]==0) return ;
        if ((string[len - 2] == '\n') || (string[len - 2] == '\r')) string[len - 2] = 0;
    }
}

stock LFile(langname[])
{
    new asd[64];
    format(asd,64,"Language/%s.txt",langname);
    return asd;
}