Xab LOSTNORVL

Far Cry: War Zone � 43 �� / Far Cry: War Zone + 43 Mods / RU /

mybb@mybb.ru (VladiKPSS) — Sun, 05 Mar 2017 13:30:20 +0300

� �� .

Video: �� 2: �� / Nemesis 2: Nebula / 1995 / DVDRip

mybb@mybb.ru (Constantin) — Fri, 20 Jun 2008 21:59:54 +0400

��!

��: �� 2: ��
�� : Nemesis 2: Nebula
�� : 1995
��: ��, ��, ��
��: ��
��: ��
� ��: �� , �� , �� , �� , �� , �� , �� , ��

� ��: �� 73 �� , � 2027 ��. �� , � �� . �� . �� , �� . �� . �� , �� , �� . �� 1980 ��, �� . �� , ��, �� -�� . �� . �� , � �� . �� 20 ��. � �� , �� , � ��

��: DVDRip
��: XviD, 1090 ��/�, 640x480
��: MP3, 128 ��/�
��: 789.76 ��
��: 01:21:08
��: ��

��: 789.76 �� (828,119,040 ��)
==============================
��.

Depositfiles
�� 1
http://depositfiles.com/ru/files/3723709

�� 2
http://depositfiles.com/ru/files/3724637

�� 3
http://depositfiles.com/ru/files/3724414

Letitbit
��
http://letitbit.net/download/8cdc8c9445 … 2.avi.html
==============================
�� !

Video: �� / Monster (2008) DVDRip

mybb@mybb.ru (Constantin) — Thu, 19 Jun 2008 23:13:37 +0400

��
��: ��
�� : Monster
�� : 2008
��: ��, ��
��: ��
� ��: �� , �� , ��

� ��:
� 2005 �� , �� (��), �� . ��, �� . � 2007 �� , �� . �� , �� , � �� .

��: ��, Global Asylum
��: 01:26:19
��: �� (��)

��
��: XviD
��: DVDRip
��: 989 kb/s, 640x352
��: MP3, 128 kb/s
��: 693 MB
---------------------------------------------------------------------------
��

Rapidshare.com
http://rapidshare.com/files/109931506/M … .part1.rar
http://rapidshare.com/files/109931509/M … .part2.rar
http://rapidshare.com/files/109931507/M … .part3.rar
http://rapidshare.com/files/109931508/M … .part4.rar
http://rapidshare.com/files/109931512/M … .part5.rar
http://rapidshare.com/files/109932738/M … .part6.rar
http://rapidshare.com/files/109932739/M … .part7.rar
http://rapidshare.com/files/109932735/M … .part8.rar

Depositfiles.com
http://depositfiles.com/files/4933803
http://depositfiles.com/files/4933802
http://depositfiles.com/files/4933800
http://depositfiles.com/files/4933804
http://depositfiles.com/files/4933805
http://depositfiles.com/files/4933808
http://depositfiles.com/files/4933809
http://depositfiles.com/files/4933737

BitRoad.net (�� )
http://bitroad.net/download/03e20b12290 … p.rar.html

Vip-file.com (�� )
http://vip-file.com/download/03e20b6174 … p.rar.html

Letitbit.net (�� )
http://letitbit.net/download/03e20b9797 … p.rar.html
---------------------------------------------------------------------------
�� !

��/Primeval.S02E01-S02E07

mybb@mybb.ru (Constantin) — Wed, 18 Jun 2008 06:53:24 +0400

�� 2-� �� 7 ��.
�� 2-�� 2.67��.
[Primeval. Season 2.rus.]

