اوامر خفيفه وحلوه

[JeKaR^Bs^7LoOo]

شباب الحين بعطيكم اوامر حلوه وخفيفه وانشالله تعجبكم
هذا الامر تحطه بالريموت عشان تظيف جنلات اول ما يشبك يدخل عليهم
dialog ajoin {
title "Auto Join Channel"
size -1 -1 105 85
option dbu
button "OK", 1, 75 68 22 9, cancel
combo 2, 7 8 61 71, sort size
button "ADD", 3, 75 9 23 9
button "DEL", 4, 75 20 23 9
box "", 5, 3 1 69 81
box "", 6, 71 1 31 81
button "JOIN", 7, 75 38 23 9
button "Join All", 8, 75 49 23 9
}

on *:dialog:ajoin:sclick:3:{
if ($chr(35) isin $left($did(2),1)) did -a $dname 2 $did(2) | set %AutoJoin $didtok($dname,2,44)
if ($chr(35) !isin $left($did(2),1)) did -a $dname 2 $chr(35) $+ $did(2) | set %AutoJoin $didtok($dname,2,44)
}
on *:dialog:ajoin:INIT:*:didtok $dname 2 44 %AutoJoin
on *:dialog:ajoin:sclick:4:{
if ($did($dname,2).sel !== $null) {
if ($did($dname,2).sel > 1) set %autojoin $remove(%autojoin,$chr(44) $+ $did(ajoin,2).seltext)
if ($did($dname,2).sel == 1) set %autojoin $remove(%autojoin,$did(ajoin,2).seltext)

did -d $dname 2 $did($dname,2).sel
} }
on *:dialog:ajoin:sclick:7:{ JOIN $did($dname,2).seltext }
on *:dialog:ajoin:sclick:8:{ join %AutoJoin }
on *:connect:{ join %AutoJoin }
alias AutoJoin { dialog -m ajoin ajoin }
menu status,channel,menubar {
AutoJoin:AutoJoin
}
---------------------------------------------------------------------------
هذا الامر هم بالريموت عشان الاختصارات
On 1:INPUT:*: {
if ($left($1,1) = /) { return }
elseif ($1 == wb) { msg $active 7W15elcome 7B15ack | halt }
elseif ( $1 == np ) { msg $active 7N15o 7P15roblem | halt }
elseif ( $1 == brb ) { msg $active 7B15e 7R15ight 7B15ack | halt }
elseif ( $1 == tyt ) { msg $active 7T15ake 7Y15our 7T15ime | halt }
elseif ( $1 == bbl ) { msg $active 7B15e 7B15ack 7L15ater | halt }
elseif ( $1 == lol ) { msg $active 7L15aughs 7O15ut 7L15oud | halt }
elseif ( $1 == bbs ) { msg $active 7B15e 7B15ack 7S15oon | halt }
elseif ( $1 == gtg ) { msg $active 7G15ot 7T15o 7G15o | halt }
elseif ( $1 == afk ) { action is 7A15way 7F15rom 7K15eyboard | halt }
elseif ( $1 == nm ) { msg $active 7N15ever 7M15ind | halt }
elseif ( $1 == jk ) { msg $active 7J15ust 7K15idding | halt }
elseif ( $1 == back ) { msg $active 7I15`m 7B15ack | halt }
elseif ( $1 == ws ) { msg $active 7W15`715Salam | halt }
}
---------------------------------------------------------------------------
هذا مترجم + زخرفه
#moterjeem on
on 1:INPUT:*: {
if ($left($1,1) = /) { return }
if ($1 ison $chan) { return }
set %mote $rand(1,8)
if (%mote == 1) { set %tupac 6¤15§6¤06 $1- 6¤15§6¤ }
if (%mote == 2) { set %tupac 0,20,02,120,00,40,00,70,00,80, 00,70,00,40,00,120,00,212 $1- 0,20,02,120,00,40,00,70,00,80, 00,70,00,40,00,120,00,212 }
if (%mote == 3) { set %tupac 0,06,150,015,615,60,015,60,015,6 15,60,06,150,0 $1- 6 0,06,150,015,615,60,015,60,015,6 15,60,06,150,0 }
if (%mote == 4) { set %tupac 6§14¤15*06 $1- 15*14¤6§ }
if (%mote == 5) { set %tupac 6*14¤15*06 $1- 15*14¤6* }
if (%mote == 6) { set %tupac 0,6¼50,14½50,15¾50,14½5 0,6¼14 $1- 0,6¼50,14½50,15¾50,14½5 0,6¼ }
if (%mote == 7) { set %tupac 6»14«56»14« $1- »6«514»6« }
if (%mote == 8) { set %tupac 614¤6614¤6 $1- 614¤6614¤6 }
%tupac = $replace(%tupac,ذ,th)
%tupac = $replace(%tupac,د,d)
%tupac = $replace(%tupac,ح,7)
%tupac = $replace(%tupac,خ,`7)
%tupac = $replace(%tupac,ه,h)
%tupac = $replace(%tupac,ع,3)
%tupac = $replace(%tupac,غ,`3)
%tupac = $replace(%tupac,ف,f)
%tupac = $replace(%tupac,ق,g)
%tupac = $replace(%tupac,ث,th)
%tupac = $replace(%tupac,ص,9)
%tupac = $replace(%tupac,ض,`9)
%tupac = $replace(%tupac,ط,6)
%tupac = $replace(%tupac,ك,k)
%tupac = $replace(%tupac,م,m)
%tupac = $replace(%tupac,ن,n)
%tupac = $replace(%tupac,ت,t)
%tupac = $replace(%tupac,ا,a)
%tupac = $replace(%tupac,أ,a)
%tupac = $replace(%tupac,ب,b)
%tupac = $replace(%tupac,ي,e)
%tupac = $replace(%tupac,س,s)
%tupac = $replace(%tupac,ش,sh)
%tupac = $replace(%tupac,ظ,th)
%tupac = $replace(%tupac,ز,z)
%tupac = $replace(%tupac,و,w)
%tupac = $replace(%tupac,ة,t)
%tupac = $replace(%tupac,ى,y)
%tupac = $replace(%tupac,لا,la)
%tupac = $replace(%tupac,ر,r)
%tupac = $replace(%tupac,ؤ,o)
%tupac = $replace(%tupac,ء,a)
%tupac = $replace(%tupac,ئ,i)
%tupac = $replace(%tupac,ل,l)
%tupac = $replace(%tupac,ج,j)
%tupac = $replace(%tupac,آ,a)
%tupac = $replace(%tupac,إ,e)
msg $active %tupac
halt
}
#moterjeem end
menu channel,menubar {
&El Moterjem
.On:.enable #moterjeem | echo $active 6El Moterjem is Now ON
.Off:.disable #moterjeem | echo $active 6El Moterjem is Now OFF
}
----------------------------------------------------------------------------------
هذا الامر للشكر على الاوب و الفويس
on 1:op:#:{
set %opnik $rand(1,4)
if ($opnick == $me) && (%opnik == 1) { /msg $CHAN 7Th15â7nks 15F7ô15r 7The 15ô7p79 $nick }
if ($opnick == $me) && (%opnik == 2) { /msg $CHAN 2Th15â2nks 15F2ô15r 2The 15ô2p82 $nick }
if ($opnick == $me) && (%opnik == 3) { /msg $CHAN 3Th15â3nks 15F3ô15r 3The 15ô3p83 $nick }
if ($opnick == $me) && (%opnik == 4) { /msg $CHAN 4Th15â4nks 15F4ô15r 4The 15ô4p84 $nick }
}
;
ON 1:VOICE:#:{
set %vonik $rand(1,4)
if ($Vnick == $me) && (%vonik == 1) { /msg $CHAN 7Th15â7nks 15F7ô15r 7The 15v7ô15ï7ç15ê79 $nick }
if ($Vnick == $me) && (%vonik == 2) { /msg $CHAN 2Th15â2nks 15F2ô15r 2The 15v2ô15ï2ç15ê82 $nick }
if ($Vnick == $me) && (%vonik == 3) { /msg $CHAN 3Th15â3nks 15F3ô15r 3The 15v3ô15ï3ç15ê83 $nick }
if ($Vnick == $me) && (%vonik == 4) { /msg $CHAN 4Th15â4nks 15F4ô15r 4The 15v4ô15ï4ç15ê84 $nick }
}
وانشالله يعجبونكم هالجم امر


اخوكم جيكر بس حلو
JeKaR^Bs^7LoOo

[SauD]

يعطيك الف عافيه والله جيكر بس حلو علي هالاوامر الحلو والله

تسلم حبيب البي والله
بديت احب هالولد :)

[JeKaR^Bs^7LoOo]

thanks

مشكور حبيبي وتسلم على انك بديت تحبني وانشالله اعجبكم بالاوامر اليديده والي تبونه راح اصير بس شوي شوي












اخوكم جيكر بس حلو
JeKaR^Bs^7LoOo

[ابـوعبدالله]

كل شي بوقته حلوو

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


خوش برامــج للمبتدئين بصناعه السكربتات :) وانشالله الكل يستفيد حبيبي

[sosos]

هاااااااااااااااااااااي
كأني شفتها الحين بس اوامر مفيده منيييييح ومالها بسيطه
تشكر خوي

[JeKaR^Bs^7LoOo]

انت المنيح حبيبي :>