مشكلة في مود شراء الرتب

[Mr.KoK]

السلام عليكم ورحمة الله وبركاته

كيفكم شباب انشاء الله بخير

عندي مشكلة في مود شراء الرتب

لما اشتري رتبه مثل مشرف1 يجيني في الشات مشرف1 تمام

لكن لما اشتري مشرف2 مايتغير

وانا ابي كود يحذف الرتبه الى قبلها انشاء الله فهمتوني

----------------------- 
-- ** Buy Admin's Script 
-- Created By Mr.Pres[T]ege 
-- Ver 1.0.0 
-- Mail : [email protected] 
-- [url=http://www.gta-arabs.com]www.gta-arabs.com[/url] 
---------------------- 
  
---------------------- 
-- Setting 
---------------------- 
  
local Key = "F7" 
  
local Admin = { 
{"V.I.P","15"}, 
{"King.Dirft","20"}, 
{"King.Of.Time","25"}, 
{"Police","35"}, 
{"Moderator1","45"}, 
{"Moderator2","55"}, 
{"SuperModerator1","75"}, 
{"SuperModerator2","100"}, 
{"Admin1","150"}, 
{"Head.Admin","250"}, 
  
} 
  
---------------------- 
-- Setting 
---------------------- 
  
  
GiveAdmin = { 
    Window = {}, 
    gridlist = {}, 
    button = {}, 
    label = {}, 
} 
  
function centerWindow(center_window) 
    local screenW,screenH=guiGetScreenSize() 
    local windowW,windowH=guiGetSize(center_window,false); 
    local x,y = (screenW-windowW)/2,(screenH-windowH)/2 
    guiSetPosition(center_window,x,y,false); 
end 
  
GiveAdmin.Window[1] = guiCreateWindow(343, 157, 427, 290, "ساعات الرتب #", false); 
centerWindow(GiveAdmin.Window[1]); 
guiSetVisible(GiveAdmin.Window[1],false); 
guiWindowSetSizable(GiveAdmin.Window[1], false); 
guiSetAlpha(GiveAdmin.Window[1], 1.00); 
guiSetProperty(GiveAdmin.Window[1], "CaptionColour", "FFFF00FF"); 
  
GiveAdmin.gridlist[1] = guiCreateGridList(9, 21, 409, 200, false, GiveAdmin.Window[1]); 
guiGridListAddColumn(GiveAdmin.gridlist[1], "الرتبة #", 0.6); 
guiGridListAddColumn(GiveAdmin.gridlist[1], "الساعات #", 0.2); 
GiveAdmin.button[1] = guiCreateButton(120,228,177,519, "اختيار الرتبة #", false, GiveAdmin.Window[1]); 
guiSetFont(GiveAdmin.button[1], "default-bold-small"); 
guiSetProperty(GiveAdmin.button[1], "NormalTextColour", "FF00FFFF"); 
  
  
for k,v in ipairs ( Admin ) do 
row = guiGridListAddRow(GiveAdmin.gridlist[1]); 
guiGridListSetItemText(GiveAdmin.gridlist[1],row,1,v[1],false,false); 
guiGridListSetItemText(GiveAdmin.gridlist[1],row,2,v[2],false,false); 
guiGridListSetItemColor(GiveAdmin.gridlist[1],row,1,255,0,255); 
guiGridListSetItemColor(GiveAdmin.gridlist[1],row,2,0,255,2550); 
guiSetFont(GiveAdmin.gridlist[1],"default-bold-small"); 
end 
  
xMainFunctions_ = function ( ) 
 local row, col = guiGridListGetSelectedItem ( GiveAdmin.gridlist[1] )  
local Group = tostring ( guiGridListGetItemText(GiveAdmin.gridlist[1],row,1 )); 
local Price = tostring ( guiGridListGetItemText(GiveAdmin.gridlist[1],row,2 )); 
local Name = tostring ( guiGridListGetItemText(GiveAdmin.gridlist[1],row,3 )); 
   if ( row and col and row ~= -1 and col ~= -1 ) then 
triggerServerEvent("Accept:the:request",localPlayer,Group,Price,Name); 
  else 
  outputChatBox("# الرجاء اختيار رتبة",255,0,255,true); 
  end 
end 
addEventHandler("onClientGUIClick",GiveAdmin.button[1],xMainFunctions_,false); 
  
xBindFunction_ = function () 
    guiSetVisible(GiveAdmin.Window[1],not guiGetVisible(GiveAdmin.Window[1])); 
    showCursor(guiGetVisible(GiveAdmin.Window[1])); 
end 
bindKey(Key,"down",xBindFunction_); 

[abu5lf]

ان شاء الله تكتب كذا وليس انشاء الله

[Mr.KoK]

شكرا

لكن ماعندك حل للمود

[ALw7sH]

تأكد من اسم القروب الي بالقريد لست لازم حتى نفس كل الاحرف الكبيره والصغيره وتأكد انه القروب موجود من اساس

والكود الثاني

  
aclGroupList -- loob 
aclGroupGetName 
aclGetGroup 
aclGroupRemoveObject 
  

[Mr.KoK]

كل شي تمام لكن اسم الرتبه مايطلع بل شات

حق الرتب تمام

انا اذا اشتريت اول شي مشرف 2 يجي بل شات مشرف 2 لكن لو بديت مثل كبار الشخصيات

بعدين ابي ارقي نفسي لل كنق الدرفت مايتغير يجلس كبار الشخصيات

لكن اذا شفتو من لوحة الادمن الرتبه موجوده لكن اسم الرتبه مايطلع بل شات

[ALw7sH]

كل شي تمام لكن اسم الرتبه مايطلع بل شات

حق الرتب تمام

انا اذا اشتريت اول شي مشرف 2 يجي بل شات مشرف 2 لكن لو بديت مثل كبار الشخصيات

بعدين ابي ارقي نفسي لل كنق الدرفت مايتغير يجلس كبار الشخصيات

لكن اذا شفتو من لوحة الادمن الرتبه موجوده لكن اسم الرتبه مايطلع بل شات

اها قصدك بالتاق؟

اذا قصدك كذا حط اكواد التاق حقك

[Mr.KoK]

سويت زي ما قلت مازبط ممكن تعدلي وخلاص

هذا ملف

الـClient

----------------------- 
-- ** Buy Admin's Script 
-- Created By Mr.Pres[T]ege 
-- Ver 1.0.0 
-- Mail : [email protected] 
-- [url=http://www.gta-arabs.com]www.gta-arabs.com[/url] 
---------------------- 
  
---------------------- 
-- Setting 
---------------------- 
  
local Key = "F7" 
  
local Admin = { 
{"V.I.P","15"}, 
{"King.Dirft","20"}, 
{"King.Of.Time","25"}, 
{"Police","35"}, 
{"Moderator1","45"}, 
{"Moderator2","55"}, 
{"SuperModerator1","75"}, 
{"SuperModerator2","100"}, 
{"Admin1","150"}, 
{"Head.Admin","250"}, 
  
} 
  
---------------------- 
-- Setting 
---------------------- 
  
  
GiveAdmin = { 
    Window = {}, 
    gridlist = {}, 
    button = {}, 
    label = {}, 
} 
  
function centerWindow(center_window) 
    local screenW,screenH=guiGetScreenSize() 
    local windowW,windowH=guiGetSize(center_window,false); 
    local x,y = (screenW-windowW)/2,(screenH-windowH)/2 
    guiSetPosition(center_window,x,y,false); 
end 
  
GiveAdmin.Window[1] = guiCreateWindow(343, 157, 427, 290, "ساعات الرتب #", false); 
centerWindow(GiveAdmin.Window[1]); 
guiSetVisible(GiveAdmin.Window[1],false); 
guiWindowSetSizable(GiveAdmin.Window[1], false); 
guiSetAlpha(GiveAdmin.Window[1], 1.00); 
guiSetProperty(GiveAdmin.Window[1], "CaptionColour", "FFFF00FF"); 
  
GiveAdmin.gridlist[1] = guiCreateGridList(9, 21, 409, 200, false, GiveAdmin.Window[1]); 
guiGridListAddColumn(GiveAdmin.gridlist[1], "الرتبة #", 0.6); 
guiGridListAddColumn(GiveAdmin.gridlist[1], "الساعات #", 0.2); 
GiveAdmin.button[1] = guiCreateButton(120,228,177,519, "اختيار الرتبة #", false, GiveAdmin.Window[1]); 
guiSetFont(GiveAdmin.button[1], "default-bold-small"); 
guiSetProperty(GiveAdmin.button[1], "NormalTextColour", "FF00FFFF"); 
  
  
for k,v in ipairs ( Admin ) do 
row = guiGridListAddRow(GiveAdmin.gridlist[1]); 
guiGridListSetItemText(GiveAdmin.gridlist[1],row,1,v[1],false,false); 
guiGridListSetItemText(GiveAdmin.gridlist[1],row,2,v[2],false,false); 
guiGridListSetItemColor(GiveAdmin.gridlist[1],row,1,255,0,255); 
guiGridListSetItemColor(GiveAdmin.gridlist[1],row,2,0,255,2550); 
guiSetFont(GiveAdmin.gridlist[1],"default-bold-small"); 
end 
  
xMainFunctions_ = function ( ) 
 local row, col = guiGridListGetSelectedItem ( GiveAdmin.gridlist[1] )  
local Group = tostring ( guiGridListGetItemText(GiveAdmin.gridlist[1],row,1 )); 
local Price = tostring ( guiGridListGetItemText(GiveAdmin.gridlist[1],row,2 )); 
local Name = tostring ( guiGridListGetItemText(GiveAdmin.gridlist[1],row,3 )); 
   if ( row and col and row ~= -1 and col ~= -1 ) then 
triggerServerEvent("Accept:the:request",localPlayer,Group,Price,Name); 
  else 
  outputChatBox("# الرجاء اختيار رتبة",255,0,255,true); 
  end 
end 
addEventHandler("onClientGUIClick",GiveAdmin.button[1],xMainFunctions_,false); 
  
xBindFunction_ = function () 
    guiSetVisible(GiveAdmin.Window[1],not guiGetVisible(GiveAdmin.Window[1])); 
    showCursor(guiGetVisible(GiveAdmin.Window[1])); 
end 
bindKey(Key,"down",xBindFunction_); 

وهذا ملف الـServer

----------------------- 
-- ** Buy Admin's Script 
-- Created By Mr.Pres[T]ege 
-- Ver 1.0.0 
-- Mail : [email protected] 
-- [url=http://www.gta-arabs.com]www.gta-arabs.com[/url] 
---------------------- 
xAddToGroupFunction_ = function ( Group,Price,Name ) 
    local account = aclGroupGetName(getPlayerAccount(source)); 
    if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("# الرجاء التسجيل اولا",source,255,0,255,true); end 
    if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("# لديك هذيه الرتبه الرجاء اختيار رتبه اخرا",source,255,0,255,true); end 
    local sValue = getElementData( source,'PlayTime' ) 
    if not sValue then sValue = '0:0:0' end 
    local data = split(sValue,':') 
    local hour = tonumber( data[1] )   
    if hour == nil or not tonumber(hour) then hour = 0 end 
    if ( hour >= tonumber(Price))  then 
        aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); 
        outputChatBox("# تهانينا تمت الترقيه بنجاح "..Name,source,255,0,255,true); 
    else 
        outputChatBox("# الرجاء اكمال التواجد",source,255,0,255,true); 
    end 
end 
addEvent("Accept:the:request",true) 
addEventHandler("Accept:the:request",root,xAddToGroupFunction_) 

[ALw7sH]

وش قصدك بالضبط الي سويته وماضبط انه اذا اخذ رتبه يحذف الباقي؟

[Mr.KoK]

حطيت الكود و سويت restart

للمود برضو مازبط