[��: ��, ��, ��, ��
��: ��
��: ��
� ��: �� /Douglas Henshall, �� /Hannah Spearritt, �� /Lucy Brown, �� /Juliet Aubrey, �� /Andrew Lee Potts, �� /James Murray

�� : �� , �� 8 �� -�� -�� , �� , �� , �� . �� ? �� , � �� , �� , �� .

�� : 5 - ��
��: 00:45:54
�� : Sat-Rip
��: �� , ��: 640 x 352
��: ��: ��, ��: Oghra /��: MaxMeister, ��, ��: 48000 ��, ��, 256 ��/�

�� : http://www.izhtorrent.ru/viewtopic.php?t=13441
�� 100%

Lost of Eternia WoW Server

mybb@mybb.ru (Constantin) — Tue, 17 Jun 2008 22:33:52 +0400

��! �� http://91.146.49.161/index.php �� 91.146.49.161 �� ! �5 ��! �� , �� ))) �� 2.4.2
------------------------------------------------------
�� .

��

mybb@mybb.ru (Constantin) — Tue, 17 Jun 2008 01:16:20 +0400

�� : User.Profile.Bot.v1.1..LUA5x.RUS.
�� Lua 5.0 / 5.1
��.
��, �� ?- �� , �� , �� - �� - �� , � �� - �� - �� (�� )- ��
+ �� . �� , �� .
�� .�� LUA 5.1.1, �� , �� ..
� ��, ��).
============================================================
� �� , �� PtokaX 0.3.6.0 �� .
�� 473-243-811 � �� .
============================================================
� �� .
�� ftp://91.146.48.45/Programs/Scripts/
�� 100%
============================================================
C�� , � �� , �� PtokaX v 0.3.6.0 �� .
�� .
============================================================
�� !
============================================================
-- /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////\
--||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||| |
--||||| �� ||||||||||| |||||||| b.y: S.t.0.n.e d.b | |
--||||| ��: NRJ ||||||||||| �.�.�.�.�.�.�.�.�.�.�.�.� ||||||||||||||||||||||||||||||| |
--||||||||||||||||||||||||||||||||| ||||||||||||||||||||||||||||||| |
--||||||||||||||||||||||||||||||||| v1.1 - LUA 5.x - PtokaX ||||||||||||||||||||||||||||||| |
--||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||| |
-- \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
--
--
----[ v1.1 �� ? ]--------------------------------------------------------------------------------
--
-- �� .
--
-- �� :
-- - ��_�_��
-- - ��_��
-- - ��_��
-- - ��
-- - ��
-- - icq
-- - ��_��
-- - ��_��
-- - �_��
-- - ��
-- - �_��
-- - ��
-- - ��
-- - ��
-- - ��
--
-- �� .
-- �� .
--
-- F.A.Q.
--
-- �. �� ?
--
-- �. ��-��, ��
-- tUserProfiles[curUser], �� .
-- ��-��, �� . ��
-- �� showProfile(curUser,type) - �� .
-- �-��, �� , �� - MenuProfile(user)
--
-- /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////\
--|� �� ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||| |
-- \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
tVar = {
sPrefix = "!", -- ��
sBot = "Profiles", -- ��
sFolder = "AHKETbI", -- ��
sFile = "profiles.dat", -- ��
sRCEnable = "on", -- �� ? <on=��, off=��>
sEdited = "on", -- �� , �� ? <on=��, off=��>
sSpam = "on", -- �� , �� ? ;)
sMsgtoUsers = "�� ! �� !�� ", -- �� ?
sRCName = "��", -- ��
}

-- ��
sDelPro = "delpro", -- �� -��
}

-- /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////\
--|� �� ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||| |
-- \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
-- �� (1=��/0=��) -- **�� 1 � 2 �� RoboCop'��**
pUser = {
[0] = 1, -- =[Master]=
[1] = 1, -- =[OP]=
[2] = 1, -- =[ViP]=
[3] = 1, -- =[Reg]=
[4] = 1, -- =[Custom Profile 1]=
[5] = 1, -- =[Custom Profile 2]=
[-1] = 1, -- =[UnReg]=
}
-- �� (1=��/0=��)
pAdmin = {
[0] = 1, -- =[Master]=
[1] = 0, -- =[OP]=
[2] = 0, -- =[ViP]=
[3] = 0, -- =[Reg]=
[4] = 0, -- =[Custom Profile 1]=
[5] = 0, -- =[Custom Profile 2]=
[-1] = 0, -- =[UnReg]=
}

-- ��
-- ["��"] = "�� "

-- !!! ["edited"] = "0" - �� !

