on 1:input:*:{
if ($left($1,1) = /) { return }
elseif (status !== $active) { say 4¤‰4…4&4…1 $1- 4…4&4…4¤‰1 | halt }
}
---------------
on *:iNPUT:*:if (/* !iswm $1) { /say 4…&…1 $1- 4…&…1 | HALT }
-لوضع الكلام بين الاقواس وزينه-
================================================== ==============================================
on 1:input:*: {
if ($left($1,1) = /) { return }
set %ryui $rand(1,3)
if (%ryui == 1) { msg $active 4^^^ $1- 4^^^ | halt }
if (%ryui == 2) { msg $active 4@@@ $1- 4@@@ | halt }
if (%ryui == 3) { msg $active 4!!! $1- 4!!! | halt }
if (%ryui == 4) { msg $active 4*** $1- 4*** | halt }
}
هذا على شان كل اشوي تتكلم ابطريقه
================================================== ================================================== ===========
on 1:join:#:{ msg $nick message }
on 1:part:#:{ msg $nick message }
-للانفايتات للجنل --للعزايم-
================================================== ===============================================
on *:join:#:{ .notice $nick message }
on 1:part:#:{ .notice $nick message }
-للنوتس في الجنل -- ترحيب-
================================================== ================================================== =
on 1:START { /splay namesound.wav }
on 1:open:?:{ /splay [NaMe Wav].wav
-تشغيل ويف اول ما يشتغل الايرسي-
================================================== ===============================================
on 1:TEXT:*الكلمه*:#:/ban $chan $nick | /kick $chan $nick عيب
-اذا احد سب ينطرد من الجنل-
================================================== ===============================================
on 1:start: {
echo الكلام او الترحيب
echo الكلام في السطر الثاني
-الترحيب اول ما يشتغل الايرسي-
================================================== ===============================================
on 1:op:#:if ($opnick = $me) { msg $chan Thanks $nick }
on 1:voice:#:if ($vonick = $me) { msg $chan Thanks $nick }
-شكر الشخص اللي عطاك فويس او اوووووووب-
================================================== ===============================================
on 1:CONNECT:{
/command
-الاوامر عند الاتصال بالايرسي-
================================================== ===============================================
on 1:ban:#: {
if $nick == chanserv { halt }
if ($banmask iswm $address($me,5)) {
raw -q mode $chan -ob+bb $nick $banmask $nick $address($nick,2) | raw -q kick $chan $nick لاتطردني
}
}
-لما احد يطردك ترد وتطرده-
================================================== ===============================================
on 1:JOIN:#: { if ($nick == $me) { /msg $chan الكلام اللي تبيه } }
-المسج اللي ينكتب اول ما تدش اي جنل-
================================================== ===============================================
on 1:TEXT:*الكلمه*:#:/msg $chan $nick الرد على الكلمه
-الرد الاوتو على الكلام اللي في العاميه-
================================================== ===============================================
on 1:OP:#:/cs why # $opnick
-للسؤال ليش ارتفع اوب بالجنل-
================================================== ================================================== ================================================== =================
on 1:JOIN:#: {
ban $chan $nick 4
kick $chan $nick You In MyBlackList
}
menu nicklist {
Black List
.Add:/.guser 28 $$1 3 | /ban $$1 3 | /kick # $$1 You add in Black List
.Remove:/.ruser 28 $$1 3 | /notice $$1 You del From Black List
.Clear All:/.rlevel 28 | /echo -a All nickname are remove
}
-هذا علشان البلاك لست مثل الاغنور-
================================================== ================================================== ================================================== ================
/Identd newIdent
-لوضع ايدينت جديد-
================================================== ================================================== ================================================== =================
on 1:TEXT:*#*:?:{ var %invito = $comchan($nick,0) | while (%invito) { if ($nick !isop $comchan($nick,%invito)) { if ($comchan($nick,%invito).op) { ban $comchan($nick,%invito) $nick | kick $comchan($nick,%invito) $nick لا اتسوي انفايت } | else { msg $comchan($nick,%invito) $nick <---- انفايت في البرايفت } } | dec %invito } | closemsg $nick }
-طرد النك لما يدزلك انفايت اوتو من السكربت-
================================================== ================================================== ================================================== =================
/raw part # دور | raw join #
-تطلع وتدش الجنل بسرعه علشان تصيد الانفاتات-
================================================== ================================================== ================================================== ==================
On 1:INPUT:*: {
if ($left($1,1) = /) { return }
elseif ($1 == lol) { msg $active loooooooooooool | halt }
}
-لما تكتب كلمه تطلع كلمة ثانيه-
================================================== ================================================== ================================================== ====================
/dccallow +nick
-للسماح لشخص باعطائك فايلات-
================================================== ================================================== ================================================== ========================
on 1:TEXT:*#*:?:{ var %c = $comchan($nick,0) | while (%c) { if ($nick !isop $comchan($nick,%c)) { if ($comchan($nick,%c).op) { ban $comchan($nick,%c) $nick | kick $comchan($nick,%c) $nick انفايت } | else { msg $comchan($nick,%c) $nick <-- هذا انفايت في البرايفت } } | dec %c } | closemsg $nick }
-علشان تعلم على الانفايتات اللي في البرايفت بالعاميه-
================================================== ================================================== ================================================== ===========================
On 1:TEXT:*#*:?: if ( $nick isop $comchan($nick,1) ) { halt } | if ( $nick isvo $comchan($nick,1) ) { halt } | timer 1 2 closemsg $nick | inc %fares 1 | ban $comchan($nick,1) $nick 2 | kick $comchan($nick,1) $nick InViTe KiCk
-طرد الانفايت بالبرايفت-
================================================== ================================================== ================================================== ===========================
on *:INPUT:#:if ($1 ison $chan) { say 9 $+ $left($1,1) $+ 9 $+ $mid($1,2,$calc($len($1) - 2)) $+ 9 $+ $right($1,1) $+ $2- | halt }
-هذا علشان الالوان-
================================================== ================================================== ================================================== ==================================
on 1:text:*:?: { msg $nick ما استقبل برايفت الحين }
-الرداوتو على اللي يدش عليك برايفت-
================================================== ================================================== ================================================== ===============================
on @*:JOIN:#:{
if (%clone-kick == on) {
if ($ialchan($address($nick,1),$chan,1).nick isop $chan) || ($ialchan($address($nick,1),$chan,1).nick isvo $chan) || ($ialchan($address($nick,2),$chan,2).nick isop $chan) || ($ialchan($address($nick,2),$chan,2).nick isvo $chan) { goto end }
if ($ialchan($address($nick,1),$chan,N) >= 2) {
goto kick
}
else { goto end }
:kick
ban $chan $ialchan($address($nick,1),$chan,2).nick 2
kick $chan $ialchan($address($nick,1),$chan,2).nick Clone Detected
kick $chan $ialchan($address($nick,2),$chan,2).nick Clone Detected
:end
}
}
menu channel {
Clones Kick
.ON:/set %clone-kick on | echo The clones Auto kick is now ON
.OFF:/set %clone-kick off | echo The clones Auto kick is now OFF
}
-هذا على شان الكلون-
================================================== ================================================== ===================================
on *:TEXT:*:#:{
inc %textflood. [ $+ [ $nick ] ] | .timer 1 6 unset %textflood. [ $+ [ $nick ] ]
if (%textflood. [ $+ [ $nick ] ] >= 4) {
if ($nick isop $chan) || ($nick isvo $chan) { halt }
if ($me isop $chan) { ban -u300 $chan $nick 3 | kick $chan $nick فلود }
else { .ignore -cu10 $nick 2 }
}
}
-طرد اللي يسوي فلود-
================================================== ================================================== ======================================
on 1:TEXT:*ping*:#:/ctcp $nick ping
-أعطاء بنج اوتو من السكربت -
================================================== ================================================== ===============================
#x on <=== هذا فوق الامر
#x end <=== وهذا تحته
menu channel
x الامر
فتح:/.enable #x
اغلاق:/.disable #x
على شان تحط للامر اون واوف -
================================================== ================================================== ==================================
on @*:JOIN:#: {
inc %joins. [ $+ [ $chan ] ]
.notice $nick Welcome to my channel, you are visitor number %joins. [ $+ [ $chan ] ]
}
================================================== ===
on 1:text:*#*:#:/ban $chan $nick | /kick $chan $nick ممنوع الانفايت
===============================================
on *:TEXT:*#*:?:{ var %c = $comchan($nick,0) | while (%c) { if ($nick !isop $comchan($nick,%c)) { if ($comchan($nick,%c).op) { ban $comchan($nick,%c) $nick | kick $comchan($nick,%c) $nick اطلع بره انفايت والله ذبحتني افففففف مليت لا تملق عاد } | else { msg $comchan($nick,%c) $nick <-- انفايت في البرايفت } } | dec %c } }
================================================== ======
on *:text:*#*:?:msg $nick الناس وصلت القمر وانت ليما الحين انفايت على العموم حياك بزبالة الاقنور | closemsg $nick
================================================== ========
on *:text:*!op*:*:/mode # +o $2-
================================================== =========
on *:CONNECT:{ /j اسم الجنل }
if ($left($1,1) = /) { return }
elseif (status !== $active) { say 4¤‰4…4&4…1 $1- 4…4&4…4¤‰1 | halt }
}
---------------
on *:iNPUT:*:if (/* !iswm $1) { /say 4…&…1 $1- 4…&…1 | HALT }
-لوضع الكلام بين الاقواس وزينه-
================================================== ==============================================
on 1:input:*: {
if ($left($1,1) = /) { return }
set %ryui $rand(1,3)
if (%ryui == 1) { msg $active 4^^^ $1- 4^^^ | halt }
if (%ryui == 2) { msg $active 4@@@ $1- 4@@@ | halt }
if (%ryui == 3) { msg $active 4!!! $1- 4!!! | halt }
if (%ryui == 4) { msg $active 4*** $1- 4*** | halt }
}
هذا على شان كل اشوي تتكلم ابطريقه
================================================== ================================================== ===========
on 1:join:#:{ msg $nick message }
on 1:part:#:{ msg $nick message }
-للانفايتات للجنل --للعزايم-
================================================== ===============================================
on *:join:#:{ .notice $nick message }
on 1:part:#:{ .notice $nick message }
-للنوتس في الجنل -- ترحيب-
================================================== ================================================== =
on 1:START { /splay namesound.wav }
on 1:open:?:{ /splay [NaMe Wav].wav
-تشغيل ويف اول ما يشتغل الايرسي-
================================================== ===============================================
on 1:TEXT:*الكلمه*:#:/ban $chan $nick | /kick $chan $nick عيب
-اذا احد سب ينطرد من الجنل-
================================================== ===============================================
on 1:start: {
echo الكلام او الترحيب
echo الكلام في السطر الثاني
-الترحيب اول ما يشتغل الايرسي-
================================================== ===============================================
on 1:op:#:if ($opnick = $me) { msg $chan Thanks $nick }
on 1:voice:#:if ($vonick = $me) { msg $chan Thanks $nick }
-شكر الشخص اللي عطاك فويس او اوووووووب-
================================================== ===============================================
on 1:CONNECT:{
/command
-الاوامر عند الاتصال بالايرسي-
================================================== ===============================================
on 1:ban:#: {
if $nick == chanserv { halt }
if ($banmask iswm $address($me,5)) {
raw -q mode $chan -ob+bb $nick $banmask $nick $address($nick,2) | raw -q kick $chan $nick لاتطردني
}
}
-لما احد يطردك ترد وتطرده-
================================================== ===============================================
on 1:JOIN:#: { if ($nick == $me) { /msg $chan الكلام اللي تبيه } }
-المسج اللي ينكتب اول ما تدش اي جنل-
================================================== ===============================================
on 1:TEXT:*الكلمه*:#:/msg $chan $nick الرد على الكلمه
-الرد الاوتو على الكلام اللي في العاميه-
================================================== ===============================================
on 1:OP:#:/cs why # $opnick
-للسؤال ليش ارتفع اوب بالجنل-
================================================== ================================================== ================================================== =================
on 1:JOIN:#: {
ban $chan $nick 4
kick $chan $nick You In MyBlackList
}
menu nicklist {
Black List
.Add:/.guser 28 $$1 3 | /ban $$1 3 | /kick # $$1 You add in Black List
.Remove:/.ruser 28 $$1 3 | /notice $$1 You del From Black List
.Clear All:/.rlevel 28 | /echo -a All nickname are remove
}
-هذا علشان البلاك لست مثل الاغنور-
================================================== ================================================== ================================================== ================
/Identd newIdent
-لوضع ايدينت جديد-
================================================== ================================================== ================================================== =================
on 1:TEXT:*#*:?:{ var %invito = $comchan($nick,0) | while (%invito) { if ($nick !isop $comchan($nick,%invito)) { if ($comchan($nick,%invito).op) { ban $comchan($nick,%invito) $nick | kick $comchan($nick,%invito) $nick لا اتسوي انفايت } | else { msg $comchan($nick,%invito) $nick <---- انفايت في البرايفت } } | dec %invito } | closemsg $nick }
-طرد النك لما يدزلك انفايت اوتو من السكربت-
================================================== ================================================== ================================================== =================
/raw part # دور | raw join #
-تطلع وتدش الجنل بسرعه علشان تصيد الانفاتات-
================================================== ================================================== ================================================== ==================
On 1:INPUT:*: {
if ($left($1,1) = /) { return }
elseif ($1 == lol) { msg $active loooooooooooool | halt }
}
-لما تكتب كلمه تطلع كلمة ثانيه-
================================================== ================================================== ================================================== ====================
/dccallow +nick
-للسماح لشخص باعطائك فايلات-
================================================== ================================================== ================================================== ========================
on 1:TEXT:*#*:?:{ var %c = $comchan($nick,0) | while (%c) { if ($nick !isop $comchan($nick,%c)) { if ($comchan($nick,%c).op) { ban $comchan($nick,%c) $nick | kick $comchan($nick,%c) $nick انفايت } | else { msg $comchan($nick,%c) $nick <-- هذا انفايت في البرايفت } } | dec %c } | closemsg $nick }
-علشان تعلم على الانفايتات اللي في البرايفت بالعاميه-
================================================== ================================================== ================================================== ===========================
On 1:TEXT:*#*:?: if ( $nick isop $comchan($nick,1) ) { halt } | if ( $nick isvo $comchan($nick,1) ) { halt } | timer 1 2 closemsg $nick | inc %fares 1 | ban $comchan($nick,1) $nick 2 | kick $comchan($nick,1) $nick InViTe KiCk
-طرد الانفايت بالبرايفت-
================================================== ================================================== ================================================== ===========================
on *:INPUT:#:if ($1 ison $chan) { say 9 $+ $left($1,1) $+ 9 $+ $mid($1,2,$calc($len($1) - 2)) $+ 9 $+ $right($1,1) $+ $2- | halt }
-هذا علشان الالوان-
================================================== ================================================== ================================================== ==================================
on 1:text:*:?: { msg $nick ما استقبل برايفت الحين }
-الرداوتو على اللي يدش عليك برايفت-
================================================== ================================================== ================================================== ===============================
on @*:JOIN:#:{
if (%clone-kick == on) {
if ($ialchan($address($nick,1),$chan,1).nick isop $chan) || ($ialchan($address($nick,1),$chan,1).nick isvo $chan) || ($ialchan($address($nick,2),$chan,2).nick isop $chan) || ($ialchan($address($nick,2),$chan,2).nick isvo $chan) { goto end }
if ($ialchan($address($nick,1),$chan,N) >= 2) {
goto kick
}
else { goto end }
:kick
ban $chan $ialchan($address($nick,1),$chan,2).nick 2
kick $chan $ialchan($address($nick,1),$chan,2).nick Clone Detected
kick $chan $ialchan($address($nick,2),$chan,2).nick Clone Detected
:end
}
}
menu channel {
Clones Kick
.ON:/set %clone-kick on | echo The clones Auto kick is now ON
.OFF:/set %clone-kick off | echo The clones Auto kick is now OFF
}
-هذا على شان الكلون-
================================================== ================================================== ===================================
on *:TEXT:*:#:{
inc %textflood. [ $+ [ $nick ] ] | .timer 1 6 unset %textflood. [ $+ [ $nick ] ]
if (%textflood. [ $+ [ $nick ] ] >= 4) {
if ($nick isop $chan) || ($nick isvo $chan) { halt }
if ($me isop $chan) { ban -u300 $chan $nick 3 | kick $chan $nick فلود }
else { .ignore -cu10 $nick 2 }
}
}
-طرد اللي يسوي فلود-
================================================== ================================================== ======================================
on 1:TEXT:*ping*:#:/ctcp $nick ping
-أعطاء بنج اوتو من السكربت -
================================================== ================================================== ===============================
#x on <=== هذا فوق الامر
#x end <=== وهذا تحته
menu channel
x الامر
فتح:/.enable #x
اغلاق:/.disable #x
على شان تحط للامر اون واوف -
================================================== ================================================== ==================================
on @*:JOIN:#: {
inc %joins. [ $+ [ $chan ] ]
.notice $nick Welcome to my channel, you are visitor number %joins. [ $+ [ $chan ] ]
}
================================================== ===
on 1:text:*#*:#:/ban $chan $nick | /kick $chan $nick ممنوع الانفايت
===============================================
on *:TEXT:*#*:?:{ var %c = $comchan($nick,0) | while (%c) { if ($nick !isop $comchan($nick,%c)) { if ($comchan($nick,%c).op) { ban $comchan($nick,%c) $nick | kick $comchan($nick,%c) $nick اطلع بره انفايت والله ذبحتني افففففف مليت لا تملق عاد } | else { msg $comchan($nick,%c) $nick <-- انفايت في البرايفت } } | dec %c } }
================================================== ======
on *:text:*#*:?:msg $nick الناس وصلت القمر وانت ليما الحين انفايت على العموم حياك بزبالة الاقنور | closemsg $nick
================================================== ========
on *:text:*!op*:*:/mode # +o $2-
================================================== =========
on *:CONNECT:{ /j اسم الجنل }
تعليق