اوامر منوعه

[نيدو عسل]

السلام عليكم ارجو ان تقبلوا بي عضوا جديد لكم او هذي بعد الاوامر انشالله تفيدكم
--------------------------------
هذا امر الكتابه بالالوان بالريموت
#fofo off
on *:INPUT:*:{ if ($left($1,1) != /) { set %talk 1 | while (%talk <= $0) { var %say = $chr(3) $+ $gettok(02 03 04 05 06 07 76 34 08 09 10 11 12 13 14 15 16 17 8,$r(1,15),32) $+ $ [ $+ [ %talk ] ] %say | inc %talk } | say %say | halt } }
#fofo end
menu menubar,channel {
الكتابه بالالوان
.on:.enable #fofo
.off:.disable #fofo
}
---------------------------------
او هذا امر كشف كلون يعني اذا واحد دش بنكيين تصيدهم بالريموت
on *:join:#:{ if ($nick != $me) { if ($ial($address($nick,2),0) > 1) { set %clone.count [ $+ [ $nick ] ] $ial($address($nick,2),0) | :cloop | if (%clone.count [ $+ [ $nick ] ] < 1) { goto clend } | set %clecho %clecho ‡ $ial($address($nick,2), %clone.count [ $+ [ $nick ] ] ).nick ‡ | dec %clone.count [ $+ [ $nick ] ] | goto cloop | :clend | window @Clones | echo @clones Clones Detected: %clecho IP ›› $address($nick,2) ‹‹ $chan %next-s | echo @clones - } | unset %clecho* | unset %clone.count* } }
-------------------------------
هذا امر ترحيب بالبرايفت بالريموت
on *:OPEN:?:msg $nick [ WeLcoMe $nick TO My Privat ] [NeDO^^sL^SCRIPT]
-------------
بامر فلاش اول ما اتدش السكربت بالريموت
on 1:START: {
window -aohdp +f @dark $calc( ( $window(-1).w - 300 ) / 2 ) $calc( ( $window(-1).h - 200 ) / 2 ) 800 600 @dark
/drawfill @dark 1 1 1 12
set %coul_abs 255
/.timerdem -m 26 10 /aff_deb_abs

}
menu @dark {
sclick { if ( %dark == 1 ) { window -c @dark | unset %dark %coul_abs } }
}

alias aff_deb_abs {
/drawtext -rc @dark $rgb(%coul_abs,%coul_abs,%coul_abs) Tahoma 180 00 200 800 600 Welcome
dec %coul_abs 10
if ( %coul_abs < 0 ) { /.timerdem off | set %coul_abs 255 | /.timerdem -m 26 10 /aff_deb_abs2 }
}

alias aff_deb_abs2 {
/drawtext -rc @dark $rgb(%coul_abs,%coul_abs,%coul_abs) Tahoma 180 200 170 800 600 in
dec %coul_abs 10
if ( %coul_abs < 0 ) { /.timerdem off | set %coul_abs 255 | /.timerdem -m 26 1 /aff_deb_abs3 }
}

alias aff_deb_abs3 {
/drawtext -rc @dark $rgb(%coul_abs,%coul_abs,%coul_abs) Tahoma 190 00 200 800 600 Script
dec %coul_abs 10
if ( %coul_abs < 0 ) { /.timerdem off | set %coul_abs 255 | /.timerdem -m 26 1 /aff_deb_abs4 }
}

alias aff_deb_abs4 {
/drawtext -rc @dark $rgb(%coul_abs,%coul_abs,%coul_abs) Tahoma 190 00 200 800 600 WaLaDFLoS

dec %coul_abs 10 $mircdir\invite\button.bmp
if ( %coul_abs < 0 ) { /.timerdem off | set %coul_abs 255 | /.timerdem -m 26 1 /aff_deb_abs5 }
}

alias aff_deb_abs5 {
/drawtext -rc @dark $rgb(%coul_abs,%coul_abs,%coul_abs) Tahoma 190 00 200 800 600 in
dec %coul_abs 10
if ( %coul_abs < 0 ) { /.timerdem off | unset %coul_abs | /aff_deb_absfin }
}

alias aff_deb_absfin {
set %dark 1
/.timerdem -m 0 100 /aff_deb_absnj
/drawtext -c @dark 0 Tahoma 90 00 5 800 600 WaLaDFLoS
/drawtext -c @dark 0 Tahoma 100 0 20 800 600 script
/drawtext -c @dark 0 Tahoma 90 0 120 800 600 Nick: $me $+
/drawtext -c @dark 0 Tahoma 70 65 430 800 600 $day
/drawtext -c @dark 0 Tahoma 30 50 530 800 600 $time
}

alias aff_deb_absnj { if ( $window(@dark) == $null ) { /.timerdem off | halt } | /drawtext -rc @dark $rgb($rand(0,255),$rand(0,255),$rand(0,255)) Tahoma 150 220 250 800 600 [OK] }

----------------
انشالله تحووز على اعجابكم هالاوامر او مشكورين بااااااااي

[FAWAZ]

يعطيييك العافيه خيوو خوش اوامر الله تعجبك والله مشكور ما تقصر ان شاء الله نستفيد منكم بعد