function newProfile(curUser)
tUserProfiles[curUser] = {}
tUserProfiles[curUser] = {
["��_�_��"] = "",
["��_��"] = "",
["��_��"] = "",
["��"] = "",
["��"] = "",
["icq"] = "",
["��_��"] = "",
["��_��"] = "",
["�_��"] = "",
["��"] = "",
["�_��"] = "",
["��"] = "",
["��"] = "",
["��"] = "",
["��"] = "",
["edited"] = "0",
}
saveProfile();
end

-- �� . �� (NRJ)

function MenuProfile(user)
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\��$<%[mynick]> !"..tCmd.sProfile.."|")
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\��\\�� $<%[mynick]> !"..tCmd.sProfile.." �� _�_�� %[line:�� ?]|")
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\��\\�� $<%[mynick]> !"..tCmd.sProfile.." �� _�� %[line:�� ?]|")
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\��\\�� $<%[mynick]> !"..tCmd.sProfile.." �� _�� %[line:�� ?]|")
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\��\\��$<%[mynick]> !"..tCmd.sProfile.." �� %[line:�) �� )?]|")
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\��\\��$<%[mynick]> !"..tCmd.sProfile.." �� %[line:��, ��, �� ?]|")
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\��\\ICQ$<%[mynick]> !"..tCmd.sProfile.." �� icq %[line:�� ?]|")
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\��\\�� $<%[mynick]> !"..tCmd.sProfile.." �� _�� %[line:�� ?]|")
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\��\\�� $<%[mynick]> !"..tCmd.sProfile.." �� _�� %[line:�� /�� ?]|")
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\��\\� ��$<%[mynick]> !"..tCmd.sProfile.." �� _�� %[line:�� ..]|")
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\��\\� ��$<%[mynick]> !"..tCmd.sProfile.." �� %[line:��, ��, ��, ��, ��?]|")
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\��\\�� $<%[mynick]> !"..tCmd.sProfile.." �� _�� %[line:� �� ?..]|")
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\��\\��$<%[mynick]> !"..tCmd.sProfile.." �� %[line:�� ?]|")
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\��\\��$<%[mynick]> !"..tCmd.sProfile.." �� %[line:�� ?]|")
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\��\\��$<%[mynick]> !"..tCmd.sProfile.." �� %[line:�� ?]|")
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\��\\�� $<%[mynick]> !"..tCmd.sProfile.." �� %[line:��, ��, ��?:)]|")

end

function Main()
frmHub:RegBot(tVar.sBot);
loadProfile();
end

