PDA

عرض كامل الموضوع : أمر احتلال الغرف-IRCX



البرق
10-09-2003, 10:05 PM
بسم الله الرحمن الرحيم وبعد

صناعة أمر احتلال الغرفه و نمط كتابته يتوافق مع خوادم الIRCX وهو خاص ببرمجة الميرك

مكان وضع الأمر : aliases

شرح الأدوات :
$nick(#,0) إجمالي عدد الاشخاص بالغرفة
$nick(#,3) اسم ثالث شخص موجوده بالغرفة
$nick(#,1,q) اسم أول شخص مالك للقناة
set لتسجيل قيمة الى متغير محدد
access : وهو امر الاكسس
$1 : المدخل الاول
$str : وهو امر لتكرار المدخل الاول بعدد مرات المدخل الثاني
$str(a,5) ستكون النتيجة aaaaa
$calc أداة حسابية
$calc(5 - 1) ستكون النتيجة 4



صيغة الامر:
[code:1]massq-q {
var %i = 1
while (%i <= $nick($1,0,q)) { if ($nick($1,%i,q) != $me) set %massnick %massnick $nick($1,%i,q)
inc %i
}
.raw access $1 clear
.raw mode $1 - $+ $str(q,$calc($nick($1,0,q) - 1)) %massnick
.raw prop $1 ownerkey NewOwnerKey
unset %massnick
}[/code:1]

شرح الأمر :
هناك دالة دوران
بدأت من القيمة رقم واحد طلب منها ان يكون القيمه اقل من او يساوي عدد الاشخاص الاونرات بالقناة
إن كان عدد الاشخاص كذلك عندها سيتحقق الاسكريبت من أن الشخص المذكور ليس أنا "مستخدم الاسكريبت"
عندها
ستصبح قيمة
%massnick
اسم أول شخص للقناة مضافا اليها قيمة
%massnick ولكنها ستكون خالية

ستعاد الكرة ثانية
سيضاف الى
%massnick
قيمة
%massnick وهي المسجله بالأول
بالاضافة الى اسم ثاني شخص موجود بالقناة
%massnick اسم أول شخص اسم ثاني شخص
إلى ان ينتهي العداد بعدد الاعضاء الملاك

---------------------

/set %barq aaa
ستصبح قيمة
%barq aaa

/set %Helper bbb
ستصبح قيمة
%Helper bbb

set %Pro %barq %Helper
ستصبح قيمة
%Pro
في الفيرابولز التالي :
%Pro aaa bbb

عندما أريد اضافة مثلا
bbb
إلى
aaa
في المتغير
%barq

لتصبح في الفيرابولز التالي
%barq aaa bbb
لذلك سأقوم بكتابة هذه الصيغة
set %barq %barq bbb

وان اردت اضافة عليها الاحرف
ccc
سأقوم باضافتها الى المتغير الموجود الحالي
set %barq %barq ccc
ستصبح
%barq aaa bbb ccc

حيث تعني خلاصة التسجيل
سجل إلى المتغير الفلاني قيمة المتغير الفلاني "الذي هو نفسه" قيمته الحالية مضافا إليها القيمة المطلوبة

----------------------
و من ثم
سيقوم الاسكريبت بمسح الاكسس
ومن ثم سيقوم بإنزال هؤلاء الاونرات
حيث أن عدد
q
يجب ان تكون مساوية لعدد الاونرات ناقصاً واحد حيث لم أحسب نفسي بينهم

ومن ثم سيقوم بتغيير مفتاح الملكية
و بعدها سيقوم بمسح قيمة
%massnick

بعض الصور الخاطئة في صياغة أمر الاحتلال للقنوات
صورة :

[code:1]massq-q {
var %i = 1
while (%i <= $nick($1,0,q)) { set %massnick %massnick $nick($1,%i,q)
inc %i }
.raw access $1 clear
.raw mode $1 - $+ $str(q,$nick($1,0,q) %massnick
.raw prop $1 ownerkey : NewOwnerKey
unset %massnick
}[/code:1]

صورة :

[code:1]massq-q {
var %i = 1
while (%i <= $nick($1,0,q)) { if ($nick($1,%i,q) != $me) set %massnick $nick($1,%i,q)
inc %i
}
.raw access $1 clear
.raw mode $1 - $+ $str(q,$calc($nick($1,0,q) - 1)) %massnick
.raw prop $1 ownerkey NewOwnerKey
unset %massnick
}[/code:1]

صورة :
[code:1]massq-q {
var %i = 1
while (%i <= $nick($1,0,q)) { if ($nick($1,%i,q) != $me) set %massnick %massnick $nick($1,%i,q)
inc %i
}
.raw access $1 clear
.raw mode $1 - $+ $str(q,$nick($1,0,q)) %massnick
.raw prop $1 ownerkey NewOwnerKey
unset %massnick
}[/code:1]
صورة :

[code:1]massq-q {
var %i = 1
while (%i <= $nick($1,0,q) { if ($nick($1,%i,q) != $me) set %massnick %massnick $nick($1,%i,q)
inc %i
}
.raw access $1 clear
.raw mode $1 - $+ $str(q,$calc($nick($1,0,q) - 1)) %massnick
.raw prop $1 ownerkey NewOwnerKey
unset %massnick
}[/code:1]

صورة :

[code:1]massq-q {
var %i = 1
while (%i <= $nick($1,0,q)) { if ($nick($1,%i,q) != $me) set %massnick %massnick $nick($1,%i,q)
}
.raw access $1 clear
.raw mode $1 - $+ $str(q,$calc($nick($1,0,q) - 1)) %massnick
.raw prop $1 ownerkey NewOwnerKey
unset %massnick
}[/code:1]

صورة :

[code:1]massq-q {
var %i = 1
while (%i <= $nick($1,0,q)) { if ($nick($1,%i,q) != $me) set %massnick %massnick $nick($1,%i,q)
inc %i
}
.raw access $1 clear
.raw prop $1 ownerkey NewOwnerKey
.raw mode $1 - $+ $str(q,$calc($nick($1,0,q) - 1)) %massnick
unset %massnick
}[/code:1]


انتهى

البرق

السلطان
29-10-2003, 08:55 AM
البرق,

يسلموو اخوي البرق. .

مشكور على مشاركتك ومجهودك المميز. .

تحياتي

Dns
28-09-2004, 07:49 AM
ماشاء الله تبارك الله

الف شكر والله يعطيك العافية البرق