15.09.2013, 11:27
How can i save accounts ?
PHP код:
/*
Pawno Edited by
Scripter Gabii/Scripter Bizza
*/
/*
NICO
*/
#include <a_samp>
#include <Dini>
#include <dutils>
#define TAG[SRC] "{FFBF00}"
#define COL_EASY "{FFF1AF}"
#define COL_WHITE "{FFFFFF}"
#define COL_BLACK "{0E0101}"
#define COL_GREY "{C3C3C3}"
#define COL_GREEN "{6EF83C}"
#define COL_RED "{F81414}"
#define COL_YELLOW "{F3FF02}"
#define COL_ORANGE "{FFAF00}"
#define COL_LIME "{B7FF00}"
#define COL_CYAN "{00FFEE}"
#define COL_LIGHTBLUE "{00C0FF}"
#define COL_BLUE "{0049FF}"
#define COL_MAGENTA "{F300FF}"
#define COL_VIOLET "{B700FF}"
#define COL_PINK "{FF00EA}"
#define COL_MARONE "{A90202}"
#define COL_CMD "{B8FF02}"
#define COL_PARAM "{3FCD02}"
#define COL_SERVER "{AFE7FF}"
#define COLOR_LIGHTBLUE 0x33CCFFAA
#define COLOR_RED 0xAA3333AA
#define COLOR_GREY 0xAFAFAFAA
#define COLOR_YELLOW 0xFFFF00AA
#define COLOR_PINK 0xFF66FFAA
#define COLOR_BLUE 0x0000BBAA
#define COLOR_1BLUE 0x0080FFFF
#define COLOR_WHITE 0xFFFFFFAA
#define COLOR_DARKRED 0x660000AA
#define COLOR_ORANGE 0xFF9900AA
#define COLOR_BRIGHTRED 0xFF0000AA
#define COLOR_INDIGO 0x4B00B0AA
#define COLOR_VIOLET 0x9955DEEE
#define COLOR_LIGHTRED 0xFF99AADD
#define COLOR_SEAGREEN 0x00EEADDF
#define COLOR_GRAYWHITE 0xEEEEFFC4
#define COLOR_LIGHTNEUTRALBLUE 0xabcdef66
#define COLOR_GREENISHGOLD 0xCCFFDD56
#define COLOR_LIGHTBLUEGREEN 0x0FFDD349
#define COLOR_NEUTRALBLUE 0xABCDEF01
#define COLOR_LIGHTCYAN 0xAAFFCC33
#define COLOR_LEMON 0xDDDD2357
#define COLOR_MEDIUMBLUE 0x63AFF00A
#define COLOR_NEUTRAL 0xABCDEF97
#define COLOR_BLACK 0x00000000
#define COLOR_NEUTRALGREEN 0x81CFAB00
#define COLOR_DARKGREEN 0x12900BBF
#define COLOR_LIGHTGREEN 0x24FF0AB9
#define COLOR_DARKBLUE 0x300FFAAB
#define COLOR_BLUEGREEN 0x46BBAA00
#define COLOR_PINK 0xFF66FFAA
#define COLOR_LIGHTBLUE 0x33CCFFAA
#define COLOR_DARKRED 0x660000AA
#define COLOR_ORANGE 0xFF9900AA
#define COLOR_PURPLE 0x800080AA
#define COLOR_GRAD1 0xB4B5B7FF
#define COLOR_GRAD2 0xBFC0C2FF
#define COLOR_RED1 0xFF0000AA
#define COLOR_GREY 0xAFAFAFAA
#define COLOR_GREEN 0x33AA33AA
#define COLOR_1GREEN 0x6BD700FF
#define COLOR_RED 0xAA3333AA
#define COLOR_YELLOW 0xFFFF00AA
#define COLOR_WHITE 0xFFFFFFAA
#define COLOR_BROWN 0x993300AA
#define COLOR_CYAN 0x99FFFFAA
#define COLOR_TAN 0xFFFFCCAA
#define COLOR_PINK 0xFF66FFAA
#define COLOR_KHAKI 0x999900AA
#define COLOR_LIME 0x99FF00AA
#define COLOR_SYSTEM 0xEFEFF7AA
#define COLOR_GRAD2 0xBFC0C2FF
#define COLOR_GRAD4 0xD8D8D8FF
#define COLOR_GRAD6 0xF0F0F0FF
#define COLOR_GRAD2 0xBFC0C2FF
#define COLOR_GRAD3 0xCBCCCEFF
#define COLOR_GRAD5 0xE3E3E3FF
#define COLOR_GRAD1 0xB4B5B7FF
forward OnPlayerLogin(playerid,password[]);
forward OnPlayerUpdate(playerid);
forward OnPlayerRegister(playerid, password[]);
forward SetPlayerSpawn(playerid);
forward ClearChatbox(playerid, lines);
forward split(const strsrc[], strdest[][], delimiter);
enum pInfo
{
pPass,
pSex,
pAge,
pOrigin,
pLevel,
pMoney,
pTut,
pChar,
};
new PlayerInfo[MAX_PLAYERS][pInfo];
new gPlayerLogged[MAX_PLAYERS];
new gPlayerLogTries[MAX_PLAYERS];
new gPlayerAccount[MAX_PLAYERS];
new gOoc[MAX_PLAYERS];
new gNews[MAX_PLAYERS];
new gFam[MAX_PLAYERS];
new RegistrationStep[MAX_PLAYERS];
new Typed[MAX_PLAYERS][64];
new TutTime[MAX_PLAYERS];
main()
{
print("\n========================================");
print(" | Pawno Edited by |");
print(" | Scripteri Gabii/Scripter Bizza |");
print(" | Enjoy :D |");
print("=========================================\n");
}
public OnGameModeInit()
{
SetGameModeText("DieselRPG");
ShowPlayerMarkers(1);
AddPlayerClass(0,2271.2456,2405.2004,10.8203,320.2789,0,0,0,0,0,0);
EnableStuntBonusForAll(0);
return 1;
}
public OnGameModeExit()
{
return 1;
}
public OnPlayerRequestClass(playerid, classid)
{
new playername[MAX_PLAYER_NAME];
GetPlayerName(playerid, playername, sizeof(playername));
new string[64];
format(string, sizeof(string), "Conturi/%s.ini", playername);
if (dini_Exists(string))
{
ShowPlayerDialog(playerid, 1245, DIALOG_STYLE_INPUT,""COL_WHITE"Bun venit. Te rugam sa te loghezi.",""COL_WHITE"Scrie parola ta aici pentru a te loga","Log-in","Quit");
}
else
{
ShowPlayerDialog(playerid, 1246, DIALOG_STYLE_INPUT,""COL_WHITE"Te rugam sa te inregistrezi!",""COL_WHITE"Scrie parola ta aici pentru a te inregistra.","Register","Quit");
}
SetPlayerPos(playerid, 1958.3783, 1343.1572, 15.3746);
SetPlayerCameraPos(playerid, 1958.3783, 1343.1572, 15.3746);
SetPlayerCameraLookAt(playerid, 1958.3783, 1343.1572, 15.3746);
return 1;
}
public OnPlayerConnect(playerid)
{
new string[128];
new plname[MAX_PLAYER_NAME];
gOoc[playerid] = 0;
gNews[playerid] = 0;
gFam[playerid] = 0;
RegistrationStep[playerid] = 0;
TutTime[playerid] = 0;
PlayerInfo[playerid][pTut] = 0;
PlayerInfo[playerid][pSex] = 0;
PlayerInfo[playerid][pOrigin] = 0;
PlayerInfo[playerid][pAge] = 0;
PlayerInfo[playerid][pChar] = 0;
GetPlayerName(playerid, plname, sizeof(plname));
PlayerInfo[playerid][pLevel] = 0;
PlayerInfo[playerid][pMoney] = 0;
format(string, sizeof(string), "Conturi/%s.ini", plname);
if(dini_Exists(string))
{
gPlayerAccount[playerid] = 1;
}
else
{
gPlayerAccount[playerid] = 0;
}
return 1;
}
public OnPlayerRegister(playerid, password[])
{
if(IsPlayerConnected(playerid))
{
new file[64];
new playername3[MAX_PLAYER_NAME];
GetPlayerName(playerid, playername3, sizeof(playername3));
format(file, sizeof(file), "Conturi/%s.ini", playername3);
if(dini_Exists(file))
{
return SendClientMessage(playerid,COLOR_GREY,"This account is already registered.");
}
else
{
dini_Create(file);
new password2 = num_hash(password);
PlayerInfo[playerid][pPass] = password2;
dini_IntSet(file, "Password",password2);
dini_IntSet(file, "Sex",PlayerInfo[playerid][pSex]);
dini_IntSet(file, "Origin",PlayerInfo[playerid][pOrigin]);
dini_IntSet(file, "Age",PlayerInfo[playerid][pAge]);
dini_IntSet(file, "Level",PlayerInfo[playerid][pLevel]);
dini_IntSet(file, "Money",PlayerInfo[playerid][pMoney]);
dini_IntSet(file, "Tut",PlayerInfo[playerid][pTut]);
dini_IntSet(file, "Char",PlayerInfo[playerid][pChar]);
ShowPlayerDialog(playerid, 1245, DIALOG_STYLE_INPUT,""COL_WHITE"Bun Venit",""COL_WHITE"Cont inregistrat cu succes!\n"COL_WHITE"Scrie parola ta mai jos pentru a te loga","Log-in","Quit");
}
}
return 1;
}
public OnPlayerLogin(playerid,password[])
{
new string2[64];
new playername3[MAX_PLAYER_NAME];
GetPlayerName(playerid, playername3, sizeof(playername3));
format(string2, sizeof(string2), "Conturi/%s.ini", playername3);
if (dini_Exists(string2))
{
new password2 = num_hash(password);
if(dini_Int(string2,"Password") == password2)
{
PlayerInfo[playerid][pPass] = dini_Int(string2,"Password");
PlayerInfo[playerid][pSex] = dini_Int(string2,"Sex");
PlayerInfo[playerid][pOrigin] = dini_Int(string2,"Origin");
PlayerInfo[playerid][pAge] = dini_Int(string2,"Age");
PlayerInfo[playerid][pMoney] = dini_Int(string2,"Money");
PlayerInfo[playerid][pLevel] = dini_Int(string2,"Level");
PlayerInfo[playerid][pTut] = dini_Int(string2,"Tut");
PlayerInfo[playerid][pChar] = dini_Int(string2,"Char");
}
else
{
gPlayerLogTries[playerid] += 1;
ShowPlayerDialog(playerid, 1245, DIALOG_STYLE_INPUT,""COL_WHITE"Mai incearca!",""COL_WHITE"Ai introdus o parola gresita\n"COL_WHITE"Scrie-ti parola pentru a te loga!","Log-in","Quit");
if(gPlayerLogTries[playerid] == 3) { Kick(playerid); }
return 1;
}
}
return 1;
}
public OnPlayerDisconnect(playerid, reason)
{
OnPlayerUpdate(playerid);
return 1;
}
public OnPlayerSpawn(playerid)
{
SetPlayerSpawn(playerid);
//SetPlayerPos(playerid, 1529.6,-1691.2,13.3);
return 1;
}
public SetPlayerSpawn(playerid)
{
if(IsPlayerConnected(playerid))
{
if(PlayerInfo[playerid][pTut] == 0)
{
gOoc[playerid] = 1;
gNews[playerid] = 1;
gFam[playerid] = 1;
TogglePlayerControllable(playerid, 0);
RegistrationStep[playerid] = 1;
SendClientMessage(playerid, COLOR_GREEN, "");
SendClientMessage(playerid, COLOR_GREEN, "");
SendClientMessage(playerid, COLOR_GREEN, "");
SendClientMessage(playerid, COLOR_GREEN, "");
SendClientMessage(playerid, COLOR_GREEN, "");
SendClientMessage(playerid, COLOR_GREEN, "");
SendClientMessage(playerid, COLOR_GREEN, "");
SendClientMessage(playerid, COLOR_GREEN, "");
SendClientMessage(playerid, COLOR_GREEN, "");
SendClientMessage(playerid, COLOR_GREEN, "");
SendClientMessage(playerid, COLOR_WHITE, "{30a030}[Diesel RPG]: {ffffff}Bine ai venit pe {ff0000}Diesel RPG.ro: RPG Server [0.3D] (BETA){ffffff}.");
SendClientMessage(playerid, COLOR_GREEN, "");
SendClientMessage(playerid, COLOR_GREEN, "_____________________________________________");
SendClientMessage(playerid, COLOR_WHITE, "{30a030}[Diesel RPG]: {ffffff}Ce sex ai? [{ffd700}Masculin {ffffff}sau {ffd700}Feminin{ffffff}]?");
SendClientMessage(playerid, COLOR_GREEN, "_____________________________________________");
ApplyAnimation(playerid,"DANCING","DNCE_M_B",4.0,1,0,0,0,-1);
}
}
return 1;
}
public OnPlayerDeath(playerid, killerid, reason)
{
return 1;
}
public OnVehicleSpawn(vehicleid)
{
return 1;
}
public OnVehicleDeath(vehicleid, killerid)
{
return 1;
}
public OnPlayerText(playerid, text[])
{
new giver[MAX_PLAYER_NAME];
new sendername[MAX_PLAYER_NAME];
new giveplayer[MAX_PLAYER_NAME];
new tmp[256];
new string[256];
new giveplayerid;
if(RegistrationStep[playerid] > 0)
{
if(RegistrationStep[playerid] == 1)
{
new idx;
tmp = strtok(text, idx);
if((strcmp("masculin", tmp, true, strlen(tmp)) == 0) && (strlen(tmp) == strlen("Masculin")))
{
GetPlayerName(playerid, sendername, sizeof(sendername));
PlayerInfo[playerid][pSex] = 1;
RegistrationStep[playerid] = 2;
SetPlayerSkin(playerid, 18);
PlayerInfo[playerid][pChar] = 18;
ClearChatbox(playerid, 10);
SendClientMessage(playerid, COLOR_GREEN, "_____________________________________________");
format(string, sizeof(string), "» Ok %s, esti Barbat.", sendername);
SendClientMessage(playerid, COLOR_WHITE, string);
SendClientMessage(playerid, COLOR_1BLUE, "{30a030}[Diesel RPG]: {ffffff}Ce varsta ai? [{ffd700}zz{ffffff}/{ffd700}ll{ffffff}/{ffd700}aa{ffffff}]?");
SendClientMessage(playerid, COLOR_GREEN, "_____________________________________________");
return 0;
}
else if((strcmp("feminin", tmp, true, strlen(tmp)) == 0) && (strlen(tmp) == strlen("Feminin")))
{
GetPlayerName(playerid, sendername, sizeof(sendername));
PlayerInfo[playerid][pSex] = 2;
RegistrationStep[playerid] = 2;
SetPlayerSkin(playerid, 41);
PlayerInfo[playerid][pChar] = 41;
ClearChatbox(playerid, 10);
ApplyAnimation(playerid,"DANCING","DNCE_M_B",4.0,1,0,0,0,-1);
SendClientMessage(playerid, COLOR_GREEN, "_____________________________________________");
format(string, sizeof(string), "» Ok %s, esti Femeie.", sendername);
SendClientMessage(playerid, COLOR_WHITE, string);
SendClientMessage(playerid, COLOR_1BLUE, "{30a030}[Diesel RPG]: {ffffff}Ce varsta ai? [{ffd700}zz{ffffff}/{ffd700}ll{ffffff}/{ffd700}aa{ffffff}]?");
SendClientMessage(playerid, COLOR_GREEN, "_____________________________________________");
return 0;
}
else
{
ClearChatbox(playerid, 10);
ApplyAnimation(playerid,"DANCING","DNCE_M_B",4.0,1,0,0,0,-1);
SendClientMessage(playerid, COLOR_GREEN, "_____________________________________________");
SendClientMessage(playerid, COLOR_1BLUE, "{30a030}[Diesel RPG]: {ffffff}Ce sex ai? [{ffd700}Masculin {ffffff}sau {ffd700}Feminin{ffffff}]?");
SendClientMessage(playerid, COLOR_GREEN, "_____________________________________________");
}
return 0;
}
else if(RegistrationStep[playerid] == 2)
{
new year, month,day;
getdate(year, month, day);
new DateInfo[3][20];
split(text, DateInfo, '/');
if(year - strvalEx(DateInfo[2]) > 100 || strvalEx(DateInfo[2]) < 1 || strvalEx(DateInfo[2]) >= year)
{
SendClientMessage(playerid, COLOR_GREEN, "_____________________________________________");
SendClientMessage(playerid, COLOR_1BLUE, "{30a030}[Diesel RPG]: {ffffff}Ce varsta ai? [{ffd700}zz{ffffff}/{ffd700}ll{ffffff}/{ffd700}aa{ffffff}]?");
SendClientMessage(playerid, COLOR_GREEN, "_____________________________________________");
ApplyAnimation(playerid,"DANCING","DNCE_M_B",4.0,1,0,0,0,-1);
return 0;
}
new check = year - strvalEx(DateInfo[2]);
if(check == year)
{
SendClientMessage(playerid, COLOR_GREEN, "_____________________________________________");
SendClientMessage(playerid, COLOR_1BLUE, "{30a030}[Diesel RPG]: {ffffff}Ce varsta ai? [{ffd700}zz{ffffff}/{ffd700}ll{ffffff}/{ffd700}aa{ffffff}]?");
SendClientMessage(playerid, COLOR_GREEN, "_____________________________________________");
ApplyAnimation(playerid,"DANCING","DNCE_M_B",4.0,1,0,0,0,-1);
return 0;
}
if(strvalEx(DateInfo[1]) > month)
{
check -= 1;
}
else if(strvalEx(DateInfo[1]) == month && strvalEx(DateInfo[0]) > day)
{
check -= 1;
}
ClearChatbox(playerid, 10);
PlayerInfo[playerid][pOrigin] = 1;
PlayerInfo[playerid][pAge] = check;
GetPlayerName(playerid, sendername, sizeof(sendername));
format(string, sizeof(string), "» Ok %s, ai %d anii.", sendername, PlayerInfo[playerid][pAge]);
SendClientMessage(playerid, COLOR_WHITE, string);
//ApplyAnimation(playerid,"DANCING","DNCE_M_B",4.0,1,0,0,0,-1);
TutTime[playerid] = 1;
RegistrationStep[playerid] = 0;
SetPlayerTutorial(playerid);
SendClientMessage(playerid, COLOR_1GREEN, "{30a030}[Diesel RPG]: {ffffff}Acuma iti vom prezenta un Tutorial legat de Server.");
return 0;
}
return 0;
}
return 1;
}
forward SetPlayerTutorial(playerid);
public SetPlayerTutorial(playerid)
{
if(TutTime[playerid] == 1)
{
SendClientMessage(playerid, COLOR_GREY, "Tutorial in lucru 1");
}
return 1;
}
public OnPlayerCommandText(playerid, cmdtext[])
{
if (strcmp("/goto", cmdtext, true, 10) == 0)
{
SetPlayerPos(playerid, 840.7271000,-1628.2101000,12.9325000);
return 1;
}
return 0;
}
public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
{
return 1;
}
public OnPlayerExitVehicle(playerid, vehicleid)
{
return 1;
}
public OnPlayerStateChange(playerid, newstate, oldstate)
{
return 1;
}
public OnPlayerEnterCheckpoint(playerid)
{
return 1;
}
public OnPlayerLeaveCheckpoint(playerid)
{
return 1;
}
public OnPlayerEnterRaceCheckpoint(playerid)
{
return 1;
}
public OnPlayerLeaveRaceCheckpoint(playerid)
{
return 1;
}
public OnRconCommand(cmd[])
{
return 1;
}
public OnPlayerRequestSpawn(playerid)
{
return 1;
}
public OnObjectMoved(objectid)
{
return 1;
}
public OnPlayerObjectMoved(playerid, objectid)
{
return 1;
}
public OnPlayerPickUpPickup(playerid, pickupid)
{
return 1;
}
public OnVehicleMod(playerid, vehicleid, componentid)
{
return 1;
}
public OnVehiclePaintjob(playerid, vehicleid, paintjobid)
{
return 1;
}
public OnVehicleRespray(playerid, vehicleid, color1, color2)
{
return 1;
}
public OnPlayerSelectedMenuRow(playerid, row)
{
return 1;
}
public OnPlayerExitedMenu(playerid)
{
return 1;
}
public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
{
return 1;
}
public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
return 1;
}
public OnRconLoginAttempt(ip[], password[], success)
{
return 1;
}
public OnPlayerUpdate(playerid)
{
if(IsPlayerConnected(playerid))
{
if(gPlayerLogged[playerid] == 1)
{
new string3[64];
new playername3[MAX_PLAYER_NAME];
GetPlayerName(playerid, playername3, sizeof(playername3));
format(string3, sizeof(string3), "Conturi/%s.ini", playername3);
dini_IntSet(string3, "Password",PlayerInfo[playerid][pPass]);
dini_IntSet(string3, "Sex",PlayerInfo[playerid][pSex]);
dini_IntSet(string3, "Origin",PlayerInfo[playerid][pOrigin]);
dini_IntSet(string3, "Age",PlayerInfo[playerid][pAge]);
dini_IntSet(string3, "Level",PlayerInfo[playerid][pLevel]);
dini_IntSet(string3, "Money",PlayerInfo[playerid][pMoney]);
dini_IntSet(string3, "Tut",PlayerInfo[playerid][pTut]);
dini_IntSet(string3, "Char",PlayerInfo[playerid][pChar]);
}
}
return 1;
}
public OnPlayerStreamIn(playerid, forplayerid)
{
return 1;
}
public OnPlayerStreamOut(playerid, forplayerid)
{
return 1;
}
public OnVehicleStreamIn(vehicleid, forplayerid)
{
return 1;
}
public OnVehicleStreamOut(vehicleid, forplayerid)
{
return 1;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == 1234)
{
if(response)
{
new playername[MAX_PLAYER_NAME];
GetPlayerName(playerid, playername, sizeof(playername));
new string[64];
format(string, sizeof(string), "Conturi/%s.ini", playername);
if (dini_Exists(string))
{
ShowPlayerDialog(playerid, 1245, DIALOG_STYLE_INPUT,""COL_WHITE"Bun venit. Te rugam sa te loghezi.",""COL_WHITE"Scrie parola ta aici pentru a te loga","Log-in","Quit");
}
else
{
ShowPlayerDialog(playerid, 1246, DIALOG_STYLE_INPUT,""COL_WHITE"Te rugam sa te inregistrezi!",""COL_WHITE"Scrie parola ta aici pentru a te inregistra.","Register","Quit");
}
}
else
{
SendClientMessage(playerid, COLOR_GREY,"*Ai refuzat. Trebuie sa accepti regulile pentru a juca");
Kick(playerid);
}
}
if(dialogid == 1245)
{
if(response)
{
strmid(Typed[playerid], inputtext, 0, strlen(inputtext), 255);
if(!strcmp(Typed[playerid], "None", true))
{
ShowPlayerDialog(playerid, 1245, DIALOG_STYLE_INPUT,""COL_WHITE"Incerca din nou.",""COL_WHITE"Nu ai introdus o parola!\n"COL_WHITE"Scrie-ti parola mai jos pentru a te inregistra","Log-in","Quit");
}
else
{
OnPlayerLogin(playerid, inputtext);
}
}
else
{
Kick(playerid);
}
}
if(dialogid == 1246)
{
if(response == 1)
{
new sendername[MAX_PLAYER_NAME];
GetPlayerName(playerid, sendername, sizeof(sendername));
new string[512];
format(string, sizeof(string),""COL_WHITE"Nume: "COL_LIGHTBLUE"%s\n"COL_WHITE"Parola: "COL_LIGHTBLUE"%s,\n"COL_WHITE"Bani: "COL_LIGHTBLUE"10000\n"COL_WHITE"Scor: "COL_LIGHTBLUE"500",sendername,inputtext);
ShowPlayerDialog(playerid, 1242, DIALOG_STYLE_MSGBOX, ""COL_LIGHTBLUE"Te-ai inregistrat cu succes",string,"Ok","");
GivePlayerMoney(playerid, 50000);
SetPlayerScore(playerid, 1);
OnPlayerRegister(playerid, inputtext);
}
else
{
Kick(playerid);
}
}
return 1;
}
public OnPlayerClickPlayer(playerid, clickedplayerid, source)
{
return 1;
}
public ClearChatbox(playerid, lines)
{
if (IsPlayerConnected(playerid))
{
for(new i=0; i<lines; i++)
{
SendClientMessage(playerid, COLOR_GREY, " ");
}
}
return 1;
}
public split(const strsrc[], strdest[][], delimiter)
{
new i, li;
new aNum;
new len;
while(i <= strlen(strsrc))
{
if(strsrc[i]==delimiter || i==strlen(strsrc))
{
len = strmid(strdest[aNum], strsrc, li, i, 128);
strdest[aNum][len] = 0;
li = i+1;
aNum++;
}
i++;
}
return 1;
}
stock strvalEx( const string[] )
{
if( strlen( string ) >= 50 ) return 0;
return strval(string);
}