function ChatArrival(user,data)
local data = string.sub(data,1,-2)
local s,e,sTrig,sCmd = string.find(data,"%b<>%s*(%S)(%S+)")
if sTrig == tVar.sPrefix then
local tScriptCmds = {
[tCmd.sHelp] = function(user,data)
local msgGreeting = "\r\n"
if (pUser[user.iProfile] == 1) then
msgGreeting = msgGreeting..tab.."::: ::: ::: �� ::: ::: ::: \r\n\r\n"
..tab.."�� - "..tVar.sPrefix..tCmd.sHelp.."\r\n"
..tab.."�� - "..tVar.sPrefix..tCmd.sProfile.."\r\n"
..tab.."�� - "..tVar.sPrefix..tCmd.sViewPro.."\r\n"
elseif (pAdmin[user.iProfile] == 1) then
msgGreeting = msgGreeting.."\r\n\r\n"..tab.."::: ::: ::: �� ::: ::: :::\r\n\r\n"
..tab.."�� /�� - "..tVar.sPrefix..tCmd.sDelPro.."\r\n"
end
user:SendPM(tVar.sBot,msgGreeting);
return 1;
end,

[tCmd.sProfile] =
function(user,data)
if not (pUser[user.iProfile] == 1) then return 1; end
local curUser = user.sName;
local _,_,Cmd1 = string.find(data,"%b<>%s+%S+%s+(%S+)");
if Cmd1 then
local _,_,Cmd2 = string.find(data,"%b<>%s+%S+%s+%S+%s+(%S+)");
if string.lower(Cmd1) == "��" and not tUserProfiles[curUser] then
   newProfile(curUser); user:SendPM(tVar.sBot,"*** �� ! �� , �� : "..tVar.sPrefix..tCmd.sProfile); sendRightClick(user,"update");
   elseif string.lower(Cmd1) == "��" then
   if Cmd2 then
if tUserProfiles[curUser][string.lower(Cmd2)] then
local _,_,Cmd3 = string.find(data,"%b<>%s+%S+%s+%S+%s+%S+%s+(.*)");
if Cmd3 == "*" then
      editProfile(curUser,string.lower(Cmd2)," "); user:SendPM(tVar.sBot,"*** �� : "..Cmd2.." - ");
elseif Cmd3 then
editProfile(curUser,string.lower(Cmd2),Cmd3); user:SendPM(tVar.sBot,"*** �� : "..Cmd2.." - "..Cmd3);
else
      user:SendPM(tVar.sBot,"*** ��! �� : "..tVar.sPrefix..tCmd.sProfile.." �� "..Cmd2.." <��>");
end
else
user:SendPM(tVar.sBot,showProfile(curUser,"profilecmds").."\r\n"..tab.."*** ��! �� "..tVar.sPrefix..tCmd.sProfile.." �� <��> <��>, * = �� .");
end
else
user:SendPM(tVar.sBot,showProfile(curUser,"user").."\r\n"..tab.."�� , �� \r\n"..tab.."�� :\r\n"..tab.." "..tVar.sPrefix..tCmd.sProfile.." �� <��> <��>\r\n"..tab.."* = �� .");
end
elseif string.lower(Cmd1) == "��" then
   if Cmd2 then
if string.lower(Cmd2) == "��" then
delProfile(curUser); user:SendPM(tVar.sBot,"*** �� !");
else
user:SendPM(tVar.sBot,"*** ��!! �� ! �� : "..tVar.sPrefix..tCmd.sProfile.." �� ");
end
else
   user:SendPM(tVar.sBot,"*** ��!! �� ! �� : "..tVar.sPrefix..tCmd.sProfile.." �� ");
end
else
user:SendPM(tVar.sBot,"*** ��! �� : "..tVar.sPrefix..tCmd.sProfile.." <��/��>");
end
else
if not tUserProfiles[curUser] then
user:SendPM(tVar.sBot,"*** � �� ! �� : "..tVar.sPrefix..tCmd.sProfile.." ��"); return 1;
else
user:SendPM(tVar.sBot,showProfile(curUser,"user").."\r\n"..tab.."�� \r\n"..tab.."�� : "..tVar.sPrefix..tCmd.sProfile.." <��/��>");
end
end
return 1;
end,

[tCmd.sViewPro] =
function(user,data)
if not (pUser[user.iProfile] == 1) then return 1; end
local _,_,Cmd1 = string.find(data,"%b<>%s+%S+%s+(%S+)");
if GetItemByName(Cmd1) then
user:SendPM(tVar.sBot,showProfile(Cmd1,"user"));
else
user:SendPM(tVar.sBot,showProfile(user,"allusers").."\r\n"..tab.."*** "..tVar.sPrefix..tCmd.sViewPro.." <��> �� . ***");
end
return 1;
end,

[tCmd.sDelPro] =
function(user,data)
if not (pAdmin[user.iProfile] == 1) then return 1; end
local _,_,Cmd1 = string.find(data,"%b<>%s+%S+%s+(%S+)");
if Cmd1 and GetItemByName(Cmd1) then
local _,_,Cmd2 = string.find(data,"%b<>%s+%S+%s+%S+%s+(%S+)");
if Cmd2 then
   if string.lower(Cmd2) == "��" then
   delProfile(Cmd1); user:SendPM(tVar.sBot,"*** �� "..Cmd1.." �� .");
   elseif tUserProfiles[Cmd1][string.lower(Cmd2)] then
   editProfile(Cmd1,string.lower(Cmd2)," "); user:SendPM(tVar.sBot,"*** �� "..Cmd2.." �� "..Cmd1.." �� .");
else
   user:SendPM(tVar.sBot,"*** ��! �� , �� - �� : "..tVar.sPrefix..tCmd.sDelPro.." "..Cmd1.." <��/��>");
end
   else
   user:SendPM(tVar.sBot,showProfile(Cmd1,"user").."\r\n"..tab.."*** �� \r\n"..tab.."�� '��', �� :\r\n"..tab..tVar.sPrefix..tCmd.sDelPro.." <��> <��/��>");
   end
else
   user:SendPM(tVar.sBot,"*** �� -�� : "..tVar.sPrefix..tCmd.sDelPro.." <��>");
end
return 1;
end,
}
if tScriptCmds[sCmd] then
return tScriptCmds[sCmd](user,data);
end
end
end

