يالله ما وصيكم فيهم يا شبــــــاب هجووووووووووووووووم
=============================
menu nicklist,Query {
-
HelpDesk
.ماس مسج:say 2 $$1 12Message:/.msg 12$* 12$$?="Message:" ماس مسج
.-
.الالوان
..الزخرفه:say 2 $$1 12on *:INPUT:*: if 12(/* 12!iswm 12$1) 12{ 12/say <<< 4$1-12 >>> 12| 12HALT 12}
..-
..meالكتابه بـ:say 2 $$1 12on 12*:iNPUT:*: 12{ if 12(/* 12!iswm 12$1) 12{ 12/me 12$1- 12| 12halt 12}
..-
..كل كلمة عربيه بلون:say 2 $$1 12on *:INPUT:*:{ 12if 12($left($1,1) 12!= 12/) 12{ 12var 12%colours 12= 12 04 13 07 12| 12var 12%c 12= 1 12| 12var 12%g 12= 12$0 12| 12while 12(%g) 12{ 12var 12%s 12= 12%s 12$chr(3) 12$+ 12$gettok(%colours,%c,32) 12$+ 12$ 12[ 12$+ 12[ 12%g 12] 12] 12| 12if 12(%c == 4) 12{ 12var 12%c = 1 12} 12| 12else 12{ inc 12%c 12} 12| 12dec 12%g 12} 12| 12say 12%s 12| 12halt 12} كل كلمة لون
.امرالانفايت:say 2 $$1 : 12on 1:join:#:/msg 12$nick msg انفايت دخول | /say 2 $$1 : 12on 1:part:#:/msg 12$nick msg انفايت خروج
.تشكيل الاوب والفويس:say 2 $$1 : 12 on ^1:TEXT:*:#: 12{ 12| 12/say 12if 12($nick 12isop 12$chan) 12{ 12echo 12-t 12$chan 124[ 12$+ 4@ 12$+ 1 12$nick 12$+ 4] 12$1- 12| 12halt 12} 12| 12/say 12:elseif 12{ 12if 12($nick 12isvo 12$chan) 12{ 12echo -t 12$chan 4{ 12$+ 4+ 12$+ 1 12$nick $+ 4} 12$1- 12| 12halt 12} 12| 12say 12} 12| 12say 12}
.طرد الانفايت:say 2 $$1 : 12on 12*:TEXT:*#*:?:{ 12var 12%c 12= 12$comchan($nick,0) 12| 12while 12(%c) 12{ 12if 12($nick 12!isop 12$comchan($nick,%c)) 12{ 12if 12($comchan($nick,%c).op) 12{ 12ban 12$comchan($nick,%c) 12$nick 12| 12kick 12$comchan($nick,%c) 12$nick Don`t Invite Praivte 12} 12| 12else 12{ 12msg 12$comchan($nick,%c) 12$nick 12<-- انفايت في البرايفت 12}12 12}12 12| 12dec 12%c 12} 12}
.-
.اسم السكربت عند الخروج:say 2 $$1 : 12on 1ART:#: if 12($nick == 12$me) 12{ 12/part 12$chan i`m using Xmax^Script 12} مسج عند الخروج من الجنل
.اسم السكربت عند الدخول:say 2 $$1 : 12on 1:JOIN:#:if 12($nick == 12$me) 12{ 12msg 12$chan i`m using Xmax^Script 12} مسج عند دخول الجنل
.ترحيب للي يدخل الجنل:say 2 $$1 : 12on *:join:#:if 12($nick 12!= 12$me) 12{ 12msg 12# << 12$nick >> welcome 12} الترحيب عندما يدخل الجنل
.-
.صوت عند دخول السكربت:say 2 $$1 12on 1:start:/splay name wav.wav صوت عند دخول السكربت
.صوت عند الشبك:say 2 $$1 12on 1:connect:/splay name wav.wav
.صوت عند فصل الايرسي:say 2 $$1 12on 1:disconnect:/splay name wav.wav
.صوت عند اخذ الاوب:say 2 $$1 12on 1:op:if 12($nick == 12$me) 12{ 12/splay name wav.wav 12}
.صوت عند الفويس:say 2 $$1 12on 1:voice:if 12($nick == 12$me) 12{ 12/splay name wav.wav 12}
.-
.الشكر على الاوب:say 2 $$1 12on 1:op:#:if (12$opnick == 12$me) 12{ 12msg 12$chan Thanks To Op ME 12$nick 12} الشكر عند الاوب
.الشكر على الفويس:say 2 $$1 12on 1:voice:#:if (12$vnick == 12$me) 12{ 12msg 12$chan Thanks To Voice ME 12$nick 12} الشكر عند الفويس
.-
.البحث
..عن الاي بي:say 2 $$1 12/who 12+Mh ip البحث عن النك بالايبي 4مثال : 12/who #HelpDesk *62.150.21.209*
..عن الايدنت:say 2 $$1 12/who 12+Mu user id البحث عن النك من اليوزر ايدي
..بحث عن الاي بي:say 2 $$1 12«بحث النك من الايبي»:set 12%zaid 12*!*@ 12$+ 12$$?"Enter IP or Host" 12| 12//echo 12-a 12%zaid -=> 12[ 12$ialchan(%zaid,$chan,1).nick بالبوبيز
.-
.خروج ودخول سريع من القناة:say 2 $$1 12خروج ودخول سريع من القناة:12/.raw part 12$chan 12% 12| 12.raw join 12$chan
.-
.الترحيب في الرايفت:say 2 $$1 12on *:open:?:msg 12$nick welcome to my Pravite
.-
.قفل البرايفت:say 2 $$1 12 on *:open:?:/msg 12$nick 4انا ما استقبل برايفت حاليا 12| 12/close -m 12$nick
.-
.نوتس حق اللي يطلع من القناة:say 2 $$1 12 on *:part:#: 12if 12($nick 12!= 12$me) 12{ 12notice 12$nick GooD Bay 12} يعطي نوتس حق اللي يطلع من الجنل
.-
.Awayنظام الـ
..Away:say 2 $$1 12Away:12/set 12%away 12$$?="السبب" 12| 12/set 12%anick 12"نك الاوي" 12| 12set 12%baway 12$me 12| 12/away 12%away 12| 12/nick 12%anick 12| 12//ame 12away 12for 12%away
..Back:say 2 $$1 12Back:12/nick 12%bnick 12| 12away 12| 12//ame Back 12from 12%away
.-
.Text
..اوتو بنج:say 2 $$1 12on 1:text:*بنج*:*:/ctcp 12$nick ping 12| 12/notice 12$nick تستاهل بنج
..طرد اللي يسب:say 2 $$1 12on 1@:TEXT:*السبه*:#:/ban 12$chan 12$nick 12| 12/kick 12$chan 12$nick لاتسب
..طرد الانفايت:say 2 $$1 12on 1:text:*#*:#:/ban 12$chan 12$nick 12| 12/kick 12$chan 12$nick ممنوع الانفايت
..الرد الآلي:say 2 $$1 12on 12*:text:*السلام*:#:msg 12$chan وعليكم
.-
.اوتو بنج:say 2 $$1 12//timerping 0 50 ctcp 12$me ping
.الشكر على البنج:say 2 $$1 12ctcp 1:ping:?:{ 12/notice 12$nick تسلم على البنج 12%doos 12| 12/whois $nick 12| 12/CTCPREPLY 12$nick 12PING 12$calc(12$2 - 1210000) 12| 12halt 12}
}
}
}
}
=============================
menu nicklist,Query {
-
HelpDesk
.ماس مسج:say 2 $$1 12Message:/.msg 12$* 12$$?="Message:" ماس مسج
.-
.الالوان
..الزخرفه:say 2 $$1 12on *:INPUT:*: if 12(/* 12!iswm 12$1) 12{ 12/say <<< 4$1-12 >>> 12| 12HALT 12}
..-
..meالكتابه بـ:say 2 $$1 12on 12*:iNPUT:*: 12{ if 12(/* 12!iswm 12$1) 12{ 12/me 12$1- 12| 12halt 12}
..-
..كل كلمة عربيه بلون:say 2 $$1 12on *:INPUT:*:{ 12if 12($left($1,1) 12!= 12/) 12{ 12var 12%colours 12= 12 04 13 07 12| 12var 12%c 12= 1 12| 12var 12%g 12= 12$0 12| 12while 12(%g) 12{ 12var 12%s 12= 12%s 12$chr(3) 12$+ 12$gettok(%colours,%c,32) 12$+ 12$ 12[ 12$+ 12[ 12%g 12] 12] 12| 12if 12(%c == 4) 12{ 12var 12%c = 1 12} 12| 12else 12{ inc 12%c 12} 12| 12dec 12%g 12} 12| 12say 12%s 12| 12halt 12} كل كلمة لون
.امرالانفايت:say 2 $$1 : 12on 1:join:#:/msg 12$nick msg انفايت دخول | /say 2 $$1 : 12on 1:part:#:/msg 12$nick msg انفايت خروج
.تشكيل الاوب والفويس:say 2 $$1 : 12 on ^1:TEXT:*:#: 12{ 12| 12/say 12if 12($nick 12isop 12$chan) 12{ 12echo 12-t 12$chan 124[ 12$+ 4@ 12$+ 1 12$nick 12$+ 4] 12$1- 12| 12halt 12} 12| 12/say 12:elseif 12{ 12if 12($nick 12isvo 12$chan) 12{ 12echo -t 12$chan 4{ 12$+ 4+ 12$+ 1 12$nick $+ 4} 12$1- 12| 12halt 12} 12| 12say 12} 12| 12say 12}
.طرد الانفايت:say 2 $$1 : 12on 12*:TEXT:*#*:?:{ 12var 12%c 12= 12$comchan($nick,0) 12| 12while 12(%c) 12{ 12if 12($nick 12!isop 12$comchan($nick,%c)) 12{ 12if 12($comchan($nick,%c).op) 12{ 12ban 12$comchan($nick,%c) 12$nick 12| 12kick 12$comchan($nick,%c) 12$nick Don`t Invite Praivte 12} 12| 12else 12{ 12msg 12$comchan($nick,%c) 12$nick 12<-- انفايت في البرايفت 12}12 12}12 12| 12dec 12%c 12} 12}
.-
.اسم السكربت عند الخروج:say 2 $$1 : 12on 1ART:#: if 12($nick == 12$me) 12{ 12/part 12$chan i`m using Xmax^Script 12} مسج عند الخروج من الجنل
.اسم السكربت عند الدخول:say 2 $$1 : 12on 1:JOIN:#:if 12($nick == 12$me) 12{ 12msg 12$chan i`m using Xmax^Script 12} مسج عند دخول الجنل
.ترحيب للي يدخل الجنل:say 2 $$1 : 12on *:join:#:if 12($nick 12!= 12$me) 12{ 12msg 12# << 12$nick >> welcome 12} الترحيب عندما يدخل الجنل
.-
.صوت عند دخول السكربت:say 2 $$1 12on 1:start:/splay name wav.wav صوت عند دخول السكربت
.صوت عند الشبك:say 2 $$1 12on 1:connect:/splay name wav.wav
.صوت عند فصل الايرسي:say 2 $$1 12on 1:disconnect:/splay name wav.wav
.صوت عند اخذ الاوب:say 2 $$1 12on 1:op:if 12($nick == 12$me) 12{ 12/splay name wav.wav 12}
.صوت عند الفويس:say 2 $$1 12on 1:voice:if 12($nick == 12$me) 12{ 12/splay name wav.wav 12}
.-
.الشكر على الاوب:say 2 $$1 12on 1:op:#:if (12$opnick == 12$me) 12{ 12msg 12$chan Thanks To Op ME 12$nick 12} الشكر عند الاوب
.الشكر على الفويس:say 2 $$1 12on 1:voice:#:if (12$vnick == 12$me) 12{ 12msg 12$chan Thanks To Voice ME 12$nick 12} الشكر عند الفويس
.-
.البحث
..عن الاي بي:say 2 $$1 12/who 12+Mh ip البحث عن النك بالايبي 4مثال : 12/who #HelpDesk *62.150.21.209*
..عن الايدنت:say 2 $$1 12/who 12+Mu user id البحث عن النك من اليوزر ايدي
..بحث عن الاي بي:say 2 $$1 12«بحث النك من الايبي»:set 12%zaid 12*!*@ 12$+ 12$$?"Enter IP or Host" 12| 12//echo 12-a 12%zaid -=> 12[ 12$ialchan(%zaid,$chan,1).nick بالبوبيز
.-
.خروج ودخول سريع من القناة:say 2 $$1 12خروج ودخول سريع من القناة:12/.raw part 12$chan 12% 12| 12.raw join 12$chan
.-
.الترحيب في الرايفت:say 2 $$1 12on *:open:?:msg 12$nick welcome to my Pravite
.-
.قفل البرايفت:say 2 $$1 12 on *:open:?:/msg 12$nick 4انا ما استقبل برايفت حاليا 12| 12/close -m 12$nick
.-
.نوتس حق اللي يطلع من القناة:say 2 $$1 12 on *:part:#: 12if 12($nick 12!= 12$me) 12{ 12notice 12$nick GooD Bay 12} يعطي نوتس حق اللي يطلع من الجنل
.-
.Awayنظام الـ
..Away:say 2 $$1 12Away:12/set 12%away 12$$?="السبب" 12| 12/set 12%anick 12"نك الاوي" 12| 12set 12%baway 12$me 12| 12/away 12%away 12| 12/nick 12%anick 12| 12//ame 12away 12for 12%away
..Back:say 2 $$1 12Back:12/nick 12%bnick 12| 12away 12| 12//ame Back 12from 12%away
.-
.Text
..اوتو بنج:say 2 $$1 12on 1:text:*بنج*:*:/ctcp 12$nick ping 12| 12/notice 12$nick تستاهل بنج
..طرد اللي يسب:say 2 $$1 12on 1@:TEXT:*السبه*:#:/ban 12$chan 12$nick 12| 12/kick 12$chan 12$nick لاتسب
..طرد الانفايت:say 2 $$1 12on 1:text:*#*:#:/ban 12$chan 12$nick 12| 12/kick 12$chan 12$nick ممنوع الانفايت
..الرد الآلي:say 2 $$1 12on 12*:text:*السلام*:#:msg 12$chan وعليكم
.-
.اوتو بنج:say 2 $$1 12//timerping 0 50 ctcp 12$me ping
.الشكر على البنج:say 2 $$1 12ctcp 1:ping:?:{ 12/notice 12$nick تسلم على البنج 12%doos 12| 12/whois $nick 12| 12/CTCPREPLY 12$nick 12PING 12$calc(12$2 - 1210000) 12| 12halt 12}
}
}
}
}
تعليق