MR.GRAND

ملاحظة ": نظرا لوجود خطأ او ( bug ) في آلية عمل كلمة سر اللوحة ... - تم رفع سكربت بديل بدون كلمة سر لقفل اللوحة قريبا إن شاء الله سيتم حل مشكلة كلمة السر وتنزيل أصدار جديد رابط تحميل النسخة المفتوحة ( بدون كلمة سر ) : http://www.mediafire.com/download/777j0 ... ss_v01.zip ____________________________________________

وظيفة المزارع ؟ يمكن مشن او ( مهمة ) بس وظيفة ؟! لو تبي المود هنا القسم الغلطء ولو تبي الأكواد ي حليلك لما تطلب كود وتبيه جاهز وش تستفيد غير الأعتماد على غيركء؟ حاول ونساعدك ي قلبيءءء

تم وضع رابط التحميل في الموضوع !!! لتحميل السكربت : http://www.mediafire.com/download/tlf04 ... em_v01.zip

حياك الله شكرا لتعليقك الرائع ورايك الصريح

function playerID() local check = executeSQLQuery( ' SELECT * FROM `BoughtUSERSsystem` ' ) if ( type(check) == "table" and #check ~= 0 ) then local playerIDcheck = check[1]['userID'] local playerSerial = getPlayerSerial(source) local value = math.random(1, 1000) -- خطا بزيادة سترنق مع سترنق if (playerIDcheck == nil) then playerID = (tostring(value) + playerSerial) else local value = value * math.random(1, 1000) -- playerID = tostring(value) + playerSerial --خطا بزيادة سترنق مع سترنق end else local value = math.random(1, 1000) local playerSerial = getPlayerSerial(source) playerID = getPlayerSerial(source) end end addEvent( 'NewPlayerBought', true ) addEventHandler( 'NewPlayerBought', root, function(BoutghType, BoutghPlan, BoutghPrice, cardType, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) local check = executeSQLQuery('SELECT * FROM `BoughtUSERSsystem` WHERE userSerial=?', getPlayerSerial(source)) if (type(check) == 'table' and #check ~= 0 and check) then local oldItemPlan = check[1]['boughtPlan'] if (oldItemPlan == BoutghPlan) then outputChatBox('* خطأ : #FFFFFF لقد قمت بشراء النوع والخطة التي حددتها مسبقا !', source, 255, 0, 0, true) triggerClientEvent( source, "ERRORselectedBUY", source ) return end playerID() local ID = playerID executeSQLQuery('INSERT INTO `BoughtUSERSsystem` (userSerial,userID,userName,boughtType,boughtPlan,boughtPrice,typeCard,CARD1,CARD2,CARD3,CARD4,CARD5,CARD6) VALUES(?,?,?,?,?,?,?,?,?,?,?,?,?)', getPlayerSerial(source), ID, getPlayerName(source), BoutghType, BoutghPlan, BoutghPrice, cardType, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) triggerClientEvent( 'UPDATEGRIDLIST', source) triggerClientEvent( source, 'SeccessfullySent', source) else playerID() local ID = playerID executeSQLQuery('INSERT INTO `BoughtUSERSsystem` (userSerial,userID,userName,boughtType,boughtPlan,boughtPrice,typeCard,CARD1,CARD2,CARD3,CARD4,CARD5,CARD6) VALUES(?,?,?,?,?,?,?,?,?,?,?,?,?)', getPlayerSerial(source), ID, getPlayerName(source), BoutghType, BoutghPlan, BoutghPrice, cardType, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) triggerClientEvent( 'UPDATEGRIDLIST', source) triggerClientEvent( source, 'SeccessfullySent', source) end end )

ابي مثال يالليل

ضبط لي الوضع هنا addEvent( 'NewPlayerBought', true ) addEventHandler( 'NewPlayerBought', root, function(BoutghType, BoutghPlan, BoutghPrice, cardType, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) local check = executeSQLQuery('SELECT * FROM `BoughtUSERSsystem` WHERE userSerial=?', getPlayerSerial(source)) if (type(check) == 'table' and #check ~= 0 and check) then local oldItemPlan = check[1]['boughtPlan'] local getSuchID = check[1]['userID'] if (oldItemPlan == BoutghPlan) then outputChatBox('* خطأ : #FFFFFF لقد قمت بشراء النوع والخطة التي حددتها مسبقا !', source, 255, 0, 0, true) triggerClientEvent( source, "ERRORselectedBUY", source ) return end local ID = math.random(1,100) if (ID == getSuchID) then local ID = math.random(1000,1000000) * 1000 / 100 end executeSQLQuery('INSERT INTO `BoughtUSERSsystem` (userSerial,userID,userName,boughtType,boughtPlan,boughtPrice,typeCard,CARD1,CARD2,CARD3,CARD4,CARD5,CARD6) VALUES(?,?,?,?,?,?,?,?,?,?,?,?,?)', getPlayerSerial(source), ID, getPlayerName(source), BoutghType, BoutghPlan, BoutghPrice, cardType, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) triggerClientEvent( 'UPDATEGRIDLIST', source) triggerClientEvent( source, 'SeccessfullySent', source) else local ID = 1 executeSQLQuery('INSERT INTO `BoughtUSERSsystem` (userSerial,userID,userName,boughtType,boughtPlan,boughtPrice,typeCard,CARD1,CARD2,CARD3,CARD4,CARD5,CARD6) VALUES(?,?,?,?,?,?,?,?,?,?,?,?,?)', getPlayerSerial(source), ID, getPlayerName(source), BoutghType, BoutghPlan, BoutghPrice, cardType, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) triggerClientEvent( 'UPDATEGRIDLIST', source) triggerClientEvent( source, 'SeccessfullySent', source) end end ) شايف local ID ? ابي كل لاعب له اي دي خاص فيه ولما يسوي العملية مرة ثانية وهو عنده بيانات بالقاعدة الاي دي حقه يتغير وأي لاعب مايملك أي دي حقه واي دي حق الاعب ابيه مايتشابه بالمرة اللي قبها "

مثال او شرح صغيرر عن الطريقة بالضبط

حياك الله , نورت ام الموضوع شكرا لمرورك الرائع

سلآم عليكم ي عيال ~~ أبي اسأل عن شغلة .! الحين لنفرض إني ابي اعطي لكل لاعب عند حدوث امر معين قيمة رقمية ماحد بالكون عنده نفس القيمة الرقمية اللي عطيتها للاعب المحدد اوك!؟ وابي عند حدوث امر ثاني أعطي للاعب اللي عطيته القيمة الرقمية فوق قيمة رقميه ثانية ماحد بالكون عنده نفس القيمة الرقمية اللي عطيتها له اول مرة وثاني مرة وابي القيمة الرقمية في كل مرة تتغير وماتجي نفس القيمة اللي عطيتها له قبل أتمنى احد يعطيني طريقة لعمل هالشيء

ههههه ثانكس ي مزز شكرا على التعليق الجميل

شكر لأقتراحك بصراحة فاتني لآكن الأصدارات الجدديدة من السكربت موجودة ^.^

السلام عليكم ورحمة الله تعالى وبركاته كيف الحال ؟ , عساكم طيبين ! واخيرا انتهينا من سكربت نظام الشراء الحصري !!! ابي تقييمكم واقتراحاتكم وكل اللي في عقلكم عن السكربت ملاحظة ": نظرا لوجود خطأ او ( bug ) في آلية عمل كلمة سر اللوحة ... - تم رفع سكربت بديل بدون كلمة سر لقفل اللوحة قريبا إن شاء الله سيتم حل مشكلة كلمة السر وتنزيل أصدار جديد رابط تحميل النسخة المفتوحة ( بدون كلمة سر ) : http://www.mediafire.com/download/777j0 ... ss_v01.zip ____________________________________________ - النسخة العادية رابط تحميل النظام : http://www.mediafire.com/download/tlf04 ... em_v01.zip صور النظـــام : اتمنى تقييم صريح ^ مجتمع MultiTheftAuto العربي | للمشاركة معنا | https://www.facebook.com/groups/luaprofessional/ للتواصل عبر السكايب حول السكربت او اشياء ثانيةء ! Skype : kamel1234128 في امان الله تعالى

تم حل المشكلة # يرجى اغلاق الموضوع , # Fixed by TOPIC Owner : addEvent( 'getCARDS', true ) addEventHandler( 'getCARDS', root, function(SERIAL_, ID) local checkPlayer = executeSQLQuery( ' SELECT * FROM `testBuyTable` WHERE userSerial=?', SERIAL_ ) if (checkPlayer) then end local checkID = executeSQLQuery( ' SELECT * FROM `testBuyTable` WHERE userID=?', ID ) local CARD1_ = checkID[1]['CARD1'] local CARD2_ = checkID[1]['CARD2'] local CARD3_ = checkID[1]['CARD3'] local CARD4_ = checkID[1]['CARD4'] local CARD5_ = checkID[1]['CARD5'] local CARD6_ = checkID[1]['CARD6'] local CARDtype_ = checkID[1]['typeCard'] triggerClientEvent(source, 'putNUMBERS', source, CARDtype_, CARD1_, CARD2_, CARD3_, CARD4_, CARD5_, CARD6_) end )

addEvent( 'NewPlayerBought', true ) addEventHandler( 'NewPlayerBought', root, function(BoutghType, BoutghPlan, BoutghPrice, STC, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) local check = executeSQLQuery( ' SELECT * FROM `testBuyTable` WHERE userSerial=? ', getPlayerSerial(source)) if ( type(check) == "table" and #check == 0 or not check) then executeSQLQuery( ' INSERT INTO `testBuyTable` (userSerial,userName,boughtType,boughtPlan,boughtPrice,typeCard,CARD1,CARD2,CARD3,CARD4,CARD5,CARD6) VALUES(?,?,?,?,?,?,?,?,?,?,?,?) ', getPlayerSerial(source), getPlayerName(source), BoutghType, BoutghPlan, BoutghPrice, STC, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) triggerClientEvent( 'UPDATEGRIDLIST', source) else local oldItemBought = check[1]['boughtType'] local oldItemPlan = check[1]['boughtPlan'] if (BoutghType == oldItemBought) and (oldItemPlan == oldItemPlan) then return outputChatBox('ERROR : You bought this item !') end executeSQLQuery( ' INSERT INTO `testBuyTable` (userSerial,userName,boughtType,boughtPlan,boughtPrice,typeCard,CARD1,CARD2,CARD3,CARD4,CARD5,CARD6) VALUES(?,?,?,?,?,?,?,?,?,?,?,?) ', getPlayerSerial(source), getPlayerName(source), BoutghType, BoutghPlan, BoutghPrice, STC, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) triggerClientEvent( 'UPDATEGRIDLIST', source) outputChatBox(STC) end end ) موضابطهةء الزبدهةء انه يجيب البيانات اللي رسلتها للقاعدة واللي مسجلة على سيريالي اول شي يعني لو رسلت بيانات ثانية مرة ثانية يجيب البيانات الأولى ومايجيب الثانية

انا مسوي كذا addEvent( 'NewPlayerBought', true ) addEventHandler( 'NewPlayerBought', root, function(BoutghType, BoutghPlan, BoutghPrice, STC, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) local check = executeSQLQuery( ' SELECT * FROM `testBuyTable` WHERE userSerial=? ', SERIAL_ ) if ( type(check) == "table" and #check == 0 or not check) then executeSQLQuery( ' INSERT INTO `testBuyTable` (userSerial,userName,boughtType,boughtPlan,boughtPrice,typeCard,CARD1,CARD2,CARD3,CARD4,CARD5,CARD6) VALUES(?,?,?,?,?,?,?,?,?,?,?,?) ', getPlayerSerial(source), getPlayerName(source), BoutghType, BoutghPlan, BoutghPrice, STC, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) triggerClientEvent( 'UPDATEGRIDLIST', source) else local oldItemBought = check[1]['boughtType'] local oldItemPlan = check[1]['boughtPlan'] if (BoutghType == oldItemBought) and (oldItemPlan == oldItemPlan) then return outputChatBox('ERROR : You bought this item !') end executeSQLQuery( ' INSERT INTO `testBuyTable` (userSerial,userName,boughtType,boughtPlan,boughtPrice,typeCard,CARD1,CARD2,CARD3,CARD4,CARD5,CARD6) VALUES(?,?,?,?,?,?,?,?,?,?,?,?) ', getPlayerSerial(source), getPlayerName(source), BoutghType, BoutghPlan, BoutghPrice, STC, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) triggerClientEvent( 'UPDATEGRIDLIST', source) outputChatBox(STC) end end )

معقول مافي ردء ؟!

حياك الله .. نورت الموضوع يالغالي

السلام عليكم كيف الحال ؟@ الحين احنا نشوف في اخر فترة شخص لغة جهازه عربي وشخص مسوي سكربت ولغة جهازه انجليزي , عندما عمل لوحة السكربت تمام ؟! يوم يجي اللي لغة جهازه عربي ويشوف السكربت اللي كتب ليبلاته وازراره الشخص اللي جهازه انجليزي يجي نص مخربط واشكال ورموز غير مفهومة .. هذي مشكلة الكل يعرفها لاكن في حل ؟! اللي يعرف حل لقولهء أو اللي معه طريقة تشفير UTF-8 مضمونة

معي لوحة شراء وابي لما يرسل معلومات ويبي يشتري مرة ثانية وهو مشتري شي ثاني من قبل لاكن الشي اللي اشتراه سابقا مايساوي نفس الشي اللي يبي يشتريه مرة ثانية تروح ارقام البطائق الجديدة للقاعدة وابي لما احدد على الاعب تجي الأرقام الجديدة موب القديمة ^

محاولة : CARDS = { } ; addEvent( 'NewPlayerBought', true ) addEventHandler( 'NewPlayerBought', root, function(BoutghType, BoutghPlan, BoutghPrice, STC, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) local CARD1_ = CARDS[source].CARDnumber1 local CARD2_ = CARDS[source].CARDnumber2 local CARD3_ = CARDS[source].CARDnumber3 local CARD4_ = CARDS[source].CARDnumber4 local CARD5_ = CARDS[source].CARDnumber5 local CARD6_ = CARDS[source].CARDnumber6 يجي expected to index field "?" ( a nil value ) بأول سطر من المتغيرات CARD

وضح اكثر + وين يطلع المعلومات ؟؟ كل المطلوب هو ^ لوحة شراء ولوحة إدارة المشتريات ^.^ لوحة الأدارة فيها قريد لست للاعبين اللي اشتروآ وكل شي مضبطه انا بس ابيه لما يشتري مرة ثانية ويدفع بطائق ويشتري حاجة ثانية تجي ارقام البطائق الجديدة موب القديمة ^

لنفرض أنه يبي يحط قيمة جديدة مو يستبدل القيمة القديمة بـ الجديدة