ToArrival = ChatArrival

function NewUserConnected(user)
sendRightClick(user,"new");
if string.lower(tVar.sSpam) == "on" and not tUserProfiles[user.sName] then
user:SendPM(tVar.sBot, "*** "..tVar.sMsgtoUsers)
end
end

function OnExit()
saveProfile();
end

function sendRightClick(user,type)
if type == "new" then
if user.bUserCommand then
   if (pUser[user.iProfile] == 1) and string.lower(tVar.sRCEnable) == "on" then
   user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\��$<%[mynick]> !"..tCmd.sHelp.."|")
         user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\��\\�� $<%[mynick]> !"..tCmd.sViewPro.."|")
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\��\\�� $<%[mynick]> !"..tCmd.sViewPro.." %[nick]|")
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\��\\�� ..$<%[mynick]> !"..tCmd.sViewPro.." %[line:�� ?]|")
if tUserProfiles[user.sName] then
MenuProfile(user)
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\��\\�� $<%[mynick]> !"..tCmd.sProfile.." ��|")
else
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\�� $<%[mynick]> !"..tCmd.sProfile.." ��|")
end
end
   if (pAdmin[user.iProfile] == 1) and string.lower(tVar.sRCEnable) == "on" then
         user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\��\\�� $<%[mynick]> !"..tCmd.sDelPro.." %[line:�� ?] ��|")
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\��\\�� $<%[mynick]> !"..tCmd.sDelPro.." %[line:�� ?] %[line:�� ?]|")
end
   end
elseif type == "update" then
--user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\��$<%[mynick]> !"..tCmd.sProfile.."|")
MenuProfile(user)
user:SendData("$UserCommand 1 3 "..tVar.sRCName.."\\�� \\��\\�� $<%[mynick]> !"..tCmd.sProfile.." ��|")
end
end

function showProfile(curUser,type)
local sMsg = "\r\n\r\n"..tab;
if type == "user" then sMsg = sMsg.."-= �� "..curUser.." =-\r\n\r\n";
elseif type == "profilecmds" then sMsg = sMsg.."-= �� "..curUser.." - �� =-\r\n\r\n";
elseif type == "all" or type == "allusers" then sMsg = sMsg.."-= �� =-\r\n\r\n"; end
if type == "user" then
if tUserProfiles[curUser] then
sMsg = sMsg..tab..string.rep("��",19).."\r\n"

sMsg = sMsg..tab.."��_�_��\t - "..tUserProfiles[curUser]["��_�_��"].."\r\n";
sMsg = sMsg..tab.."��_��\t - "..tUserProfiles[curUser]["��_��"].."\r\n";
sMsg = sMsg..tab.."��\t\t - "..tUserProfiles[curUser]["��"].."\r\n";
sMsg = sMsg..tab.."��\t\t - "..tUserProfiles[curUser]["��"].."\r\n";
sMsg = sMsg..tab.."icq\t\t - "..tUserProfiles[curUser]["icq"].."\r\n";
sMsg = sMsg..tab.."��_��\t - "..tUserProfiles[curUser]["��_��"].."\r\n";
sMsg = sMsg..tab.."��_��\t - "..tUserProfiles[curUser]["��_��"].."\r\n";
sMsg = sMsg..tab.."�_��\t\t - "..tUserProfiles[curUser]["�_��"].."\r\n";
sMsg = sMsg..tab.."��\t\t - "..tUserProfiles[curUser]["��"].."\r\n";
sMsg = sMsg..tab.."�_��\t - "..tUserProfiles[curUser]["�_��"].."\r\n";
sMsg = sMsg..tab.."��\t - "..tUserProfiles[curUser]["��"].."\r\n";
sMsg = sMsg..tab.."��\t - "..tUserProfiles[curUser]["��"].."\r\n";
sMsg = sMsg..tab.."��\t - "..tUserProfiles[curUser]["��"].."\r\n";
sMsg = sMsg..tab.."��\t - "..tUserProfiles[curUser]["��"].."\r\n";

sMsg = sMsg..tab..string.rep("��",19).."\r\n\r\n"
end
elseif type == "profilecmds" then
if tUserProfiles[curUser] then
   sMsg = sMsg..tab..string.rep("��",19).."\r\n"
   for sItem in pairs(tUserProfiles[curUser]) do
if sItem ~= "edited" then
sMsg = sMsg.."\t "..tVar.sPrefix..tCmd.sProfile.." �� "..sItem.." \t- "..tUserProfiles[curUser][sItem].."\r\n";
end
end
sMsg = sMsg..tab..string.rep("��",19).."\r\n\r\n"
end
elseif type == "allusers" then
if tUserProfiles ~= nil then
   sMsg = sMsg..tab..string.rep("��",19).."\r\n"
for sUser in pairs(tUserProfiles) do
if string.lower(tVar.sEdited) == "on" then
for sItem in pairs(tUserProfiles[sUser]) do
if sItem == "edited" and tUserProfiles[sUser][sItem] ~= "0" then
sMsg = sMsg.."\t �"..sUser.."\r\n";
end
end
else
sMsg = sMsg.."\t �"..sUser.."\r\n";
end
   end
   sMsg = sMsg..tab..string.rep("��",19).."\r\n\r\n"
end
end
return sMsg;
end

function editProfile(curUser,sItem,sValue)
if tUserProfiles[curUser] then
tUserProfiles[curUser][sItem] = sValue;
if tUserProfiles[curUser]["edited"] == "0" then tUserProfiles[curUser]["edited"] = "1"; end
saveProfile();
else
newProfile(curUser); saveProfile(); editProfile(curUser,sItem,sValue)
end
end

function delProfile(curUser)
tUserProfiles[curUser] = nil;
saveProfile();
end

function saveProfile()
for sUser in pairs(tUserProfiles) do
ProfileData[sUser] = {}
for sItem in pairs(tUserProfiles[sUser]) do
ProfileData[sUser][sItem] = tUserProfiles[sUser][sItem];
end
end
SaveToFile(tVar.sFolder.."/"..tVar.sFile,ProfileData,"ProfileData")
ProfileData = {};
end

Serialize = function(tTable,sTableName,hFile,sTab)
sTab = sTab or "";
hFile:write(sTab..sTableName.." = {\n");
for key,value in pairs(tTable) do
if (type(value) ~= "function") then
local sKey = (type(key) == "string") and string.format("[%q]",key) or string.format("[%d]",key);
if(type(value) == "table") then
Serialize(value,sKey,hFile,sTab.."\t");
else
local sValue = (type(value) == "string") and string.format("%q",value) or tostring(value);
hFile:write(sTab.."\t"..sKey.." = "..sValue);
end
hFile:write(",\n");
end
end
hFile:write(sTab.."}");
end

SaveToFile = function(file,table,tablename)
local hFile = io.open(file,"w+") Serialize(table,tablename,hFile); hFile:close();
end

Settings = {
sChar = { "-", " ", "i", "l", "r", "t", "I", "y", "o", },
}

tab = " "..string.rep(" ",string.len(tVar.sBot));

tUserProfiles = {}

OpDisconnected=UserDisconnected
OpConnected=NewUserConnected
===========================================================
�� , �� .
�� .

LOSTNORVL

mybb@mybb.ru (Constantin) — Sun, 15 Jun 2008 21:40:50 +0400

�� - ��
-------------------------------------------[ �� ]-----------------------------------------
�� (�� : ��)
�� dchub://91.146.48.45
�� 33 �� (��: 56)
�� 3 �� (��: 5)
�� 1110 ��
��.�� 0 ��
��. �� 0
��. �� 0
�� PtokaX
��
---------------------------------------------------------------------------------------------------
=========================[ �� ]=========================
�� -��-
�� -��-
��
��
=======================================================

Xab LOSTNORVL

Far Cry: War Zone � 43 ���������� / Far Cry: War Zone + 43 Mods / RU /

Video: �������� 2: ��������� / Nemesis 2: Nebula / 1995 / DVDRip

Video: ������ / Monster (2008) DVDRip

�����������/Primeval.S02E01-S02E07